Representation of any entry in a UDP table.
(vl-udpentry-p x) → bool
Function:
(defun vl-udpentry-p (x) (declare (xargs :guard t)) (let ((__function__ 'vl-udpentry-p)) (declare (ignorable __function__)) (mbe :logic (or (vl-udpsymbol-p x) (vl-udpedge-p x)) :exec (if (consp x) (vl-udpedge-p x) (vl-udpsymbol-p x)))))
Theorem:
(defthm vl-udpentry-p-when-vl-udpsymbol-p (implies (vl-udpsymbol-p x) (vl-udpentry-p x)))
Theorem:
(defthm vl-udpentry-p-when-vl-udpedge-p (implies (vl-udpedge-p x) (vl-udpentry-p x)))