extend the names API

2023-02-07 08:47:34 +01:00
parent a6faaeb351
commit 828bf9c677
33 changed files with 182 additions and 57 deletions
@@ -49,11 +49,7 @@ concrete CatTur of Cat = CommonX - [CAdv,AdN] ** open ResTur, HarmonyTur, Prelud
    N  = Noun ;
    N2 = Noun ** {c : Prep} ;
    N3 = Noun ** {c1,c2 : Prep} ;
-    GN, SN = {
-      s   : Case => Str ;
-      h   : Harmony
-    } ;
-    PN = {
+    GN, SN, PN = {
      s   : Case => Str ;
      h   : Harmony ;
      n   : Number