concrete SymbolSwe of Symbol = CatSwe ** SymbolScand with
  (ResScand = ResSwe) ;