-- newtype TExp a = ...
tExpDataConName :: Name
tExpDataConName = thCon (fsLit "TExp") tExpDataConKey
tExpDataConName :: Name
tExpDataConName = thCon (fsLit "TExp") tExpDataConKey
tExpDataConName = thCon (fsLit "TExp") tExpDataConKey