Sujet : Or-Func, What is (make-list 3) good for? (besides Lazy-factorial) ???
De : HenHanna (at) *nospam* devnull.tb (HenHanna)
Groupes : comp.lang.lispDate : 18. Jun 2024, 22:35:30
Autres entêtes
Organisation : A noiseless patient Spider
Message-ID : <v4sr2j$1gg3l$3@dont-email.me>
User-Agent : Mozilla Thunderbird
1. Is there a better way to define Or-Func ?
2. (make-list x) works well here. What else is it good for?
3. What is (make-list 3) in MIT Scheme?
Should (length (make-list 3)) raise an Error?
(define (or-func2 x y) (or x y))
(define or-func (lambda x (fold or-func2 #t x)))
(define (fact x)
(fold * 1
(map or-func (make-list x) (lrange 1))))
(print (fact 0))
(print (fact 1))
(print (fact 3))
(print (fact 5))
(print (fact 10))