(define-syntax let-zip (syntax-rules () ((_ symbols values body ...) `(let (,@(zip symbols values)) body ...)))) (let-zip '(x y z) '(5 10 15) (print "x: " x) (print "y: " y) (print "z: " z))