Create a list of values from a set.
(to-list set) → list
Function:
(defun to-list (set) (declare (xargs :guard (setp set))) (let ((__function__ 'to-list)) (declare (ignorable __function__)) (tree-post-order (sfix set))))
Theorem:
(defthm true-listp-of-to-list (b* ((list (to-list set))) (true-listp list)) :rule-classes :rewrite)