Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (eval '((lambda-rec (sum n)
- (lazy-let [t 0]
- (lazy-let [f (+ n (sum (- n 1)))]
- (lazy-let [g (+ n (sum (- n 1)))]
- (if (= n 0) t (+ f g)))))) 10))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement