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

Let's count to 5

Name: Anonymous 2009-01-31 21:12

ac

Name: Anonymous 2009-02-02 16:11

hax :: String -> String

hax a | a  == "HaX mY aNuS" = [ b | b <- a, elem b ['A'..'Z']]

count :: String -> [String]

count a | a == "HaX mY aNuS" = do i <- [1..length (hax a)]

                                  [show i]

main = mapM_ putStrLn (count "HaX mY aNuS")

Newer Posts