-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathMiniLexiconVot.gf
123 lines (122 loc) · 4.11 KB
/
MiniLexiconVot.gf
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
concrete MiniLexiconVot of MiniLexicon = MiniGrammarVot ** open MiniResVot,Prelude in {
lin already_Adv = mkAdv "jo" ;
-- lin animal_N = mkN "animal" ;
lin apple_N = mkOmõn "omõn" ;
-- lin baby_N = mkN "baby" ;
-- lin bad_A = mkA "bad" ; -- märännü
-- lin beer_N = mkN "beer" ; -- õlut
-- lin big_A = mkA "big" ; -- suuri
-- lin bike_N = mkN "bike" ; -- samakatka, velossipeeda
-- lin bird_N = mkN "bird" ; -- lintu
-- lin black_A = mkA "black" ; -- mussa
-- lin blood_N = mkN "blood" ; -- veri
lin blue_A = mkSinin "sinin" ; -- TODO this is not an adjective
-- lin boat_N = mkN "boat" ; -- vene
-- lin book_N = mkN "book" ; -- čirja
lin boy_N = mkPoikõ "poikõ" ;
-- lin bread_N = mkN "bread" ; -- leipe
-- lin break_V2 = mkV2 "break" ;
lin buy_V2 = mkV2 (mkV "osõ") ; -- TODO proofcheck
-- lin car_N = mkN "car" ; -- mašinõ
lin cat_N = mkKatti "katti" ;
-- lin child_N = mkN "child" "children" ; -- lahsi
-- lin city_N = mkN "city" ; -- lidna
-- lin clean_A = mkA "clean" ; -- puhaz
-- lin clever_A = mkA "clever" ; -- tarkka
-- lin cloud_N = mkN "cloud" ; -- pilvi
-- lin cold_A = mkA "cold" ; -- čülmä
lin come_V = {
s = table {
Presn Sg Per1 => "tuõn" ;
Presn Sg Per2 => "tuõd" ;
Presn Sg Per3 => "tuõb" ;
Presn Pl Per1 => "tuõmmõ" ;
Presn Pl Per2 => "tuõttõ" ;
Presn Pl Per3 => "tulla" ;
Imp => "tuõ"
} ;
isAux = False ;
} ;
-- lin computer_N = mkN "computer" ; -- kampuuttera
lin cow_N = mkPäive "lehme" ;
-- lin dirty_A = mkA "dirty" ;
lin dog_N = mkKoirõ "koirõ" ;
-- lin drink_V2 = mkV2 "drink" ;
-- lin eat_V2 = mkV2 "eat" ;
-- lin find_V2 = mkV2 "find" ;
-- lin fire_N = mkN "fire" ; -- tuli
-- lin fish_N = mkN "fish" ; -- kala
-- lin flower_N = mkN "flower" ; -- kukka
-- lin friend_N = mkN "friend" ; -- tavarissa
lin girl_N = mkTüttö "tüttö" ; -- tüttö
-- lin good_A = mkA "good" ; -- üvä
lin go_V = {
s = table {
Presn Sg Per1 => "meen" ;
Presn Sg Per2 => "meed" ;
Presn Sg Per3 => "meeb" ;
Presn Pl Per1 => "meemme" ;
Presn Pl Per2 => "meette" ;
Presn Pl Per3 => "mennä" ;
Imp => "mee"
} ;
isAux = False ;
} ;
-- lin grammar_N = mkN "grammar" ;
-- lin green_A = mkA "green" ; -- rohoin
-- lin heavy_A = mkA "heavy" ; -- raskaz
-- lin horse_N = mkN "horse" ; -- õpõn
-- lin hot_A = mkA "hot" ;
-- lin house_N = mkN "house" ; -- koto
-- lin john_PN = mkPN "John" ;
-- lin jump_V = mkV "jump" ;
-- lin kill_V2 = mkV2 "kill" ;
-- lin language_N = mkN "language" ; -- čeeli
lin live_V = {
s = table {
Presn Sg Per1 => "elän" ;
Presn Sg Per2 => "eläd" ;
Presn Sg Per3 => "eläb" ;
Presn Pl Per1 => "elämme" ;
Presn Pl Per2 => "elätte" ;
Presn Pl Per3 => "eletä" ;
Imp => "elä"
} ;
isAux = False ;
} ;
lin love_V2 = mkV2 (mkV "suvva") ; -- TODO proofcheck
-- lin man_N = mkN "man" "men" ; -- meez
lin milk_N = mkPäive "piime" ;
-- lin music_N = mkN "music" ; -- muzükka
-- lin new_A = mkA "new" ; -- uusi
lin now_Adv = mkAdv "nüt" ;
-- lin old_A = mkA "old" ;
-- lin paris_PN = mkPN "Paris" ;
lin play_V = mkV "pela" ;
lin read_V2 = mkV2 (mkV "lugõ") ;
-- lin ready_A = mkA "ready" ;
-- lin red_A = mkA "red" ;
-- lin river_N = mkN "river" ; -- jõki jõgõ jõkkia
lin run_V = mkV "johzõ" ; -- TODO proofcheck
-- lin sea_N = mkN "sea" ; -- meri mere merte
lin see_V2 = mkV2 (mkV "näe") ; -- TODO proofcheck
-- lin ship_N = mkN "ship" ;
lin sleep_V = mkV "makka" ; -- TODO proofcheck
-- lin small_A = mkA "small" ;
-- lin star_N = mkN "star" ;
lin swim_V = mkV "uju" ; -- TODO proofcheck
lin teach_V2 = mkV2 (mkV "õpõta") ; -- TODO proofcheck
-- lin train_N = mkN "train" ;
-- lin travel_V = mkV "travel" ;
-- lin tree_N = mkN "tree" ;
-- lin understand_V2 = mkV2 "understand" ;
lin wait_V2 = mkV2 (mkV "oottõ") ; -- TODO proofcheck
-- lin walk_V = mkV "walk" ;
-- lin warm_A = mkA "warm" ;
-- lin water_N = mkN "water" ;
-- lin white_A = mkA "white" ;
-- lin wine_N = mkN "wine" ;
-- lin woman_N = mkN "woman" "women" ;
-- lin yellow_A = mkA "yellow" ;
-- lin young_A = mkA "young" ;
}