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