blob: 63d40781f7ba1605c256b9b47e82dc3a7aa6d689 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
* 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
|
