helper functions for various noun types

2026-07-02 12:08:34 -06:00 · 2019-06-23 16:51:38 +02:00
parent 9772134edc
commit 02130dc128
2 changed files with 6 additions and 2 deletions
@@ -79,6 +79,8 @@ param
      postap = n.postap 
 --      massable = n.massable ;
    };
+  constN : Str -> Gender -> Noun = \s,g ->
+    { s = \\_,_ => s ; g = g } ;

  param
    AdjPos = Pre | Post ;