concrete AdjectiveSwe of Adjective = CatSwe ** AdjectiveScand with
  (DiffScand = DiffSwe) ;