A simplified version of 4v-sexpr-to-faig that constructs its own onoff list out of the variables of the sexpr.
(sfaig sexpr) → faig
Function:
(defun sfaig (sexpr) (declare (xargs :guard t)) (let ((__function__ 'sfaig)) (declare (ignorable __function__)) (b* ((vars (4v-sexpr-vars-1pass sexpr)) (onoff (num-varmap vars 0))) (4v-sexpr-to-faig sexpr onoff))))