'Define rat' diaporamas de présentation

(define <rat> <pair>) (define (make-rat <function>) (method ((n <integer>) (d <integer>))

(define <rat> <pair>) (define (make-rat <function>) (method ((n <integer>) (d <integer>)) (if (= d 0) (begin (print "zero denominator") (pair 0 1)) (pair n d)))) (define (numer <function>) head) (define (denom <function>) tail) Why not

203 views • 6 slides