[[1,2,3],[1,2,4],[1,2,5],[1,3,4],[1,3,5],[1,4,5],[2,3,4],[2,3,5], [2,4,5],[3,4,5]]

Functioal Programming IAT "関数型指数 (潜在的な関数型プログラミングの嗜好度) をはかる" だそうです．結果 あなたの関数型指数は 0.179482541761944 です。正が関数型、負が手続き型です。ということで関数型だそうです． これがどれくらいの大きさなの…

前回の改良バージョンを眺めていると組み合わせも簡単に作れることに気付く． takeOne のときに 前半を捨ててしまえばよさそうだ． takeOne' :: [a] -> [(a, [a])] takeOne' [] = [] takeOne' (x:xs) = (x, xs) : takeOne' xscomb :: Int -> [a] -> a comb _…