in reply to Re^2: Calculate propabilities without recursion? Coin toss.
in thread Calculate propabilities without recursion? Coin toss.

Memoize (Attribute::Memoize) fac.
Btw: n!/k! = List::Util::reduce { $a * $b } $k+1 .. $n