Names introduced by an event landmark.
(event-landmark-names event) → names
Each event landmark introduces zero or more names into the world.
See
Function:
(defun event-landmark-names (event) (declare (xargs :guard (pseudo-event-landmarkp event))) (let ((__function__ 'event-landmark-names)) (declare (ignorable __function__)) (let ((namex (access-event-tuple-namex event))) (cond ((equal namex 0) nil) ((consp namex) namex) (t (list namex))))))