lbruder

(define (partial-apply proc . cargs) (lambda args (apply proc (append cargs args))))