Shorten

This library provides a short alias for lambda expression.  The idea come from “Gauche Devlog - Shorter names http://blog.practical-scheme.net/gauche/20100428-shorter-names” by Shiro.

Example

(map (^(x y) (+ x y)) '(1 2 3 4) '(1 2 3 4)) => (map (lambda (x y) (+ x y)) '(1 2 3 4) '(1 2 3 4))

(^a body ...) => (lambda (a) body ...)
(^b body ...) => (lambda (b) body ...)
...
(^z body ...) => (lambda (z) body ...)
(^_ body ...) => (lambda (_) body ...)

(^a* body ...) => (lambda a* body ...)
(^b* body ...) => (lambda b* body ...)
...
(^z* body ...) => (lambda z* body ...)
(^_* body ...) => (lambda _* body ...)