Hindi and Urdu as refactored to Hindustani by Shafqat

lib/src/hindi/LexiconHin.gf

@@ -1,375 +1,369 @@
---# -path=.:prelude
-
-concrete LexiconHin of Lexicon = CatHin ** 
-  open ParadigmsHin, Prelude in {
-
-  flags 
-    optimize=values ;
-
-  lin
---  airplane_N = regN "airplane" ;
---  answer_V2S = mkV2S (regV "answer") toP ;
---  apartment_N = regN "apartment" ;
-  apple_N = mkN "seb" ;
---  art_N = regN "art" ;
---  ask_V2Q = mkV2Q (regV "ask") noPrep ;
---  baby_N = regN "baby" ;
---  bad_A = mkADeg "bad" "worse" "worst" "badly" ;
---  bank_N = regN "bank" ;
---  beautiful_A = compoundADeg (regA "beautiful") ;
---  become_VA = mkVA (irregV "become" "became" "become") ;
---  beer_N = regN "beer" ;
---  beg_V2V = mkV2V (regDuplV "beg") noPrep toP ;
-  big_A = mkA "baRA" ;
---  bike_N = regN "bike" ;
---  bird_N = regN "bird" ;
---  black_A = regADeg "black" ;
---  blue_A = regADeg "blue" ;
---  boat_N = regN "boat" ;
---  book_N = regN "book" ;
---  boot_N = regN "boot" ;
---  boss_N = mkN human (regN "boss") ;
-  boy_N = mkN "lar.kA" ;
-  bread_N = mkN "rot.I" ;
---  break_V2 = dirV2 (irregV "break" "broke" "broken") ;
---  broad_A = regADeg "broad" ;
---  brother_N2 = mkN2 (mkN masculine (mkN "brother")) (mkPrep "of") ;
---  brown_A = regADeg "brown" ;
---  butter_N = regN "butter" ;
---  buy_V2 = dirV2 (irregV "buy" "bought" "bought") ;
---  camera_N = regN "camera" ;
---  cap_N = regN "cap" ;
---  car_N = regN "car" ;
---  carpet_N = regN "carpet" ;
---  cat_N = regN "cat" ;
---  ceiling_N = regN "ceiling" ;
---  chair_N = regN "chair" ;
---  cheese_N = regN "cheese" ;
---  child_N = mk2N "child" "children" ;
---  church_N = regN "church" ;
---  city_N = regN "city" ;
---  clean_A = regADeg "clean" ;
---  clever_A = regADeg "clever" ;
---  close_V2 = dirV2 (regV "close") ;
---  coat_N = regN "coat" ;
---  cold_A = regADeg "cold" ;
---  come_V = (irregV "come" "came" "come") ;
---  computer_N = regN "computer" ;
---  country_N = regN "country" ;
---  cousin_N = mkN human (regN "cousin") ;
---  cow_N = regN "cow" ;
---  die_V = (regV "die") ;
---  dirty_A = regADeg "dirty" ;
---  distance_N3 = mkN3 (regN "distance") fromP toP ;
---  doctor_N = mkN human (regN "doctor") ;
---  dog_N = regN "dog" ;
---  door_N = regN "door" ;
---  drink_V2 = dirV2 (irregV "drink" "drank" "drunk") ;
---  easy_A2V = mkA2V (regA "easy") forP ;
-  eat_V2 = mkV2 "KA" ;
---  empty_A = regADeg "empty" ;
---  enemy_N = regN "enemy" ;
---  factory_N = regN "factory" ;
---  father_N2 = mkN2 (mkN masculine (mkN "father")) (mkPrep "of") ;
---  fear_VS = mkVS (regV "fear") ;
---  find_V2 = dirV2 (irregV "find" "found" "found") ;
---  fish_N = mk2N "fish" "fish" ;
---  floor_N = regN "floor" ;
---  forget_V2 = dirV2 (irregDuplV "forget" "forgot" "forgotten") ;
---  fridge_N = regN "fridge" ;
---  friend_N = mkN human (regN "friend") ;
---  fruit_N = regN "fruit" ;
---  fun_AV = mkAV (regA "fun") ;
---  garden_N = regN "garden" ;
-  girl_N = mkN "lar.kI" ;
---  glove_N = regN "glove" ;
---  gold_N = regN "gold" ;
-  good_A = mkA "a-cCA" ;
-  go_V = mkV "cal" ;
---  green_A = regADeg "green" ;
---  harbour_N = regN "harbour" ;
---  hate_V2 = dirV2 (regV "hate") ;
---  hat_N = regN "hat" ;
---  have_V2 = dirV2 (mk5V "have" "has" "had" "had" "having") ;
---  hear_V2 = dirV2 (irregV "hear" "heard" "heard") ;
---  hill_N = regN "hill" ;
---  hope_VS = mkVS (regV "hope") ;
---  horse_N = regN "horse" ;
---  hot_A = duplADeg "hot" ;
---  house_N = regN "house" ;
---  important_A = compoundADeg (regA "important") ;
---  industry_N = regN "industry" ;
---  iron_N = regN "iron" ;
---  king_N = mkN masculine (regN "king") ;
---  know_V2 = dirV2 (irregV "know" "knew" "known") ;
---  lake_N = regN "lake" ;
---  lamp_N = regN "lamp" ;
---  learn_V2 = dirV2 (regV "learn") ;
---  leather_N = regN "leather" ;
---  leave_V2 = dirV2 (irregV "leave" "left" "left") ;
---  like_V2 = dirV2 (regV "like") ;
---  listen_V2 = prepV2 (regV "listen") toP ;
-  live_V = mkV "CU" ; ---- touch
---  long_A = regADeg "long" ;
---  lose_V2 = dirV2 (irregV "lose" "lost" "lost") ;
---  love_N = regN "love" ;
---  love_V2 = dirV2 (regV "love") ;
---  man_N = mkN masculine (mk2N "man" "men") ;
---  married_A2 = mkA2 (regA "married") toP ;
---  meat_N = regN "meat" ;
---  milk_N = regN "milk" ;
---  moon_N = regN "moon" ;
---  mother_N2 = mkN2 (mkN feminine (mkN "mother")) (mkPrep "of") ;
---  mountain_N = regN "mountain" ;
---  music_N = regN "music" ;
---  narrow_A = regADeg "narrow" ;
---  new_A = regADeg "new" ;
---  newspaper_N = regN "newspaper" ;
---  oil_N = regN "oil" ;
---  old_A = regADeg "old" ;
---  open_V2 = dirV2 (regV "open") ;
---  paint_V2A = mkV2A (regV "paint") noPrep ;
---  paper_N = regN "paper" ;
---  paris_PN = mkPN (mkN nonhuman (mkN "Paris")) ;
---  peace_N = regN "peace" ;
---  pen_N = regN "pen" ;
---  planet_N = regN "planet" ;
---  plastic_N = regN "plastic" ;
---  play_V2 = dirV2 (regV "play") ;
---  policeman_N = mkN masculine (mkN "policeman" "policemen") ;
---  priest_N = mkN human (regN "priest") ;
---  probable_AS = mkAS (regA "probable") ;
---  queen_N = mkN feminine (regN "queen") ;
---  radio_N = regN "radio" ;
---  rain_V0 = mkV0 (regV "rain") ;
---  read_V2 = dirV2 (irregV "read" "read" "read") ;
-  red_A = mkA "lAl" ;
---  religion_N = regN "religion" ;
---  restaurant_N = regN "restaurant" ;
---  river_N = regN "river" ;
---  rock_N = regN "rock" ;
---  roof_N = regN "roof" ;
---  rubber_N = regN "rubber" ;
---  run_V = (irregDuplV "run" "ran" "run") ;
---  say_VS = mkVS (irregV "say" "said" "said") ;
---  school_N = regN "school" ;
---  science_N = regN "science" ;
---  sea_N = regN "sea" ;
---  seek_V2 = dirV2 (irregV "seek" "sought" "sought") ;
---  see_V2 = dirV2 (irregV "see" "saw" "seen") ;
---  sell_V3 = dirV3 (irregV "sell" "sold" "sold") toP ;
---  send_V3 = dirV3 (irregV "send" "sent" "sent") toP ;
---  sheep_N = mk2N "sheep" "sheep" ;
---  ship_N = regN "ship" ;
---  shirt_N = regN "shirt" ;
---  shoe_N = regN "shoe" ;
---  shop_N = regN "shop" ;
---  short_A = regADeg "short" ;
---  silver_N = regN "silver" ;
---  sister_N = mkN2 (mkN feminine (mkN "sister")) (mkPrep "of") ;
---  sleep_V = (irregV "sleep" "slept" "slept") ;
---  small_A = regADeg "small" ;
---  snake_N = regN "snake" ;
---  sock_N = regN "sock" ;
---  speak_V2 = dirV2 (irregV "speak" "spoke" "spoken") ;
---  star_N = regN "star" ;
---  steel_N = regN "steel" ;
---  stone_N = regN "stone" ;
---  stove_N = regN "stove" ;
---  student_N = mkN human (regN "student") ;
---  stupid_A = regADeg "stupid" ;
---  sun_N = regN "sun" ;
---  switch8off_V2 = dirV2 (partV (regV "switch") "off") ;
---  switch8on_V2 = dirV2 (partV (regV "switch") "on") ;
---  table_N = regN "table" ;
---  talk_V3 = mkV3 (regV "talk") toP aboutP ;
---  teacher_N = mkN human (regN "teacher") ;
---  teach_V2 = dirV2 (irregV "teach" "taught" "taught") ;
---  television_N = regN "television" ;
---  thick_A = regADeg "thick" ;
---  thin_A = duplADeg "thin" ;
---  train_N = regN "train" ;
---  travel_V = (regDuplV "travel") ;
---  tree_N = regN "tree" ;
--- ---- trousers_N = regN "trousers" ;
---  ugly_A = regADeg "ugly" ;
---  understand_V2 = dirV2 (irregV "understand" "understood" "understood") ;
---  university_N = regN "university" ;
---  village_N = regN "village" ;
---  wait_V2 = prepV2 (regV "wait") forP ;
---  walk_V = (regV "walk") ;
---  warm_A = regADeg "warm" ;
---  war_N = regN "war" ;
---  watch_V2 = dirV2 (regV "watch") ;
---  water_N = regN "water" ;
---  white_A = regADeg "white" ;
---  window_N = regN "window" ;
---  wine_N = regN "wine" ;
---  win_V2 = dirV2 (irregDuplV "win" "won" "won") ;
---  woman_N = mkN feminine (mk2N "woman" "women") ;
---  wonder_VQ = mkVQ (regV "wonder") ;
---  wood_N = regN "wood" ;
---  write_V2 = dirV2 (irregV "write" "wrote" "written") ;
---  yellow_A = regADeg "yellow" ;
---  young_A = regADeg "young" ;
---
---  do_V2 = dirV2 (mk5V "do" "does" "did" "done" "doing") ;
---  now_Adv = mkAdv "now" ;
---  already_Adv = mkAdv "already" ;
---  song_N = regN "song" ;
---  add_V3 = dirV3 (regV "add") toP ;
---  number_N = regN "number" ;
---  put_V2 = prepV2 (irregDuplV "put" "put" "put") noPrep ;
---  stop_V = regDuplV "stop" ;
---  jump_V = regV "jump" ;
---
---  left_Ord = ss "left" ;
---  right_Ord = ss "right" ;
---  far_Adv = mkAdv "far" ;
---  correct_A = (regA "correct") ;
---  dry_A = regA "dry" ;
---  dull_A = regA "dull" ;
---  full_A = regA "full" ;
---  heavy_A = regA "heavy" ;
---  near_A = regA "near" ;
---  rotten_A = (regA "rotten") ;
---  round_A = regA "round" ;
---  sharp_A = regA "sharp" ;
---  smooth_A = regA "smooth" ;
---  straight_A = regA "straight" ;
---  wet_A = regA "wet" ; ----
---  wide_A = regA "wide" ;
---  animal_N = regN "animal" ;
---  ashes_N = regN "ash" ; -- FIXME: plural only?
---  back_N = regN "back" ;
---  bark_N = regN "bark" ;
---  belly_N = regN "belly" ;
---  blood_N = regN "blood" ;
---  bone_N = regN "bone" ;
---  breast_N = regN "breast" ;
---  cloud_N = regN "cloud" ;
---  day_N = regN "day" ;
---  dust_N = regN "dust" ;
---  ear_N = regN "ear" ;
---  earth_N = regN "earth" ;
---  egg_N = regN "egg" ;
---  eye_N = regN "eye" ;
---  fat_N = regN "fat" ;
---  feather_N = regN "feather" ;
---  fingernail_N = regN "fingernail" ;
---  fire_N = regN "fire" ;
---  flower_N = regN "flower" ;
---  fog_N = regN "fog" ;
---  foot_N = mk2N "foot" "feet" ;
---  forest_N = regN "forest" ;
---  grass_N = regN "grass" ;
---  guts_N = regN "gut" ; -- FIXME: no singular
---  hair_N = regN "hair" ;
---  hand_N = regN "hand" ;
---  head_N = regN "head" ;
---  heart_N = regN "heart" ;
---  horn_N = regN "horn" ;
---  husband_N = mkN masculine (regN "husband") ;
---  ice_N = regN "ice" ;
---  knee_N = regN "knee" ;
---  leaf_N = mk2N "leaf" "leaves" ;
---  leg_N = regN "leg" ;
---  liver_N = regN "liver" ;
---  louse_N = mk2N "louse" "lice" ;
---  mouth_N = regN "mouth" ;
---  name_N = regN "name" ;
---  neck_N = regN "neck" ;
---  night_N = regN "night" ;
---  nose_N = regN "nose" ;
---  person_N = mkN human (regN "person") ;
---  rain_N = regN "rain" ;
---  road_N = regN "road" ;
---  root_N = regN "root" ;
---  rope_N = regN "rope" ;
---  salt_N = regN "salt" ;
---  sand_N = regN "sand" ;
---  seed_N = regN "seed" ;
---  skin_N = regN "skin" ;
---  sky_N = regN "sky" ;
---  smoke_N = regN "smoke" ;
---  snow_N = regN "snow" ;
---  stick_N = regN "stick" ;
---  tail_N = regN "tail" ;
---  tongue_N = regN "tongue" ;
---  tooth_N = mk2N "tooth" "teeth" ;
---  wife_N = mkN feminine (mk2N "wife" "wives") ;
---  wind_N = regN "wind" ;
---  wing_N = regN "wing" ;
---  worm_N = regN "worm" ;
---  year_N = regN "year" ;
---  blow_V = IrregHin.blow_V ;
---  breathe_V = dirV2 (regV "breathe") ;
---  burn_V = IrregHin.burn_V ;
---  dig_V = IrregHin.dig_V ;
---  fall_V = IrregHin.fall_V ;
---  float_V = regV "float" ;
---  flow_V = regV "flow" ;
---  fly_V = IrregHin.fly_V ;
---  freeze_V = IrregHin.freeze_V ;
---  give_V3 = dirV3 give_V toP ;
---  laugh_V = regV "laugh" ;
---  lie_V = IrregHin.lie_V ;
---  play_V = regV "play" ;
-  sew_V = mkV "sI" ;
---  sing_V = IrregHin.sing_V ;
---  sit_V = IrregHin.sit_V ;
---  smell_V = regV "smell" ;
---  spit_V = IrregHin.spit_V ;
---  stand_V = IrregHin.stand_V ;
---  swell_V = IrregHin.swell_V ;
---  swim_V = IrregHin.swim_V ;
---  think_V = IrregHin.think_V ;
---  turn_V = regV "turn" ;
---  vomit_V = regV "vomit" ;
---
---  bite_V2 = dirV2 IrregHin.bite_V ;
---  count_V2 = dirV2 (regV "count") ;
---  cut_V2 = dirV2 IrregHin.cut_V ;
---  fear_V2 = dirV2 (regV "fear") ;
---  fight_V2 = dirV2 fight_V ;
-  hit_V2 = mkV2 (mkV "mAr") "ko" ;
---  hold_V2 = dirV2 hold_V ;
---  hunt_V2 = dirV2 (regV "hunt") ;
---  kill_V2 = dirV2 (regV "kill") ;
---  pull_V2 = dirV2 (regV "pull") ;
---  push_V2 = dirV2 (regV "push") ;
---  rub_V2 = dirV2 (regDuplV "rub") ;
---  scratch_V2 = dirV2 (regV "scratch") ;
---  split_V2 = dirV2 split_V ;
---  squeeze_V2 = dirV2 (regV "squeeze") ;
---  stab_V2 = dirV2 (regDuplV "stab") ;
---  suck_V2 = dirV2 (regV "suck") ;
---  throw_V2 = dirV2 throw_V ;
---  tie_V2 = dirV2 (regV "tie") ;
---  wash_V2 = dirV2 (regV "wash") ;
---  wipe_V2 = dirV2 (regV "wipe") ;
---
-----  other_A = regA "other" ;
---
---  grammar_N = regN "grammar" ;
---  language_N = regN "language" ;
---  rule_N = regN "rule" ;
---
----- added 4/6/2007
-    john_PN = mkPN "jon" ;
---    question_N = regN "question" ;
---    ready_A = regA "ready" ;
---    reason_N = regN "reason" ;
---    today_Adv = mkAdv "today" ;
---    uncertain_A = regA "uncertain" ;
---
---oper
---  aboutP = mkPrep "about" ;
---  atP = mkPrep "at" ;
---  forP = mkPrep "for" ;
---  fromP = mkPrep "from" ;
---  inP = mkPrep "in" ;
---  onP = mkPrep "on" ;
---  toP = mkPrep "to" ;
---
-}
+--# -path=.:prelude
+
+concrete LexiconHin of Lexicon = CatHin ** 
+--open ResHin, Prelude in {
+  open ParadigmsHin, Prelude in {
+
+  flags 
+    optimize=values ;
+    coding = utf8;
+
+  lin
+  airplane_N = mkN "जHज" ;
+--  answer_V2S = mkV2  (compoundV "जwब" (mkV "दयन")) ;
+--  apartment_N = mkN "कमरह" ;
+  apple_N = mkN "सयब" ;
+--  art_N = mkN "fन" ;
+  ask_V2Q = mkV2 (mkV "पwचHन") ;
+--  baby_N = mkN "बचH" ;
+  bad_A = mkA "बर" ;
+  bank_N = mkN "बयनक" ;
+  beautiful_A = mkA "सनदर" ;
+  become_VA = mkV "बनन";
+  beer_N = mkN "बेेर" ;
+--  beg_V2V =  mkV2V (compoundV "लतज" (mkV "करन")) "सै" "कह" False;
+  big_A = mkA "बृ" ;
+--  bike_N = mkN "सयचल" feminine ;
+--  bird_N = mkN "परनदह" ;
+  black_A =  mkA "कल" ;
+  blue_A = mkA "नयल" ;
+  boat_N = mkN "नw" ;
+  book_N = mkN "कतब" feminine ;
+--  boot_N = mkN "जwत" ;
+  boss_N = mkN "मलक" ;
+  boy_N = mkN "लृक" ;
+  bread_N = mkN "रwतय" ;
+  break_V2 = mkV2 (mkV "तwृन") ;
+  broad_A = mkA "चwृ" ;
+  brother_N2 = mkN2 (mkN "बHय") (mkPrep "क" "क") "कै" ; --not correct
+  brown_A = mkA "बHwर" ;
+--  butter_N = mkN "मकh-न" ;
+  buy_V2 = mkV2 (mkV "खरयदन");
+  camera_N = mkN "कयमरH" ;
+  cap_N = mkN "तwपय" ;
+  car_N = mkN "कर" ;
+--  carpet_N = mkN "तपy^य" ;
+  cat_N = mkN "बलय" feminine;
+--  ceiling_N = mkN "चh-त" feminine ;
+  chair_N = mkN "करसय" ;
+--  cheese_N = mkN "पनयर" feminine ;
+  child_N = mkN "बचH"  ;
+  church_N = mkN "गरज" ;
+  city_N = mkN "XHर" ;
+  clean_A = mkA "सf" ;
+  clever_A = mkA "चतर" ;  
+  close_V2 =  mkV2 (compoundV "बनद" do_V2); 
+  coat_N = mkN "कwथ" ;
+  cold_A = mkA "सरद" ;
+  come_V = mkV "ान" ;
+  computer_N = mkN "कमपयwथर" ;
+  country_N = mkN "दयX" ;
+--  cousin_N = mkCmpdNoun "चच" (mkN "ज़द") ; -- a compund noun made of two nouns
+  cow_N = mkN "गै" feminine ;
+  die_V = mkV "मरन" ;
+  dirty_A = mkA "गनद" ;
+--  distance_N3 = mkN3 (mkN "fशलह") (mkPrep "क") "कै" "सै"  ;
+  doctor_N = mkN "दकतर" ;
+  dog_N = mkN "कत" ;
+  door_N = mkN "दरwज़" ;
+  drink_V2 = mkV2 (mkV "पयन");
+  easy_A2V = mkA "ासन" "" ; -- chek for A or a
+  eat_V2 = mkV2 (mkV "कHन") "" ;
+  empty_A = mkA "खलय" ;
+  enemy_N = mkN "दXमन" ;
+  factory_N = mkN "करखन" ;
+-- father_N2 = mkN2 (mkN "पत" irregular) (mkPrep "क") "कै"  ;
+  fear_VS = mkV "दृन";
+  find_V2 = mkV2 (mkV "दHwनद") ;
+  fish_N = mkN "मचHलय" ;
+  floor_N = mkN "fरX" ;
+  forget_V2 = mkV2 (mkV "बHwलन")  ;
+--  fridge_N = mkN "fरयग" ;
+  friend_N = mkN "दwसत" masculine ;
+  fruit_N = mkN "पHल" ;
+--  fun_AV = mkAV (regA "fुन") ;
+  garden_N = mkN "बघ" ; -- chek for G
+  girl_N = mkN "लृकय" ;
+  glove_N = mkN "दसतन" ;
+  gold_N = mkN "सwन" ;
+  good_A = mkA "चH" ;
+  go_V = mkV "जन" ;
+  green_A = mkA "Hर" ;
+--  harbour_N = mkCmpdNoun "बनदर" (mkN "गह") ;
+  hate_V2 = mkV2 (compoundV "नfरत" do_V2) ;
+  hat_N = mkN "थwपय" ;
+--  have_V2 = dirV2 (mk5V "हवे" "हस" "हद" "हद" "हविनग") ;
+  hear_V2 = mkV2 (mkV "सनन") ;
+--  hill_N = mkN "पहृय" ;
+--  hope_VS = (compoundV "मयद" do_V2);
+  horse_N = mkN "गHwृ" ;
+  hot_A = mkA "गरम" ;
+  house_N = mkN "गHर" ;
+  important_A = mkA "ज़रwरय" ;  -- check about z
+--  industry_N = mkN "शनेत" feminine ;
+  iron_N = mkN "लwH" ;
+  king_N = mkN "रज" ;
+  know_V2 = mkV2 (mkV "जनन") ;
+  know_VS = mkV "जनन";
+--  lake_N = mkN "जh-यल" feminine ;
+  lamp_N = mkN "दय" ;
+  learn_V2 = mkV2 (mkV "सयकHन") ;
+--  leather_N = mkN "चमृ" ;
+  leave_V2 = mkV2 (mkV "चलन") ;
+  like_V2 = mkV2 (compoundV "पसनद" do_V2);
+  listen_V2 = mkV2 (mkV "सनन") ;
+  live_V = mkV "रहन" ; ---- touch
+  long_A = mkA "लमब" ;
+  lose_V2 = mkV2 (compoundV "कHw" do_V2) ;
+  love_N = mkN "परयम" ;
+  love_V2 = mkV2 (compoundV "पयर" do_V2) "कw";
+  man_N = mkN "ादमय" ;
+--  married_A2 = mkA "Xदय " "सै" ;
+  meat_N = mkN "मस" ;
+  milk_N = mkN "दwदH" ;
+  moon_N = mkN "चनद" ;
+  mother_N2 = mkN2 (mkN "मत" feminine) (mkPrep "कय" "कय") "कै";   -- not covered need to be discussed
+--  mountain_N = mkN "पहृय" ;
+  music_N = mkN "सनगयत" ;
+--  narrow_A = mkA "बरयक" ;
+  new_A = mkA "नय" ;
+  newspaper_N = mkN "खबर" ;
+  oil_N = mkN "तयल" ;
+  old_A = mkA "बwृH" ;
+  open_V2 = mkV2 (mkV "कHwलन") ;
+--  paint_V2A = mkV2 (compoundV "रनग" do_V2) ;
+  paper_N = mkN "कघज़" ;
+  paris_PN = mkPN "पयरस" ;
+  peace_N = mkN "मन" ;
+  pen_N = mkN "qलम" ;
+--  planet_N = mkN "सयरह" ;
+--  plastic_N = mkN "पलसथक" ;
+  play_V2 = mkV2 (mkV "कHयलन") ;
+--  policeman_N = mkCmpdNoun "पwलयस" (mkN "wल") ; 
+--  priest_N = (mkN "पयघमबर") ;
+--  probable_AS = mkAS (regA "परॉबबले") ;
+--  queen_N = mkN "Xहज़दय" ;
+--  radio_N = mkN "रयधयw" ;
+  rain_V0 = compoundV "बरX" (mkV "Hwन" ) ;
+  read_V2 = mkV2 (mkV "पृHन");
+  red_A = mkA "लल" ;
+  religion_N = mkN "दHरम" ;
+--  restaurant_N = mkN "हwथल" ;
+  river_N = mkN "दरय" masculine ;
+  rock_N = mkN "चथन" ;
+  roof_N = mkN "चh-त" masculine ;
+--  rubber_N = mkN "रबृ" ;
+  run_V = mkV "दwृन" ;
+  say_VS = mkV "कHन" ;
+  school_N = mkN "मकतब" ;
+--  science_N = mkN "सनस" ; -- vgyan
+  sea_N = mkN "समनदर" ;
+--  seek_V2 = mkV2 (compoundV "तलX" do_V2) ;
+  see_V2 = mkV2 (mkV "दयकHन") ;
+  sell_V3 = mkV3 (mkV "बयचन") "कw" "";
+  send_V3 = mkV3 (mkV "बHयजन") "कw" "";
+  sheep_N = mkN "बHयृ" feminine ;
+  ship_N = mkN "जHज़" ;
+  shirt_N = mkN "करत" feminine;
+  shoe_N = mkN "जwत" ;
+  shop_N = mkN "दwकन" feminine ;
+  short_A = mkA "चHwथ" ;
+  silver_N = mkN "चनदय" ;
+  sister_N = mkN "बHन" feminine ;
+  sleep_V = mkV "सwन" ;
+  small_A = mkA "चHwथ" ;
+  snake_N = mkN "सनप" ;
+--  sock_N = mkN "जरब" feminine ;
+  speak_V2 = mkV2 (mkV "बwलन") ;
+  star_N = mkN "तर" ;
+--  steel_N = mkN "सतयल" ; -- something like ispat
+  stone_N = mkN "पतHर" ;
+--  stove_N = mkN "चwलह" ;
+--  student_N = mkCmpdNoun "t-लब" (mkN "ेलम") ; -- something vidrati
+  stupid_A = mkA "बैwqwf" ;
+--  sun_N = mkN "सwरज" ; -- swrya
+  switch8off_V2 =  mkV2 (compoundV "बनद" do_V2) ;
+  switch8on_V2 = mkV2 (mkV "चलन") ;
+  table_N = mkN "मयज़" feminine ;
+  talk_V3 = mkV3 (mkV "बwलन") "सै" "कै बरै में";
+--  teacher_N = mkN "िसतद" ; -- adyapak
+  teach_V2 = mkV2 (mkV "पृHन") ;
+  television_N = mkN "तयwय" ;
+  thick_A = mkA "मwथ" ;
+  thin_A = mkA "पतल" ;
+  train_N = mkN "रयल गृय" ;
+  travel_V = (compoundV "सfर" do_V2) ;
+--  tree_N = mkN "पयृ" masculine ;
+-- ---- trousers_N = mkN "तरॉुसेरस" ;
+  ugly_A = mkA "बदसwरत" ;
+  understand_V2 = mkV2 (mkV "समजHन") ;
+--  university_N = mkN "यwनयwरसथय" ;
+  village_N = mkN "गwं" ; -- check for n or N
+--  wait_V2 = mkV2 (compoundV "नतz-र" do_V2) "क" ; -- something prtkXa
+  walk_V = mkV "चलन" ;
+--  warm_A = mkA "गरम" ; something gngna
+--  war_N = mkN "जनग" ;
+  watch_V2 = mkV2 (mkV "दयकHन") ;
+--  water_N = mkN "पनय" masculine ; -- not covered masculine ending with y
+  white_A = mkA "सfयद" ;
+  window_N = mkN "रwXनदन" ;
+--  wine_N = mkN "Xरब" feminine ;
+  win_V2 = mkV2 (mkV "जयतन") ;
+  woman_N = mkN "ेwरत" feminine ;
+--  wonder_VQ = compoundV "Hेरन" (mkV "हwन") ;
+  wood_N = mkN "लकृय" ;
+  write_V2 = mkV2 (mkV "लकh-न") ;
+  yellow_A = mkA "पयल" ;
+  young_A = mkA "जwन" ;
+  do_V2 = mkV2 (mkV "करन")  ;
+--  now_Adv = mkAdv "ब" ;
+--  already_Adv = mkAdv "पहलै हय" ;
+  song_N = mkN "गयत" ;
+  add_V3 = mkV3 (compoundV "जमे" do_V2) "" "" ;
+--  number_N = mkN "हनदसह" ;
+--  put_V2 = mkV2 (mkV "धलन") ;
+  stop_V = mkV "रकन"  ;
+--  jump_V = compoundV "चHलनग" (mkV "लगन") feminine ;
+
+--  left_Ord = {s = "बयं" ; n = singular};
+--  right_Ord = {s= "दयं" ; n = singular};
+--  far_Adv = mkAdv "दwर" ;
+  correct_A = mkA "सयH" ;
+  dry_A = mkA "सwकH" ;
+--  dull_A = mkA "नलिक" ;
+--  full_A = mkA "मकमल" ;
+  heavy_A = mkA "बHरय" ;
+  near_A = mkA "पस" ;
+--  rotten_A = mkA "खरब" ;
+  round_A = mkA "गwल" ;
+  sharp_A = mkA "तयज़" ;
+  smooth_A = mkA "चकन" ;
+  straight_A = mkA "सयदH" ;
+  wet_A = mkA "गयल" ; ----
+  wide_A = mkA "चwृ" ;
+  animal_N = mkN "जनwर" ;
+  ashes_N = mkN "रकh-" feminine; -- FIXME: plural only?
+--  back_N = mkN "qमर" feminine ;
+--  bark_N = mkN "बरक" ;
+--  belly_N = mkN "दh-नय" ;
+--  blood_N = mkN "खwन" ;
+  bone_N = mkN "Hधय" feminine ;
+--  breast_N = mkN "चh-तय" ; --stan
+  cloud_N = mkN "बदल" ;
+  day_N = mkN "दन" ;
+  dust_N = mkN "दHwल" ;
+  ear_N = mkN "कन" ;
+--  earth_N = mkN "ज़मयन" feminine ;
+  egg_N = mkN "नधH" ;
+  eye_N = mkN "ानकH" feminine ;
+  fat_N = mkN "मwत" ;
+  feather_N = mkN "पनकH" ;
+--  fingernail_N = mkN "नखन" ;
+  fire_N = mkN "ाग" feminine ;
+  flower_N = mkN "पHwल" ;
+  fog_N = mkN "दHनद" feminine ;
+  foot_N = mkN "पwं" ; -- not properly covered need to be discussed
+  forest_N = mkN "जनगल" ;
+  grass_N = mkN "गHस" feminine ;
+--  guts_N = mkN "गुत" ; -- FIXME: no singular
+  hair_N = mkN "बल" ;
+  hand_N = mkN "HतH" ;
+  head_N = mkN "सर" ;
+  heart_N = mkN "दल" ;
+--  horn_N = mkN "गh-नतय" ;
+  husband_N = mkN "पतय" ;
+  ice_N = mkN "बरf" feminine ;
+  knee_N = mkN "गHतनH" ;
+  leaf_N = mkN "पतH" ;
+  leg_N = mkN "तनग" feminine ;
+  liver_N = mkN "कलयजH" ;
+--  louse_N = mkN "" ; -- jwN
+  mouth_N = mkN "मनH" ; 
+  name_N = mkN "नम" ;
+  neck_N = mkN "गरदन" feminine ;
+  night_N = mkN "रत" feminine ;
+  nose_N = mkN "नक" ;
+--  person_N = mkN "Xखश" ;
+  rain_N = mkN "बरX" feminine ;
+  road_N = mkN "सृक" ;
+  root_N = mkN "गृ" feminine ;
+  rope_N = mkN "रसय" ;
+  salt_N = mkN "नमक" feminine ;
+  sand_N = mkN "रयत" feminine ;
+  seed_N = mkN "बयज"  ;
+--  skin_N = mkN "जलद" feminine ; -- crm
+  sky_N = mkN "मबर" ;
+  smoke_N = mkN "दHwं"; -- singular masc nouns ending with aN,wN yet to be implemented
+  snow_N = mkN "बरf" feminine ;
+  stick_N = mkN "सॉथय" ;
+  tail_N = mkN "दम" ;
+--  tongue_N = mkN "ज़बन" feminine ;
+--  tooth_N = mkN "दनत" masculine;
+  wife_N = mkN "पतनय" ;
+  wind_N = mkN "Hw" ;
+--  wing_N = mkN "पर" ;
+  worm_N = mkN "कयृ" ;
+  year_N = mkN "सल" ;
+--  blow_V = mkV "चलन" ;
+  breathe_V = compoundV "सनस" (mkV "लयन" ) ;
+  burn_V = mkV "जलन" ;
+  dig_V = mkV "कHwदन" ;
+  fall_V = mkV "गरन" ;
+--  float_V = mkV "तयरन" ;
+  flow_V = mkV  "चलन" ;
+  fly_V = mkV "ृन" ;
+--  freeze_V = mkV "जमन";
+  give_V3 = mkV3 (mkV "दयन") "कw" "";
+  laugh_V = mkV "हनसन" ;
+--  lie_N = mkN "जh-wत" masculine ;
+  lie_V = compoundV "जHwत" (mkV "बwलन" );
+  play_V = mkV "कHयलन" ;
+  sew_V = mkV "सयन" ;
+  sing_V = mkV "गन" ;
+  sit_V = mkV "बयथHन" ;
+  smell_V = mkV "सwनगन" ;
+  spit_V = mkV "तHwकन" ;
+  stand_V = compoundV "कHृै" (mkV "हwन" ); -- a type of compound verb made of two verbs i.e 'kHRa' also inflects, rather than a string and verb should be fixed
+--  swell_V = mkV "सwजh-न" ;
+  swim_V = mkV "तयरन" ;
+  think_V = mkV "सwचन" ;
+  turn_V = mkV "मृन";
+--  vomit_V = compoundV "लतय" (mkV "करन") feminine ;
+  bite_V2 = mkV2 (mkV "कतन") ;
+  count_V2 = mkV2 (mkV "गनन") ;
+  cut_V2 = mkV2 (mkV "कतन") ;
+  fear_V2 = mkV2 (mkV "धरन") ;
+  fight_V2 = mkV2 (mkV "लृन") ;
+--  hit_V2 = mkV2 (compoundV "तh-wकर" (mkV "मरन" ));
+  hold_V2 = mkV2 (mkV "पकृन") ;
+--  hunt_V2 = mkV2 (compoundV "Xकर" do_V2);
+  kill_V2 =  mkV2 (compoundV "मर" (mkV "धलन" )) ;
+  pull_V2 = mkV2 (mkV "कHनचन");
+--  push_V2 = mkV2 (mkV "दh-कयलन") "कw" ;
+--  rub_V2 = mkV2 (mkV "रगृन") ;
+--  scratch_V2 = mkV2 (mkV "कh-रचन") "कw" ;
+--  split_V2 = mkV2 (mkV "बनत") "कw" ;
+--  squeeze_V2 = dirV2 (regV "सqुेेज़े") ;
+--  stab_V2 = dirV2 (regDuplV "सतब") ;
+--  suck_V2 = mkV2 (mkV "चwसन") ;
+  throw_V2 = mkV2 (mkV "पHयनकन") ;
+  tie_V2 = mkV2 (mkV "बनदHन") ;
+  wash_V2 = mkV2 (mkV "दHwन") ;
+  wipe_V2 = mkV2 (compoundV "शf" (mkV "करन" ));
+
+----  other_A = regA "ॉतहेर" ;
+
+--  grammar_N = mkN "गरदन" ;
+--  language_N = mkN "ज़बन" feminine ;
+--  rule_N = mkN "शwल" ;
+
+---- added 4/6/2007
+    john_PN = mkPN "जॉन" ;
+--    question_N = mkN "सwल" ;
+--    ready_A = regA "रेदय" ;
+--    reason_N = mkN "wजह" feminine ;
+--    today_Adv = mkAdv "ाज" ;
+--    uncertain_A = mkA ["घयर यqयनय"] ;
+    
+ 
+}