pe (TyApp (TyCon "StableName#") [x]) = "mkStableNamePrimTy " ++ ppType x

pp
ppType (TyApp (TyCon "StableName#") [x]) = "mkStableNamePrimTy " ++ ppType x
ppType (TyApp (TyCon "StableName#") [x]) = "mkStableNamePrimTy " ++ ppType x