blob: 413cb02e5e2b8e47dcb5a6af33a51433c6e056ad (
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
|
--# -path=.:present:prelude
concrete PeaceLexExt_Eng of PeaceLexExt =
PeaceCat_Eng ** open ParadigmsEng in {
lin
-- Adjectives
dangerous_A = regA "dangerous" ;
dead_A = regA "dead" ;
hungry_A = regA "hungry" ;
large_A = regA "large" ;
sick_A = regA "sick" ;
-- Nouns
air_N = regN "air" ;
arm_N = regN "arm" ;
building_N = regN "building" ;
car_N = regN "car" ;
corpse_N = regN "corpse" ;
doctor_N = regN "doctor";
enemy_N = regN "enemy";
food_N = regN "food";
friend_N = regN "friend";
landmine_N = regN "landmine" ;
medicine_N = regN "medicine" ;
skin_N = regN "skin" ;
soldier_N = regN "soldier" ;
weapon_N = regN "weapon";
-- Verbs
cough_V = regV "cough" ;
need_V2 = dirV2 (regV "need");
own_V2 = dirV2 (regV "own") ;
show_V3 = dirdirV3 (regV "show") ;
}
|
