concrete AdjectiveNor of Adjective = CatNor ** AdjectiveScand with
  (ResScand = ResNor) ;