3.63 もとのsqrt-stream (define (sqrt-stream x) (define guesses (cons-stream 1.0 (stream-map (lambda (guess) (sqrt-improve guess x)) guesses))) guesses) Louisのsqrt-stream (define (sqrt-stream x) (cons-stream 1.0 (stream-map (lambda (guess)…