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

concrete SymbolDan of Symbol = CatDan ** SymbolScand with
  (ResScand = ResDan) ;