Error: right-hand-side of clause doesn't agree with function result type [tycon mismatch] SML:

Question

fun splitter [] Even Odd = (Even,Odd)
    | splitter (x::xs) Even Odd =
          if (x mod 2 = 1) then (splitter xs (Odd @ [x])) else (splitter xs (Even @ [x]));