2.33
(cons (p x) y)seq2 seq1(lambda (x y) (+ 1 y))
2.34
(+ this-coeff (* higher-terms))
2.35
(define (my-count-leaves t) (accumulate + 0 (map (lambda (x) (cond ((null? x) 0) ((pair? x) (my-count-leaves x)) (else 1)))
本文共 347 字，大约阅读时间需要 1 分钟。
2.33
(cons (p x) y)seq2 seq1(lambda (x y) (+ 1 y))
2.34
(+ this-coeff (* higher-terms))
2.35
(define (my-count-leaves t) (accumulate + 0 (map (lambda (x) (cond ((null? x) 0) ((pair? x) (my-count-leaves x)) (else 1)))
转载于:https://my.oschina.net/guzhou/blog/732275