concrete NounSwe of Noun = CatSwe ** NounScand with
  (DiffScand = DiffSwe) ;