Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

Factorial in LISP



factorial 1->1; n->n*(factorial n-1)

compare to Haskell



factorial::Integer->Integer

factorial 0=1

factorial n=n*factorial(n-1)

>>27
Lisp:



f 1->1; n->n*(f n-1)

Forth:



: f 1+ 1 tuck +do i * loop ;

Newer Posts