(define -ayalog '())

括弧に魅せられて道を外した名前のないプログラマ

2013-01-17から1日間の記事一覧

srfi-1のfilterってこんな感じ??

これの追記を書いたときに、srfi-1のfilterに興味持ったのでちょっと分かったことだけメモっとく。一般形としてはこんな感じかな?? (filter predicate list) なんか無名関数とか渡せるらしい (filter (lambda (x) (= (modulo x 2) 0)) (iota 100)) 自分で作…

エラトステネスの篩(Schemeで書きたかった)

なんとなく書いてみた。 (define (range m n) (cond ((> m n) ()) (else (cons m (range (+ m 1) n))))) (define (filter x l) (cond ((null? l) ()) ((= (modulo (car l) x) 0) (filter x (cdr l))) (else (cons (car l) (filter x (cdr l)))))) (define (s…