Create a gist now

Instantly share code, notes, and snippets.

What would you like to do?
Solution to Stack Overflow question 12702535
(define (unzip l)
(if (null? l) '(() ())
(let ((next (unzip (cdr l))))
(list (cons (car l) (cadr next)) (car next)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment