concrete MathSwe of Math = CatSwe ** MathScand with
  (ResScand = ResSwe) ;