mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-28 09:28:54 -06:00
(Ara) misc. small fixes/additions
This commit is contained in:
@@ -57,7 +57,7 @@ lin
|
|||||||
|
|
||||||
oper
|
oper
|
||||||
|
|
||||||
amount_N : N = mkN "مِقْدَار" "مَقَادِير" masc nohum ;
|
amount_N : N = mkN "مِقْدَار" "مَقَادِير" masc nohum ;
|
||||||
|
|
||||||
-- hack used in the name constructions
|
-- hack used in the name constructions
|
||||||
toNP : Bool -> NP -> NP = \b -> if_then_else NP b R.emptyNP ;
|
toNP : Bool -> NP -> NP = \b -> if_then_else NP b R.emptyNP ;
|
||||||
|
|||||||
@@ -450,6 +450,7 @@ resource ParadigmsAra = open
|
|||||||
in case rootStr of {
|
in case rootStr of {
|
||||||
f@? + c@? + "ّ" => v1geminate (f+c+c) vPerf vImpf ;
|
f@? + c@? + "ّ" => v1geminate (f+c+c) vPerf vImpf ;
|
||||||
? + #hamza + #weak => v1doubleweak root ;
|
? + #hamza + #weak => v1doubleweak root ;
|
||||||
|
#weak + ? + #weak => v1assimilated_defective root vPerf vImpf ;
|
||||||
? + ? + #weak => case vPerf of {
|
? + ? + #weak => case vPerf of {
|
||||||
i => v1defective_i root vImpf ;
|
i => v1defective_i root vImpf ;
|
||||||
_ => v1defective_a root vImpf } ;
|
_ => v1defective_a root vImpf } ;
|
||||||
|
|||||||
Reference in New Issue
Block a user