;; -*- mode: lisp-data -*-

(print (funcall (let ((te 'a))
                    (lambda (b &optional (a te ap)) a)) 2 3))