concrete StructuralHin of Structural = CatHin ** open MorphoHin, ParadigmsHin, Prelude, NounHin,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 "" "" ; by8means_Prep = mkPrep "" "" ; -- 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 (ParadigmsHin.mkN "hr kwy" "hr kwy" "hr kwy" "hr kwy" "hr kwy" "hr kwy" Masc )); -- not a good way coz need to include NounHin -- every_Det = mkDet "hr" Sg; everything_NP = MassNP (UseN (ParadigmsHin.mkN "hr cyz" "hr cyz" "hr cyzw" "sb cyzyN" "sb cyzwN" "sb cyzw" Masc )); everywhere_Adv = mkAdv "hr jgh" ; -- few_Det = mkDet "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" 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 ; if_Subj = ss "agr" ; in8front_Prep = mkPrep ["kE samnE"] ["kE samnE"] ; i_Pron = personalPN "myN" "mjh-" "" "myra" Sg Masc Pers1; in_Prep = mkPrep "meN" "meN" ; it_Pron = personalPN "yh" "yh" "yh" "as ka" Sg Masc Pers3_Near; less_CAdv = {s = "km" ; p = ""} ; -- many_Det = mkDet "bht zyadh" Pl ; more_CAdv = {s = "zyadh-" ; p = "" } ; most_Predet = ss "zyadh tr" ; --much_Det = mkDet "bht" Pl ; -- 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 "mhrbani" ; possess_Prep = mkPrep "ka" "ky" ; quite_Adv = ss "khamosh" ; she_Pron = personalPN "wh" "as" "wh" "as ky" Sg Fem Pers3_Distant ; so_AdA = ss "so" ; somebody_NP = MassNP (UseN (ParadigmsHin.mkN "kwy" "kwy" "kwy" "kwy" "kwy" "kwy" Masc )); --someSg_Det = mkDet "kch-" Sg ; --somePl_Det = mkDet "kch-" Pl ; something_NP = MassNP (UseN (ParadigmsHin.mkN "kwy cyz" "kwy cyz" "kwy cyz" "kh- cyzyN" "kh- cyzwN" "kh- cyzw" Masc )); somewhere_Adv = mkAdv "khin 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" 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" ; under_Prep = mkPrep "nycE" "nycE" ; very_AdA = ss "bht" ; -- want_VV = mkV "cahna" ** { isAux = False} ; we_Pron = personalPN "hm" "hm" "hm" "hmara" Pl Masc Pers1 ; whatSg_IP = mkIP "kya" "kis" "kis" Sg Masc ; whatPl_IP = mkIP "kya" "kin" "kin" Pl Masc ; when_IAdv = ss "kb" ; when_Subj = ss "kb" ; where_IAdv = ss "khaN" ; which_IQuant = {s = \\_ => "kwn sy"} ; -- 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" "kis" "kis" 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 "tm" "tm" "tm" "tmh-ara" Sg Masc Pers2_Casual ; youPl_Pron = personalPN "tm" "tm" "tm" "tmh-ara" Pl Masc Pers2_Casual ; youPol_Pron = personalPN "Ap" "AP" "AP" "Ap ka" Sg 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 (ParadigmsHin.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 (ParadigmsHin.mkN "kwy nhyN" "kwy nhyN" "kwy nhyN" "kwy nhyN" "kwy nhyN" "kwy nhyN" Masc )); as_CAdv = {s = "etna" ; p = "jtna"} ; have_V2 = mkV2 (mkV "rakh-na") "" ; language_title_Utt = ss "ardw" ; }