preparing for 2023

This commit is contained in:
Aarne Ranta
2023-03-21 07:50:03 +01:00
parent 7e9e636776
commit c8abcf4bd4
21 changed files with 0 additions and 0 deletions

View File

@@ -0,0 +1,20 @@
concrete CountriesEng of Countries = FactsEng, CountryNamesEng **
open SyntaxEng, ParadigmsEng, SymbolicEng in {
lin
cName name = name ;
capital_Attribute = mkAttribute "capital" ;
area_Attribute = mkAttribute "area" ;
population_Attribute = mkAttribute "population" ;
continent_Attribute = mkAttribute "continent" ;
currency_Attribute = mkAttribute "currency" ;
populationFact cname int = mkCl cname have_V2 (mkNP <symb int : Card> (mkN "inhabitant")) ;
continentFact cname name = mkCl cname (SyntaxEng.mkAdv in_Prep name) ;
oper
mkAttribute : Str -> CN = \s -> mkCN (mkN s) ;
}