Read an AIGER file into a collection of AIGs.
(aiger-read fname innames latchnames state) → (mv err latch-aigs out-aigs bad-aigs cnstr-aigs state)
Function:
(defun aiger-read (fname innames latchnames state) (declare (xargs :stobjs (state))) (declare (xargs :guard (and (stringp fname) (true-listp innames) (true-listp latchnames)))) (let ((__function__ 'aiger-read)) (declare (ignorable __function__)) (b* (((mv err latch-lits out-lits bad-lits cnstr-lits gates state) (aiger-parse fname state)) ((when err) (mv err nil nil nil nil state)) (- (sneaky-save 'innames innames) (sneaky-save 'latchnames latchnames) (sneaky-save 'latch-lits latch-lits) (sneaky-save 'out-lits out-lits) (sneaky-save 'bad-lits bad-lits) (sneaky-save 'cnstr-lits cnstr-lits) (sneaky-save 'gates gates)) ((mv latch-aigs out-aigs bad-aigs cnstr-aigs) (aiger-to-aigs innames latchnames latch-lits out-lits bad-lits cnstr-lits gates))) (mv nil latch-aigs out-aigs bad-aigs cnstr-aigs state))))