--# -path=.:romance:abstract:../common:prelude

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