[Haskell-cafe] Syntax for modifying nested product types