Lisp study
- 2. ( 始める前に注意点 ( Lispそこまで詳しくない ) ( 途中いきつまる可能性がある ) ) → みんなで教え合って解決していきたい
- 3. 準備 • Emacs もしくは xyzzy のインストール できてますか？
- 4. 勉強会の流れ
- 5. Lispの考え方 Lispの文法 Lispの演習 Emacs,xyzzy カスタマイズ
- 6. Lisp 考え方
- 7. Lispの二大重要単語 リスト （list） リストとは括弧で 括ったもの アトム 例 (atom) (emacs vim xyzzy) ("睦月" "如月" "弥生" "卯月")
- 8. リストの中にあるものがアトム コレ アトム 例 (atom) (emacs vim xyzzy) ("睦月" "如月" "弥生" "卯月")
- 10. S式 リスト アトム （list） (atom)
- 11. Lisp 文法 +演習
- 12. 基本 リストで括って作る。 Lispの由来 「List Programing」
- 14. (関数名 引数１ 引数2 …) 関数以外のものは シングルクォーテーションを 例 つける。 （car ‘(a b)) 関数 car
- 15. 関数を入れ子構造で書いて使っていく。 (関数2 (関数1 引数１ 引数２ …)) ※使う関数が増えると括弧が複雑になるので注意
- 16. Lisp基本関数 car cdr cons
- 17. car 関数の紹介 (car ‘(helloworld goodbyeworld world)) を動かしてみてください ① scratchバッファを選んで プログラムを入力 ② ctrl J プログラム入力直後のこの 位置にカーソルを置く！
- 18. car関数 (helloworld goodbyeworld world) 先頭要素を取り出す関数 helloworld
- 19. 演習問題 先ほどの演習をもとに次のリストから Appleを取り出してください。 ((Apple) Banana Orange) ※注意点 リストの先頭にシングルクォーテーションを付ける。 実行は ctrl J です。
- 20. • 回答 (car (car ‘((Apple) Banana Orange)))
- 21. cdr関数の紹介 演習 (cdr ‘((Apple) Banana Orange)) を動かしてみてください carの残りをリストで返す (Banana Orange)
- 22. 演習問題 これまでの演習をもとに次のリストから Bananaもしくは(Banana)を取り出してください。 ((Apple Banana) Orange) ※注意点 リストの先頭にシングルクォーテーションを付ける。 実行は ctrl J です。
- 23. • 回答 (car (cdr (car '((Apple Banana) Orange)))) (cdr (car '((Apple Banana) Orange)))
- 24. setq関数の紹介 (car (cdr (car '((Apple Banana) Orange)))) …だんだんと長くなってきて読みにくい。 そうだ！変数宣言だ。 (setq x '((Apple Banana) Orange)) (car (cdr (car x)))
- 25. cons関数の紹介 演習 (cons ‘a ‘((Apple) Banana Orange)) を動かしてみてください 一つ目の引数アトムを先頭に 加えたリストを返す (a (Apple) Banana Orange) ※注意点 (cons atom list) のように一つ目の引数をアトム 二つ目の引数をリストとする。
- 26. 演習問題 事前に (setq s ‘Apple) (setq l ‘(Banana (Orange Grape))) として、変数宣言してください。 これまでに紹介した関数 「car」「cdr」「cons」 を用いて、上で宣言した二つの変数から、 (Apple Orange) というリストを返すプログラムを作ってください。
- 27. • 回答 (setq s 'Apple) (setq l '(Banana (Orenge Grape))) (cons s (cdr (car (cdr l))))
- 28. 条件式関係の関数などの紹介 cond t null or eq nil
- 29. eq 引数二つが同じものか確かめる関数 (eq ‘a ‘a) → t or 引数のどれかが t の時 t を返す (or (eq ‘a ‘a ) (eq ‘a ‘b )) → t cond 条件式
- 31. cond関数の紹介 ① (setq l ‘(Apple Banana Orenge)) ② (setq l ‘(Banana Orenge)) ③ (setq l ‘(Orenge Banana)) (cond ((eq (car l) ‘Apple) t) ①の時 t を返す！ ((eq (car l) ‘Banana) (car l)) ②の時 Bananaを返す！ (t nil)) ③の時 nil を返す！ C言語のswitch-Case文でいうdefault文
- 32. 関数を作る関数の紹介 defun関数 (defun 関数名 (引数) 処理 )
- 35. • 回答 (defun seconder (l) (car (cdr l)) )
- 36. null関数の紹介 • null関数はリストが空の時 t を返す (null ‘()) • 加えて、nilが引数の時 t を返す (null nil)
- 37. • 再起関数を作ろう！
- 38. 問題 一つ目の引数アトムが 二つ目の引数リストにある場合t を返す関数 member1を作ってください 。 S…’apple l…’(apple banana orange) (defun member1 (s l) の時はtを返す null…リストが空の時 t (cond ((null l) nil) (t (or (eq (car l) s) (member1 s (cdr l)) ))))
- 40. Emacs , xyzzy の カスタマイズ
- 41. カスタマイズに必要なこと 1. 豊富なEmacs,xyzzy関数を扱うことが必要 define-key beginning-of-buffer … etc 2. カスタマイズファイルが必要 ~/.emacs ~/.xyzzy 3. デバッグが必要 scratchバッファを使う
- 42. キーボードの設定 必要な関数 global-set-key キーを設定する関数 (global-set-key "¥C-h" 'delete-backward-char) もしうまく動かなかったら (define-key global-map (kbd "C-h") 'delete-backward-char)
- 43. エディタを開いた状態で ctrl x を押してください そのあとに F を押してください パスは関係ないとして、上のようにパスと ファイル名 .xyzzyもしくは、.emacsと書いてください。
- 44. • さきほどscratchに書いたキーボードの設定を .xyzzy、.emacsに書いておくことで 次回からC-hでbackspaceが使えます。