#base :: String
base = ['a'..'z'] ++ ['A'..'Z'] ++ ['0'..'9']
random7 :: [String]
random7 = [[x1,x2,x3,x4,x5,x6,x7] | x1<-base,x2<-base,x3<-base,x4<-base,x5<-base,x6<-base,x7<-base]
#↑ このコードって、もう少し奇麗に書けませんか？
#random7 = sequence $ replicate 7 base
#ありがとうございます。リストモナドは、やはり僕の理解を超えています。。。
haskell-ja > Archives > 2012/01/11