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