secret
Created

Solution to Stack Overflow question 12702535

  • Download Gist
gistfile1.scm
Scheme
1 2 3 4
(define (unzip l)
(if (null? l) '(() ())
(let ((next (unzip (cdr l))))
(list (cons (car l) (cadr next)) (car next)))))

Please sign in to comment on this gist.

Something went wrong with that request. Please try again.