YAZ 5.35.1
stem_ISO_8859_1_hungarian.c
Go to the documentation of this file.
1
2/* This file was generated automatically by the Snowball to ANSI C compiler */
3
4#include "../runtime/header.h"
5
6#ifdef __cplusplus
7extern "C"
8{
9#endif
10 extern int hungarian_ISO_8859_1_stem (struct SN_env *z);
11#ifdef __cplusplus
12}
13#endif
14static int r_double (struct SN_env *z);
15static int r_undouble (struct SN_env *z);
16static int r_factive (struct SN_env *z);
17static int r_instrum (struct SN_env *z);
18static int r_plur_owner (struct SN_env *z);
19static int r_sing_owner (struct SN_env *z);
20static int r_owned (struct SN_env *z);
21static int r_plural (struct SN_env *z);
22static int r_case_other (struct SN_env *z);
23static int r_case_special (struct SN_env *z);
24static int r_case (struct SN_env *z);
25static int r_v_ending (struct SN_env *z);
26static int r_R1 (struct SN_env *z);
27static int r_mark_regions (struct SN_env *z);
28#ifdef __cplusplus
29extern "C"
30{
31#endif
32
33
34 extern struct SN_env *hungarian_ISO_8859_1_create_env (void);
35 extern void hungarian_ISO_8859_1_close_env (struct SN_env *z);
36
37
38#ifdef __cplusplus
39}
40#endif
41static const symbol s_0_0[2] = { 'c', 's' };
42static const symbol s_0_1[3] = { 'd', 'z', 's' };
43static const symbol s_0_2[2] = { 'g', 'y' };
44static const symbol s_0_3[2] = { 'l', 'y' };
45static const symbol s_0_4[2] = { 'n', 'y' };
46static const symbol s_0_5[2] = { 's', 'z' };
47static const symbol s_0_6[2] = { 't', 'y' };
48static const symbol s_0_7[2] = { 'z', 's' };
49
50static const struct among a_0[8] = {
51/* 0 */ {2, s_0_0, -1, -1, 0},
52/* 1 */ {3, s_0_1, -1, -1, 0},
53/* 2 */ {2, s_0_2, -1, -1, 0},
54/* 3 */ {2, s_0_3, -1, -1, 0},
55/* 4 */ {2, s_0_4, -1, -1, 0},
56/* 5 */ {2, s_0_5, -1, -1, 0},
57/* 6 */ {2, s_0_6, -1, -1, 0},
58/* 7 */ {2, s_0_7, -1, -1, 0}
59};
60
61static const symbol s_1_0[1] = { 0xE1 };
62static const symbol s_1_1[1] = { 0xE9 };
63
64static const struct among a_1[2] = {
65/* 0 */ {1, s_1_0, -1, 1, 0},
66/* 1 */ {1, s_1_1, -1, 2, 0}
67};
68
69static const symbol s_2_0[2] = { 'b', 'b' };
70static const symbol s_2_1[2] = { 'c', 'c' };
71static const symbol s_2_2[2] = { 'd', 'd' };
72static const symbol s_2_3[2] = { 'f', 'f' };
73static const symbol s_2_4[2] = { 'g', 'g' };
74static const symbol s_2_5[2] = { 'j', 'j' };
75static const symbol s_2_6[2] = { 'k', 'k' };
76static const symbol s_2_7[2] = { 'l', 'l' };
77static const symbol s_2_8[2] = { 'm', 'm' };
78static const symbol s_2_9[2] = { 'n', 'n' };
79static const symbol s_2_10[2] = { 'p', 'p' };
80static const symbol s_2_11[2] = { 'r', 'r' };
81static const symbol s_2_12[3] = { 'c', 'c', 's' };
82static const symbol s_2_13[2] = { 's', 's' };
83static const symbol s_2_14[3] = { 'z', 'z', 's' };
84static const symbol s_2_15[2] = { 't', 't' };
85static const symbol s_2_16[2] = { 'v', 'v' };
86static const symbol s_2_17[3] = { 'g', 'g', 'y' };
87static const symbol s_2_18[3] = { 'l', 'l', 'y' };
88static const symbol s_2_19[3] = { 'n', 'n', 'y' };
89static const symbol s_2_20[3] = { 't', 't', 'y' };
90static const symbol s_2_21[3] = { 's', 's', 'z' };
91static const symbol s_2_22[2] = { 'z', 'z' };
92
93static const struct among a_2[23] = {
94/* 0 */ {2, s_2_0, -1, -1, 0},
95/* 1 */ {2, s_2_1, -1, -1, 0},
96/* 2 */ {2, s_2_2, -1, -1, 0},
97/* 3 */ {2, s_2_3, -1, -1, 0},
98/* 4 */ {2, s_2_4, -1, -1, 0},
99/* 5 */ {2, s_2_5, -1, -1, 0},
100/* 6 */ {2, s_2_6, -1, -1, 0},
101/* 7 */ {2, s_2_7, -1, -1, 0},
102/* 8 */ {2, s_2_8, -1, -1, 0},
103/* 9 */ {2, s_2_9, -1, -1, 0},
104/* 10 */ {2, s_2_10, -1, -1, 0},
105/* 11 */ {2, s_2_11, -1, -1, 0},
106/* 12 */ {3, s_2_12, -1, -1, 0},
107/* 13 */ {2, s_2_13, -1, -1, 0},
108/* 14 */ {3, s_2_14, -1, -1, 0},
109/* 15 */ {2, s_2_15, -1, -1, 0},
110/* 16 */ {2, s_2_16, -1, -1, 0},
111/* 17 */ {3, s_2_17, -1, -1, 0},
112/* 18 */ {3, s_2_18, -1, -1, 0},
113/* 19 */ {3, s_2_19, -1, -1, 0},
114/* 20 */ {3, s_2_20, -1, -1, 0},
115/* 21 */ {3, s_2_21, -1, -1, 0},
116/* 22 */ {2, s_2_22, -1, -1, 0}
117};
118
119static const symbol s_3_0[2] = { 'a', 'l' };
120static const symbol s_3_1[2] = { 'e', 'l' };
121
122static const struct among a_3[2] = {
123/* 0 */ {2, s_3_0, -1, 1, 0},
124/* 1 */ {2, s_3_1, -1, 2, 0}
125};
126
127static const symbol s_4_0[2] = { 'b', 'a' };
128static const symbol s_4_1[2] = { 'r', 'a' };
129static const symbol s_4_2[2] = { 'b', 'e' };
130static const symbol s_4_3[2] = { 'r', 'e' };
131static const symbol s_4_4[2] = { 'i', 'g' };
132static const symbol s_4_5[3] = { 'n', 'a', 'k' };
133static const symbol s_4_6[3] = { 'n', 'e', 'k' };
134static const symbol s_4_7[3] = { 'v', 'a', 'l' };
135static const symbol s_4_8[3] = { 'v', 'e', 'l' };
136static const symbol s_4_9[2] = { 'u', 'l' };
137static const symbol s_4_10[3] = { 'n', 0xE1, 'l' };
138static const symbol s_4_11[3] = { 'n', 0xE9, 'l' };
139static const symbol s_4_12[3] = { 'b', 0xF3, 'l' };
140static const symbol s_4_13[3] = { 'r', 0xF3, 'l' };
141static const symbol s_4_14[3] = { 't', 0xF3, 'l' };
142static const symbol s_4_15[3] = { 'b', 0xF5, 'l' };
143static const symbol s_4_16[3] = { 'r', 0xF5, 'l' };
144static const symbol s_4_17[3] = { 't', 0xF5, 'l' };
145static const symbol s_4_18[2] = { 0xFC, 'l' };
146static const symbol s_4_19[1] = { 'n' };
147static const symbol s_4_20[2] = { 'a', 'n' };
148static const symbol s_4_21[3] = { 'b', 'a', 'n' };
149static const symbol s_4_22[2] = { 'e', 'n' };
150static const symbol s_4_23[3] = { 'b', 'e', 'n' };
151static const symbol s_4_24[6] = { 'k', 0xE9, 'p', 'p', 'e', 'n' };
152static const symbol s_4_25[2] = { 'o', 'n' };
153static const symbol s_4_26[2] = { 0xF6, 'n' };
154static const symbol s_4_27[4] = { 'k', 0xE9, 'p', 'p' };
155static const symbol s_4_28[3] = { 'k', 'o', 'r' };
156static const symbol s_4_29[1] = { 't' };
157static const symbol s_4_30[2] = { 'a', 't' };
158static const symbol s_4_31[2] = { 'e', 't' };
159static const symbol s_4_32[4] = { 'k', 0xE9, 'n', 't' };
160static const symbol s_4_33[6] = { 'a', 'n', 'k', 0xE9, 'n', 't' };
161static const symbol s_4_34[6] = { 'e', 'n', 'k', 0xE9, 'n', 't' };
162static const symbol s_4_35[6] = { 'o', 'n', 'k', 0xE9, 'n', 't' };
163static const symbol s_4_36[2] = { 'o', 't' };
164static const symbol s_4_37[3] = { 0xE9, 'r', 't' };
165static const symbol s_4_38[2] = { 0xF6, 't' };
166static const symbol s_4_39[3] = { 'h', 'e', 'z' };
167static const symbol s_4_40[3] = { 'h', 'o', 'z' };
168static const symbol s_4_41[3] = { 'h', 0xF6, 'z' };
169static const symbol s_4_42[2] = { 'v', 0xE1 };
170static const symbol s_4_43[2] = { 'v', 0xE9 };
171
172static const struct among a_4[44] = {
173/* 0 */ {2, s_4_0, -1, -1, 0},
174/* 1 */ {2, s_4_1, -1, -1, 0},
175/* 2 */ {2, s_4_2, -1, -1, 0},
176/* 3 */ {2, s_4_3, -1, -1, 0},
177/* 4 */ {2, s_4_4, -1, -1, 0},
178/* 5 */ {3, s_4_5, -1, -1, 0},
179/* 6 */ {3, s_4_6, -1, -1, 0},
180/* 7 */ {3, s_4_7, -1, -1, 0},
181/* 8 */ {3, s_4_8, -1, -1, 0},
182/* 9 */ {2, s_4_9, -1, -1, 0},
183/* 10 */ {3, s_4_10, -1, -1, 0},
184/* 11 */ {3, s_4_11, -1, -1, 0},
185/* 12 */ {3, s_4_12, -1, -1, 0},
186/* 13 */ {3, s_4_13, -1, -1, 0},
187/* 14 */ {3, s_4_14, -1, -1, 0},
188/* 15 */ {3, s_4_15, -1, -1, 0},
189/* 16 */ {3, s_4_16, -1, -1, 0},
190/* 17 */ {3, s_4_17, -1, -1, 0},
191/* 18 */ {2, s_4_18, -1, -1, 0},
192/* 19 */ {1, s_4_19, -1, -1, 0},
193/* 20 */ {2, s_4_20, 19, -1, 0},
194/* 21 */ {3, s_4_21, 20, -1, 0},
195/* 22 */ {2, s_4_22, 19, -1, 0},
196/* 23 */ {3, s_4_23, 22, -1, 0},
197/* 24 */ {6, s_4_24, 22, -1, 0},
198/* 25 */ {2, s_4_25, 19, -1, 0},
199/* 26 */ {2, s_4_26, 19, -1, 0},
200/* 27 */ {4, s_4_27, -1, -1, 0},
201/* 28 */ {3, s_4_28, -1, -1, 0},
202/* 29 */ {1, s_4_29, -1, -1, 0},
203/* 30 */ {2, s_4_30, 29, -1, 0},
204/* 31 */ {2, s_4_31, 29, -1, 0},
205/* 32 */ {4, s_4_32, 29, -1, 0},
206/* 33 */ {6, s_4_33, 32, -1, 0},
207/* 34 */ {6, s_4_34, 32, -1, 0},
208/* 35 */ {6, s_4_35, 32, -1, 0},
209/* 36 */ {2, s_4_36, 29, -1, 0},
210/* 37 */ {3, s_4_37, 29, -1, 0},
211/* 38 */ {2, s_4_38, 29, -1, 0},
212/* 39 */ {3, s_4_39, -1, -1, 0},
213/* 40 */ {3, s_4_40, -1, -1, 0},
214/* 41 */ {3, s_4_41, -1, -1, 0},
215/* 42 */ {2, s_4_42, -1, -1, 0},
216/* 43 */ {2, s_4_43, -1, -1, 0}
217};
218
219static const symbol s_5_0[2] = { 0xE1, 'n' };
220static const symbol s_5_1[2] = { 0xE9, 'n' };
221static const symbol s_5_2[6] = { 0xE1, 'n', 'k', 0xE9, 'n', 't' };
222
223static const struct among a_5[3] = {
224/* 0 */ {2, s_5_0, -1, 2, 0},
225/* 1 */ {2, s_5_1, -1, 1, 0},
226/* 2 */ {6, s_5_2, -1, 3, 0}
227};
228
229static const symbol s_6_0[4] = { 's', 't', 'u', 'l' };
230static const symbol s_6_1[5] = { 'a', 's', 't', 'u', 'l' };
231static const symbol s_6_2[5] = { 0xE1, 's', 't', 'u', 'l' };
232static const symbol s_6_3[4] = { 's', 't', 0xFC, 'l' };
233static const symbol s_6_4[5] = { 'e', 's', 't', 0xFC, 'l' };
234static const symbol s_6_5[5] = { 0xE9, 's', 't', 0xFC, 'l' };
235
236static const struct among a_6[6] = {
237/* 0 */ {4, s_6_0, -1, 2, 0},
238/* 1 */ {5, s_6_1, 0, 1, 0},
239/* 2 */ {5, s_6_2, 0, 3, 0},
240/* 3 */ {4, s_6_3, -1, 2, 0},
241/* 4 */ {5, s_6_4, 3, 1, 0},
242/* 5 */ {5, s_6_5, 3, 4, 0}
243};
244
245static const symbol s_7_0[1] = { 0xE1 };
246static const symbol s_7_1[1] = { 0xE9 };
247
248static const struct among a_7[2] = {
249/* 0 */ {1, s_7_0, -1, 1, 0},
250/* 1 */ {1, s_7_1, -1, 2, 0}
251};
252
253static const symbol s_8_0[1] = { 'k' };
254static const symbol s_8_1[2] = { 'a', 'k' };
255static const symbol s_8_2[2] = { 'e', 'k' };
256static const symbol s_8_3[2] = { 'o', 'k' };
257static const symbol s_8_4[2] = { 0xE1, 'k' };
258static const symbol s_8_5[2] = { 0xE9, 'k' };
259static const symbol s_8_6[2] = { 0xF6, 'k' };
260
261static const struct among a_8[7] = {
262/* 0 */ {1, s_8_0, -1, 7, 0},
263/* 1 */ {2, s_8_1, 0, 4, 0},
264/* 2 */ {2, s_8_2, 0, 6, 0},
265/* 3 */ {2, s_8_3, 0, 5, 0},
266/* 4 */ {2, s_8_4, 0, 1, 0},
267/* 5 */ {2, s_8_5, 0, 2, 0},
268/* 6 */ {2, s_8_6, 0, 3, 0}
269};
270
271static const symbol s_9_0[2] = { 0xE9, 'i' };
272static const symbol s_9_1[3] = { 0xE1, 0xE9, 'i' };
273static const symbol s_9_2[3] = { 0xE9, 0xE9, 'i' };
274static const symbol s_9_3[1] = { 0xE9 };
275static const symbol s_9_4[2] = { 'k', 0xE9 };
276static const symbol s_9_5[3] = { 'a', 'k', 0xE9 };
277static const symbol s_9_6[3] = { 'e', 'k', 0xE9 };
278static const symbol s_9_7[3] = { 'o', 'k', 0xE9 };
279static const symbol s_9_8[3] = { 0xE1, 'k', 0xE9 };
280static const symbol s_9_9[3] = { 0xE9, 'k', 0xE9 };
281static const symbol s_9_10[3] = { 0xF6, 'k', 0xE9 };
282static const symbol s_9_11[2] = { 0xE9, 0xE9 };
283
284static const struct among a_9[12] = {
285/* 0 */ {2, s_9_0, -1, 7, 0},
286/* 1 */ {3, s_9_1, 0, 6, 0},
287/* 2 */ {3, s_9_2, 0, 5, 0},
288/* 3 */ {1, s_9_3, -1, 9, 0},
289/* 4 */ {2, s_9_4, 3, 4, 0},
290/* 5 */ {3, s_9_5, 4, 1, 0},
291/* 6 */ {3, s_9_6, 4, 1, 0},
292/* 7 */ {3, s_9_7, 4, 1, 0},
293/* 8 */ {3, s_9_8, 4, 3, 0},
294/* 9 */ {3, s_9_9, 4, 2, 0},
295/* 10 */ {3, s_9_10, 4, 1, 0},
296/* 11 */ {2, s_9_11, 3, 8, 0}
297};
298
299static const symbol s_10_0[1] = { 'a' };
300static const symbol s_10_1[2] = { 'j', 'a' };
301static const symbol s_10_2[1] = { 'd' };
302static const symbol s_10_3[2] = { 'a', 'd' };
303static const symbol s_10_4[2] = { 'e', 'd' };
304static const symbol s_10_5[2] = { 'o', 'd' };
305static const symbol s_10_6[2] = { 0xE1, 'd' };
306static const symbol s_10_7[2] = { 0xE9, 'd' };
307static const symbol s_10_8[2] = { 0xF6, 'd' };
308static const symbol s_10_9[1] = { 'e' };
309static const symbol s_10_10[2] = { 'j', 'e' };
310static const symbol s_10_11[2] = { 'n', 'k' };
311static const symbol s_10_12[3] = { 'u', 'n', 'k' };
312static const symbol s_10_13[3] = { 0xE1, 'n', 'k' };
313static const symbol s_10_14[3] = { 0xE9, 'n', 'k' };
314static const symbol s_10_15[3] = { 0xFC, 'n', 'k' };
315static const symbol s_10_16[2] = { 'u', 'k' };
316static const symbol s_10_17[3] = { 'j', 'u', 'k' };
317static const symbol s_10_18[4] = { 0xE1, 'j', 'u', 'k' };
318static const symbol s_10_19[2] = { 0xFC, 'k' };
319static const symbol s_10_20[3] = { 'j', 0xFC, 'k' };
320static const symbol s_10_21[4] = { 0xE9, 'j', 0xFC, 'k' };
321static const symbol s_10_22[1] = { 'm' };
322static const symbol s_10_23[2] = { 'a', 'm' };
323static const symbol s_10_24[2] = { 'e', 'm' };
324static const symbol s_10_25[2] = { 'o', 'm' };
325static const symbol s_10_26[2] = { 0xE1, 'm' };
326static const symbol s_10_27[2] = { 0xE9, 'm' };
327static const symbol s_10_28[1] = { 'o' };
328static const symbol s_10_29[1] = { 0xE1 };
329static const symbol s_10_30[1] = { 0xE9 };
330
331static const struct among a_10[31] = {
332/* 0 */ {1, s_10_0, -1, 18, 0},
333/* 1 */ {2, s_10_1, 0, 17, 0},
334/* 2 */ {1, s_10_2, -1, 16, 0},
335/* 3 */ {2, s_10_3, 2, 13, 0},
336/* 4 */ {2, s_10_4, 2, 13, 0},
337/* 5 */ {2, s_10_5, 2, 13, 0},
338/* 6 */ {2, s_10_6, 2, 14, 0},
339/* 7 */ {2, s_10_7, 2, 15, 0},
340/* 8 */ {2, s_10_8, 2, 13, 0},
341/* 9 */ {1, s_10_9, -1, 18, 0},
342/* 10 */ {2, s_10_10, 9, 17, 0},
343/* 11 */ {2, s_10_11, -1, 4, 0},
344/* 12 */ {3, s_10_12, 11, 1, 0},
345/* 13 */ {3, s_10_13, 11, 2, 0},
346/* 14 */ {3, s_10_14, 11, 3, 0},
347/* 15 */ {3, s_10_15, 11, 1, 0},
348/* 16 */ {2, s_10_16, -1, 8, 0},
349/* 17 */ {3, s_10_17, 16, 7, 0},
350/* 18 */ {4, s_10_18, 17, 5, 0},
351/* 19 */ {2, s_10_19, -1, 8, 0},
352/* 20 */ {3, s_10_20, 19, 7, 0},
353/* 21 */ {4, s_10_21, 20, 6, 0},
354/* 22 */ {1, s_10_22, -1, 12, 0},
355/* 23 */ {2, s_10_23, 22, 9, 0},
356/* 24 */ {2, s_10_24, 22, 9, 0},
357/* 25 */ {2, s_10_25, 22, 9, 0},
358/* 26 */ {2, s_10_26, 22, 10, 0},
359/* 27 */ {2, s_10_27, 22, 11, 0},
360/* 28 */ {1, s_10_28, -1, 18, 0},
361/* 29 */ {1, s_10_29, -1, 19, 0},
362/* 30 */ {1, s_10_30, -1, 20, 0}
363};
364
365static const symbol s_11_0[2] = { 'i', 'd' };
366static const symbol s_11_1[3] = { 'a', 'i', 'd' };
367static const symbol s_11_2[4] = { 'j', 'a', 'i', 'd' };
368static const symbol s_11_3[3] = { 'e', 'i', 'd' };
369static const symbol s_11_4[4] = { 'j', 'e', 'i', 'd' };
370static const symbol s_11_5[3] = { 0xE1, 'i', 'd' };
371static const symbol s_11_6[3] = { 0xE9, 'i', 'd' };
372static const symbol s_11_7[1] = { 'i' };
373static const symbol s_11_8[2] = { 'a', 'i' };
374static const symbol s_11_9[3] = { 'j', 'a', 'i' };
375static const symbol s_11_10[2] = { 'e', 'i' };
376static const symbol s_11_11[3] = { 'j', 'e', 'i' };
377static const symbol s_11_12[2] = { 0xE1, 'i' };
378static const symbol s_11_13[2] = { 0xE9, 'i' };
379static const symbol s_11_14[4] = { 'i', 't', 'e', 'k' };
380static const symbol s_11_15[5] = { 'e', 'i', 't', 'e', 'k' };
381static const symbol s_11_16[6] = { 'j', 'e', 'i', 't', 'e', 'k' };
382static const symbol s_11_17[5] = { 0xE9, 'i', 't', 'e', 'k' };
383static const symbol s_11_18[2] = { 'i', 'k' };
384static const symbol s_11_19[3] = { 'a', 'i', 'k' };
385static const symbol s_11_20[4] = { 'j', 'a', 'i', 'k' };
386static const symbol s_11_21[3] = { 'e', 'i', 'k' };
387static const symbol s_11_22[4] = { 'j', 'e', 'i', 'k' };
388static const symbol s_11_23[3] = { 0xE1, 'i', 'k' };
389static const symbol s_11_24[3] = { 0xE9, 'i', 'k' };
390static const symbol s_11_25[3] = { 'i', 'n', 'k' };
391static const symbol s_11_26[4] = { 'a', 'i', 'n', 'k' };
392static const symbol s_11_27[5] = { 'j', 'a', 'i', 'n', 'k' };
393static const symbol s_11_28[4] = { 'e', 'i', 'n', 'k' };
394static const symbol s_11_29[5] = { 'j', 'e', 'i', 'n', 'k' };
395static const symbol s_11_30[4] = { 0xE1, 'i', 'n', 'k' };
396static const symbol s_11_31[4] = { 0xE9, 'i', 'n', 'k' };
397static const symbol s_11_32[5] = { 'a', 'i', 't', 'o', 'k' };
398static const symbol s_11_33[6] = { 'j', 'a', 'i', 't', 'o', 'k' };
399static const symbol s_11_34[5] = { 0xE1, 'i', 't', 'o', 'k' };
400static const symbol s_11_35[2] = { 'i', 'm' };
401static const symbol s_11_36[3] = { 'a', 'i', 'm' };
402static const symbol s_11_37[4] = { 'j', 'a', 'i', 'm' };
403static const symbol s_11_38[3] = { 'e', 'i', 'm' };
404static const symbol s_11_39[4] = { 'j', 'e', 'i', 'm' };
405static const symbol s_11_40[3] = { 0xE1, 'i', 'm' };
406static const symbol s_11_41[3] = { 0xE9, 'i', 'm' };
407
408static const struct among a_11[42] = {
409/* 0 */ {2, s_11_0, -1, 10, 0},
410/* 1 */ {3, s_11_1, 0, 9, 0},
411/* 2 */ {4, s_11_2, 1, 6, 0},
412/* 3 */ {3, s_11_3, 0, 9, 0},
413/* 4 */ {4, s_11_4, 3, 6, 0},
414/* 5 */ {3, s_11_5, 0, 7, 0},
415/* 6 */ {3, s_11_6, 0, 8, 0},
416/* 7 */ {1, s_11_7, -1, 15, 0},
417/* 8 */ {2, s_11_8, 7, 14, 0},
418/* 9 */ {3, s_11_9, 8, 11, 0},
419/* 10 */ {2, s_11_10, 7, 14, 0},
420/* 11 */ {3, s_11_11, 10, 11, 0},
421/* 12 */ {2, s_11_12, 7, 12, 0},
422/* 13 */ {2, s_11_13, 7, 13, 0},
423/* 14 */ {4, s_11_14, -1, 24, 0},
424/* 15 */ {5, s_11_15, 14, 21, 0},
425/* 16 */ {6, s_11_16, 15, 20, 0},
426/* 17 */ {5, s_11_17, 14, 23, 0},
427/* 18 */ {2, s_11_18, -1, 29, 0},
428/* 19 */ {3, s_11_19, 18, 26, 0},
429/* 20 */ {4, s_11_20, 19, 25, 0},
430/* 21 */ {3, s_11_21, 18, 26, 0},
431/* 22 */ {4, s_11_22, 21, 25, 0},
432/* 23 */ {3, s_11_23, 18, 27, 0},
433/* 24 */ {3, s_11_24, 18, 28, 0},
434/* 25 */ {3, s_11_25, -1, 20, 0},
435/* 26 */ {4, s_11_26, 25, 17, 0},
436/* 27 */ {5, s_11_27, 26, 16, 0},
437/* 28 */ {4, s_11_28, 25, 17, 0},
438/* 29 */ {5, s_11_29, 28, 16, 0},
439/* 30 */ {4, s_11_30, 25, 18, 0},
440/* 31 */ {4, s_11_31, 25, 19, 0},
441/* 32 */ {5, s_11_32, -1, 21, 0},
442/* 33 */ {6, s_11_33, 32, 20, 0},
443/* 34 */ {5, s_11_34, -1, 22, 0},
444/* 35 */ {2, s_11_35, -1, 5, 0},
445/* 36 */ {3, s_11_36, 35, 4, 0},
446/* 37 */ {4, s_11_37, 36, 1, 0},
447/* 38 */ {3, s_11_38, 35, 4, 0},
448/* 39 */ {4, s_11_39, 38, 1, 0},
449/* 40 */ {3, s_11_40, 35, 2, 0},
450/* 41 */ {3, s_11_41, 35, 3, 0}
451};
452
453static const unsigned char g_v[] =
454 { 17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 17, 52, 14 };
455
456static const symbol s_0[] = { 'a' };
457static const symbol s_1[] = { 'e' };
458static const symbol s_2[] = { 'e' };
459static const symbol s_3[] = { 'a' };
460static const symbol s_4[] = { 'a' };
461static const symbol s_5[] = { 'a' };
462static const symbol s_6[] = { 'e' };
463static const symbol s_7[] = { 'a' };
464static const symbol s_8[] = { 'e' };
465static const symbol s_9[] = { 'e' };
466static const symbol s_10[] = { 'a' };
467static const symbol s_11[] = { 'e' };
468static const symbol s_12[] = { 'a' };
469static const symbol s_13[] = { 'e' };
470static const symbol s_14[] = { 'a' };
471static const symbol s_15[] = { 'e' };
472static const symbol s_16[] = { 'a' };
473static const symbol s_17[] = { 'e' };
474static const symbol s_18[] = { 'a' };
475static const symbol s_19[] = { 'e' };
476static const symbol s_20[] = { 'a' };
477static const symbol s_21[] = { 'e' };
478static const symbol s_22[] = { 'a' };
479static const symbol s_23[] = { 'e' };
480static const symbol s_24[] = { 'a' };
481static const symbol s_25[] = { 'e' };
482static const symbol s_26[] = { 'a' };
483static const symbol s_27[] = { 'e' };
484static const symbol s_28[] = { 'a' };
485static const symbol s_29[] = { 'e' };
486static const symbol s_30[] = { 'a' };
487static const symbol s_31[] = { 'e' };
488static const symbol s_32[] = { 'a' };
489static const symbol s_33[] = { 'e' };
490static const symbol s_34[] = { 'a' };
491static const symbol s_35[] = { 'e' };
492
493static int
495{
496 z->I[0] = z->l;
497 {
498 int c1 = z->c; /* or, line 51 */
499 if (in_grouping (z, g_v, 97, 252, 0))
500 goto lab1;
501 if (in_grouping (z, g_v, 97, 252, 1) < 0)
502 goto lab1; /* goto *//* non v, line 48 */
503 {
504 int c2 = z->c; /* or, line 49 */
505 if (z->c + 1 >= z->l || z->p[z->c + 1] >> 5 != 3
506 || !((101187584 >> (z->p[z->c + 1] & 0x1f)) & 1))
507 goto lab3;
508 if (!(find_among (z, a_0, 8)))
509 goto lab3; /* among, line 49 */
510 goto lab2;
511 lab3:
512 z->c = c2;
513 if (z->c >= z->l)
514 goto lab1;
515 z->c++; /* next, line 49 */
516 }
517 lab2:
518 z->I[0] = z->c; /* setmark p1, line 50 */
519 goto lab0;
520 lab1:
521 z->c = c1;
522 if (out_grouping (z, g_v, 97, 252, 0))
523 return 0;
524 { /* gopast *//* grouping v, line 53 */
525 int ret = out_grouping (z, g_v, 97, 252, 1);
526 if (ret < 0)
527 return 0;
528 z->c += ret;
529 }
530 z->I[0] = z->c; /* setmark p1, line 53 */
531 }
532lab0:
533 return 1;
534}
535
536static int
537r_R1 (struct SN_env *z)
538{
539 if (!(z->I[0] <= z->c))
540 return 0;
541 return 1;
542}
543
544static int
546{
547 int among_var;
548 z->ket = z->c; /* [, line 61 */
549 if (z->c <= z->lb || (z->p[z->c - 1] != 225 && z->p[z->c - 1] != 233))
550 return 0;
551 among_var = find_among_b (z, a_1, 2); /* substring, line 61 */
552 if (!(among_var))
553 return 0;
554 z->bra = z->c; /* ], line 61 */
555 {
556 int ret = r_R1 (z);
557 if (ret == 0)
558 return 0; /* call R1, line 61 */
559 if (ret < 0)
560 return ret;
561 }
562 switch (among_var)
563 {
564 case 0:
565 return 0;
566 case 1:
567 {
568 int ret = slice_from_s (z, 1, s_0); /* <-, line 62 */
569 if (ret < 0)
570 return ret;
571 }
572 break;
573 case 2:
574 {
575 int ret = slice_from_s (z, 1, s_1); /* <-, line 63 */
576 if (ret < 0)
577 return ret;
578 }
579 break;
580 }
581 return 1;
582}
583
584static int
585r_double (struct SN_env *z)
586{
587 {
588 int m_test = z->l - z->c; /* test, line 68 */
589 if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3
590 || !((106790108 >> (z->p[z->c - 1] & 0x1f)) & 1))
591 return 0;
592 if (!(find_among_b (z, a_2, 23)))
593 return 0; /* among, line 68 */
594 z->c = z->l - m_test;
595 }
596 return 1;
597}
598
599static int
601{
602 if (z->c <= z->lb)
603 return 0;
604 z->c--; /* next, line 73 */
605 z->ket = z->c; /* [, line 73 */
606 {
607 int ret = z->c - 1;
608 if (z->lb > ret || ret > z->l)
609 return 0;
610 z->c = ret; /* hop, line 73 */
611 }
612 z->bra = z->c; /* ], line 73 */
613 {
614 int ret = slice_del (z); /* delete, line 73 */
615 if (ret < 0)
616 return ret;
617 }
618 return 1;
619}
620
621static int
622r_instrum (struct SN_env *z)
623{
624 int among_var;
625 z->ket = z->c; /* [, line 77 */
626 if (z->c - 1 <= z->lb || z->p[z->c - 1] != 108)
627 return 0;
628 among_var = find_among_b (z, a_3, 2); /* substring, line 77 */
629 if (!(among_var))
630 return 0;
631 z->bra = z->c; /* ], line 77 */
632 {
633 int ret = r_R1 (z);
634 if (ret == 0)
635 return 0; /* call R1, line 77 */
636 if (ret < 0)
637 return ret;
638 }
639 switch (among_var)
640 {
641 case 0:
642 return 0;
643 case 1:
644 {
645 int ret = r_double (z);
646 if (ret == 0)
647 return 0; /* call double, line 78 */
648 if (ret < 0)
649 return ret;
650 }
651 break;
652 case 2:
653 {
654 int ret = r_double (z);
655 if (ret == 0)
656 return 0; /* call double, line 79 */
657 if (ret < 0)
658 return ret;
659 }
660 break;
661 }
662 {
663 int ret = slice_del (z); /* delete, line 81 */
664 if (ret < 0)
665 return ret;
666 }
667 {
668 int ret = r_undouble (z);
669 if (ret == 0)
670 return 0; /* call undouble, line 82 */
671 if (ret < 0)
672 return ret;
673 }
674 return 1;
675}
676
677static int
678r_case (struct SN_env *z)
679{
680 z->ket = z->c; /* [, line 87 */
681 if (!(find_among_b (z, a_4, 44)))
682 return 0; /* substring, line 87 */
683 z->bra = z->c; /* ], line 87 */
684 {
685 int ret = r_R1 (z);
686 if (ret == 0)
687 return 0; /* call R1, line 87 */
688 if (ret < 0)
689 return ret;
690 }
691 {
692 int ret = slice_del (z); /* delete, line 111 */
693 if (ret < 0)
694 return ret;
695 }
696 {
697 int ret = r_v_ending (z);
698 if (ret == 0)
699 return 0; /* call v_ending, line 112 */
700 if (ret < 0)
701 return ret;
702 }
703 return 1;
704}
705
706static int
708{
709 int among_var;
710 z->ket = z->c; /* [, line 116 */
711 if (z->c - 1 <= z->lb || (z->p[z->c - 1] != 110 && z->p[z->c - 1] != 116))
712 return 0;
713 among_var = find_among_b (z, a_5, 3); /* substring, line 116 */
714 if (!(among_var))
715 return 0;
716 z->bra = z->c; /* ], line 116 */
717 {
718 int ret = r_R1 (z);
719 if (ret == 0)
720 return 0; /* call R1, line 116 */
721 if (ret < 0)
722 return ret;
723 }
724 switch (among_var)
725 {
726 case 0:
727 return 0;
728 case 1:
729 {
730 int ret = slice_from_s (z, 1, s_2); /* <-, line 117 */
731 if (ret < 0)
732 return ret;
733 }
734 break;
735 case 2:
736 {
737 int ret = slice_from_s (z, 1, s_3); /* <-, line 118 */
738 if (ret < 0)
739 return ret;
740 }
741 break;
742 case 3:
743 {
744 int ret = slice_from_s (z, 1, s_4); /* <-, line 119 */
745 if (ret < 0)
746 return ret;
747 }
748 break;
749 }
750 return 1;
751}
752
753static int
755{
756 int among_var;
757 z->ket = z->c; /* [, line 124 */
758 if (z->c - 3 <= z->lb || z->p[z->c - 1] != 108)
759 return 0;
760 among_var = find_among_b (z, a_6, 6); /* substring, line 124 */
761 if (!(among_var))
762 return 0;
763 z->bra = z->c; /* ], line 124 */
764 {
765 int ret = r_R1 (z);
766 if (ret == 0)
767 return 0; /* call R1, line 124 */
768 if (ret < 0)
769 return ret;
770 }
771 switch (among_var)
772 {
773 case 0:
774 return 0;
775 case 1:
776 {
777 int ret = slice_del (z); /* delete, line 125 */
778 if (ret < 0)
779 return ret;
780 }
781 break;
782 case 2:
783 {
784 int ret = slice_del (z); /* delete, line 126 */
785 if (ret < 0)
786 return ret;
787 }
788 break;
789 case 3:
790 {
791 int ret = slice_from_s (z, 1, s_5); /* <-, line 127 */
792 if (ret < 0)
793 return ret;
794 }
795 break;
796 case 4:
797 {
798 int ret = slice_from_s (z, 1, s_6); /* <-, line 128 */
799 if (ret < 0)
800 return ret;
801 }
802 break;
803 }
804 return 1;
805}
806
807static int
808r_factive (struct SN_env *z)
809{
810 int among_var;
811 z->ket = z->c; /* [, line 133 */
812 if (z->c <= z->lb || (z->p[z->c - 1] != 225 && z->p[z->c - 1] != 233))
813 return 0;
814 among_var = find_among_b (z, a_7, 2); /* substring, line 133 */
815 if (!(among_var))
816 return 0;
817 z->bra = z->c; /* ], line 133 */
818 {
819 int ret = r_R1 (z);
820 if (ret == 0)
821 return 0; /* call R1, line 133 */
822 if (ret < 0)
823 return ret;
824 }
825 switch (among_var)
826 {
827 case 0:
828 return 0;
829 case 1:
830 {
831 int ret = r_double (z);
832 if (ret == 0)
833 return 0; /* call double, line 134 */
834 if (ret < 0)
835 return ret;
836 }
837 break;
838 case 2:
839 {
840 int ret = r_double (z);
841 if (ret == 0)
842 return 0; /* call double, line 135 */
843 if (ret < 0)
844 return ret;
845 }
846 break;
847 }
848 {
849 int ret = slice_del (z); /* delete, line 137 */
850 if (ret < 0)
851 return ret;
852 }
853 {
854 int ret = r_undouble (z);
855 if (ret == 0)
856 return 0; /* call undouble, line 138 */
857 if (ret < 0)
858 return ret;
859 }
860 return 1;
861}
862
863static int
864r_plural (struct SN_env *z)
865{
866 int among_var;
867 z->ket = z->c; /* [, line 142 */
868 if (z->c <= z->lb || z->p[z->c - 1] != 107)
869 return 0;
870 among_var = find_among_b (z, a_8, 7); /* substring, line 142 */
871 if (!(among_var))
872 return 0;
873 z->bra = z->c; /* ], line 142 */
874 {
875 int ret = r_R1 (z);
876 if (ret == 0)
877 return 0; /* call R1, line 142 */
878 if (ret < 0)
879 return ret;
880 }
881 switch (among_var)
882 {
883 case 0:
884 return 0;
885 case 1:
886 {
887 int ret = slice_from_s (z, 1, s_7); /* <-, line 143 */
888 if (ret < 0)
889 return ret;
890 }
891 break;
892 case 2:
893 {
894 int ret = slice_from_s (z, 1, s_8); /* <-, line 144 */
895 if (ret < 0)
896 return ret;
897 }
898 break;
899 case 3:
900 {
901 int ret = slice_del (z); /* delete, line 145 */
902 if (ret < 0)
903 return ret;
904 }
905 break;
906 case 4:
907 {
908 int ret = slice_del (z); /* delete, line 146 */
909 if (ret < 0)
910 return ret;
911 }
912 break;
913 case 5:
914 {
915 int ret = slice_del (z); /* delete, line 147 */
916 if (ret < 0)
917 return ret;
918 }
919 break;
920 case 6:
921 {
922 int ret = slice_del (z); /* delete, line 148 */
923 if (ret < 0)
924 return ret;
925 }
926 break;
927 case 7:
928 {
929 int ret = slice_del (z); /* delete, line 149 */
930 if (ret < 0)
931 return ret;
932 }
933 break;
934 }
935 return 1;
936}
937
938static int
939r_owned (struct SN_env *z)
940{
941 int among_var;
942 z->ket = z->c; /* [, line 154 */
943 if (z->c <= z->lb || (z->p[z->c - 1] != 105 && z->p[z->c - 1] != 233))
944 return 0;
945 among_var = find_among_b (z, a_9, 12); /* substring, line 154 */
946 if (!(among_var))
947 return 0;
948 z->bra = z->c; /* ], line 154 */
949 {
950 int ret = r_R1 (z);
951 if (ret == 0)
952 return 0; /* call R1, line 154 */
953 if (ret < 0)
954 return ret;
955 }
956 switch (among_var)
957 {
958 case 0:
959 return 0;
960 case 1:
961 {
962 int ret = slice_del (z); /* delete, line 155 */
963 if (ret < 0)
964 return ret;
965 }
966 break;
967 case 2:
968 {
969 int ret = slice_from_s (z, 1, s_9); /* <-, line 156 */
970 if (ret < 0)
971 return ret;
972 }
973 break;
974 case 3:
975 {
976 int ret = slice_from_s (z, 1, s_10); /* <-, line 157 */
977 if (ret < 0)
978 return ret;
979 }
980 break;
981 case 4:
982 {
983 int ret = slice_del (z); /* delete, line 158 */
984 if (ret < 0)
985 return ret;
986 }
987 break;
988 case 5:
989 {
990 int ret = slice_from_s (z, 1, s_11); /* <-, line 159 */
991 if (ret < 0)
992 return ret;
993 }
994 break;
995 case 6:
996 {
997 int ret = slice_from_s (z, 1, s_12); /* <-, line 160 */
998 if (ret < 0)
999 return ret;
1000 }
1001 break;
1002 case 7:
1003 {
1004 int ret = slice_del (z); /* delete, line 161 */
1005 if (ret < 0)
1006 return ret;
1007 }
1008 break;
1009 case 8:
1010 {
1011 int ret = slice_from_s (z, 1, s_13); /* <-, line 162 */
1012 if (ret < 0)
1013 return ret;
1014 }
1015 break;
1016 case 9:
1017 {
1018 int ret = slice_del (z); /* delete, line 163 */
1019 if (ret < 0)
1020 return ret;
1021 }
1022 break;
1023 }
1024 return 1;
1025}
1026
1027static int
1029{
1030 int among_var;
1031 z->ket = z->c; /* [, line 168 */
1032 among_var = find_among_b (z, a_10, 31); /* substring, line 168 */
1033 if (!(among_var))
1034 return 0;
1035 z->bra = z->c; /* ], line 168 */
1036 {
1037 int ret = r_R1 (z);
1038 if (ret == 0)
1039 return 0; /* call R1, line 168 */
1040 if (ret < 0)
1041 return ret;
1042 }
1043 switch (among_var)
1044 {
1045 case 0:
1046 return 0;
1047 case 1:
1048 {
1049 int ret = slice_del (z); /* delete, line 169 */
1050 if (ret < 0)
1051 return ret;
1052 }
1053 break;
1054 case 2:
1055 {
1056 int ret = slice_from_s (z, 1, s_14); /* <-, line 170 */
1057 if (ret < 0)
1058 return ret;
1059 }
1060 break;
1061 case 3:
1062 {
1063 int ret = slice_from_s (z, 1, s_15); /* <-, line 171 */
1064 if (ret < 0)
1065 return ret;
1066 }
1067 break;
1068 case 4:
1069 {
1070 int ret = slice_del (z); /* delete, line 172 */
1071 if (ret < 0)
1072 return ret;
1073 }
1074 break;
1075 case 5:
1076 {
1077 int ret = slice_from_s (z, 1, s_16); /* <-, line 173 */
1078 if (ret < 0)
1079 return ret;
1080 }
1081 break;
1082 case 6:
1083 {
1084 int ret = slice_from_s (z, 1, s_17); /* <-, line 174 */
1085 if (ret < 0)
1086 return ret;
1087 }
1088 break;
1089 case 7:
1090 {
1091 int ret = slice_del (z); /* delete, line 175 */
1092 if (ret < 0)
1093 return ret;
1094 }
1095 break;
1096 case 8:
1097 {
1098 int ret = slice_del (z); /* delete, line 176 */
1099 if (ret < 0)
1100 return ret;
1101 }
1102 break;
1103 case 9:
1104 {
1105 int ret = slice_del (z); /* delete, line 177 */
1106 if (ret < 0)
1107 return ret;
1108 }
1109 break;
1110 case 10:
1111 {
1112 int ret = slice_from_s (z, 1, s_18); /* <-, line 178 */
1113 if (ret < 0)
1114 return ret;
1115 }
1116 break;
1117 case 11:
1118 {
1119 int ret = slice_from_s (z, 1, s_19); /* <-, line 179 */
1120 if (ret < 0)
1121 return ret;
1122 }
1123 break;
1124 case 12:
1125 {
1126 int ret = slice_del (z); /* delete, line 180 */
1127 if (ret < 0)
1128 return ret;
1129 }
1130 break;
1131 case 13:
1132 {
1133 int ret = slice_del (z); /* delete, line 181 */
1134 if (ret < 0)
1135 return ret;
1136 }
1137 break;
1138 case 14:
1139 {
1140 int ret = slice_from_s (z, 1, s_20); /* <-, line 182 */
1141 if (ret < 0)
1142 return ret;
1143 }
1144 break;
1145 case 15:
1146 {
1147 int ret = slice_from_s (z, 1, s_21); /* <-, line 183 */
1148 if (ret < 0)
1149 return ret;
1150 }
1151 break;
1152 case 16:
1153 {
1154 int ret = slice_del (z); /* delete, line 184 */
1155 if (ret < 0)
1156 return ret;
1157 }
1158 break;
1159 case 17:
1160 {
1161 int ret = slice_del (z); /* delete, line 185 */
1162 if (ret < 0)
1163 return ret;
1164 }
1165 break;
1166 case 18:
1167 {
1168 int ret = slice_del (z); /* delete, line 186 */
1169 if (ret < 0)
1170 return ret;
1171 }
1172 break;
1173 case 19:
1174 {
1175 int ret = slice_from_s (z, 1, s_22); /* <-, line 187 */
1176 if (ret < 0)
1177 return ret;
1178 }
1179 break;
1180 case 20:
1181 {
1182 int ret = slice_from_s (z, 1, s_23); /* <-, line 188 */
1183 if (ret < 0)
1184 return ret;
1185 }
1186 break;
1187 }
1188 return 1;
1189}
1190
1191static int
1193{
1194 int among_var;
1195 z->ket = z->c; /* [, line 193 */
1196 if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 3
1197 || !((10768 >> (z->p[z->c - 1] & 0x1f)) & 1))
1198 return 0;
1199 among_var = find_among_b (z, a_11, 42); /* substring, line 193 */
1200 if (!(among_var))
1201 return 0;
1202 z->bra = z->c; /* ], line 193 */
1203 {
1204 int ret = r_R1 (z);
1205 if (ret == 0)
1206 return 0; /* call R1, line 193 */
1207 if (ret < 0)
1208 return ret;
1209 }
1210 switch (among_var)
1211 {
1212 case 0:
1213 return 0;
1214 case 1:
1215 {
1216 int ret = slice_del (z); /* delete, line 194 */
1217 if (ret < 0)
1218 return ret;
1219 }
1220 break;
1221 case 2:
1222 {
1223 int ret = slice_from_s (z, 1, s_24); /* <-, line 195 */
1224 if (ret < 0)
1225 return ret;
1226 }
1227 break;
1228 case 3:
1229 {
1230 int ret = slice_from_s (z, 1, s_25); /* <-, line 196 */
1231 if (ret < 0)
1232 return ret;
1233 }
1234 break;
1235 case 4:
1236 {
1237 int ret = slice_del (z); /* delete, line 197 */
1238 if (ret < 0)
1239 return ret;
1240 }
1241 break;
1242 case 5:
1243 {
1244 int ret = slice_del (z); /* delete, line 198 */
1245 if (ret < 0)
1246 return ret;
1247 }
1248 break;
1249 case 6:
1250 {
1251 int ret = slice_del (z); /* delete, line 199 */
1252 if (ret < 0)
1253 return ret;
1254 }
1255 break;
1256 case 7:
1257 {
1258 int ret = slice_from_s (z, 1, s_26); /* <-, line 200 */
1259 if (ret < 0)
1260 return ret;
1261 }
1262 break;
1263 case 8:
1264 {
1265 int ret = slice_from_s (z, 1, s_27); /* <-, line 201 */
1266 if (ret < 0)
1267 return ret;
1268 }
1269 break;
1270 case 9:
1271 {
1272 int ret = slice_del (z); /* delete, line 202 */
1273 if (ret < 0)
1274 return ret;
1275 }
1276 break;
1277 case 10:
1278 {
1279 int ret = slice_del (z); /* delete, line 203 */
1280 if (ret < 0)
1281 return ret;
1282 }
1283 break;
1284 case 11:
1285 {
1286 int ret = slice_del (z); /* delete, line 204 */
1287 if (ret < 0)
1288 return ret;
1289 }
1290 break;
1291 case 12:
1292 {
1293 int ret = slice_from_s (z, 1, s_28); /* <-, line 205 */
1294 if (ret < 0)
1295 return ret;
1296 }
1297 break;
1298 case 13:
1299 {
1300 int ret = slice_from_s (z, 1, s_29); /* <-, line 206 */
1301 if (ret < 0)
1302 return ret;
1303 }
1304 break;
1305 case 14:
1306 {
1307 int ret = slice_del (z); /* delete, line 207 */
1308 if (ret < 0)
1309 return ret;
1310 }
1311 break;
1312 case 15:
1313 {
1314 int ret = slice_del (z); /* delete, line 208 */
1315 if (ret < 0)
1316 return ret;
1317 }
1318 break;
1319 case 16:
1320 {
1321 int ret = slice_del (z); /* delete, line 209 */
1322 if (ret < 0)
1323 return ret;
1324 }
1325 break;
1326 case 17:
1327 {
1328 int ret = slice_del (z); /* delete, line 210 */
1329 if (ret < 0)
1330 return ret;
1331 }
1332 break;
1333 case 18:
1334 {
1335 int ret = slice_from_s (z, 1, s_30); /* <-, line 211 */
1336 if (ret < 0)
1337 return ret;
1338 }
1339 break;
1340 case 19:
1341 {
1342 int ret = slice_from_s (z, 1, s_31); /* <-, line 212 */
1343 if (ret < 0)
1344 return ret;
1345 }
1346 break;
1347 case 20:
1348 {
1349 int ret = slice_del (z); /* delete, line 214 */
1350 if (ret < 0)
1351 return ret;
1352 }
1353 break;
1354 case 21:
1355 {
1356 int ret = slice_del (z); /* delete, line 215 */
1357 if (ret < 0)
1358 return ret;
1359 }
1360 break;
1361 case 22:
1362 {
1363 int ret = slice_from_s (z, 1, s_32); /* <-, line 216 */
1364 if (ret < 0)
1365 return ret;
1366 }
1367 break;
1368 case 23:
1369 {
1370 int ret = slice_from_s (z, 1, s_33); /* <-, line 217 */
1371 if (ret < 0)
1372 return ret;
1373 }
1374 break;
1375 case 24:
1376 {
1377 int ret = slice_del (z); /* delete, line 218 */
1378 if (ret < 0)
1379 return ret;
1380 }
1381 break;
1382 case 25:
1383 {
1384 int ret = slice_del (z); /* delete, line 219 */
1385 if (ret < 0)
1386 return ret;
1387 }
1388 break;
1389 case 26:
1390 {
1391 int ret = slice_del (z); /* delete, line 220 */
1392 if (ret < 0)
1393 return ret;
1394 }
1395 break;
1396 case 27:
1397 {
1398 int ret = slice_from_s (z, 1, s_34); /* <-, line 221 */
1399 if (ret < 0)
1400 return ret;
1401 }
1402 break;
1403 case 28:
1404 {
1405 int ret = slice_from_s (z, 1, s_35); /* <-, line 222 */
1406 if (ret < 0)
1407 return ret;
1408 }
1409 break;
1410 case 29:
1411 {
1412 int ret = slice_del (z); /* delete, line 223 */
1413 if (ret < 0)
1414 return ret;
1415 }
1416 break;
1417 }
1418 return 1;
1419}
1420
1421extern int
1423{
1424 {
1425 int c1 = z->c; /* do, line 229 */
1426 {
1427 int ret = r_mark_regions (z);
1428 if (ret == 0)
1429 goto lab0; /* call mark_regions, line 229 */
1430 if (ret < 0)
1431 return ret;
1432 }
1433 lab0:
1434 z->c = c1;
1435 }
1436 z->lb = z->c;
1437 z->c = z->l; /* backwards, line 230 */
1438
1439 {
1440 int m2 = z->l - z->c;
1441 (void) m2; /* do, line 231 */
1442 {
1443 int ret = r_instrum (z);
1444 if (ret == 0)
1445 goto lab1; /* call instrum, line 231 */
1446 if (ret < 0)
1447 return ret;
1448 }
1449 lab1:
1450 z->c = z->l - m2;
1451 }
1452 {
1453 int m3 = z->l - z->c;
1454 (void) m3; /* do, line 232 */
1455 {
1456 int ret = r_case (z);
1457 if (ret == 0)
1458 goto lab2; /* call case, line 232 */
1459 if (ret < 0)
1460 return ret;
1461 }
1462 lab2:
1463 z->c = z->l - m3;
1464 }
1465 {
1466 int m4 = z->l - z->c;
1467 (void) m4; /* do, line 233 */
1468 {
1469 int ret = r_case_special (z);
1470 if (ret == 0)
1471 goto lab3; /* call case_special, line 233 */
1472 if (ret < 0)
1473 return ret;
1474 }
1475 lab3:
1476 z->c = z->l - m4;
1477 }
1478 {
1479 int m5 = z->l - z->c;
1480 (void) m5; /* do, line 234 */
1481 {
1482 int ret = r_case_other (z);
1483 if (ret == 0)
1484 goto lab4; /* call case_other, line 234 */
1485 if (ret < 0)
1486 return ret;
1487 }
1488 lab4:
1489 z->c = z->l - m5;
1490 }
1491 {
1492 int m6 = z->l - z->c;
1493 (void) m6; /* do, line 235 */
1494 {
1495 int ret = r_factive (z);
1496 if (ret == 0)
1497 goto lab5; /* call factive, line 235 */
1498 if (ret < 0)
1499 return ret;
1500 }
1501 lab5:
1502 z->c = z->l - m6;
1503 }
1504 {
1505 int m7 = z->l - z->c;
1506 (void) m7; /* do, line 236 */
1507 {
1508 int ret = r_owned (z);
1509 if (ret == 0)
1510 goto lab6; /* call owned, line 236 */
1511 if (ret < 0)
1512 return ret;
1513 }
1514 lab6:
1515 z->c = z->l - m7;
1516 }
1517 {
1518 int m8 = z->l - z->c;
1519 (void) m8; /* do, line 237 */
1520 {
1521 int ret = r_sing_owner (z);
1522 if (ret == 0)
1523 goto lab7; /* call sing_owner, line 237 */
1524 if (ret < 0)
1525 return ret;
1526 }
1527 lab7:
1528 z->c = z->l - m8;
1529 }
1530 {
1531 int m9 = z->l - z->c;
1532 (void) m9; /* do, line 238 */
1533 {
1534 int ret = r_plur_owner (z);
1535 if (ret == 0)
1536 goto lab8; /* call plur_owner, line 238 */
1537 if (ret < 0)
1538 return ret;
1539 }
1540 lab8:
1541 z->c = z->l - m9;
1542 }
1543 {
1544 int m10 = z->l - z->c;
1545 (void) m10; /* do, line 239 */
1546 {
1547 int ret = r_plural (z);
1548 if (ret == 0)
1549 goto lab9; /* call plural, line 239 */
1550 if (ret < 0)
1551 return ret;
1552 }
1553 lab9:
1554 z->c = z->l - m10;
1555 }
1556 z->c = z->lb;
1557 return 1;
1558}
1559
1560extern struct SN_env *
1562{
1563 return SN_create_env (0, 1, 0);
1564}
1565
1566extern void
1568{
1569 SN_close_env (z, 0);
1570}
struct SN_env * SN_create_env(int S_size, int I_size, int B_size)
Definition api.c:6
void SN_close_env(struct SN_env *z, int S_size)
Definition api.c:50
unsigned char symbol
Definition api.h:2
int find_among_b(struct SN_env *z, const struct among *v, int v_size)
Definition utilities.c:400
int slice_del(struct SN_env *z)
Definition utilities.c:573
int in_grouping(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition utilities.c:206
int out_grouping(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition utilities.c:244
int find_among(struct SN_env *z, const struct among *v, int v_size)
Definition utilities.c:312
int slice_from_s(struct SN_env *z, int s_size, const symbol *s)
Definition utilities.c:559
static const symbol s_2_12[3]
static const symbol s_8_6[2]
static const symbol s_25[]
static const symbol s_2[]
static const symbol s_9_6[3]
static const symbol s_4_22[2]
static const symbol s_0_4[2]
static const symbol s_11_21[3]
static const struct among a_3[2]
static const symbol s_10_0[1]
static const symbol s_4_11[3]
static const symbol s_10_16[2]
static const symbol s_2_2[2]
static const symbol s_4_17[3]
static const symbol s_8_2[2]
static const symbol s_2_5[2]
static const symbol s_0_5[2]
static const symbol s_4[]
static const symbol s_11_11[3]
void hungarian_ISO_8859_1_close_env(struct SN_env *z)
static const symbol s_11_30[4]
static const symbol s_11_20[4]
static const symbol s_10_18[4]
static const symbol s_10_6[2]
static const symbol s_6_5[5]
static const struct among a_4[44]
static const symbol s_10_28[1]
static const symbol s_4_35[6]
static const symbol s_2_13[2]
static const struct among a_6[6]
static const symbol s_10_30[1]
static const symbol s_9_0[2]
static const symbol s_2_22[2]
static const symbol s_11_7[1]
static const symbol s_30[]
static const symbol s_4_9[2]
static const symbol s_2_9[2]
static const symbol s_11_29[5]
static const symbol s_11_28[4]
static const symbol s_11_3[3]
static const symbol s_3_1[2]
static int r_case(struct SN_env *z)
static int r_v_ending(struct SN_env *z)
static const struct among a_2[23]
static int r_double(struct SN_env *z)
static const symbol s_5_0[2]
static int r_factive(struct SN_env *z)
static const struct among a_7[2]
static const symbol s_10_24[2]
static const symbol s_11_31[4]
static const symbol s_29[]
static const symbol s_10_27[2]
static const symbol s_4_1[2]
static const symbol s_10_21[4]
static const symbol s_4_18[2]
static const symbol s_2_18[3]
static const symbol s_11_39[4]
static const symbol s_4_39[3]
static const symbol s_2_0[2]
static const symbol s_11_8[2]
static const symbol s_27[]
static const symbol s_9_11[2]
struct SN_env * hungarian_ISO_8859_1_create_env(void)
static int r_instrum(struct SN_env *z)
static const symbol s_4_15[3]
static const symbol s_11_10[2]
static const symbol s_11_12[2]
static const symbol s_4_21[3]
static const symbol s_6[]
static const symbol s_10_14[3]
static const symbol s_7_1[1]
static const symbol s_0_0[2]
static const symbol s_11_33[6]
static const symbol s_21[]
static const symbol s_3[]
static const symbol s_10_20[3]
static const symbol s_3_0[2]
static const symbol s_11_23[3]
static const symbol s_9_10[3]
static const symbol s_4_4[2]
static const symbol s_6_3[4]
static const symbol s_10_4[2]
static const symbol s_0_7[2]
static const symbol s_2_15[2]
static const symbol s_11_25[3]
static const symbol s_10_7[2]
static const symbol s_2_11[2]
static const symbol s_7[]
static const symbol s_32[]
static const symbol s_11_16[6]
static const symbol s_11_35[2]
static const symbol s_13[]
static const symbol s_4_10[3]
static const symbol s_4_36[2]
static const symbol s_9_9[3]
static int r_plur_owner(struct SN_env *z)
static const symbol s_10_26[2]
static const symbol s_2_20[3]
static const symbol s_10_3[2]
static const symbol s_6_2[5]
static const symbol s_20[]
static const symbol s_4_33[6]
static int r_undouble(struct SN_env *z)
static const symbol s_10_17[3]
static const symbol s_4_42[2]
static const symbol s_11_4[4]
static const symbol s_35[]
static const symbol s_2_10[2]
static const symbol s_8_3[2]
static const symbol s_4_16[3]
static const symbol s_19[]
static const symbol s_23[]
static const symbol s_10_1[2]
static const symbol s_4_6[3]
static const symbol s_6_4[5]
static const struct among a_1[2]
static const symbol s_24[]
static const symbol s_4_5[3]
static const symbol s_11_9[3]
static const symbol s_2_14[3]
static const symbol s_6_1[5]
static const symbol s_0_1[3]
static const symbol s_9_8[3]
static const symbol s_11_14[4]
static int r_owned(struct SN_env *z)
static const symbol s_4_30[2]
static const symbol s_4_40[3]
static int r_case_other(struct SN_env *z)
static const symbol s_9_2[3]
static int r_R1(struct SN_env *z)
static const symbol s_16[]
static const symbol s_14[]
static const symbol s_11_22[4]
static const symbol s_10_23[2]
static const symbol s_11_40[3]
static const symbol s_11_27[5]
static const symbol s_22[]
static const symbol s_10_29[1]
static const symbol s_11_17[5]
static const symbol s_4_26[2]
static const struct among a_5[3]
static const symbol s_4_8[3]
static const symbol s_2_21[3]
static const symbol s_2_3[2]
static const symbol s_4_2[2]
static const symbol s_2_7[2]
static const symbol s_11_6[3]
static const symbol s_10[]
static const symbol s_1_1[1]
static int r_plural(struct SN_env *z)
static const symbol s_4_23[3]
static const symbol s_2_4[2]
static const symbol s_2_17[3]
static const symbol s_11_24[3]
static const symbol s_1[]
static const symbol s_11_2[4]
static const symbol s_8_5[2]
static const symbol s_4_43[2]
static const struct among a_11[42]
static const symbol s_4_29[1]
static const symbol s_10_25[2]
static const symbol s_10_8[2]
static const symbol s_31[]
static const symbol s_4_0[2]
static int r_sing_owner(struct SN_env *z)
static const symbol s_1_0[1]
static const symbol s_4_25[2]
static const symbol s_10_13[3]
static const symbol s_4_14[3]
static const symbol s_9_3[1]
static const struct among a_8[7]
static const symbol s_4_27[4]
static const symbol s_11_1[3]
static const symbol s_10_22[1]
static int r_mark_regions(struct SN_env *z)
static const symbol s_4_32[4]
static const symbol s_9_4[2]
static const struct among a_10[31]
static const symbol s_11[]
static const symbol s_12[]
static const symbol s_0_6[2]
static const symbol s_8_1[2]
static const symbol s_9_7[3]
static const struct among a_0[8]
static const symbol s_4_12[3]
static const symbol s_33[]
static const symbol s_11_13[2]
static const struct among a_9[12]
static const symbol s_2_16[2]
static const symbol s_4_34[6]
static const symbol s_4_3[2]
static const symbol s_4_13[3]
static const symbol s_7_0[1]
static const symbol s_9_1[3]
static const symbol s_4_31[2]
static const symbol s_10_19[2]
static const symbol s_5_1[2]
static const symbol s_11_5[3]
static const symbol s_2_19[3]
static const symbol s_10_9[1]
static const symbol s_0_2[2]
static const symbol s_18[]
static const symbol s_17[]
static const symbol s_5_2[6]
int hungarian_ISO_8859_1_stem(struct SN_env *z)
static const symbol s_11_19[3]
static const symbol s_4_41[3]
static const symbol s_6_0[4]
static const symbol s_2_8[2]
static const symbol s_28[]
static const symbol s_0_3[2]
static const symbol s_11_38[3]
static const symbol s_11_18[2]
static const symbol s_2_6[2]
static const symbol s_11_15[5]
static const symbol s_2_1[2]
static const symbol s_10_11[2]
static const unsigned char g_v[]
static const symbol s_11_36[3]
static const symbol s_4_37[3]
static const symbol s_4_24[6]
static const symbol s_10_15[3]
static const symbol s_4_7[3]
static const symbol s_10_12[3]
static const symbol s_8[]
static const symbol s_9[]
static const symbol s_11_37[4]
static int r_case_special(struct SN_env *z)
static const symbol s_11_41[3]
static const symbol s_10_5[2]
static const symbol s_5[]
static const symbol s_10_10[2]
static const symbol s_11_32[5]
static const symbol s_10_2[1]
static const symbol s_8_0[1]
static const symbol s_8_4[2]
static const symbol s_15[]
static const symbol s_11_26[4]
static const symbol s_11_0[2]
static const symbol s_26[]
static const symbol s_9_5[3]
static const symbol s_4_19[1]
static const symbol s_11_34[5]
static const symbol s_4_28[3]
static const symbol s_0[]
static const symbol s_4_20[2]
static const symbol s_34[]
static const symbol s_4_38[2]
Definition api.h:14
int lb
Definition api.h:16
symbol * p
Definition api.h:15
int * I
Definition api.h:18
int ket
Definition api.h:16
int c
Definition api.h:16
int bra
Definition api.h:16
int l
Definition api.h:16
Definition header.h:16