Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- (((lambda (f)
- ((lambda (proc)
- (f (lambda (arg) ((proc proc) arg))))
- (lambda (proc)
- (f (lambda (arg) ((proc proc) arg))))))
- (lambda (self)
- (lambda (ls)
- (if (null? ls) 0 (+ 1 (self (cdr ls)))))))
- '(a b c d e))
Add Comment
Please, Sign In to add comment
