concrete DemonstrativeSpa of Demonstrative = CatSpa ** DemonstrativeI with
  (Lang = LangSpa) ;