concrete PredicationSwe of Predication = CatSwe ** PredicationI with
  (Lang = LangSwe) ;