drager · March 22, 2016 14:00
diff --git a/split.hs b/split.hs

 split p [] = ([],[])
 split p (x:xs) = if p x then (x : ys, zs)
  else (ys, x : zs)
  where (ys, zs) = split p xs
  
 isEven :: Int -> Bool
 isEven number = number `mod` 2 == 0

	split p [] = ([],[])
	split p (x:xs) = if p x then (x : ys, zs)
	else (ys, x : zs)
	where (ys, zs) = split p xs

	isEven :: Int -> Bool
	isEven number = number `mod` 2 == 0