concrete PredicationFre of Predication = CatFre ** PredicationI with
  (Syntax = SyntaxFre),
  (Lang = LangFre) ;