PostgreSQL Source Code git master
stem_ISO_8859_1_dutch.c
Go to the documentation of this file.
1/* Generated from dutch.sbl by Snowball 3.0.0 - https://snowballstem.org/ */
2
4
5#include <stddef.h>
6
7#include "snowball_runtime.h"
8
9struct SN_local {
10 struct SN_env z;
11 int i_p2;
12 int i_p1;
13 unsigned char b_GE_removed;
14 symbol * s_ch;
15};
16
17typedef struct SN_local SN_local;
18
19#ifdef __cplusplus
20extern "C" {
21#endif
22extern int dutch_ISO_8859_1_stem(struct SN_env * z);
23#ifdef __cplusplus
24}
25#endif
26
27static int r_measure(struct SN_env * z);
28static int r_Lose_infix(struct SN_env * z);
29static int r_Lose_prefix(struct SN_env * z);
30static int r_Step_1c(struct SN_env * z);
31static int r_Step_6(struct SN_env * z);
32static int r_Step_7(struct SN_env * z);
33static int r_Step_4(struct SN_env * z);
34static int r_Step_3(struct SN_env * z);
35static int r_Step_2(struct SN_env * z);
36static int r_Step_1(struct SN_env * z);
37static int r_lengthen_V(struct SN_env * z);
38static int r_VX(struct SN_env * z);
39static int r_V(struct SN_env * z);
40static int r_C(struct SN_env * z);
41static int r_R2(struct SN_env * z);
42static int r_R1(struct SN_env * z);
43
44static const symbol s_0[] = { 'i', 'j' };
45static const symbol s_1[] = { 'i', 'j' };
46static const symbol s_2[] = { 'i', 'j' };
47static const symbol s_3[] = { 'e', 0xEB, 'e' };
48static const symbol s_4[] = { 'i', 'e', 'e' };
49static const symbol s_5[] = { 'i', 'e' };
50static const symbol s_6[] = { 'a', 'r' };
51static const symbol s_7[] = { 'e', 'r' };
52static const symbol s_8[] = { 'e' };
53static const symbol s_9[] = { 0xE9 };
54static const symbol s_10[] = { 'a', 'u' };
55static const symbol s_11[] = { 'h', 'e', 'd' };
56static const symbol s_12[] = { 'h', 'e', 'i', 'd' };
57static const symbol s_13[] = { 'n', 'd' };
58static const symbol s_14[] = { 'n', 'd' };
59static const symbol s_15[] = { '\'', 't' };
60static const symbol s_16[] = { 'e', 't' };
61static const symbol s_17[] = { 'r', 'n', 't' };
62static const symbol s_18[] = { 'r', 'n' };
63static const symbol s_19[] = { 'i', 'n', 'k' };
64static const symbol s_20[] = { 'i', 'n', 'g' };
65static const symbol s_21[] = { 'm', 'p' };
66static const symbol s_22[] = { 'm' };
67static const symbol s_23[] = { 'g' };
68static const symbol s_24[] = { 'l', 'i', 'j', 'k' };
69static const symbol s_25[] = { 'i', 's', 'c', 'h' };
70static const symbol s_26[] = { 't' };
71static const symbol s_27[] = { 's' };
72static const symbol s_28[] = { 'r' };
73static const symbol s_29[] = { 'l' };
74static const symbol s_30[] = { 'e', 'n' };
75static const symbol s_31[] = { 'i', 'e', 'f' };
76static const symbol s_32[] = { 'e', 'e', 'r' };
77static const symbol s_33[] = { 'r' };
78static const symbol s_34[] = { 'i', 'l', 'd' };
79static const symbol s_35[] = { 'e', 'r' };
80static const symbol s_36[] = { 'a', 'a', 'r' };
81static const symbol s_37[] = { 'f' };
82static const symbol s_38[] = { 'g' };
83static const symbol s_39[] = { 't' };
84static const symbol s_40[] = { 'd' };
85static const symbol s_41[] = { 'i', 'e' };
86static const symbol s_42[] = { 'e', 'e', 'r' };
87static const symbol s_43[] = { 'n' };
88static const symbol s_44[] = { 'l' };
89static const symbol s_45[] = { 'r' };
90static const symbol s_46[] = { 't', 'e', 'e', 'r' };
91static const symbol s_47[] = { 'l', 'i', 'j', 'k' };
92static const symbol s_48[] = { 'i', 'n', 'n' };
93static const symbol s_49[] = { 'k' };
94static const symbol s_50[] = { 'f' };
95static const symbol s_51[] = { 'p' };
96static const symbol s_52[] = { 'b' };
97static const symbol s_53[] = { 'c' };
98static const symbol s_54[] = { 'd' };
99static const symbol s_55[] = { 'f' };
100static const symbol s_56[] = { 'g' };
101static const symbol s_57[] = { 'h' };
102static const symbol s_58[] = { 'j' };
103static const symbol s_59[] = { 'k' };
104static const symbol s_60[] = { 'l' };
105static const symbol s_61[] = { 'm' };
106static const symbol s_62[] = { 'n' };
107static const symbol s_63[] = { 'p' };
108static const symbol s_64[] = { 'q' };
109static const symbol s_65[] = { 'r' };
110static const symbol s_66[] = { 's' };
111static const symbol s_67[] = { 't' };
112static const symbol s_68[] = { 'v' };
113static const symbol s_69[] = { 'w' };
114static const symbol s_70[] = { 'x' };
115static const symbol s_71[] = { 'z' };
116static const symbol s_72[] = { 'i', 'n' };
117static const symbol s_73[] = { 'n' };
118static const symbol s_74[] = { 'e', 'n' };
119static const symbol s_75[] = { 'g', 'e' };
120static const symbol s_76[] = { 'i', 'j' };
121static const symbol s_77[] = { 'i', 'j' };
122static const symbol s_78[] = { 'e' };
123static const symbol s_79[] = { 'i' };
124static const symbol s_80[] = { 'g', 'e' };
125static const symbol s_81[] = { 'i', 'j' };
126static const symbol s_82[] = { 'i', 'j' };
127static const symbol s_83[] = { 'e' };
128static const symbol s_84[] = { 'i' };
129static const symbol s_85[] = { 'i', 'j' };
130static const symbol s_86[] = { 'i', 'j' };
131
132static const symbol s_0_0[1] = { 'a' };
133static const symbol s_0_1[1] = { 'e' };
134static const symbol s_0_2[1] = { 'o' };
135static const symbol s_0_3[1] = { 'u' };
136static const symbol s_0_4[1] = { 0xE0 };
137static const symbol s_0_5[1] = { 0xE1 };
138static const symbol s_0_6[1] = { 0xE2 };
139static const symbol s_0_7[1] = { 0xE4 };
140static const symbol s_0_8[1] = { 0xE8 };
141static const symbol s_0_9[1] = { 0xE9 };
142static const symbol s_0_10[1] = { 0xEA };
143static const symbol s_0_11[2] = { 'e', 0xEB };
144static const symbol s_0_12[2] = { 'i', 0xEB };
145static const symbol s_0_13[1] = { 0xF2 };
146static const symbol s_0_14[1] = { 0xF3 };
147static const symbol s_0_15[1] = { 0xF4 };
148static const symbol s_0_16[1] = { 0xF6 };
149static const symbol s_0_17[1] = { 0xF9 };
150static const symbol s_0_18[1] = { 0xFA };
151static const symbol s_0_19[1] = { 0xFB };
152static const symbol s_0_20[1] = { 0xFC };
153static const struct among a_0[21] = {
154{ 1, s_0_0, 0, 1, 0},
155{ 1, s_0_1, 0, 2, 0},
156{ 1, s_0_2, 0, 1, 0},
157{ 1, s_0_3, 0, 1, 0},
158{ 1, s_0_4, 0, 1, 0},
159{ 1, s_0_5, 0, 1, 0},
160{ 1, s_0_6, 0, 1, 0},
161{ 1, s_0_7, 0, 1, 0},
162{ 1, s_0_8, 0, 2, 0},
163{ 1, s_0_9, 0, 2, 0},
164{ 1, s_0_10, 0, 2, 0},
165{ 2, s_0_11, 0, 3, 0},
166{ 2, s_0_12, 0, 4, 0},
167{ 1, s_0_13, 0, 1, 0},
168{ 1, s_0_14, 0, 1, 0},
169{ 1, s_0_15, 0, 1, 0},
170{ 1, s_0_16, 0, 1, 0},
171{ 1, s_0_17, 0, 1, 0},
172{ 1, s_0_18, 0, 1, 0},
173{ 1, s_0_19, 0, 1, 0},
174{ 1, s_0_20, 0, 1, 0}
175};
176
177static const symbol s_1_0[3] = { 'n', 'd', 'e' };
178static const symbol s_1_1[2] = { 'e', 'n' };
179static const symbol s_1_2[1] = { 's' };
180static const symbol s_1_3[2] = { '\'', 's' };
181static const symbol s_1_4[2] = { 'e', 's' };
182static const symbol s_1_5[3] = { 'i', 'e', 's' };
183static const symbol s_1_6[3] = { 'a', 'u', 's' };
184static const symbol s_1_7[2] = { 0xE9, 's' };
185static const struct among a_1[8] = {
186{ 3, s_1_0, 0, 8, 0},
187{ 2, s_1_1, 0, 7, 0},
188{ 1, s_1_2, 0, 2, 0},
189{ 2, s_1_3, -1, 1, 0},
190{ 2, s_1_4, -2, 4, 0},
191{ 3, s_1_5, -1, 3, 0},
192{ 3, s_1_6, -4, 6, 0},
193{ 2, s_1_7, -5, 5, 0}
194};
195
196static const symbol s_2_0[2] = { 'd', 'e' };
197static const symbol s_2_1[2] = { 'g', 'e' };
198static const symbol s_2_2[5] = { 'i', 's', 'c', 'h', 'e' };
199static const symbol s_2_3[2] = { 'j', 'e' };
200static const symbol s_2_4[5] = { 'l', 'i', 'j', 'k', 'e' };
201static const symbol s_2_5[2] = { 'l', 'e' };
202static const symbol s_2_6[3] = { 'e', 'n', 'e' };
203static const symbol s_2_7[2] = { 'r', 'e' };
204static const symbol s_2_8[2] = { 's', 'e' };
205static const symbol s_2_9[2] = { 't', 'e' };
206static const symbol s_2_10[4] = { 'i', 'e', 'v', 'e' };
207static const struct among a_2[11] = {
208{ 2, s_2_0, 0, 5, 0},
209{ 2, s_2_1, 0, 2, 0},
210{ 5, s_2_2, 0, 4, 0},
211{ 2, s_2_3, 0, 1, 0},
212{ 5, s_2_4, 0, 3, 0},
213{ 2, s_2_5, 0, 9, 0},
214{ 3, s_2_6, 0, 10, 0},
215{ 2, s_2_7, 0, 8, 0},
216{ 2, s_2_8, 0, 7, 0},
217{ 2, s_2_9, 0, 6, 0},
218{ 4, s_2_10, 0, 11, 0}
219};
220
221static const symbol s_3_0[4] = { 'h', 'e', 'i', 'd' };
222static const symbol s_3_1[3] = { 'f', 'i', 'e' };
223static const symbol s_3_2[3] = { 'g', 'i', 'e' };
224static const symbol s_3_3[4] = { 'a', 't', 'i', 'e' };
225static const symbol s_3_4[4] = { 'i', 's', 'm', 'e' };
226static const symbol s_3_5[3] = { 'i', 'n', 'g' };
227static const symbol s_3_6[4] = { 'a', 'r', 'i', 'j' };
228static const symbol s_3_7[4] = { 'e', 'r', 'i', 'j' };
229static const symbol s_3_8[3] = { 's', 'e', 'l' };
230static const symbol s_3_9[4] = { 'r', 'd', 'e', 'r' };
231static const symbol s_3_10[4] = { 's', 't', 'e', 'r' };
232static const symbol s_3_11[5] = { 'i', 't', 'e', 'i', 't' };
233static const symbol s_3_12[3] = { 'd', 's', 't' };
234static const symbol s_3_13[3] = { 't', 's', 't' };
235static const struct among a_3[14] = {
236{ 4, s_3_0, 0, 3, 0},
237{ 3, s_3_1, 0, 7, 0},
238{ 3, s_3_2, 0, 8, 0},
239{ 4, s_3_3, 0, 1, 0},
240{ 4, s_3_4, 0, 5, 0},
241{ 3, s_3_5, 0, 5, 0},
242{ 4, s_3_6, 0, 6, 0},
243{ 4, s_3_7, 0, 5, 0},
244{ 3, s_3_8, 0, 3, 0},
245{ 4, s_3_9, 0, 4, 0},
246{ 4, s_3_10, 0, 3, 0},
247{ 5, s_3_11, 0, 2, 0},
248{ 3, s_3_12, 0, 10, 0},
249{ 3, s_3_13, 0, 9, 0}
250};
251
252static const symbol s_4_0[3] = { 'e', 'n', 'd' };
253static const symbol s_4_1[5] = { 'a', 't', 'i', 'e', 'f' };
254static const symbol s_4_2[4] = { 'e', 'r', 'i', 'g' };
255static const symbol s_4_3[6] = { 'a', 'c', 'h', 't', 'i', 'g' };
256static const symbol s_4_4[6] = { 'i', 'o', 'n', 'e', 'e', 'l' };
257static const symbol s_4_5[4] = { 'b', 'a', 'a', 'r' };
258static const symbol s_4_6[4] = { 'l', 'a', 'a', 'r' };
259static const symbol s_4_7[4] = { 'n', 'a', 'a', 'r' };
260static const symbol s_4_8[4] = { 'r', 'a', 'a', 'r' };
261static const symbol s_4_9[6] = { 'e', 'r', 'i', 'g', 'e', 'r' };
262static const symbol s_4_10[8] = { 'a', 'c', 'h', 't', 'i', 'g', 'e', 'r' };
263static const symbol s_4_11[6] = { 'l', 'i', 'j', 'k', 'e', 'r' };
264static const symbol s_4_12[4] = { 't', 'a', 'n', 't' };
265static const symbol s_4_13[6] = { 'e', 'r', 'i', 'g', 's', 't' };
266static const symbol s_4_14[8] = { 'a', 'c', 'h', 't', 'i', 'g', 's', 't' };
267static const symbol s_4_15[6] = { 'l', 'i', 'j', 'k', 's', 't' };
268static const struct among a_4[16] = {
269{ 3, s_4_0, 0, 9, 0},
270{ 5, s_4_1, 0, 2, 0},
271{ 4, s_4_2, 0, 9, 0},
272{ 6, s_4_3, 0, 3, 0},
273{ 6, s_4_4, 0, 1, 0},
274{ 4, s_4_5, 0, 3, 0},
275{ 4, s_4_6, 0, 5, 0},
276{ 4, s_4_7, 0, 4, 0},
277{ 4, s_4_8, 0, 6, 0},
278{ 6, s_4_9, 0, 9, 0},
279{ 8, s_4_10, 0, 3, 0},
280{ 6, s_4_11, 0, 8, 0},
281{ 4, s_4_12, 0, 7, 0},
282{ 6, s_4_13, 0, 9, 0},
283{ 8, s_4_14, 0, 3, 0},
284{ 6, s_4_15, 0, 8, 0}
285};
286
287static const symbol s_5_0[2] = { 'i', 'g' };
288static const symbol s_5_1[4] = { 'i', 'g', 'e', 'r' };
289static const symbol s_5_2[4] = { 'i', 'g', 's', 't' };
290static const struct among a_5[3] = {
291{ 2, s_5_0, 0, 1, 0},
292{ 4, s_5_1, 0, 1, 0},
293{ 4, s_5_2, 0, 1, 0}
294};
295
296static const symbol s_6_0[2] = { 'f', 't' };
297static const symbol s_6_1[2] = { 'k', 't' };
298static const symbol s_6_2[2] = { 'p', 't' };
299static const struct among a_6[3] = {
300{ 2, s_6_0, 0, 2, 0},
301{ 2, s_6_1, 0, 1, 0},
302{ 2, s_6_2, 0, 3, 0}
303};
304
305static const symbol s_7_0[2] = { 'b', 'b' };
306static const symbol s_7_1[2] = { 'c', 'c' };
307static const symbol s_7_2[2] = { 'd', 'd' };
308static const symbol s_7_3[2] = { 'f', 'f' };
309static const symbol s_7_4[2] = { 'g', 'g' };
310static const symbol s_7_5[2] = { 'h', 'h' };
311static const symbol s_7_6[2] = { 'j', 'j' };
312static const symbol s_7_7[2] = { 'k', 'k' };
313static const symbol s_7_8[2] = { 'l', 'l' };
314static const symbol s_7_9[2] = { 'm', 'm' };
315static const symbol s_7_10[2] = { 'n', 'n' };
316static const symbol s_7_11[2] = { 'p', 'p' };
317static const symbol s_7_12[2] = { 'q', 'q' };
318static const symbol s_7_13[2] = { 'r', 'r' };
319static const symbol s_7_14[2] = { 's', 's' };
320static const symbol s_7_15[2] = { 't', 't' };
321static const symbol s_7_16[1] = { 'v' };
322static const symbol s_7_17[2] = { 'v', 'v' };
323static const symbol s_7_18[2] = { 'w', 'w' };
324static const symbol s_7_19[2] = { 'x', 'x' };
325static const symbol s_7_20[1] = { 'z' };
326static const symbol s_7_21[2] = { 'z', 'z' };
327static const struct among a_7[22] = {
328{ 2, s_7_0, 0, 1, 0},
329{ 2, s_7_1, 0, 2, 0},
330{ 2, s_7_2, 0, 3, 0},
331{ 2, s_7_3, 0, 4, 0},
332{ 2, s_7_4, 0, 5, 0},
333{ 2, s_7_5, 0, 6, 0},
334{ 2, s_7_6, 0, 7, 0},
335{ 2, s_7_7, 0, 8, 0},
336{ 2, s_7_8, 0, 9, 0},
337{ 2, s_7_9, 0, 10, 0},
338{ 2, s_7_10, 0, 11, 0},
339{ 2, s_7_11, 0, 12, 0},
340{ 2, s_7_12, 0, 13, 0},
341{ 2, s_7_13, 0, 14, 0},
342{ 2, s_7_14, 0, 15, 0},
343{ 2, s_7_15, 0, 16, 0},
344{ 1, s_7_16, 0, 4, 0},
345{ 2, s_7_17, -1, 17, 0},
346{ 2, s_7_18, 0, 18, 0},
347{ 2, s_7_19, 0, 19, 0},
348{ 1, s_7_20, 0, 15, 0},
349{ 2, s_7_21, -1, 20, 0}
350};
351
352static const symbol s_8_0[1] = { 'd' };
353static const symbol s_8_1[1] = { 't' };
354static const struct among a_8[2] = {
355{ 1, s_8_0, 0, 1, 0},
356{ 1, s_8_1, 0, 2, 0}
357};
358
359static const symbol s_9_1[3] = { 'e', 'f', 't' };
360static const symbol s_9_2[3] = { 'v', 'a', 'a' };
361static const symbol s_9_3[3] = { 'v', 'a', 'l' };
362static const symbol s_9_4[4] = { 'v', 'a', 'l', 'i' };
363static const symbol s_9_5[4] = { 'v', 'a', 'r', 'e' };
364static const struct among a_9[6] = {
365{ 0, 0, 0, -1, 0},
366{ 3, s_9_1, -1, 1, 0},
367{ 3, s_9_2, -2, 1, 0},
368{ 3, s_9_3, -3, 1, 0},
369{ 4, s_9_4, -1, -1, 0},
370{ 4, s_9_5, -5, 1, 0}
371};
372
373static const symbol s_10_0[1] = { 0xEB };
374static const symbol s_10_1[1] = { 0xEF };
375static const struct among a_10[2] = {
376{ 1, s_10_0, 0, 1, 0},
377{ 1, s_10_1, 0, 2, 0}
378};
379
380static const symbol s_11_0[1] = { 0xEB };
381static const symbol s_11_1[1] = { 0xEF };
382static const struct among a_11[2] = {
383{ 1, s_11_0, 0, 1, 0},
384{ 1, s_11_1, 0, 2, 0}
385};
386
387static const unsigned char g_E[] = { 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 120 };
388
389static const unsigned char g_AIOU[] = { 1, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128, 11, 120, 46, 15 };
390
391static const unsigned char g_AEIOU[] = { 17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128, 139, 127, 46, 15 };
392
393static const unsigned char g_v[] = { 17, 65, 16, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128, 139, 127, 46, 15 };
394
395static const unsigned char g_v_WX[] = { 17, 65, 208, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 128, 139, 127, 46, 15 };
396
397static int r_R1(struct SN_env * z) {
398 return ((SN_local *)z)->i_p1 <= z->c;
399}
400
401static int r_R2(struct SN_env * z) {
402 return ((SN_local *)z)->i_p2 <= z->c;
403}
404
405static int r_V(struct SN_env * z) {
406 {
407 int v_1 = z->l - z->c;
408 do {
409 int v_2 = z->l - z->c;
410 if (in_grouping_b(z, g_v, 97, 252, 0)) goto lab0;
411 break;
412 lab0:
413 z->c = z->l - v_2;
414 if (!(eq_s_b(z, 2, s_0))) return 0;
415 } while (0);
416 z->c = z->l - v_1;
417 }
418 return 1;
419}
420
421static int r_VX(struct SN_env * z) {
422 {
423 int v_1 = z->l - z->c;
424 if (z->c <= z->lb) return 0;
425 z->c--;
426 do {
427 int v_2 = z->l - z->c;
428 if (in_grouping_b(z, g_v, 97, 252, 0)) goto lab0;
429 break;
430 lab0:
431 z->c = z->l - v_2;
432 if (!(eq_s_b(z, 2, s_1))) return 0;
433 } while (0);
434 z->c = z->l - v_1;
435 }
436 return 1;
437}
438
439static int r_C(struct SN_env * z) {
440 {
441 int v_1 = z->l - z->c;
442 {
443 int v_2 = z->l - z->c;
444 if (!(eq_s_b(z, 2, s_2))) goto lab0;
445 return 0;
446 lab0:
447 z->c = z->l - v_2;
448 }
449 if (out_grouping_b(z, g_v, 97, 252, 0)) return 0;
450 z->c = z->l - v_1;
451 }
452 return 1;
453}
454
455static int r_lengthen_V(struct SN_env * z) {
456 int among_var;
457 {
458 int v_1 = z->l - z->c;
459 if (out_grouping_b(z, g_v_WX, 97, 252, 0)) goto lab0;
460 z->ket = z->c;
461 among_var = find_among_b(z, a_0, 21, 0);
462 if (!among_var) goto lab0;
463 z->bra = z->c;
464 switch (among_var) {
465 case 1:
466 {
467 int v_2 = z->l - z->c;
468 do {
469 int v_3 = z->l - z->c;
470 if (out_grouping_b(z, g_AEIOU, 97, 252, 0)) goto lab1;
471 break;
472 lab1:
473 z->c = z->l - v_3;
474 if (z->c > z->lb) goto lab0;
475 } while (0);
476 z->c = z->l - v_2;
477 }
478 {
479 int ret = slice_to(z, &((SN_local *)z)->s_ch);
480 if (ret < 0) return ret;
481 }
482 {
483 int saved_c = z->c;
484 int ret = insert_v(z, z->c, z->c, ((SN_local *)z)->s_ch);
485 z->c = saved_c;
486 if (ret < 0) return ret;
487 }
488 break;
489 case 2:
490 {
491 int v_4 = z->l - z->c;
492 do {
493 int v_5 = z->l - z->c;
494 if (out_grouping_b(z, g_AEIOU, 97, 252, 0)) goto lab2;
495 break;
496 lab2:
497 z->c = z->l - v_5;
498 if (z->c > z->lb) goto lab0;
499 } while (0);
500 {
501 int v_6 = z->l - z->c;
502 do {
503 int v_7 = z->l - z->c;
504 if (in_grouping_b(z, g_AIOU, 97, 252, 0)) goto lab4;
505 break;
506 lab4:
507 z->c = z->l - v_7;
508 if (in_grouping_b(z, g_E, 101, 235, 0)) goto lab3;
509 if (z->c > z->lb) goto lab3;
510 } while (0);
511 goto lab0;
512 lab3:
513 z->c = z->l - v_6;
514 }
515 {
516 int v_8 = z->l - z->c;
517 if (z->c <= z->lb) goto lab5;
518 z->c--;
519 if (in_grouping_b(z, g_AIOU, 97, 252, 0)) goto lab5;
520 if (out_grouping_b(z, g_AEIOU, 97, 252, 0)) goto lab5;
521 goto lab0;
522 lab5:
523 z->c = z->l - v_8;
524 }
525 z->c = z->l - v_4;
526 }
527 {
528 int ret = slice_to(z, &((SN_local *)z)->s_ch);
529 if (ret < 0) return ret;
530 }
531 {
532 int saved_c = z->c;
533 int ret = insert_v(z, z->c, z->c, ((SN_local *)z)->s_ch);
534 z->c = saved_c;
535 if (ret < 0) return ret;
536 }
537 break;
538 case 3:
539 {
540 int ret = slice_from_s(z, 3, s_3);
541 if (ret < 0) return ret;
542 }
543 break;
544 case 4:
545 {
546 int ret = slice_from_s(z, 3, s_4);
547 if (ret < 0) return ret;
548 }
549 break;
550 }
551 lab0:
552 z->c = z->l - v_1;
553 }
554 return 1;
555}
556
557static int r_Step_1(struct SN_env * z) {
558 int among_var;
559 z->ket = z->c;
560 if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((540704 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
561 among_var = find_among_b(z, a_1, 8, 0);
562 if (!among_var) return 0;
563 z->bra = z->c;
564 switch (among_var) {
565 case 1:
566 {
567 int ret = slice_del(z);
568 if (ret < 0) return ret;
569 }
570 break;
571 case 2:
572 {
573 int ret = r_R1(z);
574 if (ret <= 0) return ret;
575 }
576 {
577 int v_1 = z->l - z->c;
578 if (z->c <= z->lb || z->p[z->c - 1] != 't') goto lab0;
579 z->c--;
580 {
581 int ret = r_R1(z);
582 if (ret == 0) goto lab0;
583 if (ret < 0) return ret;
584 }
585 return 0;
586 lab0:
587 z->c = z->l - v_1;
588 }
589 {
590 int ret = r_C(z);
591 if (ret <= 0) return ret;
592 }
593 {
594 int ret = slice_del(z);
595 if (ret < 0) return ret;
596 }
597 break;
598 case 3:
599 {
600 int ret = r_R1(z);
601 if (ret <= 0) return ret;
602 }
603 {
604 int ret = slice_from_s(z, 2, s_5);
605 if (ret < 0) return ret;
606 }
607 break;
608 case 4:
609 do {
610 int v_2 = z->l - z->c;
611 {
612 int v_3 = z->l - z->c;
613 if (!(eq_s_b(z, 2, s_6))) goto lab1;
614 {
615 int ret = r_R1(z);
616 if (ret == 0) goto lab1;
617 if (ret < 0) return ret;
618 }
619 {
620 int ret = r_C(z);
621 if (ret == 0) goto lab1;
622 if (ret < 0) return ret;
623 }
624 z->c = z->l - v_3;
625 }
626 {
627 int ret = slice_del(z);
628 if (ret < 0) return ret;
629 }
630 {
631 int ret = r_lengthen_V(z);
632 if (ret < 0) return ret;
633 }
634 break;
635 lab1:
636 z->c = z->l - v_2;
637 {
638 int v_4 = z->l - z->c;
639 if (!(eq_s_b(z, 2, s_7))) goto lab2;
640 {
641 int ret = r_R1(z);
642 if (ret == 0) goto lab2;
643 if (ret < 0) return ret;
644 }
645 {
646 int ret = r_C(z);
647 if (ret == 0) goto lab2;
648 if (ret < 0) return ret;
649 }
650 z->c = z->l - v_4;
651 }
652 {
653 int ret = slice_del(z);
654 if (ret < 0) return ret;
655 }
656 break;
657 lab2:
658 z->c = z->l - v_2;
659 {
660 int ret = r_R1(z);
661 if (ret <= 0) return ret;
662 }
663 {
664 int ret = r_C(z);
665 if (ret <= 0) return ret;
666 }
667 {
668 int ret = slice_from_s(z, 1, s_8);
669 if (ret < 0) return ret;
670 }
671 } while (0);
672 break;
673 case 5:
674 {
675 int ret = r_R1(z);
676 if (ret <= 0) return ret;
677 }
678 {
679 int ret = slice_from_s(z, 1, s_9);
680 if (ret < 0) return ret;
681 }
682 break;
683 case 6:
684 {
685 int ret = r_R1(z);
686 if (ret <= 0) return ret;
687 }
688 {
689 int ret = r_V(z);
690 if (ret <= 0) return ret;
691 }
692 {
693 int ret = slice_from_s(z, 2, s_10);
694 if (ret < 0) return ret;
695 }
696 break;
697 case 7:
698 do {
699 int v_5 = z->l - z->c;
700 if (!(eq_s_b(z, 3, s_11))) goto lab3;
701 {
702 int ret = r_R1(z);
703 if (ret == 0) goto lab3;
704 if (ret < 0) return ret;
705 }
706 z->bra = z->c;
707 {
708 int ret = slice_from_s(z, 4, s_12);
709 if (ret < 0) return ret;
710 }
711 break;
712 lab3:
713 z->c = z->l - v_5;
714 if (!(eq_s_b(z, 2, s_13))) goto lab4;
715 {
716 int ret = slice_del(z);
717 if (ret < 0) return ret;
718 }
719 break;
720 lab4:
721 z->c = z->l - v_5;
722 if (z->c <= z->lb || z->p[z->c - 1] != 'd') goto lab5;
723 z->c--;
724 {
725 int ret = r_R1(z);
726 if (ret == 0) goto lab5;
727 if (ret < 0) return ret;
728 }
729 {
730 int ret = r_C(z);
731 if (ret == 0) goto lab5;
732 if (ret < 0) return ret;
733 }
734 z->bra = z->c;
735 {
736 int ret = slice_del(z);
737 if (ret < 0) return ret;
738 }
739 break;
740 lab5:
741 z->c = z->l - v_5;
742 do {
743 int v_6 = z->l - z->c;
744 if (z->c <= z->lb || z->p[z->c - 1] != 'i') goto lab7;
745 z->c--;
746 break;
747 lab7:
748 z->c = z->l - v_6;
749 if (z->c <= z->lb || z->p[z->c - 1] != 'j') goto lab6;
750 z->c--;
751 } while (0);
752 {
753 int ret = r_V(z);
754 if (ret == 0) goto lab6;
755 if (ret < 0) return ret;
756 }
757 {
758 int ret = slice_del(z);
759 if (ret < 0) return ret;
760 }
761 break;
762 lab6:
763 z->c = z->l - v_5;
764 {
765 int ret = r_R1(z);
766 if (ret <= 0) return ret;
767 }
768 {
769 int ret = r_C(z);
770 if (ret <= 0) return ret;
771 }
772 {
773 int ret = slice_del(z);
774 if (ret < 0) return ret;
775 }
776 {
777 int ret = r_lengthen_V(z);
778 if (ret <= 0) return ret;
779 }
780 } while (0);
781 break;
782 case 8:
783 {
784 int ret = slice_from_s(z, 2, s_14);
785 if (ret < 0) return ret;
786 }
787 break;
788 }
789 return 1;
790}
791
792static int r_Step_2(struct SN_env * z) {
793 int among_var;
794 z->ket = z->c;
795 if (z->c - 1 <= z->lb || z->p[z->c - 1] != 101) return 0;
796 among_var = find_among_b(z, a_2, 11, 0);
797 if (!among_var) return 0;
798 z->bra = z->c;
799 switch (among_var) {
800 case 1:
801 do {
802 int v_1 = z->l - z->c;
803 if (!(eq_s_b(z, 2, s_15))) goto lab0;
804 z->bra = z->c;
805 {
806 int ret = slice_del(z);
807 if (ret < 0) return ret;
808 }
809 break;
810 lab0:
811 z->c = z->l - v_1;
812 if (!(eq_s_b(z, 2, s_16))) goto lab1;
813 z->bra = z->c;
814 {
815 int ret = r_R1(z);
816 if (ret == 0) goto lab1;
817 if (ret < 0) return ret;
818 }
819 {
820 int ret = r_C(z);
821 if (ret == 0) goto lab1;
822 if (ret < 0) return ret;
823 }
824 {
825 int ret = slice_del(z);
826 if (ret < 0) return ret;
827 }
828 break;
829 lab1:
830 z->c = z->l - v_1;
831 if (!(eq_s_b(z, 3, s_17))) goto lab2;
832 z->bra = z->c;
833 {
834 int ret = slice_from_s(z, 2, s_18);
835 if (ret < 0) return ret;
836 }
837 break;
838 lab2:
839 z->c = z->l - v_1;
840 if (z->c <= z->lb || z->p[z->c - 1] != 't') goto lab3;
841 z->c--;
842 z->bra = z->c;
843 {
844 int ret = r_R1(z);
845 if (ret == 0) goto lab3;
846 if (ret < 0) return ret;
847 }
848 {
849 int ret = r_VX(z);
850 if (ret == 0) goto lab3;
851 if (ret < 0) return ret;
852 }
853 {
854 int ret = slice_del(z);
855 if (ret < 0) return ret;
856 }
857 break;
858 lab3:
859 z->c = z->l - v_1;
860 if (!(eq_s_b(z, 3, s_19))) goto lab4;
861 z->bra = z->c;
862 {
863 int ret = slice_from_s(z, 3, s_20);
864 if (ret < 0) return ret;
865 }
866 break;
867 lab4:
868 z->c = z->l - v_1;
869 if (!(eq_s_b(z, 2, s_21))) goto lab5;
870 z->bra = z->c;
871 {
872 int ret = slice_from_s(z, 1, s_22);
873 if (ret < 0) return ret;
874 }
875 break;
876 lab5:
877 z->c = z->l - v_1;
878 if (z->c <= z->lb || z->p[z->c - 1] != '\'') goto lab6;
879 z->c--;
880 z->bra = z->c;
881 {
882 int ret = r_R1(z);
883 if (ret == 0) goto lab6;
884 if (ret < 0) return ret;
885 }
886 {
887 int ret = slice_del(z);
888 if (ret < 0) return ret;
889 }
890 break;
891 lab6:
892 z->c = z->l - v_1;
893 z->bra = z->c;
894 {
895 int ret = r_R1(z);
896 if (ret <= 0) return ret;
897 }
898 {
899 int ret = r_C(z);
900 if (ret <= 0) return ret;
901 }
902 {
903 int ret = slice_del(z);
904 if (ret < 0) return ret;
905 }
906 } while (0);
907 break;
908 case 2:
909 {
910 int ret = r_R1(z);
911 if (ret <= 0) return ret;
912 }
913 {
914 int ret = slice_from_s(z, 1, s_23);
915 if (ret < 0) return ret;
916 }
917 break;
918 case 3:
919 {
920 int ret = r_R1(z);
921 if (ret <= 0) return ret;
922 }
923 {
924 int ret = slice_from_s(z, 4, s_24);
925 if (ret < 0) return ret;
926 }
927 break;
928 case 4:
929 {
930 int ret = r_R1(z);
931 if (ret <= 0) return ret;
932 }
933 {
934 int ret = slice_from_s(z, 4, s_25);
935 if (ret < 0) return ret;
936 }
937 break;
938 case 5:
939 {
940 int ret = r_R1(z);
941 if (ret <= 0) return ret;
942 }
943 {
944 int ret = r_C(z);
945 if (ret <= 0) return ret;
946 }
947 {
948 int ret = slice_del(z);
949 if (ret < 0) return ret;
950 }
951 break;
952 case 6:
953 {
954 int ret = r_R1(z);
955 if (ret <= 0) return ret;
956 }
957 {
958 int ret = slice_from_s(z, 1, s_26);
959 if (ret < 0) return ret;
960 }
961 break;
962 case 7:
963 {
964 int ret = r_R1(z);
965 if (ret <= 0) return ret;
966 }
967 {
968 int ret = slice_from_s(z, 1, s_27);
969 if (ret < 0) return ret;
970 }
971 break;
972 case 8:
973 {
974 int ret = r_R1(z);
975 if (ret <= 0) return ret;
976 }
977 {
978 int ret = slice_from_s(z, 1, s_28);
979 if (ret < 0) return ret;
980 }
981 break;
982 case 9:
983 {
984 int ret = r_R1(z);
985 if (ret <= 0) return ret;
986 }
987 {
988 int ret = slice_del(z);
989 if (ret < 0) return ret;
990 }
991 {
992 int ret = insert_s(z, z->c, z->c, 1, s_29);
993 if (ret < 0) return ret;
994 }
995 {
996 int ret = r_lengthen_V(z);
997 if (ret <= 0) return ret;
998 }
999 break;
1000 case 10:
1001 {
1002 int ret = r_R1(z);
1003 if (ret <= 0) return ret;
1004 }
1005 {
1006 int ret = r_C(z);
1007 if (ret <= 0) return ret;
1008 }
1009 {
1010 int ret = slice_del(z);
1011 if (ret < 0) return ret;
1012 }
1013 {
1014 int ret = insert_s(z, z->c, z->c, 2, s_30);
1015 if (ret < 0) return ret;
1016 }
1017 {
1018 int ret = r_lengthen_V(z);
1019 if (ret <= 0) return ret;
1020 }
1021 break;
1022 case 11:
1023 {
1024 int ret = r_R1(z);
1025 if (ret <= 0) return ret;
1026 }
1027 {
1028 int ret = r_C(z);
1029 if (ret <= 0) return ret;
1030 }
1031 {
1032 int ret = slice_from_s(z, 3, s_31);
1033 if (ret < 0) return ret;
1034 }
1035 break;
1036 }
1037 return 1;
1038}
1039
1040static int r_Step_3(struct SN_env * z) {
1041 int among_var;
1042 z->ket = z->c;
1043 if (z->c - 2 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((1316016 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
1044 among_var = find_among_b(z, a_3, 14, 0);
1045 if (!among_var) return 0;
1046 z->bra = z->c;
1047 switch (among_var) {
1048 case 1:
1049 {
1050 int ret = r_R1(z);
1051 if (ret <= 0) return ret;
1052 }
1053 {
1054 int ret = slice_from_s(z, 3, s_32);
1055 if (ret < 0) return ret;
1056 }
1057 break;
1058 case 2:
1059 {
1060 int ret = r_R1(z);
1061 if (ret <= 0) return ret;
1062 }
1063 {
1064 int ret = slice_del(z);
1065 if (ret < 0) return ret;
1066 }
1067 {
1068 int ret = r_lengthen_V(z);
1069 if (ret <= 0) return ret;
1070 }
1071 break;
1072 case 3:
1073 {
1074 int ret = r_R1(z);
1075 if (ret <= 0) return ret;
1076 }
1077 {
1078 int ret = slice_del(z);
1079 if (ret < 0) return ret;
1080 }
1081 break;
1082 case 4:
1083 {
1084 int ret = slice_from_s(z, 1, s_33);
1085 if (ret < 0) return ret;
1086 }
1087 break;
1088 case 5:
1089 do {
1090 int v_1 = z->l - z->c;
1091 if (!(eq_s_b(z, 3, s_34))) goto lab0;
1092 {
1093 int ret = slice_from_s(z, 2, s_35);
1094 if (ret < 0) return ret;
1095 }
1096 break;
1097 lab0:
1098 z->c = z->l - v_1;
1099 {
1100 int ret = r_R1(z);
1101 if (ret <= 0) return ret;
1102 }
1103 {
1104 int ret = slice_del(z);
1105 if (ret < 0) return ret;
1106 }
1107 {
1108 int ret = r_lengthen_V(z);
1109 if (ret <= 0) return ret;
1110 }
1111 } while (0);
1112 break;
1113 case 6:
1114 {
1115 int ret = r_R1(z);
1116 if (ret <= 0) return ret;
1117 }
1118 {
1119 int ret = r_C(z);
1120 if (ret <= 0) return ret;
1121 }
1122 {
1123 int ret = slice_from_s(z, 3, s_36);
1124 if (ret < 0) return ret;
1125 }
1126 break;
1127 case 7:
1128 {
1129 int ret = r_R2(z);
1130 if (ret <= 0) return ret;
1131 }
1132 {
1133 int ret = slice_del(z);
1134 if (ret < 0) return ret;
1135 }
1136 {
1137 int ret = insert_s(z, z->c, z->c, 1, s_37);
1138 if (ret < 0) return ret;
1139 }
1140 {
1141 int ret = r_lengthen_V(z);
1142 if (ret <= 0) return ret;
1143 }
1144 break;
1145 case 8:
1146 {
1147 int ret = r_R2(z);
1148 if (ret <= 0) return ret;
1149 }
1150 {
1151 int ret = slice_del(z);
1152 if (ret < 0) return ret;
1153 }
1154 {
1155 int ret = insert_s(z, z->c, z->c, 1, s_38);
1156 if (ret < 0) return ret;
1157 }
1158 {
1159 int ret = r_lengthen_V(z);
1160 if (ret <= 0) return ret;
1161 }
1162 break;
1163 case 9:
1164 {
1165 int ret = r_R1(z);
1166 if (ret <= 0) return ret;
1167 }
1168 {
1169 int ret = r_C(z);
1170 if (ret <= 0) return ret;
1171 }
1172 {
1173 int ret = slice_from_s(z, 1, s_39);
1174 if (ret < 0) return ret;
1175 }
1176 break;
1177 case 10:
1178 {
1179 int ret = r_R1(z);
1180 if (ret <= 0) return ret;
1181 }
1182 {
1183 int ret = r_C(z);
1184 if (ret <= 0) return ret;
1185 }
1186 {
1187 int ret = slice_from_s(z, 1, s_40);
1188 if (ret < 0) return ret;
1189 }
1190 break;
1191 }
1192 return 1;
1193}
1194
1195static int r_Step_4(struct SN_env * z) {
1196 int among_var;
1197 do {
1198 int v_1 = z->l - z->c;
1199 z->ket = z->c;
1200 if (z->c - 2 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((1315024 >> (z->p[z->c - 1] & 0x1f)) & 1)) goto lab0;
1201 among_var = find_among_b(z, a_4, 16, 0);
1202 if (!among_var) goto lab0;
1203 z->bra = z->c;
1204 switch (among_var) {
1205 case 1:
1206 {
1207 int ret = r_R1(z);
1208 if (ret == 0) goto lab0;
1209 if (ret < 0) return ret;
1210 }
1211 {
1212 int ret = slice_from_s(z, 2, s_41);
1213 if (ret < 0) return ret;
1214 }
1215 break;
1216 case 2:
1217 {
1218 int ret = r_R1(z);
1219 if (ret == 0) goto lab0;
1220 if (ret < 0) return ret;
1221 }
1222 {
1223 int ret = slice_from_s(z, 3, s_42);
1224 if (ret < 0) return ret;
1225 }
1226 break;
1227 case 3:
1228 {
1229 int ret = r_R1(z);
1230 if (ret == 0) goto lab0;
1231 if (ret < 0) return ret;
1232 }
1233 {
1234 int ret = slice_del(z);
1235 if (ret < 0) return ret;
1236 }
1237 break;
1238 case 4:
1239 {
1240 int ret = r_R1(z);
1241 if (ret == 0) goto lab0;
1242 if (ret < 0) return ret;
1243 }
1244 {
1245 int ret = r_V(z);
1246 if (ret == 0) goto lab0;
1247 if (ret < 0) return ret;
1248 }
1249 {
1250 int ret = slice_from_s(z, 1, s_43);
1251 if (ret < 0) return ret;
1252 }
1253 break;
1254 case 5:
1255 {
1256 int ret = r_R1(z);
1257 if (ret == 0) goto lab0;
1258 if (ret < 0) return ret;
1259 }
1260 {
1261 int ret = r_V(z);
1262 if (ret == 0) goto lab0;
1263 if (ret < 0) return ret;
1264 }
1265 {
1266 int ret = slice_from_s(z, 1, s_44);
1267 if (ret < 0) return ret;
1268 }
1269 break;
1270 case 6:
1271 {
1272 int ret = r_R1(z);
1273 if (ret == 0) goto lab0;
1274 if (ret < 0) return ret;
1275 }
1276 {
1277 int ret = r_V(z);
1278 if (ret == 0) goto lab0;
1279 if (ret < 0) return ret;
1280 }
1281 {
1282 int ret = slice_from_s(z, 1, s_45);
1283 if (ret < 0) return ret;
1284 }
1285 break;
1286 case 7:
1287 {
1288 int ret = r_R1(z);
1289 if (ret == 0) goto lab0;
1290 if (ret < 0) return ret;
1291 }
1292 {
1293 int ret = slice_from_s(z, 4, s_46);
1294 if (ret < 0) return ret;
1295 }
1296 break;
1297 case 8:
1298 {
1299 int ret = r_R1(z);
1300 if (ret == 0) goto lab0;
1301 if (ret < 0) return ret;
1302 }
1303 {
1304 int ret = slice_from_s(z, 4, s_47);
1305 if (ret < 0) return ret;
1306 }
1307 break;
1308 case 9:
1309 {
1310 int ret = r_R1(z);
1311 if (ret == 0) goto lab0;
1312 if (ret < 0) return ret;
1313 }
1314 {
1315 int ret = r_C(z);
1316 if (ret == 0) goto lab0;
1317 if (ret < 0) return ret;
1318 }
1319 {
1320 int ret = slice_del(z);
1321 if (ret < 0) return ret;
1322 }
1323 {
1324 int ret = r_lengthen_V(z);
1325 if (ret < 0) return ret;
1326 }
1327 break;
1328 }
1329 break;
1330 lab0:
1331 z->c = z->l - v_1;
1332 z->ket = z->c;
1333 if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((1310848 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
1334 if (!find_among_b(z, a_5, 3, 0)) return 0;
1335 z->bra = z->c;
1336 {
1337 int ret = r_R1(z);
1338 if (ret <= 0) return ret;
1339 }
1340 {
1341 int v_2 = z->l - z->c;
1342 if (!(eq_s_b(z, 3, s_48))) goto lab1;
1343 if (z->c > z->lb) goto lab1;
1344 return 0;
1345 lab1:
1346 z->c = z->l - v_2;
1347 }
1348 {
1349 int ret = r_C(z);
1350 if (ret <= 0) return ret;
1351 }
1352 {
1353 int ret = slice_del(z);
1354 if (ret < 0) return ret;
1355 }
1356 {
1357 int ret = r_lengthen_V(z);
1358 if (ret <= 0) return ret;
1359 }
1360 } while (0);
1361 return 1;
1362}
1363
1364static int r_Step_7(struct SN_env * z) {
1365 int among_var;
1366 z->ket = z->c;
1367 if (z->c - 1 <= z->lb || z->p[z->c - 1] != 116) return 0;
1368 among_var = find_among_b(z, a_6, 3, 0);
1369 if (!among_var) return 0;
1370 z->bra = z->c;
1371 switch (among_var) {
1372 case 1:
1373 {
1374 int ret = slice_from_s(z, 1, s_49);
1375 if (ret < 0) return ret;
1376 }
1377 break;
1378 case 2:
1379 {
1380 int ret = slice_from_s(z, 1, s_50);
1381 if (ret < 0) return ret;
1382 }
1383 break;
1384 case 3:
1385 {
1386 int ret = slice_from_s(z, 1, s_51);
1387 if (ret < 0) return ret;
1388 }
1389 break;
1390 }
1391 return 1;
1392}
1393
1394static int r_Step_6(struct SN_env * z) {
1395 int among_var;
1396 z->ket = z->c;
1397 if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((98532828 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
1398 among_var = find_among_b(z, a_7, 22, 0);
1399 if (!among_var) return 0;
1400 z->bra = z->c;
1401 switch (among_var) {
1402 case 1:
1403 {
1404 int ret = slice_from_s(z, 1, s_52);
1405 if (ret < 0) return ret;
1406 }
1407 break;
1408 case 2:
1409 {
1410 int ret = slice_from_s(z, 1, s_53);
1411 if (ret < 0) return ret;
1412 }
1413 break;
1414 case 3:
1415 {
1416 int ret = slice_from_s(z, 1, s_54);
1417 if (ret < 0) return ret;
1418 }
1419 break;
1420 case 4:
1421 {
1422 int ret = slice_from_s(z, 1, s_55);
1423 if (ret < 0) return ret;
1424 }
1425 break;
1426 case 5:
1427 {
1428 int ret = slice_from_s(z, 1, s_56);
1429 if (ret < 0) return ret;
1430 }
1431 break;
1432 case 6:
1433 {
1434 int ret = slice_from_s(z, 1, s_57);
1435 if (ret < 0) return ret;
1436 }
1437 break;
1438 case 7:
1439 {
1440 int ret = slice_from_s(z, 1, s_58);
1441 if (ret < 0) return ret;
1442 }
1443 break;
1444 case 8:
1445 {
1446 int ret = slice_from_s(z, 1, s_59);
1447 if (ret < 0) return ret;
1448 }
1449 break;
1450 case 9:
1451 {
1452 int ret = slice_from_s(z, 1, s_60);
1453 if (ret < 0) return ret;
1454 }
1455 break;
1456 case 10:
1457 {
1458 int ret = slice_from_s(z, 1, s_61);
1459 if (ret < 0) return ret;
1460 }
1461 break;
1462 case 11:
1463 {
1464 int v_1 = z->l - z->c;
1465 if (z->c <= z->lb || z->p[z->c - 1] != 'i') goto lab0;
1466 z->c--;
1467 if (z->c > z->lb) goto lab0;
1468 return 0;
1469 lab0:
1470 z->c = z->l - v_1;
1471 }
1472 {
1473 int ret = slice_from_s(z, 1, s_62);
1474 if (ret < 0) return ret;
1475 }
1476 break;
1477 case 12:
1478 {
1479 int ret = slice_from_s(z, 1, s_63);
1480 if (ret < 0) return ret;
1481 }
1482 break;
1483 case 13:
1484 {
1485 int ret = slice_from_s(z, 1, s_64);
1486 if (ret < 0) return ret;
1487 }
1488 break;
1489 case 14:
1490 {
1491 int ret = slice_from_s(z, 1, s_65);
1492 if (ret < 0) return ret;
1493 }
1494 break;
1495 case 15:
1496 {
1497 int ret = slice_from_s(z, 1, s_66);
1498 if (ret < 0) return ret;
1499 }
1500 break;
1501 case 16:
1502 {
1503 int ret = slice_from_s(z, 1, s_67);
1504 if (ret < 0) return ret;
1505 }
1506 break;
1507 case 17:
1508 {
1509 int ret = slice_from_s(z, 1, s_68);
1510 if (ret < 0) return ret;
1511 }
1512 break;
1513 case 18:
1514 {
1515 int ret = slice_from_s(z, 1, s_69);
1516 if (ret < 0) return ret;
1517 }
1518 break;
1519 case 19:
1520 {
1521 int ret = slice_from_s(z, 1, s_70);
1522 if (ret < 0) return ret;
1523 }
1524 break;
1525 case 20:
1526 {
1527 int ret = slice_from_s(z, 1, s_71);
1528 if (ret < 0) return ret;
1529 }
1530 break;
1531 }
1532 return 1;
1533}
1534
1535static int r_Step_1c(struct SN_env * z) {
1536 int among_var;
1537 z->ket = z->c;
1538 if (z->c <= z->lb || (z->p[z->c - 1] != 100 && z->p[z->c - 1] != 116)) return 0;
1539 among_var = find_among_b(z, a_8, 2, 0);
1540 if (!among_var) return 0;
1541 z->bra = z->c;
1542 {
1543 int ret = r_R1(z);
1544 if (ret <= 0) return ret;
1545 }
1546 {
1547 int ret = r_C(z);
1548 if (ret <= 0) return ret;
1549 }
1550 switch (among_var) {
1551 case 1:
1552 {
1553 int v_1 = z->l - z->c;
1554 if (z->c <= z->lb || z->p[z->c - 1] != 'n') goto lab0;
1555 z->c--;
1556 {
1557 int ret = r_R1(z);
1558 if (ret == 0) goto lab0;
1559 if (ret < 0) return ret;
1560 }
1561 return 0;
1562 lab0:
1563 z->c = z->l - v_1;
1564 }
1565 do {
1566 int v_2 = z->l - z->c;
1567 if (!(eq_s_b(z, 2, s_72))) goto lab1;
1568 if (z->c > z->lb) goto lab1;
1569 {
1570 int ret = slice_from_s(z, 1, s_73);
1571 if (ret < 0) return ret;
1572 }
1573 break;
1574 lab1:
1575 z->c = z->l - v_2;
1576 {
1577 int ret = slice_del(z);
1578 if (ret < 0) return ret;
1579 }
1580 } while (0);
1581 break;
1582 case 2:
1583 {
1584 int v_3 = z->l - z->c;
1585 if (z->c <= z->lb || z->p[z->c - 1] != 'h') goto lab2;
1586 z->c--;
1587 {
1588 int ret = r_R1(z);
1589 if (ret == 0) goto lab2;
1590 if (ret < 0) return ret;
1591 }
1592 return 0;
1593 lab2:
1594 z->c = z->l - v_3;
1595 }
1596 {
1597 int v_4 = z->l - z->c;
1598 if (!(eq_s_b(z, 2, s_74))) goto lab3;
1599 if (z->c > z->lb) goto lab3;
1600 return 0;
1601 lab3:
1602 z->c = z->l - v_4;
1603 }
1604 {
1605 int ret = slice_del(z);
1606 if (ret < 0) return ret;
1607 }
1608 break;
1609 }
1610 return 1;
1611}
1612
1613static int r_Lose_prefix(struct SN_env * z) {
1614 int among_var;
1615 z->bra = z->c;
1616 if (!(eq_s(z, 2, s_75))) return 0;
1617 z->ket = z->c;
1618 {
1619 int v_1 = z->c;
1620 if (z->c + 3 > z->l) return 0;
1621 z->c += 3;
1622 z->c = v_1;
1623 }
1624 {
1625 int v_2 = z->c;
1626 while (1) {
1627 int v_3 = z->c;
1628 do {
1629 int v_4 = z->c;
1630 if (!(eq_s(z, 2, s_76))) goto lab1;
1631 break;
1632 lab1:
1633 z->c = v_4;
1634 if (in_grouping(z, g_v, 97, 252, 0)) goto lab0;
1635 } while (0);
1636 break;
1637 lab0:
1638 z->c = v_3;
1639 if (z->c >= z->l) return 0;
1640 z->c++;
1641 }
1642 while (1) {
1643 int v_5 = z->c;
1644 do {
1645 int v_6 = z->c;
1646 if (!(eq_s(z, 2, s_77))) goto lab3;
1647 break;
1648 lab3:
1649 z->c = v_6;
1650 if (in_grouping(z, g_v, 97, 252, 0)) goto lab2;
1651 } while (0);
1652 continue;
1653 lab2:
1654 z->c = v_5;
1655 break;
1656 }
1657 if (z->c < z->l) goto lab4;
1658 return 0;
1659 lab4:
1660 z->c = v_2;
1661 }
1662 if (z->c + 2 >= z->l || z->p[z->c + 2] >> 5 != 3 || !((1314818 >> (z->p[z->c + 2] & 0x1f)) & 1)) among_var = -1; else
1663 among_var = find_among(z, a_9, 6, 0);
1664 switch (among_var) {
1665 case 1:
1666 return 0;
1667 break;
1668 }
1669 ((SN_local *)z)->b_GE_removed = 1;
1670 {
1671 int ret = slice_del(z);
1672 if (ret < 0) return ret;
1673 }
1674 {
1675 int v_7 = z->c;
1676 z->bra = z->c;
1677 if (z->c >= z->l || (z->p[z->c + 0] != 235 && z->p[z->c + 0] != 239)) goto lab5;
1678 among_var = find_among(z, a_10, 2, 0);
1679 if (!among_var) goto lab5;
1680 z->ket = z->c;
1681 switch (among_var) {
1682 case 1:
1683 {
1684 int ret = slice_from_s(z, 1, s_78);
1685 if (ret < 0) return ret;
1686 }
1687 break;
1688 case 2:
1689 {
1690 int ret = slice_from_s(z, 1, s_79);
1691 if (ret < 0) return ret;
1692 }
1693 break;
1694 }
1695 lab5:
1696 z->c = v_7;
1697 }
1698 return 1;
1699}
1700
1701static int r_Lose_infix(struct SN_env * z) {
1702 int among_var;
1703 if (z->c >= z->l) return 0;
1704 z->c++;
1705 while (1) {
1706 z->bra = z->c;
1707 if (!(eq_s(z, 2, s_80))) goto lab0;
1708 z->ket = z->c;
1709 break;
1710 lab0:
1711 if (z->c >= z->l) return 0;
1712 z->c++;
1713 }
1714 {
1715 int v_1 = z->c;
1716 if (z->c + 3 > z->l) return 0;
1717 z->c += 3;
1718 z->c = v_1;
1719 }
1720 {
1721 int v_2 = z->c;
1722 while (1) {
1723 int v_3 = z->c;
1724 do {
1725 int v_4 = z->c;
1726 if (!(eq_s(z, 2, s_81))) goto lab2;
1727 break;
1728 lab2:
1729 z->c = v_4;
1730 if (in_grouping(z, g_v, 97, 252, 0)) goto lab1;
1731 } while (0);
1732 break;
1733 lab1:
1734 z->c = v_3;
1735 if (z->c >= z->l) return 0;
1736 z->c++;
1737 }
1738 while (1) {
1739 int v_5 = z->c;
1740 do {
1741 int v_6 = z->c;
1742 if (!(eq_s(z, 2, s_82))) goto lab4;
1743 break;
1744 lab4:
1745 z->c = v_6;
1746 if (in_grouping(z, g_v, 97, 252, 0)) goto lab3;
1747 } while (0);
1748 continue;
1749 lab3:
1750 z->c = v_5;
1751 break;
1752 }
1753 if (z->c < z->l) goto lab5;
1754 return 0;
1755 lab5:
1756 z->c = v_2;
1757 }
1758 ((SN_local *)z)->b_GE_removed = 1;
1759 {
1760 int ret = slice_del(z);
1761 if (ret < 0) return ret;
1762 }
1763 {
1764 int v_7 = z->c;
1765 z->bra = z->c;
1766 if (z->c >= z->l || (z->p[z->c + 0] != 235 && z->p[z->c + 0] != 239)) goto lab6;
1767 among_var = find_among(z, a_11, 2, 0);
1768 if (!among_var) goto lab6;
1769 z->ket = z->c;
1770 switch (among_var) {
1771 case 1:
1772 {
1773 int ret = slice_from_s(z, 1, s_83);
1774 if (ret < 0) return ret;
1775 }
1776 break;
1777 case 2:
1778 {
1779 int ret = slice_from_s(z, 1, s_84);
1780 if (ret < 0) return ret;
1781 }
1782 break;
1783 }
1784 lab6:
1785 z->c = v_7;
1786 }
1787 return 1;
1788}
1789
1790static int r_measure(struct SN_env * z) {
1791 ((SN_local *)z)->i_p1 = z->l;
1792 ((SN_local *)z)->i_p2 = z->l;
1793 {
1794 int v_1 = z->c;
1795 while (1) {
1796 if (out_grouping(z, g_v, 97, 252, 0)) goto lab1;
1797 continue;
1798 lab1:
1799 break;
1800 }
1801 {
1802 int v_2 = 1;
1803 while (1) {
1804 int v_3 = z->c;
1805 do {
1806 int v_4 = z->c;
1807 if (!(eq_s(z, 2, s_85))) goto lab3;
1808 break;
1809 lab3:
1810 z->c = v_4;
1811 if (in_grouping(z, g_v, 97, 252, 0)) goto lab2;
1812 } while (0);
1813 v_2--;
1814 continue;
1815 lab2:
1816 z->c = v_3;
1817 break;
1818 }
1819 if (v_2 > 0) goto lab0;
1820 }
1821 if (out_grouping(z, g_v, 97, 252, 0)) goto lab0;
1822 ((SN_local *)z)->i_p1 = z->c;
1823 while (1) {
1824 if (out_grouping(z, g_v, 97, 252, 0)) goto lab4;
1825 continue;
1826 lab4:
1827 break;
1828 }
1829 {
1830 int v_5 = 1;
1831 while (1) {
1832 int v_6 = z->c;
1833 do {
1834 int v_7 = z->c;
1835 if (!(eq_s(z, 2, s_86))) goto lab6;
1836 break;
1837 lab6:
1838 z->c = v_7;
1839 if (in_grouping(z, g_v, 97, 252, 0)) goto lab5;
1840 } while (0);
1841 v_5--;
1842 continue;
1843 lab5:
1844 z->c = v_6;
1845 break;
1846 }
1847 if (v_5 > 0) goto lab0;
1848 }
1849 if (out_grouping(z, g_v, 97, 252, 0)) goto lab0;
1850 ((SN_local *)z)->i_p2 = z->c;
1851 lab0:
1852 z->c = v_1;
1853 }
1854 return 1;
1855}
1856
1857extern int dutch_ISO_8859_1_stem(struct SN_env * z) {
1858 int b_stemmed;
1859 b_stemmed = 0;
1860 {
1861 int ret = r_measure(z);
1862 if (ret <= 0) return ret;
1863 }
1864 z->lb = z->c; z->c = z->l;
1865 {
1866 int v_1 = z->l - z->c;
1867 {
1868 int ret = r_Step_1(z);
1869 if (ret == 0) goto lab0;
1870 if (ret < 0) return ret;
1871 }
1872 b_stemmed = 1;
1873 lab0:
1874 z->c = z->l - v_1;
1875 }
1876 {
1877 int v_2 = z->l - z->c;
1878 {
1879 int ret = r_Step_2(z);
1880 if (ret == 0) goto lab1;
1881 if (ret < 0) return ret;
1882 }
1883 b_stemmed = 1;
1884 lab1:
1885 z->c = z->l - v_2;
1886 }
1887 {
1888 int v_3 = z->l - z->c;
1889 {
1890 int ret = r_Step_3(z);
1891 if (ret == 0) goto lab2;
1892 if (ret < 0) return ret;
1893 }
1894 b_stemmed = 1;
1895 lab2:
1896 z->c = z->l - v_3;
1897 }
1898 {
1899 int v_4 = z->l - z->c;
1900 {
1901 int ret = r_Step_4(z);
1902 if (ret == 0) goto lab3;
1903 if (ret < 0) return ret;
1904 }
1905 b_stemmed = 1;
1906 lab3:
1907 z->c = z->l - v_4;
1908 }
1909 z->c = z->lb;
1910 ((SN_local *)z)->b_GE_removed = 0;
1911 {
1912 int v_5 = z->c;
1913 {
1914 int v_6 = z->c;
1915 {
1916 int ret = r_Lose_prefix(z);
1917 if (ret == 0) goto lab4;
1918 if (ret < 0) return ret;
1919 }
1920 z->c = v_6;
1921 {
1922 int ret = r_measure(z);
1923 if (ret < 0) return ret;
1924 }
1925 }
1926 lab4:
1927 z->c = v_5;
1928 }
1929 z->lb = z->c; z->c = z->l;
1930 {
1931 int v_7 = z->l - z->c;
1932 if (!((SN_local *)z)->b_GE_removed) goto lab5;
1933 b_stemmed = 1;
1934 {
1935 int ret = r_Step_1c(z);
1936 if (ret == 0) goto lab5;
1937 if (ret < 0) return ret;
1938 }
1939 lab5:
1940 z->c = z->l - v_7;
1941 }
1942 z->c = z->lb;
1943 ((SN_local *)z)->b_GE_removed = 0;
1944 {
1945 int v_8 = z->c;
1946 {
1947 int v_9 = z->c;
1948 {
1949 int ret = r_Lose_infix(z);
1950 if (ret == 0) goto lab6;
1951 if (ret < 0) return ret;
1952 }
1953 z->c = v_9;
1954 {
1955 int ret = r_measure(z);
1956 if (ret < 0) return ret;
1957 }
1958 }
1959 lab6:
1960 z->c = v_8;
1961 }
1962 z->lb = z->c; z->c = z->l;
1963 {
1964 int v_10 = z->l - z->c;
1965 if (!((SN_local *)z)->b_GE_removed) goto lab7;
1966 b_stemmed = 1;
1967 {
1968 int ret = r_Step_1c(z);
1969 if (ret == 0) goto lab7;
1970 if (ret < 0) return ret;
1971 }
1972 lab7:
1973 z->c = z->l - v_10;
1974 }
1975 z->c = z->lb;
1976 z->lb = z->c; z->c = z->l;
1977 {
1978 int v_11 = z->l - z->c;
1979 {
1980 int ret = r_Step_7(z);
1981 if (ret == 0) goto lab8;
1982 if (ret < 0) return ret;
1983 }
1984 b_stemmed = 1;
1985 lab8:
1986 z->c = z->l - v_11;
1987 }
1988 {
1989 int v_12 = z->l - z->c;
1990 if (!b_stemmed) goto lab9;
1991 {
1992 int ret = r_Step_6(z);
1993 if (ret == 0) goto lab9;
1994 if (ret < 0) return ret;
1995 }
1996 lab9:
1997 z->c = z->l - v_12;
1998 }
1999 z->c = z->lb;
2000 return 1;
2001}
2002
2004 struct SN_env * z = SN_new_env(sizeof(SN_local));
2005 if (z) {
2006 ((SN_local *)z)->b_GE_removed = 0;
2007 ((SN_local *)z)->i_p2 = 0;
2008 ((SN_local *)z)->i_p1 = 0;
2009 ((SN_local *)z)->s_ch = NULL;
2010
2011 if ((((SN_local *)z)->s_ch = create_s()) == NULL) {
2013 return NULL;
2014 }
2015 }
2016 return z;
2017}
2018
2019extern void dutch_ISO_8859_1_close_env(struct SN_env * z) {
2020 if (z) {
2021 lose_s(((SN_local *)z)->s_ch);
2022 }
2023 SN_delete_env(z);
2024}
2025
void SN_delete_env(struct SN_env *z)
Definition: api.c:18
struct SN_env * SN_new_env(int alloc_size)
Definition: api.c:5
unsigned char symbol
Definition: api.h:4
static const symbol s_7_7[2]
static const symbol s_3_8[3]
static const symbol s_0_8[1]
static const symbol s_4_4[6]
static const symbol s_25[]
static const symbol s_2[]
static const struct among a_1[8]
static const symbol s_60[]
static const symbol s_55[]
static const symbol s_7_3[2]
static const symbol s_7_11[2]
static const symbol s_10_0[1]
static const struct among a_6[3]
static const symbol s_52[]
static const symbol s_72[]
static const symbol s_4_7[4]
static const symbol s_2_5[2]
static const symbol s_4[]
static const symbol s_81[]
static const symbol s_48[]
static const symbol s_3_2[3]
static const symbol s_8_1[1]
static const symbol s_50[]
static const symbol s_61[]
static const symbol s_1_6[3]
static const symbol s_42[]
static const symbol s_65[]
static const symbol s_1_5[3]
static const symbol s_4_6[4]
static const symbol s_30[]
static const symbol s_2_9[2]
static const symbol s_38[]
static const symbol s_10_1[1]
static const symbol s_0_15[1]
static int r_Step_3(struct SN_env *z)
static const symbol s_7_16[1]
static const symbol s_68[]
static int r_VX(struct SN_env *z)
static const symbol s_75[]
static const symbol s_0_0[1]
static const symbol s_9_4[4]
static const symbol s_4_13[6]
static const symbol s_5_0[2]
static const symbol s_4_15[6]
static const symbol s_0_2[1]
static const symbol s_4_2[4]
static const symbol s_29[]
static int r_Lose_infix(struct SN_env *z)
static const struct among a_9[6]
static const symbol s_53[]
static const symbol s_82[]
static const symbol s_0_14[1]
static const symbol s_0_17[1]
static const symbol s_7_8[2]
static const symbol s_2_0[2]
static const symbol s_7_9[2]
static const symbol s_27[]
static const symbol s_1_3[2]
static const symbol s_0_19[1]
static const symbol s_4_9[6]
static const symbol s_3_0[4]
static const symbol s_7_5[2]
static const symbol s_51[]
static const symbol s_6[]
static const symbol s_0_6[1]
static const symbol s_21[]
static const symbol s_76[]
static const symbol s_3[]
static int r_Lose_prefix(struct SN_env *z)
static const symbol s_3_12[3]
static const symbol s_7_6[2]
static const struct among a_4[16]
static const symbol s_7_20[1]
static const symbol s_37[]
static const symbol s_7_12[2]
static const symbol s_86[]
static const symbol s_3_4[4]
static const symbol s_7_0[2]
static const symbol s_49[]
static const symbol s_3_9[4]
static int r_R2(struct SN_env *z)
static const symbol s_7[]
static const symbol s_59[]
static const symbol s_32[]
static const symbol s_47[]
static const symbol s_13[]
static const symbol s_1_7[2]
static const symbol s_2_4[5]
static int r_lengthen_V(struct SN_env *z)
static int r_Step_1(struct SN_env *z)
static const symbol s_84[]
static const symbol s_3_1[3]
static const symbol s_7_13[2]
static const symbol s_1_1[2]
static const symbol s_3_10[4]
static const symbol s_83[]
static const symbol s_20[]
static const symbol s_0_4[1]
static const struct among a_11[2]
static const symbol s_0_9[1]
static const symbol s_3_6[4]
static const symbol s_9_3[3]
static const symbol s_35[]
static const struct among a_10[2]
void dutch_ISO_8859_1_close_env(struct SN_env *z)
static const symbol s_70[]
static const symbol s_7_14[2]
static const symbol s_19[]
static const symbol s_23[]
static const symbol s_73[]
static const symbol s_0_16[1]
static const symbol s_0_11[2]
static const unsigned char g_v_WX[]
static const struct among a_0[21]
static const symbol s_71[]
static const symbol s_58[]
static const symbol s_3_11[5]
static const symbol s_24[]
static const symbol s_7_19[2]
static const symbol s_11_0[1]
static const symbol s_7_1[2]
static int r_Step_1c(struct SN_env *z)
static const symbol s_3_3[4]
static const symbol s_63[]
static const symbol s_6_2[2]
static const symbol s_80[]
static const symbol s_69[]
static const symbol s_0_10[1]
static const symbol s_7_21[2]
static const symbol s_9_2[3]
static int r_R1(struct SN_env *z)
static const symbol s_1_2[1]
static const symbol s_4_3[6]
static const symbol s_16[]
static const symbol s_14[]
static const symbol s_3_5[3]
static const struct among a_7[22]
static const symbol s_22[]
static const symbol s_4_14[8]
static const symbol s_0_18[1]
static const struct among a_5[3]
static const symbol s_4_12[4]
static const symbol s_7_2[2]
static const symbol s_45[]
static const symbol s_2_3[2]
static const symbol s_0_7[1]
static const symbol s_2_7[2]
static const symbol s_10[]
static const symbol s_5_2[4]
static const symbol s_0_13[1]
static const symbol s_7_15[2]
static const symbol s_1[]
static const symbol s_0_5[1]
static const symbol s_7_4[2]
static const symbol s_66[]
static const symbol s_2_10[4]
static const symbol s_4_5[4]
static const symbol s_39[]
static const struct among a_2[11]
static int r_measure(struct SN_env *z)
static const symbol s_77[]
static const symbol s_1_4[2]
static const symbol s_2_6[3]
static int r_V(struct SN_env *z)
static const symbol s_31[]
static const symbol s_9_5[4]
static const symbol s_74[]
static const unsigned char g_E[]
static const symbol s_11[]
static const symbol s_0_20[1]
static const symbol s_12[]
static const symbol s_6_1[2]
static const symbol s_36[]
static const symbol s_67[]
static const symbol s_1_0[3]
static const symbol s_0_3[1]
int dutch_ISO_8859_1_stem(struct SN_env *z)
static const symbol s_0_1[1]
static const symbol s_79[]
static const symbol s_33[]
static const symbol s_57[]
static const symbol s_41[]
static int r_Step_4(struct SN_env *z)
static int r_Step_2(struct SN_env *z)
static const unsigned char g_AEIOU[]
static const symbol s_9_1[3]
static const symbol s_4_8[4]
static const symbol s_0_12[2]
static const symbol s_85[]
static const symbol s_64[]
static const symbol s_3_7[4]
static const symbol s_18[]
static const symbol s_17[]
static int r_C(struct SN_env *z)
static const symbol s_3_13[3]
static const symbol s_4_11[6]
static const symbol s_40[]
static const symbol s_44[]
static const symbol s_54[]
static const symbol s_2_8[2]
static const symbol s_11_1[1]
static const symbol s_43[]
static const symbol s_4_10[8]
static const symbol s_7_18[2]
static const symbol s_28[]
static const symbol s_46[]
static const symbol s_2_1[2]
static int r_Step_6(struct SN_env *z)
static const symbol s_62[]
static const unsigned char g_v[]
static const symbol s_7_10[2]
static const symbol s_56[]
static const symbol s_78[]
static const symbol s_6_0[2]
struct SN_env * dutch_ISO_8859_1_create_env(void)
static const symbol s_8[]
static const symbol s_9[]
static const struct among a_3[14]
static const symbol s_4_1[5]
static int r_Step_7(struct SN_env *z)
static const symbol s_5[]
static const symbol s_8_0[1]
static const symbol s_15[]
static const symbol s_26[]
static const symbol s_4_0[3]
static const symbol s_2_2[5]
static const symbol s_5_1[4]
static const symbol s_7_17[2]
static const symbol s_0[]
static const unsigned char g_AIOU[]
static const struct among a_8[2]
static const symbol s_34[]
Definition: api.h:15
int lb
Definition: api.h:17
symbol * p
Definition: api.h:16
int ket
Definition: api.h:17
int c
Definition: api.h:17
int bra
Definition: api.h:17
int l
Definition: api.h:17
unsigned char b_GE_removed
struct SN_env z
SNOWBALL_ERR insert_s(struct SN_env *z, int bra, int ket, int s_size, const symbol *s)
Definition: utilities.c:464
SNOWBALL_ERR slice_from_s(struct SN_env *z, int s_size, const symbol *s)
Definition: utilities.c:432
int in_grouping(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition: utilities.c:183
SNOWBALL_ERR slice_to(struct SN_env *z, symbol **p)
Definition: utilities.c:478
int eq_s(struct SN_env *z, int s_size, const symbol *s)
Definition: utilities.c:231
SNOWBALL_ERR insert_v(struct SN_env *z, int bra, int ket, const symbol *p)
Definition: utilities.c:474
void lose_s(symbol *p)
Definition: utilities.c:31
int out_grouping_b(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition: utilities.c:219
int find_among_b(struct SN_env *z, const struct among *v, int v_size, int(*call_among_func)(struct SN_env *))
Definition: utilities.c:315
int eq_s_b(struct SN_env *z, int s_size, const symbol *s)
Definition: utilities.c:236
int out_grouping(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition: utilities.c:207
SNOWBALL_ERR slice_del(struct SN_env *z)
Definition: utilities.c:443
symbol * create_s(void)
Definition: utilities.c:20
int in_grouping_b(struct SN_env *z, const unsigned char *s, int min, int max, int repeat)
Definition: utilities.c:195
int find_among(struct SN_env *z, const struct among *v, int v_size, int(*call_among_func)(struct SN_env *))
Definition: utilities.c:249