yuanchuan · June 12, 2012 06:19
diff --git a/one day later.hs b/one day later.hs

 -- 第一印象：使用 Haskell 计算排列组合这样轻而易举。

 [ [a,b,c] | a <- [1..10], b <- [1..10], c <- [1..10] ]

 [ [a,b,c] | a <- [1..10], b <- [1..a], c <- [1..b] ]

 [ [a,b,c] | a <- "abc", b <- "abc", c <- "abc" ]

	-- 第一印象：使用 Haskell 计算排列组合这样轻而易举。

	[ [a,b,c] \| a <- [1..10], b <- [1..10], c <- [1..10] ]

	[ [a,b,c] \| a <- [1..10], b <- [1..a], c <- [1..b] ]

	[ [a,b,c] \| a <- "abc", b <- "abc", c <- "abc" ]