Advertisement
Guest User

Untitled

a guest
Feb 8th, 2016
59
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Scheme 0.13 KB | None | 0 0
  1. (define renverse (lambda (liste)
  2.   (if (null? liste)
  3.      '()
  4.      (append (renverse (cdr liste)) (list (car liste)))
  5.   )
  6. ))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement