concrete NounFre of Noun = CatFre ** NounRomance with
  (ResRomance = ResFre) ;