mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-20 00:22:51 -06:00
implementation of few more functions in ParseHin,Urd and new entries in DictUrd2
This commit is contained in:
@@ -2,6 +2,7 @@ incomplete concrete AdverbHindustani of Adverb = CatHindustani ** open CommonHin
|
||||
|
||||
lin
|
||||
PositAdvAdj a = {s = \\g => a.s ! Sg ! g ! Obl ! Posit} ;
|
||||
PositAdAAdj a = {s = a.s ! Sg ! Masc ! Obl ! Posit} ;
|
||||
ComparAdvAdj cadv a np = {
|
||||
s = \\g => np.s ! NPObj ++ cadv.p ++ cadv.s ++ a.s ! Sg ! g ! Obl ! Posit;
|
||||
} ;
|
||||
|
||||
@@ -22,6 +22,7 @@ interface DiffHindustani = open Prelude in {
|
||||
indfArt : Str ;
|
||||
nE : Str ;
|
||||
hE : Str ;
|
||||
mein : Str ;
|
||||
|
||||
na : Str ;
|
||||
nahen : Str ;
|
||||
|
||||
@@ -11,6 +11,12 @@ incomplete concrete ExtraHindustani of ExtraHindustaniAbs = CatHindustani **
|
||||
};
|
||||
|
||||
a = np.a} ;
|
||||
|
||||
EmptyRelSlash slash = {
|
||||
s = \\t,p,o,_ => slash.s ! t ! p ! o ++ slash.c2.s ;
|
||||
c = Obl
|
||||
} ;
|
||||
|
||||
|
||||
each_Det = mkDet "hr kwy" "hr kwy" "hr kwy" "hr kwy" Sg ;
|
||||
have_V = mkV "rakh'na";
|
||||
|
||||
@@ -31,7 +31,7 @@ incomplete concrete NounHindustani of Noun =
|
||||
AdvNP np adv = {
|
||||
-- s = \\c => np.s ! c ++ adv.s ! (fromAgr np.a).g ; -- jan ka bh'ay so order is changed
|
||||
s = \\c => adv.s ! (fromAgr np.a).g ++ np.s ! c ;
|
||||
a = np.a
|
||||
a = np.a
|
||||
} ;
|
||||
|
||||
DetQuantOrd quant num ord = {
|
||||
@@ -149,4 +149,9 @@ incomplete concrete NounHindustani of Noun =
|
||||
Fem => cn.s ! n ! c ++ ky ++ np.s ! NPC Dir } ;
|
||||
g = cn.g} ;
|
||||
|
||||
CountNP det np = {
|
||||
s = \\c => np.s ! NPC Obl ++ mein ++ sE ++ det.s ! (giveNumber np.a) ! (giveGender np.a) ! Dir ;
|
||||
a = agrP3 (giveGender np.a) det.n
|
||||
} ;
|
||||
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user