18/12/05 18:37:54.50 mPAQrzgG.net
0､1の組み合わせをHaskellだと１行でつくっちゃうなぁ。
遅延評価なのでメモリ不足に陥りにくい。
for loop頭には難解
zeroOne n = (!! n) $ iterate (\x-> [a:b|a<-[0,1],b<-x]) [[]]
18/12/05 18:37:54.50 mPAQrzgG.net
0､1の組み合わせをHaskellだと１行でつくっちゃうなぁ。
遅延評価なのでメモリ不足に陥りにくい。
for loop頭には難解
zeroOne n = (!! n) $ iterate (\x-> [a:b|a<-[0,1],b<-x]) [[]]