concrete ConjunctionFre of Conjunction = CatFre ** ConjunctionRomance with
  (ResRomance = ResFre) ;