concrete StructuralUrd of Structural = CatUrd ** open MorphoUrd, ParadigmsUrd, Prelude, NounUrd,ParamX,CommonHindustani in { flags optimize=all ; coding = utf8; lin above_Prep = mkPrep "awpr" "awpr" ; after_Prep = mkPrep ["kE bed"] ["kE bed"] ; all_Predet = ss "tmam" ; almost_AdA, almost_AdN = mkAdN "tqryba" ; although_Subj = ss "agrch" ; always_AdV = ss "hmyXh" ; and_Conj = sd2 [] "awr" ** {n = Pl} ; because_Subj = ss "kywnkh" ; before_Prep = mkPrep "phlE" "phlE" ; behind_Prep = mkPrep "pych'E" "pych'E" ; between_Prep = mkPrep "drmyaN" "drmyaN" ; both7and_DConj = sd2 "dwnwN" "awr" ** {n = Pl} ; but_PConj = ss "lykn" ; by8agent_Prep = mkPrep "sE" "" ; by8means_Prep = mkPrep "pr" "" ; can8know_VV,can_VV = mkV "skna" ** { isAux = True} ; during_Prep = mkPrep ["kE drmyaN"] ["kE drmyaN"] ; either7or_DConj = sd2 "kwy ayk" "ya" ** {n = Sg} ; everybody_NP = MassNP (UseN (ParadigmsUrd.mkN "hr kwy" "hr kwy" "hr kwy" "hr kwy" "hr kwy" "hr kwy" Masc )); -- not a good way coz need to include NounUrd every_Det = mkDet "hr" "hr" "hr" "hr" Sg; everything_NP = MassNP (UseN (ParadigmsUrd.mkN "hr cyz" "hr cyz" "hr cyzw" "sb cyzyN" "sb cyzwN" "sb cyzw" Masc )); everywhere_Adv = mkAdv "hr jgh" ; few_Det = mkDet "cnd" "cnd" "cnd" "cnd" Pl ; first_Ord = {s = "pehla" ; n = Sg} ; --DEPRECATED for_Prep = mkPrep "kylyE" "kylyE" ; from_Prep = mkPrep "sE" "sE" ; he_Pron = personalPN "wh" "as" "" ["as ka"] ["as ky"] ["as kE"] ["as ky"] Sg Masc Pers3_Distant ; here_Adv = mkAdv "yhaN" ; here7to_Adv = mkAdv ["yhaN pr"] ; here7from_Adv = mkAdv ["yhaN sE"] ; how_IAdv = ss "kysE" ; how8many_IDet = makeIDet "ktnE" "ktny" Pl ; how8much_IAdv = ss "ktna" ; if_Subj = ss "agr" ; in8front_Prep = mkPrep ["kE samnE"] ["kE samnE"] ; i_Pron = personalPN "myN" "mjh'" "" "myra" "myry" "myrE" "myry" Sg Masc Pers1; in_Prep = mkPrep "myN" "myN" ; it_Pron = personalPN "yh" "as" "as" ["as ka"] ["as ky"] ["as kE"] ["as ky"] Sg Masc Pers3_Near; less_CAdv = {s = "km" ; p = ""} ; many_Det = mkDet "bht zyadh" "bht zyadh" "bht zyadh" "bht zyadh" Pl ; more_CAdv = {s = "zyadh" ; p = "sE" } ; most_Predet = ss "zyadh tr" ; much_Det = mkDet "bht" "bht" "bht" "bht" Sg ; -- must_VV = { -- s = table { -- VVF VInf => ["have to"] ; -- VVF VPres => "must" ; -- VVF VPPart => ["had to"] ; -- VVF VPresPart => ["having to"] ; -- VVF VPast => ["had to"] ; --# notpresent -- VVPastNeg => ["hadn't to"] ; --# notpresent -- VVPresNeg => "mustn't" -- } ; -- isAux = True -- } ; -----b no_Phr = ss "no" ; no_Utt = ss "nhyN" ; on_Prep = mkPrep "pr" "pr" ; -- one_Quant = demoPN "ayk" "ayk" "ayk" ; -- DEPRECATED only_Predet = ss "Srf" ; or_Conj = sd2 [] "ya" ** {n = Sg} ; otherwise_PConj = ss "ya ph'r" ; part_Prep = mkPrep "" "" ; please_Voc = ss "mhrbany" ; possess_Prep = mkPrep "ka" "ky" ; quite_Adv = ss "KamwX" ; she_Pron = personalPN "wh" "as" "wh" ["as ky"] ["as ky"] ["as kE"] ["as ky"] Sg Fem Pers3_Distant ; so_AdA = ss "[as lyE]" ; somebody_NP = MassNP (UseN (ParadigmsUrd.mkN "kwy" "kwy" "kwy" "kwy" "kwy" "kwy" Masc )); someSg_Det = mkDet "kch'" "kch'" "kch'" "kch'" Sg ; somePl_Det = mkDet "kch'" "kch'" "kch'" "kch'" Pl ; something_NP = MassNP (UseN (ParadigmsUrd.mkN "kwy cyz" "kwy cyz" "kwy cyz" "kh' cyzyN" "kh' cyzwN" "kh' cyzw" Masc )); somewhere_Adv = mkAdv ["khyN pr"] ; that_Quant = demoPN "wh" "as" "an" ; that_Subj = ss "kh"; there_Adv = mkAdv "whaN" ; there7to_Adv = mkAdv ["whaN pr"] ; there7from_Adv = mkAdv ["whaN sE"] ; therefore_PConj = ss "as lyE" ; they_Pron = personalPN "wh" "wh" "wh" ["an ka"] ["an ky"] ["an kE"] ["an ky"] Pl Masc Pers3_Distant ; ---- this_Quant = demoPN "yh" "as" "an"; through_Prep = mkPrep ["myN sE"] ["myN sE"] ; too_AdA = ss "bht" ; to_Prep = mkPrep "kw" "kw" ; -- ** {lock_Prep = <>}; under_Prep = mkPrep "nycE" "nycE" ; -- ** {lock_Prep = <>}; very_AdA = ss "bht" ; want_VV = mkV "cahna" ** { isAux = False} ; we_Pron = personalPN "hm" "hm" "hm" "hmara" "hmary" "hmarE" "hmary" Pl Masc Pers1 ; whatSg_IP = mkIP "kya" "ks" "ks" Sg Masc ; whatPl_IP = mkIP "kya" "kn" "kn" Pl Masc ; when_IAdv = ss "kb" ; when_Subj = ss "jb" ; where_IAdv = ss "khaN" ; -- which_IQuant = {s = \\_ => "kwn sy"} ; which_IQuant = mkIQuant "kwn" ; -- whichPl_IDet = makeDet "kwn sa" "kwn sy" "kwn sE" "kwn sy" ; -- whichSg_IDet = makeDet "kwn sa" "kwn sy" "kwn sE" "kwn sy" ; whoSg_IP = mkIP "kwn" "ks" "ks" Sg Masc ; whoPl_IP = mkIP "kwn" "kn" "knhwN" Pl Masc ; why_IAdv = ss "kywN" ; without_Prep = mkPrep ["kE bGyr"] ["kE bGyr"] ; with_Prep = mkPrep ["kE sath'"] ["kE sath'"] ; -- yes_Phr = ss "haN" ; yes_Utt = ss "haN" ; youSg_Pron = personalPN "tw" "tw" "tw" "tyra" "tyry" "tyrE" "tyry" Sg Masc Pers2_Casual ; youPl_Pron = personalPN "tm" "tm" "tm" "tmh'ara" "tmh'ary" "tmh'arE" "tmh'ary" Pl Masc Pers2_Casual ; youPol_Pron = personalPN "Ap" "Ap" "Ap" ["Ap ka"] ["Ap ky"] ["Ap kE"] ["Ap ky"] Pl Masc Pers2_Respect ; no_Quant = demoPN " kwy nhyN" "kwy nhyN" "kwy nhyN" ; not_Predet = {s="nhyN"} ; if_then_Conj = sd2 "agr" "tw" ** {n = Sg} ; at_least_AdN = mkAdN ["km az km"] ; at_most_AdN = mkAdN ["zyadh sE zyadh"]; nothing_NP = MassNP (UseN (ParadigmsUrd.mkN "kwy cyz nhyN" "kwy cyz nhyN" "kwy cyz nhyN" "kwy cyz nhyN" "kwy cyz nhyN" "kwy cyz nhyN" Masc )); except_Prep = mkPrep "swaE" "swaE" ; nobody_NP = MassNP (UseN (ParadigmsUrd.mkN "kwy nhyN" "kwy nhyN" "kwy nhyN" "kwy nhyN" "kwy nhyN" "kwy nhyN" Masc )); as_CAdv = {s = "atna" ; p = "jtna"} ; have_V2 = mkV2 (mkV "rkh'na") "" ; language_title_Utt = ss "ardw" ; }