concrete ExtraUrd of ExtraUrdAbs = CatUrd ** open ResUrd, Coordination, Prelude, MorphoUrd, ParadigmsUrd,CommonHindustani in { flags coding = utf8 ; lin -- GenNP np = {s = \\_,_,_ => np.s ! NPC Obl ++ "كا" ; a = np.a} ; GenNP np = {s = \\n,g,c => case of { => np.s ! NPC Obl ++ "كے" ; => np.s ! NPC Obl ++ "كا" ; => np.s ! NPC Obl ++ "كے" ; <_,Fem,_> => np.s ! NPC Obl ++ "كی" }; a = np.a} ; each_Det = mkDet "ہر كوی" "ہر كوی" "ہر كوی" "ہر كوی" Sg ; have_V = mkV "راكh-نا"; IAdvAdv adv = {s = "كتنی" ++ adv.s ! Masc} ; ICompAP ap = {s = "كتنے" ++ ap.s ! Sg ! Masc ! Dir ! Posit} ; cost_V = mkV "قیمت" ; -- added for causitives make_CV = mkVerb "نoتہiنگ" ** {c2 = "" }; -- for VP conjunction }