0. #lang racket
1. (define (factorial n)
2.   (apply * (range 2 (add1 n))))
3.  
4. (factorial 70)

=>

11978571669969891796072783721689098736458938142546425857555362864628009582789845319680000000000000000