(aig-or-lists x y) pairwise ors together the AIGs from the
lists
(aig-or-lists x y) → aig-list
Function:
(defun aig-or-lists (x y) (declare (xargs :guard t)) (let ((__function__ 'aig-or-lists)) (declare (ignorable __function__)) (if (or (atom x) (atom y)) nil (cons (aig-binary-or (car x) (car y)) (aig-or-lists (cdr x) (cdr y))))))