no title added by logothesia on Sat Dec 16 21:09:53 2023

(let ((val (alist-ref var env)))
  (if val
      (reduce val)
      val))