(outnum->fanin n aignet) gets the fanin literal of primary output number
Logically this is
In the execution this is a stobj array lookup in the outputs array.
Function:
(defun aignet$a::outnum->fanin (out aignet) (declare (xargs :guard (and (natp out) (aignet$a::aignet-well-formedp aignet)))) (declare (xargs :guard (< out (aignet$a::num-outs aignet)))) (let ((__function__ 'aignet$a::outnum->fanin)) (declare (ignorable __function__)) (fanin 0 (lookup-stype out :po aignet))))