tmurata https://blog.hatena.ne.jp/tmurata/ tmurataの日記 https://tmurata.hatenadiary.org/ SICP 修正した fixed-point (define (fixed-point f first-guess) (define (close-enough? v1 v2) (< (abs (- v1 v2)) tolerance)) (define (try guess) (let ((next (f guess))) (display next) (newline) (if (close-enough? guess next) next (try next)))) (try first-guess)) x |-> log(1000)/log(x) の不動点を探索することで (x^2) = 1000… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Ftmurata.hatenadiary.org%2Fentry%2F20090416%2F1239837905" title="SICP問題1.36 - tmurataの日記" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2009-04-16 08:25:05 rich https://tmurata.hatenadiary.org/entry/20090416/1239837905 1.0 100%