(faig-eval-list x env) evaluates an FAIG alist (an alist binding keys to FAIGs).
(faig-eval-alist x env) → *
The alist
Function:
(defun faig-eval-alist (x env) (declare (xargs :guard t)) (let ((__function__ 'faig-eval-alist)) (declare (ignorable __function__)) (cond ((atom x) nil) ((atom (car x)) (faig-eval-alist (cdr x) env)) (t (cons (cons (caar x) (faig-eval (cdar x) env)) (faig-eval-alist (cdr x) env))))))