* 1 ** 2 *** 7 **** ex 2 #+BEGIN_SRC scheme (lambda (m) (+ 1 (/ m 2.0))) #+END_SRC *** 8 #+BEGIN_EXAMPLE F_nk -> m * F_k #+END_EXAMPLE #+BEGIN_EXAMPLE F_16 -> m * F_4 987 -> 329 * 3 (/ 987 3.0) #+END_EXAMPLE #+BEGIN_SRC guile-repl scheme@(guile-user)> (fib-rangea 0 20) $2 = ((0 . 0) (1 . 1) (2 . 1) (3 . 2) (4 . 3) (5 . 5) (6 . 8) (7 . 13) (8 . 21) (9 . 34) (10 . 55) (11 . 89) (12 . 144) (13 . 233) (14 . 377) (15 . 610) (16 . 987) (17 . 1597) (18 . 2584) (19 . 4181) (20 . 6765)) #+END_SRC #+BEGIN_EXAMPLE (/ 2584 8) #+END_EXAMPLE