ï¼ãã®è¨äºã¯ Functional Ikamusume Advent Calendar jp 2010 ã®çºã«æ¸ããã¾ããï¼ ä¾µç¥ï¼ä¾µç¥ï¼ä¾µç¥ï¼ä¾µç¥ï¼ä¾µç¥ï¼ä¾µç¥ï¼ã¤ã«å¨ï¼ å帰ããªã¤ã«ï¼ main = putStrLn $ f 6 where f 0 = "ã¤ã«å¨ï¼" f n = "ä¾µç¥ï¼" ++ f (n-1) å¤é¢¨ã«å帰ããªã¤ã«ï¼ main = putStrLn $ f 6 where f 0 = "ã¤ã«å¨ï¼" f (n+1) = "ä¾µç¥ï¼" ++ f n 左派ãããªã¤ã«ï¼ main = putStrLn $ foldl (\a _ -> "ä¾µç¥ï¼"++a) "ã¤ã«å¨ï¼" [1..6] å³æ´¾ãããªã¤ã«ï¼ main = putStrLn $ foldr (\_ a -> "ä¾µç¥ï¼"++a) "ã¤ã«å¨ï¼" [1..6] å³æ´¾ã«è¦ãããã左派ãããªããï¼ main = putStrLn $
{{#tags}}- {{label}}
{{/tags}}