[`(let ,(? symbol? name) ,bindings ,body ..1) (eval (named-let->combination exp) env)]
[`(let* ,bindings ,body ..1) (eval (let*->nested-lets exp) env)]
[`(letrec ,bindings ,body ..1) (eval (letrec->combination exp) env)]
[`(let ,(? symbol? name) ,bindings ,body ..1) (eval (named-let->combination exp) env)]
[`(let* ,bindings ,body ..1) (eval (let*->nested-lets exp) env)]
[`(letrec ,bindings ,body ..1) (eval (letrec->combination exp) env)]