10 lines
122 B
Racket
10 lines
122 B
Racket
#lang planet dyoo/whalesong
|
|
|
|
(define (f x)
|
|
(if (= x 0)
|
|
"one"
|
|
(* x (f (sub1 x)))))
|
|
|
|
(list (f 3)
|
|
(f 4))
|