learning-sicp

My embarrassing half assed SICP run.
git clone https://kaka.farm/~git/learning-sicp
Log | Files | Refs

exercise-7.scm (381B)

      1 (define-library (sicp tests chapter-1 exercise-7)
      2   (import (scheme base)
      3           (scheme inexact)
      4           (srfi :64)
      5           (sicp solutions chapter-1 exercise-7))
      6 
      7   (begin
      8     (test-begin "chapter-1-exercise-7")
      9     (test-approximate
     10         (sqrt 4.0)
     11       (square-root 4.0)
     12       0.0001)
     13     (test-approximate
     14         (sqrt 9.0)
     15       (square-root 9.0)
     16       0.0001)))