Lah numbers: Difference between revisions

printf "Unsigned Lah numbers: L(n, k):\nn/k"

mapM_ (printf "%11d") ([0..12] :: [Word])

printf "\nMaximum value from the L(100, *) row:\n%d\n"

(maximum $ lah 100 <$> ([0..100] :: [Integer]))</lang>