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

refinementsUrdPnb-2011-05-11

Browse Source
This commit is contained in:
virk.shafqat
2011-05-11 00:11:52 +00:00
parent e52f51007f
commit 9a31b52556
12 changed files with 100 additions and 91 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
lib/src/hindustani/CatHindustani.gf
View File

@@ -55,7 +55,8 @@ incomplete concrete CatHindustani of Cat =
CN = ResHindustani.Noun ;
NP = CommonHindustani.NP ;
Pron = {s : Case => Str ; ps : Str ; a : Agr};
-- Pron = {s : Case => Str ; ps : Str ; gs : Str ; a : Agr};
Pron = {s : Case => Str ; ps : Number => Gender => Str ; a : Agr};
Det = ResHindustani.Determiner ;
Predet = {s : Str} ;
Num = {s : Str ; n : Number} ;

42
lib/src/hindustani/CommonHindustani.gf
View File

@@ -87,30 +87,30 @@ resource CommonHindustani = ParamX ** open Prelude,Predef in {
<CPresent,Pl,Pers2_Respect,_ > => "hyN" ;
<CPresent,Pl,Pers3_Near,_ > => "hyN" ;
<CPresent,Pl,Pers3_Distant,_ > => "hyN" ;
<CPast,Sg,Pers1,Masc > => "th-a" ;
<CPast,Sg,Pers1,Fem > => "th-y" ;
<CPast,Sg,Pers2_Casual,Masc > => "th-a" ;
<CPast,Sg,Pers2_Casual,Fem > => "th-y" ;
<CPast,Sg,Pers1,Masc > => "th'a" ;
<CPast,Sg,Pers1,Fem > => "th'y" ;
<CPast,Sg,Pers2_Casual,Masc > => "th'a" ;
<CPast,Sg,Pers2_Casual,Fem > => "th'y" ;
<CPast,Sg,Pers2_Familiar,Masc > => "th-a" ;
<CPast,Sg,Pers2_Familiar,Fem > => "th-y" ;
<CPast,Sg,Pers2_Respect,Masc > => "th-E" ;
<CPast,Sg,Pers2_Respect,Fem > => "th-yN" ;
<CPast,Sg,Pers2_Familiar,Fem > => "th'y" ;
<CPast,Sg,Pers2_Respect,Masc > => "th'E" ;
<CPast,Sg,Pers2_Respect,Fem > => "th'yN" ;
<CPast,Sg,Pers3_Near,Masc > => "th-a" ;
<CPast,Sg,Pers3_Near,Fem > => "th-y" ;
<CPast,Sg,Pers3_Near,Fem > => "th'y" ;
<CPast,Sg,Pers3_Distant,Masc > => "th-a" ;
<CPast,Sg,Pers3_Distant,Fem > => "th-y" ;
<CPast,Pl,Pers1,Masc > => "th-E" ;
<CPast,Pl,Pers1,Fem > => "th-yN" ;
<CPast,Pl,Pers2_Casual,Masc > => "th-E" ;
<CPast,Pl,Pers2_Casual,Fem > => "th-yN" ;
<CPast,Pl,Pers2_Familiar,Masc > => "th-E" ;
<CPast,Pl,Pers2_Familiar,Fem > => "th-yN" ;
<CPast,Pl,Pers2_Respect,Masc > => "th-E" ;
<CPast,Pl,Pers2_Respect,Fem > => "th-yN" ;
<CPast,Pl,Pers3_Near,Masc > => "th-E" ;
<CPast,Pl,Pers3_Near,Fem > => "th-yN" ;
<CPast,Pl,Pers3_Distant,Masc > => "th-E" ;
<CPast,Pl,Pers3_Distant,Fem > => "th-yN" ;
<CPast,Sg,Pers3_Distant,Fem > => "th'y" ;
<CPast,Pl,Pers1,Masc > => "th'E" ;
<CPast,Pl,Pers1,Fem > => "th'yN" ;
<CPast,Pl,Pers2_Casual,Masc > => "th'E" ;
<CPast,Pl,Pers2_Casual,Fem > => "th'yN" ;
<CPast,Pl,Pers2_Familiar,Masc > => "th'E" ;
<CPast,Pl,Pers2_Familiar,Fem > => "th'yN" ;
<CPast,Pl,Pers2_Respect,Masc > => "th'E" ;
<CPast,Pl,Pers2_Respect,Fem > => "th'yN" ;
<CPast,Pl,Pers3_Near,Masc > => "th'E" ;
<CPast,Pl,Pers3_Near,Fem > => "th'yN" ;
<CPast,Pl,Pers3_Distant,Masc > => "th'E" ;
<CPast,Pl,Pers3_Distant,Fem > => "th'yN" ;
<CFuture,Sg,Pers1,Masc > => "ga" ;
<CFuture,Sg,Pers1,Fem > => "gy" ;
<CFuture,Sg,Pers2_Casual,Masc > => "ga" ;

11
lib/src/hindustani/ExtraHindustani.gf
View File

@@ -3,10 +3,17 @@
incomplete concrete ExtraHindustani of ExtraHindustaniAbs = CatHindustani **
open CommonHindustani,Coordination,ResHindustani, ParamX in {
lin
GenNP np = {s = \\_,_,_ => np.s ! NPC Obl ++ "ka" ; a = np.a} ;
-- GenNP np = {s = \\_,_,_ => np.s ! NPC Obl ++ "ka" ; a = np.a} ;
GenNP np = {s = \\n,g,c =>
case <n,g,c> of {
<_,Masc,_> => np.s ! NPC Obl ++ "ka" ;
<_,Fem,_> => np.s ! NPC Obl ++ "ky"
};
a = np.a} ;
each_Det = mkDet "hr kwy" "hr kwy" "hr kwy" "hr kwy" Sg ;
have_V = mkV "rakh-na";
have_V = mkV "rakh'na";
IAdvAdv adv = {s = "ktny" ++ adv.s} ;
ICompAP ap = {s = "ktnE" ++ ap.s ! Sg ! Masc ! Dir ! Posit} ;
cost_V = mkV "qymt" ;

2
lib/src/hindustani/NounHindustani.gf
View File

@@ -51,7 +51,7 @@ incomplete concrete NounHindustani of Noun =
a = agrP3 Masc Sg
} ;
PossPron p = {s = \\_,_,_ => p.ps ; a = p.a} ;
PossPron p = {s = \\n,g,_ => p.ps ! n ! g ; a = p.a} ;
NumSg = {s = []; n = Sg} ;
NumPl = {s = []; n = Pl} ;

7
lib/src/hindustani/ResHindustani.gf
View File

@@ -63,9 +63,10 @@ param
NPErg => pn ! Obl ++ "nE"
} ;
detcn2NP : (Determiner) -> Noun -> NPCase -> Number -> Str = \dt,cn,npc,nn -> case npc of {
NPC c => dt.s ! Sg ! Masc ++ cn.s ! nn ! c ;
NPObj => dt.s ! Sg ! Masc ++ cn.s ! nn ! Dir ;
NPErg => dt.s ! Sg ! Masc ++ cn.s ! nn ! Obl ++ "nE"
-- NPC c => dt.s ! Sg ! Masc ++ cn.s ! nn ! c ; --changed while phrasebook e.g tyry beti where gender of determiner 'tyry' should be dependent on gender of common noum e.g 'beti'
NPC c => dt.s ! nn ! cn.g ++ cn.s ! nn ! c ;
NPObj => dt.s ! nn ! cn.g ++ cn.s ! nn ! Dir ;
NPErg => dt.s ! nn ! cn.g ++ cn.s ! nn ! Obl ++ "nE"
} ;
det2NP : (Determiner) -> NPCase -> Str = \dt,npc -> case npc of {
NPC c => dt.s ! Sg ! Masc ;