Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

facts

Name: Anonymous 2009-04-21 8:46

ITT: Your favourite implementation of fact.

Mine would be:
fact x = foldr (*) 1 $ takeWhile (/= 1) [x,x-1..]
I wrote it today :3

Name: HMA MEME FAN 2009-04-21 15:04

fact n = mapM_ putStrLn $ replicate n "HAX MY ANUS"

Name: REPLICATEM_ MEME FAN 2009-04-21 15:55

fact n = replicateM_ n $ putStrLn "HAX MY ANUS"

Newer Posts