Re: Learning Lisp in Linux?

Liste des GroupesRevenir à cl lisp 
Sujet : Re: Learning Lisp in Linux?
De : No_spamming (at) *nospam* noWhere_7073.org (B. Pym)
Groupes : comp.lang.lisp
Date : 18. Jun 2024, 15:54:16
Autres entêtes
Organisation : A noiseless patient Spider
Message-ID : <v4s3i7$1cfk0$2@dont-email.me>
User-Agent : XanaNews/1.18.1.6
Pascal Costanza wrote:

 
(defun bang (n)
   (loop for x from 1 to n
         for r = 1 then (* x r)
         finally (return r)))

(define (bang n)
  (if (< n 2) 1 (* n (bang (- n 1)))))

(bang 5)
  ===>
120

Date Sujet#  Auteur
18 Jun 24 * Re: Learning Lisp in Linux?2B. Pym
18 Jun 24 `- Re: Learning Lisp in Linux? -- Bang, Lbang1HenHanna

Haut de la page

Les messages affichés proviennent d'usenet.

NewsPortal