concrete NounFre of Noun = CatFre ** NounRomance with (DiffRomance = DiffFre) ;