理系学生日記

おまえはいつまで学生気分なのか

忍者TOOLS

2008-10-03から1日間の記事一覧

問題 3-69 (3.5.3 Exploiting the Stream Paradigm)

まずは,三つ組の無限ストリームを作る関数 triples.これであってんのかなー. (define (triples s t u) (cons-stream (list (stream-car s) (stream-car t) (stream-car u)) (interleave (stream-map (lambda (x) (cons (stream-car s) x)) (pairs t u)) (…

問題 3-68 (3.5.3 Exploiting the Stream Paradigm)

この pairs の実装はどこが間違っているのかという問題です. (define (pairs s t) (interleave (stream-map (lambda (x) (list (stream-car s) x)) t) (pairs (stream-cdr s) (stream-cdr t)))) 実際に走らせてみたところ,無限ループにハマってしまいまし…