Function: FUNLESS

Source

(defun funless (unless then)
  (fif (complement unless) then))