(mbe-defrule mylet (((var val) ...) body ...) (funcall (lambda (var ...) body ...) val ...)) (mylet ((a 1) (b 2)) a ; => 1 b ; => 2 (+ a b)) ; => 3