Often faster alternative to 4v-sexpr-vars-list.
This uses the 4v-sexpr-vars-1pass strategy to gather variables from a list of sexprs.
Function:
(defun 4v-sexpr-vars-1pass-list (x) (declare (xargs :guard t)) (mbe :logic (4v-sexpr-vars-list x) :exec (b* (((mv seen vars) (4v-sexpr-vars-1pass-list-exec x nil nil))) (fast-alist-free seen) (set::mergesort vars))))