concrete DemonstrativeNor of Demonstrative = CatNor ** DemonstrativeI with
  (Lang = LangNor) ;