mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-09 04:59:31 -06:00
added mkVA and become_VA
This commit is contained in:
@@ -9,6 +9,7 @@ flags
|
||||
lin
|
||||
bad_A = mkA76 "ëîř" ;
|
||||
beautiful_A = mkA76 "ęđŕńčâ" ;
|
||||
become_VA = mkVA (mkV186 "ńňŕâŕě") ;
|
||||
big_A = mkA81 "ăîë˙ě" ;
|
||||
black_A = mkA79 "÷ĺđĺí" ;
|
||||
blue_A = mkA86 "ńčí" ;
|
||||
|
||||
@@ -91,6 +91,8 @@ oper
|
||||
|
||||
mkVV : V -> VV ;
|
||||
|
||||
mkVA : V -> VA ;
|
||||
|
||||
mkPN : Str -> Gender -> PN ;
|
||||
|
||||
mkIAdv : Str -> IAdv ;
|
||||
@@ -109,6 +111,8 @@ oper
|
||||
mkVS v = v ** {lock_VS = <>} ;
|
||||
|
||||
mkVV v = v ** {lock_VV = <>} ;
|
||||
|
||||
mkVA v = v ** {lock_VA = <>} ;
|
||||
|
||||
mkPN s g = {s = s; g = g ; lock_PN = <>} ;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user