concrete PhraseFre of Phrase = CatFre, TenseX ** PhraseRomance with
  (ResRomance = ResFre) ;