redswallow · December 26, 2015 19:59
diff --git a/combinations.hs b/combinations.hs
 combinations [] = [[]] 
 combinations (x:xs) = map (x:) (combs xs) ++ combs xs 
diff --git a/Haskell code snippets b/Haskell code snippets
 Haskell code snippets
diff --git a/permutations.hs b/permutations.hs
 remove x list= [n|n<-list,n/=x]
 permutations [] = [[]]
 permutations xs = [x:ps | x <- xs, ps <- permutations (remove x xs)]
	combinations [] = [[]]
	combinations (x:xs) = map (x:) (combs xs) ++ combs xs
	remove x list= [n\|n<-list,n/=x]
	permutations [] = [[]]
	permutations xs = [x:ps \| x <- xs, ps <- permutations (remove x xs)]