Name: Anonymous 2009-10-21 12:28
Bram Moolenaar designed a programming language. Prepare to wear out your shift key.
http://www.zimbu.org/
http://www.zimbu.org/
make-fn fact|x|{
make-fn fact-iter|n,i|{
if equals i 0 then
return n
neth
else
call fact-iter (times n i) (subtract i 1) llac
esle
fi
} |i,n|reti-tcaf nf-ekam
call fact-iter x 0
} |x|tcaf nf-ekam