GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-06-17 11:00:12 -06:00
Code Issues Packages Projects Releases Wiki Activity

use consistent lin X everywhere

Browse Source
This commit is contained in:
Krasimir Angelov
2025-11-14 14:12:57 +01:00
parent 48658e3689
commit c7fe453c12
58 changed files with 330 additions and 334 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
src/urdu/ParadigmsUrd.gf
View File

@@ -83,7 +83,7 @@ oper
-- compound Adjectives
mkCompoundA : Str -> Str -> A ; -- e.g dra hwa
mkCompoundA s1 s2 = compoundAdj s1 s2 ;
mkCompoundA s1 s2 = lin A (compoundAdj s1 s2) ;
--2 Verbs
@@ -144,7 +144,7 @@ mkAdV : Str -> AdV = \s -> lin AdV {s=s} ;
-- mkQuant : Pron -> Quant = \p -> {s = \\_,_,c => p.s!c ;a = p.a ; lock_Quant = <>};
-- mkQuant : (no_sg, no_pl, none_sg, non_pl : Str) -> Quant = mkQuantifier;
-- } ;
mkIQuant : Str -> IQuant = \s -> makeIQuant s ;
mkIQuant : Str -> IQuant = \s -> lin IQuant (makeIQuant s) ;
--2 Conjunctions
@@ -166,7 +166,7 @@ mkAdV : Str -> AdV = \s -> lin AdV {s=s} ;
-- mkV0 : V -> V0 ;
mkVS : V -> VS; -- e.g drna
mkVS v = v ;
mkVS v = lin VS v ;
-- mkV2S : V -> Prep -> V2S ;
mkVV : V -> VV = -- e.g cahna
\v -> lin VV (v ** {isAux = False});
@@ -181,7 +181,7 @@ mkAdV : Str -> AdV = \s -> lin AdV {s=s} ;
-- mkVA : V -> VA ;
-- mkV2A : V -> Prep -> V2A ;
mkVQ : V -> VQ ; -- e.g janna
mkVQ v = v ;
mkVQ v = lin VQ v ;
-- mkV2Q : V -> Prep -> V2Q ;
--
-- mkAS : A -> AS ;