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