#!/usr/bin/runghc

-- |
-- >>> fact26
-- 403291461126605635584000000
fact26 = product (take 26 [1..])

-- |
-- >>> fact66
-- 544344939077443064003729240247842752644293064388798874532860126869671081148416000000000000000
fact66 = product (take 66 [1..])