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