no title added by logothesia on Sat Dec 16 21:11:17 2023

(call/cc (lambda (k)
                (reduce (force (alist-ref var env eqv? (delay (k var)))))
                ))