concrete CountryEng of Country = open CategoriesEng, ParadigmsEng in {

  lincat
    Country = PN ;
    Nationality = A ;
    Language = N ;

  lin
    Denmark = regPN "Denmark" nonhuman ;
    England = regPN "England" nonhuman ;
    Finland = regPN "Finland" nonhuman ;
    France = regPN "France" nonhuman ;
    Germany = regPN "Germany" nonhuman ;
    Italy = regPN "Italy" nonhuman ;
    Norway = regPN "Norway" nonhuman ;
    Russia = regPN "Russia" nonhuman ;
    Spain = regPN "Spain" nonhuman ;
    Sweden = regPN "Sweden" nonhuman ;

    Danish = regA "Danish" ;
    English = regA "English" ;

    DanishLang = regN "Danish" ;
    EnglishLang = regN "English" ;


} ;
