Anonymous user
Generator/Exponential: Difference between revisions
→{{header|Common Lisp}}: -prog1
(→{{header|Common Lisp}}: -prog1) |
|||
Line 590:
(defun power-seq (n)
(let ((x 0))
(lambda ()
(defun filter-seq (s1 s2) ;; remove s2 from s1
|