Simplify sum-type conversion
Compile without warnings and errors on GHC 7.7.20130916
wobble WS