[Haskell-beginners] How to parse JSON into existential type