(let* ((v 2) (f (lambda () v))) (fluid-let ((v 5)) (f)))