C:\Users\Steve\Documents\Programming\Lisp\arc\arc3.1>"c:\Program Files (x86)"\racket\racket -f as.scm
Use (quit) to quit, (tl) to return here after an interrupt.
arc> (def factorial (n) (if (< n 2) 1 (* n (factorial (- n 1)))))
#<procedure: factorial>
arc> (factorial 50)
30414093201713378043612608166064768844377641568960512000000000000
arc>