summaryrefslogtreecommitdiff
path: root/next-lib/src/arabic/LexiconAra.gf
blob: 7f52d52bd0e606b89b5eacdb92d6495c28f537c5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
--# -path=.:prelude
--
concrete LexiconAra of Lexicon = CatAra ** open 
  ParadigmsAra, 
  ResAra,
  MorphoAra, --shouldn't open it here, only needed reg &sndf
  Prelude in { 

flags 
  optimize=values ;  coding=utf8 ;

  lin

  airplane_N   = sdfN "ط؟ر" "فاعِلة" Fem NoHum ;
  answer_V2S   = dirV2 (v3 "جوب") ;
  apartment_N  = brkN "شقّ" "فِعّة" "فِعَل" Fem NoHum ;
  apple_N      = sdfN "تفح" "فِعّالة" Fem NoHum ;
  art_N        = brkN "فنّ" "فَعّ" "فُعُول" Masc NoHum ;
  ask_V2Q      = dirV2 (regV "يَس؟َل") ;
--  ask_V2Q      = dirV2 (v1 "س؟ل" a a) ;
  baby_N       = brkN "طفل" "فِعل" "أَفعال" Masc Hum;
  bad_A        = sndA "سو؟" "فَيِّع" ;
  bank_N       = brkN "بنك" "فَعل" "فُعُول" Masc NoHum ;
  beautiful_A  = sndA "جمل" "فَعِيل" ;
  become_VA    = mkVA (v4 "صبح") ;
  beer_N       = sdfN "بير" "فِعلة" Fem NoHum ;
  beg_V2V      = dirV2 (v5 "وسل") ;
  big_A        = sndA "كبر" "فَعِيل" ;
  bike_N       = sdfN "درج" "فَعّالة" Fem NoHum ;
  bird_N       = brkN "طير" "فَعل" "فُعُول" Masc NoHum; 
  black_A      = clrA "سود" ;
  blue_A       = clrA "زرق" ;
  boat_N       = brkN "قرب" "فاعِل" "فَواعِل" Masc NoHum ;
  book_N       = brkN "كتب" "فِعال" "فُعُل" Masc NoHum ;
  boot_N       = sdfN "جزم" "فَعلة" Fem NoHum ;
  boss_N       = brkN "دور" "مُفِيع" "مُفَعاء" Masc Hum ;
  boy_N        = brkN "صبي" "فَعِل" "فُعلان" Masc Hum ;
  bread_N      = brkN "خبز" "فُعل" "أَفعال" Masc NoHum ;
  break_V2     = dirV2 (regV "يَكسُر") ;
--  break_V2     = dirV2 (v1 "كسر" a u) ;
  broad_A      = sndA "وسع" "فاعِل" ;
  brother_N2   = brkN "؟خو" "فَع" "فِعلة" Masc Hum ; --FIXME
  brown_A      = sndA "بني" "فُعِّل";
  butter_N     = sdfN "سبد" "فُعلة" Fem NoHum ;
  buy_V2       = dirV2 (v8 "شري") ;
  camera_N     = sdfN "كمر" "فاعِيلا" Fem NoHum ; -- |Alö taSwIr
  cap_N        = sdfN "قبع" "فُعَّلة" Fem NoHum ; --qalnUsö
  car_N        = sdfN "سير" "فَعّالة" Fem NoHum ;
  carpet_N     = sdfN "سجد" "فَعّالة" Fem NoHum ;
  cat_N        = brkN "هرّ" "فِعّة" "فِعَل" Fem NoHum ;
  ceiling_N    = brkN "سقف" "فَعل" "أَفعُل" Masc NoHum ;
  chair_N      = brkN "كرس" "فُعلِي" "فَعالِي" Masc NoHum ;
  cheese_N     = brkN "جبن" "فُعلة" "أَفعال" Fem NoHum ;
  child_N      = brkN "ولد" "فَعَل" "أَفعال" Masc Hum ;
  church_N     = brkN "كنس" "فَعِيلة" "فَعاٱِل" Fem Hum ;
  city_N       = brkN "مدن" "فَعِيلة" "فُعُل" Fem NoHum ;
  clean_A      = sndA "نظف" "فَعِيل" ;
  clever_A     = sndA "جهد" "مُفتَعِل" ;
  close_V2     = dirV2 (v4 "غلق") ;
  coat_N       = brkN "عطف" "مِفعَل" "مَفاعِل" Masc NoHum ;
  cold_A       = sndA "برد" "فاعِل" ;
  come_V       = v1 "جي؟" a i ; --check
  computer_N   = brkN "حسب" "فاعُول" "فَواعِيل" Masc NoHum ;
  country_N    = brkN "بلد" "فَعَل" "فِعال" Masc NoHum ;
  cousin_N     = brkN "قرب" "فَعِيل" "أَفعِلاء" Masc Hum ; -- (<bn / bnt) (cam[ö] / xAl[ö]) 
  cow_N        = sdfN "بقر" "فَعلة" Fem NoHum ;
  die_V        = v1 "موت" a u ; --check
  dirty_A      = sndA "وسخ" "فَعِل" ;
  distance_N3  = mkN3 (sdfN "سوف" "مَفاعة" Fem NoHum) "مِن" "إِلَى" ;
  doctor_N     = brkN "طبّ" "فَعِيل" "أَفِعّاء" Masc Hum ;
  dog_N        = brkN "كلب" "فَعل" "فِعال" Masc NoHum ;
  door_N       = brkN "بوب" "فاع" "أَفعال" Masc NoHum ;
  drink_V2     = dirV2 (regV "شَرِب") ;
--  drink_V2     = dirV2 (v1 "شرب" i a) ;
  easy_A2V     = mkA2 (sndA "سهل" "فَعل") "لِ" ;
  eat_V2       = dirV2 (regV "يَ؟كُل") ;
--  eat_V2       = dirV2 (v1 "؟كل" a u) ;
  empty_A      = sndA "فرغ" "فاعِل" ;
  enemy_N      = brkN "عدو" "فَعُلّ" "أَفعاء" Masc Hum ;
  factory_N    = brkN "صنع" "مَفعَل" "مَفاعِل" Masc NoHum ;
  father_N2    = brkN "؟ب" "فَع" "أَفعاء" Masc Hum;
  fear_VS      = mkVS (v1 "خشي" i a );
  find_V2      = dirV2 (v1 "وجد" a i ) ;
  fish_N       = brkN "سمك" "فَعَلة" "أَفعال" Fem NoHum ;
  floor_N      = brkN "؟رض" "فَعل" "فَعالِي" Fem NoHum;
  forget_V2    = dirV2 (v1 "نسي" i a ) ;
  fridge_N     = sdfN "برد" "فَعّال" Masc NoHum ;
  friend_N     = brkN "صدق" "فَعِيل" "أَفعِلاء" Masc Hum ; --SadIqö
  fruit_N      = brkN "فكه" "فاعِلة" "فَواعِل" Fem NoHum ;
  fun_AV       = sndA "متع" "مُفعِل" ;
  garden_N     = brkN "حدق" "فَعِيلة" "فَعاٱِل" Fem NoHum ;
  girl_N       = brkN "بنت" "فِعل" "فَعال" Fem Hum ;
  glove_N      = sdfN "قفز" "فُعّال" Masc NoHum ;
  gold_N       = sdfN "ذهب" "فَعَل" Masc NoHum ;
  good_A       = sndA "جود" "فَيِّع" ; -- Hasan, HisAn
  go_V         = regV "يَذهَب" ;
--  go_V         = v1 "ذهب" a a ;
  green_A      = clrA "خضر" ;
  harbour_N    = brkN "رف؟" "مَفعَل" "مَفاعِل" Masc NoHum ; --mInA', marsaY
  hate_V2      = dirV2 (regV "كَرِه") ;
  hat_N        = sdfN "قبع" "فُعَّلة" Fem NoHum ;
--  have_V2      = dirV2 (v1 "ملك" a i) ; 
  hear_V2      = dirV2 (regV "سَمِع") ;
--  hear_V2      = dirV2 (v1 "سمع" i a) ;
  hill_N       = brkN "هضب" "فَعلة" "فِعال" Fem NoHum ; --tallö, rAbiyö
  hope_VS      = mkVS (v1 "رجو" a u) ; --check
  horse_N      = brkN "حصن" "فِعال" "أَفعِلة" Masc NoHum ;
  hot_A        = sndA "سخن" "فاعِل" ; --HAr
  house_N      = brkN "بيت" "فَعل" "فُعُول" Masc NoHum ; --manzil
  important_A  = sndA "هيم" "فاعّ" ;
  industry_N   = sdfN "صنع" "فِعالة" Fem NoHum ;
  iron_N       = brkN "حدّ" "فَعِيل" "فَعائِل" Masc NoHum ;
  king_N       = brkN "ملك" "فَعِل" "فُعُول" Masc Hum ;
  know_V2      = dirV2 (regV "عَرِف") ;
--  know_V2      = dirV2 (v1 "عرف" i a) ;
  lake_N       = sdfN "بحر" "فُعَيلة" Fem NoHum ;
  lamp_N       = brkN "صبح" "مِفعال" "مَفاعِيل" Masc NoHum ; --qanDIl, fAnUs
  learn_V2     = dirV2 (v5 "علم") ;
  leather_N    = brkN "جلد" "فِعل" "فُعُول" Masc NoHum ;
  leave_V2     = dirV2 (regV "يَترُك") ;
--  leave_V2     = dirV2 (v1 "ترك" a u) ;
  like_V2      = dirV2 (regV "هَوِي") ; 
--  like_V2      = dirV2 (v1 "هوي" i a) ; --check
  listen_V2    = mkV2 (v8 "سمع") "إِلَى" ;
  live_V       = v1 "عيش" a i ; --check
  long_A       = sndA "طول" "فَعِيل" ;
  lose_V2      = dirV2 (regV "خَسِر") ; --Dayyac, >aDAc
--  lose_V2      = dirV2 (v1 "خسر" i a) ; --Dayyac, >aDAc
  love_N       = brkN "حبّ" "فُعّ" "فُعّ" Masc NoHum ; -- no plur
  love_V2      = dirV2 (v1 "حبّ" a i) ;
  man_N        = brkN "رجل" "فَعُل" "فِعال" Masc Hum ;
  married_A2   = mkA2 (sndA "زوج" "مُتَفَعِّل") "مِن" ;
  meat_N       = brkN "لحم" "فَعلة" "فُعُول" Masc NoHum ;
  milk_N       = brkN "حلب" "فَعِيل" "فَعِيل" Masc NoHum ; --no plur
  moon_N       = brkN "قمر" "فَعَل" "أَفعال" Masc NoHum ;
  mother_N2    = sdfN "؟م" "فُعّ" Fem Hum ;
  mountain_N   = brkN "جبل" "فَعَل" "فِعال" Masc NoHum ;
  music_N      = mkN (reg "مُوسِيقَى" "مُوسِيقَى") Fem NoHum ; --no plur
  narrow_A     = sndA "ضيق" "فَعِّل" ;
  new_A        = sndA "جدّ" "فَعِيل" ;
  newspaper_N  = brkN "صحف" "فَعِيلة" "فُعُل" Fem NoHum ;
  oil_N        = brkN "زيت" "فَعل" "فُعُول" Masc NoHum ;
  old_A        = sndA "قدم" "فَعِيل" ;
  open_V2      = dirV2 (regV "يَفتَح") ;
--  open_V2      = dirV2 (v1 "فتح" a a ) ;
  paint_V2A    = mkV2A (regV "يَدهَن" ) [] ;
--  paint_V2A    = mkV2A (v1 "دهن" a a ) [] ;
  paper_N      = brkN "ورق" "فَعَلة" "أَفعال" Fem NoHum ;
  paris_PN     = mkPN "بارِيس" Fem NoHum  ;
  peace_N      = brkN "سلم" "فَعال" "فَعال" Masc NoHum; --no plur
  pen_N        = brkN "قلم" "فَعَل" "أَفعال" Masc NoHum;
  planet_N     = mkN (reg "كَوكَب" "كَواكِب") Masc NoHum ; -- quadriconsonantal
  plastic_N    = mkN (sndf "بلاستِيك") Masc NoHum ;
  play_V2      = dirV2 (regV "لَعِب") ;
--  play_V2      = dirV2 (v1 "لعب" i a) ;
  policeman_N  = sdmN "شرط" "فِعلِي" Masc Hum ;
  priest_N     = brkN "قسّ" "فِعِّيل" "أَفِعّة" Masc Hum ;
  probable_AS  = mkAS (sndA "مكن" "مُفعِل") ;
  queen_N      = sdfN "ملك" "فَعِلة" Fem Hum ;
  radio_N      = mkN (sndf "راديُو") Masc NoHum ;
  rain_V0      = mkV0 (regV "يَمطُر") ;
--  rain_V0      = mkV0 (v1 "مطر" a u) ;
  read_V2      = dirV2 (regV "يَقرَ؟") ;
--  read_V2      = dirV2 (v1 "قر؟" a a ) ;
  red_A        = clrA "حمر" ;
  religion_N   = brkN "دين" "فِعل" "أَفعال" Masc NoHum ;
  restaurant_N = brkN "طعم" "مَفعَل" "مَفاعِل" Masc NoHum ;
  river_N      = brkN "نهر" "فَعل" "أَفعال" Masc NoHum ;
  rock_N       = brkN "صخر" "فَعلة" "فُعُول" Fem NoHum ;
  roof_N       = brkN "سطح" "فَعل" "أَفعُل" Masc NoHum ;
  rubber_N     = brkN "مطّ" "فَعّال" "فَعّال" Masc NoHum ; -- no hum
  run_V        = regV "يَركُض" ;
--  run_V        = v1 "ركض" a u ;
  say_VS       = mkVS (v1 "قول" a u) ; --check
  school_N     = brkN "درس" "مَفعَلة" "مَفاعِل" Fem NoHum ;
  science_N    = brkN "علم" "فِعل" "فُعُول" Masc NoHum ;
  sea_N        = brkN "بحر" "فَعل" "فُعُول" Masc NoHum ;
  seek_V2      = dirV2 (regV "يَطلُب") ; 
--  seek_V2      = dirV2 (v1 "طلب" a u) ; 
  see_V2       = dirV2 (v1 "ر؟ي" a a) ;
  sell_V3      = dirdirV3 (v1 "بيع" a i) ; --check
  send_V3      = dirdirV3 (v4 "رسل")  ;
  sheep_N      = brkN "خرف" "فَعُول" "فِعال" Masc NoHum ;
  ship_N       = brkN "سفن" "فَعِيلة" "فُعُل" Fem NoHum ;
  shirt_N      = brkN "قمص" "فَعِيل" "فُعلان" Masc NoHum ;
  shoe_N       = brkN "حذو" "فِعاء" "أَفعِية" Masc NoHum ;
  shop_N       = brkN "تجر" "مَفعَل" "مَفاعِل" Masc NoHum ;
  short_A      = sndA "قصر" "فَعِيل" ;
  silver_N     = brkN "فضّ" "فِعّة" "فِعَل" Fem NoHum ;
  sister_N     = brkN "؟خو" "فُعت" "فَعَوات" Fem Hum ; --FIXME
  sleep_V      = v1 "نوم" i a ; --check
  small_A      = sndA "صغر" "فَعِيل" ;
  snake_N      = sdfN "حيّ" "فَعّة" Fem NoHum ;
  sock_N       = brkN "جرب" "فَوعَل" "فَواعِل" Masc NoHum ;
  speak_V2     = dirV2 (v5 "كلم") ;
  star_N       = brkN "نجم" "فَعل" "فُعُول" Masc NoHum ; --najmö
  steel_N      = brkN "فلذ" "فُوعال" "فَواعِل" Masc NoHum ;
  stone_N      = brkN "حجر" "فَعَل" "أَفعال" Masc NoHum ;
  stove_N      = brkN "وقد" "مَفعِل" "مَفاعِل" Masc NoHum ;
  student_N    = brkN "طلب" "فاعِل" "فُعّال" Masc Hum ; --tilmI*
  stupid_A     = clrA "بله" ;
  sun_N        = brkN "شمس" "فَعل" "فُعُول" Fem NoHum ;
  switch8off_V2 = dirV2 (v4 "طف؟") ;
  switch8on_V2 = dirV2 (v4 "شعل") ;
  table_N      = sdfN "طول" "فاعِلة" Fem NoHum ;
  talk_V3      = mkV3 (v5 "حدث") "لِ" "عَن" ;
  teacher_N    = sdmN "علم" "مُفَعِّل" Masc Hum ; --mucal~imö
  teach_V2     = dirV2 (v2 "علم") ;
  television_N = mkN (sndf "تِلِفِزيُون") Masc NoHum ;
  thick_A      = sndA "سمك" "فَعِيل" ;
  thin_A       = sndA "رفع" "فَعِيل" ;
  train_N      = sdfN "قطر" "فِعال" Masc NoHum;
  travel_V     = v3 "سفر" ;
  tree_N       = brkN "شجر" "فَعلة" "أَفعال" Fem NoHum ;
  ugly_A       = sndA "قبح" "فَعِيل" ;
  understand_V2 = dirV2 (regV "فَهِم") ;
--  understand_V2 = dirV2 (v1 "فهم" i a ) ;
  university_N = sdfN "جمع" "فاعِلة" Fem NoHum ;
  village_N    = brkN "قري" "فَعلة" "فُعَى" Fem NoHum ; --Daycö
  wait_V2      = dirV2 (v8 "نظر")  ;
  walk_V       = v1 "مشي" a i ; --check
  warm_A       = sndA "دف؟" "فاعِل" ;
  war_N        = brkN "حرب" "فَعل" "فُعُول" Fem NoHum ;
  watch_V2     = dirV2 (v3 "شهد") ;
  water_N      = mkN (reg "ماء" "مِياه") Fem NoHum ; --"موه" "فاء" "فِياع" ??
  white_A      = clrA "بيض" ;
  window_N     = brkN "نفذ" "فاعِلة" "فَواعِل" Fem NoHum ; --$ub~Ak
  wine_N       = brkN "خمر" "فَعل" "فُعُول" Masc NoHum ;
  win_V2       = dirV2 (regV "رَبِح") ;
--  win_V2       = dirV2 (v1 "ربح" i a) ;
  woman_N      = mkN (reg "إِمرَأَة" "نِسوَة") Fem Hum ;
  wonder_VQ    = mkVQ (v6 "س؟ل") ;
  wood_N       = brkN "خشب" "فَعَل" "أَفعال" Masc NoHum ;
  write_V2     = dirV2 (regV "يَكتُب") ;
--  write_V2     = dirV2 (v1 "كتب" a u) ;
  yellow_A     = clrA "صفر" ;
  young_A      = sndA "شبّ" "فاعّ" ;

  do_V2        = dirV2 (regV "يَفعَل") ;
--  do_V2        = dirV2 (v1 "فعل" a a ) ;
  now_Adv      = mkAdv "الآن" ;
  already_Adv  = mkAdv "سابِقاً" ; 
  song_N       = brkN "غني" "أَفعِلة" "أَفاعِي" Fem NoHum ;
  add_V3       = dirV3 (regV "يَجمَع") "وَ" ;
--  add_V3       = dirV3 (v1 "جمع" a a) "وَ" ;
  number_N     = brkN "رقم" "فَعل" "أَفعال" Masc NoHum ; --cadad
  put_V2       = dirV2 (v1 "وضع" a a );
  stop_V       = v5 "وقف" ;
  jump_V       = regV "يَقفِز" ;
--  jump_V       = v1 "قفز" a i ;

  left_Ord     = mkOrd "أَيسَر" "يُسرَى";
  right_Ord    = mkOrd "أَيمَن" "يُمنَى" ;

  far_Adv      = mkAdv "بَعِيداً" ;
  correct_A    = sndA "صحّ" "فَعِيل" ;
  dry_A        = sndA "نشف" "فاعِل" ;
  dull_A       = sndA "بهت" "فاعِل" ;
  full_A       = sndA "مل؟" "فَعِيل" ;
  heavy_A      = sndA "ثقل" "فَعِيل" ;
  near_A       = sndA "قرب" "فَعِيل" ;
  rotten_A     = sndA "فسد" "فاعِل" ;
  round_A      = sndA "دور" "مُفَعَّل" ;
  sharp_A      = sndA "حدّ" "فاعّ" ;
  smooth_A     = sndA "نعم" "فاعِل" ;
  straight_A   = sndA "قوم" "مُستَفِيع" ;
  wet_A        = sndA "رطب" "فَعِل" ;
  wide_A       = sndA "وسع" "فاعِل" ;

  animal_N     = sdfN "حيّ" "فَعَوان"           Masc NoHum ;
  ashes_N      = brkN "رمد" "فَعال" "أَفعِلة"   Masc NoHum;           
  back_N       = brkN "ظهر" "فَعل" "فُعُول"      Masc NoHum;           
  bark_N       = brkN "نبح" "فَعل" "فُعال"      Masc NoHum;           
  belly_N      = brkN "بطن" "فَعل" "فُعُول"      Fem  NoHum;           
  blood_N      = brkN "دم"  "فَع" "فِعاء"       Masc NoHum;           
  bone_N       = brkN "عظم" "فَعلة" "فِعال"     Fem  NoHum;           
  breast_N     = brkN "صدر" "فَعل" "فُعُول"      Masc NoHum;           
  cloud_N      = brkN "غيم" "فَعلة" "فُعُول"     Fem  NoHum;           
  day_N        = brkN "يوم" "فَعل" "أَفّاع"     Masc NoHum;           
  dust_N       = brkN "غبر" "فُعال" "أَفعِلة"   Masc NoHum;           
  ear_N        = brkN "؟ذن" "فُعل" "أَفعال"     Fem NoHum;            
  earth_N      = brkN "ترب" "فُعلة" "فُعَل"     Fem NoHum;            
  egg_N        = sdfN "بيض" "فَعلة"             Fem NoHum;            
  eye_N        = brkN "عين" "فَعل" "فُعُول"      Fem NoHum;            
  fat_N        = brkN "دهن" "فُعل" "فُعُول"      Masc NoHum ;          
  feather_N    = sdfN "ريش" "فِعلة"             Fem NoHum;            
  fingernail_N = brkN "ظفر" "فُعل" "أَفاعِل"    Masc NoHum;           
  fire_N       = brkN "نور" "فاع" "فِيعان"       Fem NoHum;            
  flower_N     = brkN "زهر" "فَعلة" "فُعُول"     Fem NoHum;            
  fog_N        = brkN "ضبّ" "فَعال" "فَعال"     Masc NoHum; --no plural ?
  foot_N       = brkN "قدم" "فَعَل" "أَفعال"    Fem NoHum;            
  forest_N     = sdfN "غيب" "فاعة"              Fem NoHum;            
  grass_N      = brkN "عشب" "فُعلة" "أَفعال"    Fem NoHum;            
  guts_N       = brkN "حشو" "فَعا" "أَفعاء"     Fem NoHum;            
  hair_N       = sdfN "شعر" "فَعلة"             Fem NoHum ;           
  hand_N       = brkN "يد"  "فَع" "أَفاعِي"      Fem NoHum  ;  
  head_N       = brkN "ر؟س" "فَعل" "فُعُول"      Masc NoHum;           
  heart_N      = brkN "قلب" "فَعل" "فُعُول"      Masc NoHum;           
  horn_N       = brkN "قرن" "فَعل" "فُعُول"      Masc NoHum;           
  husband_N    = brkN "زوج" "فَعل" "أَفعال"     Masc NoHum;           
  ice_N        = brkN "ثلج" "فَعل" "فُعُول"      Masc NoHum;           
  knee_N       = brkN "ركب" "فُعلة" "فُعَل"     Fem NoHum;            
  leaf_N       = brkN "ورق" "فَعَلة" "أَفعال"   Fem NoHum;             
  leg_N        = brkN "رجل" "فِعل" "أَفعُل"     Fem NoHum;            
  liver_N      = brkN "كبد" "فَعِل" "أَفعال"    Masc NoHum ;          
  louse_N      = sdfN "قمل" "فَعلة"             Fem NoHum;            
  mouth_N      = brkN "فوه" "فُعل" "أَفعال"     Masc NoHum ;          
  name_N       = brkN "؟سم" "فِعل" "فَعالِي"     Masc NoHum;       
  neck_N       = brkN "رقب" "فَعَلة" "فِعال"    Fem NoHum;        
  night_N      = brkN "ليل" "فَعلة" "فَعالِي"    Fem NoHum;  --plural?
  nose_N       = brkN "؟نف" "فَعل" "فُعُول"      Masc NoHum;           
  person_N     = brkN "شخص" "فَعل" "أَفعال"     Masc Hum;             
  rain_N       = brkN "مطر" "فَعَل" "أَفعال"    Masc NoHum;           
  road_N       = brkN "طرق" "فَعِيل" "فُعُل"     Fem NoHum;            
  root_N       = brkN "جذر" "فَعل" "فُعُول"      Masc NoHum ;          
  rope_N       = brkN "حبل" "فَعل" "فِعال"      Masc NoHum;           
  salt_N       = brkN "ملح" "فِعل" "أَفعال"     Masc NoHum;           
  sand_N       = brkN "رمل" "فَعل" "فِعال"      Masc NoHum;           
  seed_N       = brkN "بذر" "فَعل" "فُعُول"      Masc NoHum;           
  skin_N       = brkN "جلد" "فِعل" "فُعُول"      Masc NoHum;           
  sky_N        = sdfN "سمو" "فَعاء"             Fem NoHum;
  smoke_N      = brkN "دخن" "فُعال" "أَفعِلة"   Masc NoHum;           
  snow_N       = brkN "ثلج" "فَعل" "فُعُول"      Masc NoHum;           
  stick_N      = brkN "عصو" "فَعا" "فِعِي"       Masc NoHum ; --"عصو"  
  tail_N       = brkN "ذنب" "فَعَل" "أَفعال"    Masc NoHum;           
  tongue_N     = brkN "لسن" "فِعال" "أَفعِلة"   Masc NoHum;           
  tooth_N      = brkN "سنّ" "فِعل" "أَفعال"     Masc NoHum ;          
  wife_N       = sdfN "زوج" "فَعلة"             Fem Hum;              
  wind_N       = brkN "ريح" "فِعل" "فِعال"      Fem NoHum;            
  wing_N       = brkN "جنح" "فَعال" "أَفعِلة"   Masc NoHum ;           
  worm_N       = brkN "دود" "فُعلة" "فِيعان"     Fem NoHum ;                       
  year_N       = sdfN "سن"  "فَعة"              Fem NoHum   ;              

  blow_V       = regV "يَنفُخ" ;
  breathe_V    = dirV2 (v5 "نفس") ;
  burn_V       = regV "يَحرِق" ;
  dig_V        = regV "يَحفِر" ;
  fall_V       = v1 "وقع" a a ;
  float_V      = v1 "عوم" a u ;
  flow_V       = v1 "سيل" a i ;
  fly_V        = v1 "طير" a i ;
  freeze_V     = v2 "جمد" ;
  give_V3      = dirdirV3 (v4 "عطي") ;
  laugh_V      =  regV "ضَحِك" ;
  lie_V        = regV "يَكذِب" ;
  play_V       = regV "لَعِب" ;
  sew_V        = v1 "خيط" a i ;
  sing_V       = v2 "غني" ;
  sit_V        = regV "يَقعُد" ;
  smell_V      = v1 "شمّ" i a ;
  spit_V       = regV "يَبصُق" ;
  stand_V      = v1 "وقف" a i ;
  swell_V      = v8 "نفخ" ;
  swim_V       = regV "يَسبَح" ;
  think_V      = v2 "فكر" ;
  turn_V       = regV "يَبرُم" ;
  vomit_V      = v5 "قي؟" ;

  bite_V2      = dirV2 ( v1 "عضّ" a a ) ;
  count_V2     = dirV2 (v1 "عدّ" a u) ;
  cut_V2       = dirV2 (v1 "قصّ" a u) ;
  fear_V2      = dirV2 (v1 "خوف" i a) ;
  fight_V2     = dirV2 (v3 "قتل") ;
  hit_V2       = dirV2 (regV "يَضرِب" ) ;
  hold_V2      = dirV2 (regV "يَمسِك" ) ;
  hunt_V2      = dirV2 (v1 "صيد" a i) ;
  kill_V2      = dirV2 (regV "يَقتُل" ) ;
  pull_V2      = dirV2 (regV "يَسحَب") ;
  push_V2      = dirV2 (regV "يَدفَع" ) ;
  rub_V2       = dirV2 ( regV "يَفرُك" ) ;
  scratch_V2   = dirV2 (regV "يَخدِش" ) ;
  split_V2     = dirV2 ( v2 "قسم" ) ;
  squeeze_V2   = dirV2 (regV "يَعصِر" ) ;
  stab_V2      = dirV2 ( regV "يَطعُن" ) ;
  suck_V2      = dirV2 (v1 "مصّ" a u) ;
  throw_V2     = dirV2 (v1 "رمي" a i) ;
  tie_V2       = dirV2 (regV "يَربُط" ) ;
  wash_V2      = dirV2 ( regV "يَغسِل" ) ;
  wipe_V2      = dirV2 ( regV "يَمسَح" ) ;

--  other_A = sndA "ْتهر" ;

} ;