1
0
forked from GitHub/gf-core

determiners and extrapositions in Tha fixed

This commit is contained in:
aarne
2011-11-28 22:10:10 +00:00
parent ebcfad5ec3
commit e5de02733c
8 changed files with 62 additions and 44 deletions

View File

@@ -24,10 +24,10 @@ concrete StructuralTha of Structural = CatTha **
-- during_Prep = ss "during" ;
-- either7or_DConj = sd2 "either" "or" ** {n = Sg} ;
-- everybody_NP = regNP "everybody" Sg ;
-- every_Det = mkDeterminer Sg "every" ;
every_Det = quantDet "ทุก" ;
-- everything_NP = regNP "everything" Sg ;
-- everywhere_Adv = ss "everywhere" ;
few_Det = mkDet (thword "สอง" "สาม") [] ;
few_Det = quantDet (thword "สอง" "สาม") ;
-- first_Ord = ss "first" ;
-- for_Prep = ss "for" ;
from_Prep = ss "จาก" ;
@@ -37,21 +37,21 @@ concrete StructuralTha of Structural = CatTha **
-- here7to_Adv = ss ["to here"] ;
-- here7from_Adv = ss ["from here"] ;
how_IAdv = ss (thword "อย่าง" "ไร") ;
-- how8many_IDet = mkDeterminer Pl ["how many"] ;
how8many_IDet = quantDet "กี่" ;
how8much_IAdv = ss (thword "เท่า" "ไร") ;
-- in8front_Prep = ss ["in front of"] ;
i_Pron = ss chan_s ;
if_Subj = ss (thword "ถ้า") ;
in_Prep = ss (thword "ใน") ;
it_Pron = ss "มัน" ;
-- less_CAdv = ss "less" ;
many_Det = mkDet "หลาย" [] ;
many_Det = quantDet "หลาย" ;
more_CAdv = {s = thword "มาก" "กว่า" ; p = []} ; ----
-- most_Predet = ss "most" ;
-- much_Det = mkDeterminer Sg "much" ;
must_VV = {s = tog_s ; typ = VVPre} ;
no_Utt = ss may_s ;
on_Prep = ss "บน" ;
-- one_Quant = mkDeterminer Sg "one" ;
only_Predet = ss (thword "เฑา" "นั้น") ;
or_Conj = {s1 = [] ; s2 = "หริอ"} ;
-- otherwise_PConj = ss "otherwise" ;
@@ -62,19 +62,18 @@ concrete StructuralTha of Structural = CatTha **
she_Pron = ss khaw_s ;
-- so_AdA = ss "so" ;
-- somebody_NP = regNP "somebody" Sg ;
somePl_Det = mkDet ("บ้าง") [] ;
someSg_Det = mkDet ("บ้าง") [] ;
somePl_Det = quantDet ("บ้าง") ;
someSg_Det = quantDet ("บ้าง") ;
-- something_NP = regNP "something" Sg ;
-- somewhere_Adv = ss "somewhere" ;
that_Quant = ss nan_s ** {hasC = True} ;
-- that_NP = regNP "that" Sg ;
that_Quant = demDet nan_s ;
there_Adv = ss (thword "ที่" "นั่น") ;
-- there7to_Adv = ss "there" ;
-- there7from_Adv = ss ["from there"] ;
-- therefore_PConj = ss "therefore" ;
-- these_NP = regNP "these" Pl ;
they_Pron = mkNP khaw_s ;
this_Quant = ss nii_s ** {hasC = True} ;
this_Quant = demDet nii_s ;
-- this_NP = regNP "this" Sg ;
-- those_NP = regNP "those" Pl ;
-- through_Prep = ss "through" ;
@@ -88,7 +87,7 @@ concrete StructuralTha of Structural = CatTha **
when_IAdv = ss (thword "เมื่อไร") ;
when_Subj = ss "ฑี" ;
where_IAdv = ss (thword "ฑี" "ไหน") ;
which_IQuant = {s1 = "ไหน" ; s2 = [] ; hasC = True} ;
which_IQuant = demDet "ไหน" ;
whoPl_IP, whoSg_IP = ss "ไคร" ;
why_IAdv = ss (thword "ฑำ" "ไม") ;
without_Prep = ss (thword "ไ่ม" "มี") ;