--# -path=.:../scandinavian:../abstract:../../prelude

concrete ClauseDan of Clause = CategoriesDan **
  ClauseI with (Rules=RulesDan), (Verbphrase=VerbphraseDan) ;