でseriesの戻り値がヘンと書いていたのですが、タイムリーにg000001さんのところにseriesの結果が変 - 'T - cadr groupってエントリが。asdf-installで入れると (subseries (series 'b 'c) 0 5) #Z(LIST B C LIST B) こうなっちゃうみたい。 まぁいいか。

Lisp、series-collectors編 Collectorsはseriesをはずして中身を取り出す ;; COLLECT-FIRST ITEMS &optional (DEFAULT NIL) [Function] ;; これは単純。 ;; 最初の要素取り出し (collect-first (scan-range)) ;;出力 ;;0 (collect-first #z()) ;;出力 ;;NIL …

Lisp、series-mapping編 mappingはseriesの加工。 ;; MAP-FN ;; いわゆるmap ;; MAP-FN TYPE FUNCTION &rest SERIES-INPUTS (map-fn 'integer #'(lambda (i) (1+ i)) (subseries (scan 'integer '(1 2 3 4 5)) 0 4)) ;; 出力 ;; #Z(2 3 4 5) ;;複数指定は例…

Lisp、series-scanners編 リファレンスを見ながらseriesのメソッド一通りみてみた。 Alterationはよくわかんなかったので飛ばしたけど。 えらく長いのでエントリを分けます。 まずはscannersから。 ;;seriseを使えるようにする (require 'series) (series::i…

(series::install) すればmap-fnを#M seriesを #Z でかけるんだー。しらなかった。 こんな感じ。 CL-USER> (require :series) ("SB-CLTL2" "SERIES") CL-USER> (series:collect (series:map-fn 'integer #'+ (series:scan '(1 2 3)))) (1 2 3) CL-USER> (ser…

seriesのリファレンス ふつーにあるじゃん。http://www.cs.cmu.edu/Groups/AI/html/cltl/clm/clm.html ここのContentsの http://www.cs.cmu.edu/Groups/AI/html/cltl/clm/node1.html 下の方にある http://www.cs.cmu.edu/Groups/AI/html/cltl/clm/node347.ht…

seriesで遅延評価されているか確認。 なんだかまたhaskellさわってみたくなってきた・・・。 前よりはわかること増えてるんじゃないかって思えるし。 ; SLIME 2006-11-26 CL-USER> ;;seriesで遅延評価の確認 ; No value CL-USER> (require :series) ("SB-CLT…

map-fnを#Mってかけそうな雰囲気なのにダメ・・・。 no dispatch function defined for #\Mだって。なんか勘違いしているのだろうか？？？

series入れてみた。 リファレンスどっかにないかなぁ。 ; SLIME 2006-11-26 CL-USER> (require :asdf) NIL CL-USER> (require :asdf-install) ("ASDF-INSTALL") CL-USER> (asdf-install:install :series) Install where? 1) System-wide install: System in …