SRFI-1のiotaっぽいものをCommon Lispで書き直してみた（その3） - 新・日々録 by TRASH BOX@Eel
id:eel3:20090307:1236401934 のCommon Lisp版の自作iotaにはSchemeっぽさが残っているというか、Common Lispっぽさが足りていないと思う。 Schemeは末尾再帰の最適化が仕様に含まれているけどCommon Lispでは含まれていない、というのは有名な話で、だから末尾再帰を最適化してループに展開して欲しい場合は処理系依存の機能に頼ることになる。 しかしそんな軟弱な態度じゃマズイだろう、ということでCommon Lispではループ用のマクロが多用される*1。 ということで、ループマクロの勉強を兼ねて書き直してみた。 まずはdotimes。iotaの第1引数はcountという名前だから、やはり繰り返す回数が大切なんだろうと考えて、dotimes。 ; dotimes 版その01 ; let が余分な感じに見える (defun iota (co
Lispにおける最大値関数 - OKWAVE
とりあえず理由がわかればいいのですか? >: (6) is not a REAL このメッセージを見てわかる通り、 (> (car n) local_max) この比較をしているところの (car n)が、 エラーになるパターンだと (6) になってしまい、> (6) 4 という比較をしようとして エラーになっています。 ((a) b) の car は a じゃなくて (a)なので、 どうにかしてもう1枚皮をむきましょう。 てなヒントでよろしいでしょうか? ところで cond と if を混ぜて使うのは珍しいというか あまり見ないスタイルですね。 できればどっちかにした方が良いと思います。 今回の場合は cond が二分岐ですし。 ところで使っているLispの処理系はなんなのでしょうか?
LISPMEMO
LISPUSERLISPMEMOLisp isn't a language, it's a building material. -- Alan Kay 先日 ANSI Common Lisp の bfs がわかりにくい、という話があったので。 A -> B, C B -> C C -> D で、このようなネットワークの A から C までの最短経路を求める。 (defun shortest-path (start end net) (bfs end (list (list start)) net)) (defun bfs (end queue net) (if (null queue) nil (let ((path (car queue))) (let ((node (car path))) (if (eql node end) (reverse path) (bfs end (app
Sign in - Google Accounts
Not your computer? Use a private browsing window to sign in. Learn more about using Guest mode
ANSI Common Lisp の仕様書を HTML Help にした - てっく煮ブログ
Amazon から On Lisp の本も届き、On Lisp Web 版 と合わせて読み進めているのだけど、Common Lisp の知識がある前提で書かれていてつらい。こういうときは仕様書が頼り。Common Lisp の仕様書を探したら Franz Inc Product Documentation に発見。ANSI Specification のリンクをたどると ANSI Common Lisp に行き着く。まとめてダウンロードもできてありがたいんだけど、いかんせん生の HTML だと使い勝手が悪い。ということで、HTML Help（CHM）にしてみましたよっと。Alt-N→関数名→Enter で定義に行き着けて大変幸せ。読書効率があがりました。あとは理解していくだけ…。http://tech.nitoyon.com/misc/ansicl-chm.zip On Lisp作者: ポ
Page not found - ファイヤープロジェクト
The page you are trying to reach does not exist, or has been moved. Please use the menus or the search box to find what you are looking for.
Lisp 一夜漬け -- 2.リスト
■ Lisp におけるデータ型 ┏ アトム──┬ 数値 ┃ ├ 文字列 ┃ ├ シンボル ┃ └ nil ┗ リスト 数値などのように、データ型としてそれ以上分解できないものをアトム(atom「原子」の意)という。 アトムではないものをリストという。 リストはアトムまたはリストを束ねたものである。 リストを分解していくとアトムになる。 アトムの種類は、処理系による。 上に挙げたものはほぼすべての処理系に存在するだろう。 シンボル以外のアトムを評価するとそれ自身が評価結果となる。 前回、「数値345を評価すると345が結果となる」ということを述べた。 文字列も同様で、文字列を評価するとそれ自身が結果となる。 シンボルは変数名や関数名に使われるデータで、 シンボルを評価すると変数として代入された値を返す。 リストにも種類があって、「純リスト」と「純リストでないリスト」に分けられる。 他のプログ
Common LispでFizz-Buzz問題・総称関数を使って | へびにっき
総称関数の練習のために、Fizz-Buzz問題を総称関数を使って解いてみた。独自のメソッド結合まで使った、無駄に大掛かりな物になっている。 (defun strcat (&rest strings) (apply 'concatenate `(string ,@strings))) (define-method-combination strcat :identity-with-one-argument t) (defgeneric fizz-buzz-method (mod3 mod5) (:documentation "mod3が0ならFizz, mod5が0ならBuzz") (:method-combination strcat)) (defmethod fizz-buzz-method strcat ((mod3 (eql 0)) mod5) "Fizz") (defmethod
Modern Common Lisp
僕のブログで「Modern Common Lispはターゲットをどこに置いているのか」という質問をいただきました。最初は環境構築から始まっており、初心者向けに見えますが、次はHello, Worldもせずにライブラリの解説をしています。 Modern Common Lispのターゲットは、これからのCommon Lispを学びたい人です。当初はこの連載を読めばCommon Lispについてのすべてを学べるAll-In-One形式にしようと考えていたのですが、それでは時間がかかりすぎてしまうため、いくつかの過程を省いて進めます。たとえば、Lispでは必要なリスト処理などはここでは解説しません。理由は、それを学ぶための書籍が既に多く存在するからです。Common Lispの基本文法はそれらの書籍を参照してください。この連載は、Common Lispの入門書と並行、または読了後に読むことをおすす
ガベージコレクションの実装法と評価
1.はじめに プログラミング言語とはシステム化する対象物を抽象化し、コンピュータで処理可能なコードを記述するために用いる人工言語である。プログラミング言語はコンピュータの機械語と一対一の対応をもったアセンブラから始まり、コンパイラを用いて機械語に翻訳することを前提としたコンパイラ言語、インタプリタと呼ばれるプログラムがソースコードを解釈し実行するスクリプト言語と、記述できる抽象度を高める方向へと進化してきた。 プログラミング言語はその存在理由から、より抽象度の高い記述が行えること、すばやい開発を行える事が求められる。抽象度の高い記述とは、プログラムがどういう処理を行うか(HOW)ではなく何の処理を行うか(WHAT)を記述しやすい構文、機能を持っていることを、すばやい開発とは記述性の高さ、コードの密度の高さ、バグの発生しにくい構文、機能を持っていることをさす。 この抽象度の高い記述、すばやい
Let Over Lambda
Let Over Lambda (ISBN 978-1-4357-1275-1, 376+iv pp.) is one of the most hardcore computer programming books out there. Starting with the fundamentals, it describes the most advanced features of the most advanced language: COMMON LISP. The point of this book is to expose you to ideas that you might otherwise never be exposed to. This book is about macros, that is programs that write programs. Macro
畳み込み関数の比較 (fold / accumulate / inject / reduce) - blanket log
つーか、fold の弱点として、言語によって引数の順番がまちまちで、 正直憶えきれないってのがあるんだよな。誰か対応表とか作ってくれんもんか。 jijixi's diary - fold, map, for-each この中から一つ選ぶとしたらどれ？ 確かにいろいろとややこしいのでまとめてみました。 いくつかの言語について大雑把に表にすると次のような感じ。 言語 関数 Haskell, OCaml, Scheme, Erlang foldl* f init items C++ accumulate(begin, end, init, f) Ruby*, JavaScript items.inject(init, f) Python, Perl* reduce(f, items [, init]) 言語 畳み込む二項演算 Scheme(SRFI)*, Erlang f(item, acc)
Scheme演習
成績について Schemeの成績はレポートのみ(出席は取らない) レポートは完全にできていなくても提出できた分をそれなりに評価する 課題について 提出は hara2001-scheme ＠ ui.is.s.u-tokyo.ac.jp へメールで送ってください 送信されたE-mailに対して自動的に返信メールが送られます 添付ファイルではなくメール本文に直接貼ってください (ただしどうしても文字化けしてしまう人はテキストファイルを添付してください) Subjectは "Report (課題番号) 学生証番号" で送ってください 例: Report (1) 123456 課題の本文の先頭に Scheme演習 第1回レポート 理科I類2年 123456 須木 異夢 という形式で名前等を書いてください 締め切りは次のScheme演習の前日 授業で出題する前に課題を提出してもかまいません (質問も受
リリース、障害情報などのサービスのお知らせ
最新の人気エントリーの配信
j次のブックマーク
k前のブックマーク
lあとで読む
eコメント一覧を開く
oページを開く
)
Format (Common Lisp) - Wikipedia
Tumblr
http://ir.kyokyo-u.ac.jp/dspace/bitstream/123456789/3650/1/S007v83p45-61_satake.pdf
総称関数
https://jp.techcrunch.com/2011/10/25/20111024creator-of-lisp-john-mccarthy-dead-at-84/
「LISP」が7月31日の渋谷AXでのライブをもって活動を休止 - hogehoge速報
"unfold" for common lisp?