learning-sicp

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

exercise-15.scm (413B)

      1 (define-library (sicp tests chapter-1 exercise-15)
      2   (import (scheme base)
      3           (scheme eval)
      4           (scheme write)
      5           (scheme inexact)
      6           (srfi :64)
      7           (sicp solutions chapter-1 exercise-15))
      8 
      9   (begin
     10     (test-begin "chapter-1-exercise-15")
     11 
     12     (sine-times 12.15)
     13 
     14     (test-approximate
     15         (sin 12.15)
     16       (sine 12.15)
     17       0.01)
     18 
     19     (test-end "chapter-1-exercise-15")))