[Haskell-beginners] How to write the FromJSON instance for CUid