Header And Logo

PostgreSQL
| The world's most advanced open source database.

stem_ISO_8859_1_hungarian.c

Go to the documentation of this file.
00001 
00002 /* This file was generated automatically by the Snowball to ANSI C compiler */
00003 
00004 #include "header.h"
00005 
00006 #ifdef __cplusplus
00007 extern "C" {
00008 #endif
00009 extern int hungarian_ISO_8859_1_stem(struct SN_env * z);
00010 #ifdef __cplusplus
00011 }
00012 #endif
00013 static int r_double(struct SN_env * z);
00014 static int r_undouble(struct SN_env * z);
00015 static int r_factive(struct SN_env * z);
00016 static int r_instrum(struct SN_env * z);
00017 static int r_plur_owner(struct SN_env * z);
00018 static int r_sing_owner(struct SN_env * z);
00019 static int r_owned(struct SN_env * z);
00020 static int r_plural(struct SN_env * z);
00021 static int r_case_other(struct SN_env * z);
00022 static int r_case_special(struct SN_env * z);
00023 static int r_case(struct SN_env * z);
00024 static int r_v_ending(struct SN_env * z);
00025 static int r_R1(struct SN_env * z);
00026 static int r_mark_regions(struct SN_env * z);
00027 #ifdef __cplusplus
00028 extern "C" {
00029 #endif
00030 
00031 
00032 extern struct SN_env * hungarian_ISO_8859_1_create_env(void);
00033 extern void hungarian_ISO_8859_1_close_env(struct SN_env * z);
00034 
00035 
00036 #ifdef __cplusplus
00037 }
00038 #endif
00039 static const symbol s_0_0[2] = { 'c', 's' };
00040 static const symbol s_0_1[3] = { 'd', 'z', 's' };
00041 static const symbol s_0_2[2] = { 'g', 'y' };
00042 static const symbol s_0_3[2] = { 'l', 'y' };
00043 static const symbol s_0_4[2] = { 'n', 'y' };
00044 static const symbol s_0_5[2] = { 's', 'z' };
00045 static const symbol s_0_6[2] = { 't', 'y' };
00046 static const symbol s_0_7[2] = { 'z', 's' };
00047 
00048 static const struct among a_0[8] =
00049 {
00050 /*  0 */ { 2, s_0_0, -1, -1, 0},
00051 /*  1 */ { 3, s_0_1, -1, -1, 0},
00052 /*  2 */ { 2, s_0_2, -1, -1, 0},
00053 /*  3 */ { 2, s_0_3, -1, -1, 0},
00054 /*  4 */ { 2, s_0_4, -1, -1, 0},
00055 /*  5 */ { 2, s_0_5, -1, -1, 0},
00056 /*  6 */ { 2, s_0_6, -1, -1, 0},
00057 /*  7 */ { 2, s_0_7, -1, -1, 0}
00058 };
00059 
00060 static const symbol s_1_0[1] = { 0xE1 };
00061 static const symbol s_1_1[1] = { 0xE9 };
00062 
00063 static const struct among a_1[2] =
00064 {
00065 /*  0 */ { 1, s_1_0, -1, 1, 0},
00066 /*  1 */ { 1, s_1_1, -1, 2, 0}
00067 };
00068 
00069 static const symbol s_2_0[2] = { 'b', 'b' };
00070 static const symbol s_2_1[2] = { 'c', 'c' };
00071 static const symbol s_2_2[2] = { 'd', 'd' };
00072 static const symbol s_2_3[2] = { 'f', 'f' };
00073 static const symbol s_2_4[2] = { 'g', 'g' };
00074 static const symbol s_2_5[2] = { 'j', 'j' };
00075 static const symbol s_2_6[2] = { 'k', 'k' };
00076 static const symbol s_2_7[2] = { 'l', 'l' };
00077 static const symbol s_2_8[2] = { 'm', 'm' };
00078 static const symbol s_2_9[2] = { 'n', 'n' };
00079 static const symbol s_2_10[2] = { 'p', 'p' };
00080 static const symbol s_2_11[2] = { 'r', 'r' };
00081 static const symbol s_2_12[3] = { 'c', 'c', 's' };
00082 static const symbol s_2_13[2] = { 's', 's' };
00083 static const symbol s_2_14[3] = { 'z', 'z', 's' };
00084 static const symbol s_2_15[2] = { 't', 't' };
00085 static const symbol s_2_16[2] = { 'v', 'v' };
00086 static const symbol s_2_17[3] = { 'g', 'g', 'y' };
00087 static const symbol s_2_18[3] = { 'l', 'l', 'y' };
00088 static const symbol s_2_19[3] = { 'n', 'n', 'y' };
00089 static const symbol s_2_20[3] = { 't', 't', 'y' };
00090 static const symbol s_2_21[3] = { 's', 's', 'z' };
00091 static const symbol s_2_22[2] = { 'z', 'z' };
00092 
00093 static const struct among a_2[23] =
00094 {
00095 /*  0 */ { 2, s_2_0, -1, -1, 0},
00096 /*  1 */ { 2, s_2_1, -1, -1, 0},
00097 /*  2 */ { 2, s_2_2, -1, -1, 0},
00098 /*  3 */ { 2, s_2_3, -1, -1, 0},
00099 /*  4 */ { 2, s_2_4, -1, -1, 0},
00100 /*  5 */ { 2, s_2_5, -1, -1, 0},
00101 /*  6 */ { 2, s_2_6, -1, -1, 0},
00102 /*  7 */ { 2, s_2_7, -1, -1, 0},
00103 /*  8 */ { 2, s_2_8, -1, -1, 0},
00104 /*  9 */ { 2, s_2_9, -1, -1, 0},
00105 /* 10 */ { 2, s_2_10, -1, -1, 0},
00106 /* 11 */ { 2, s_2_11, -1, -1, 0},
00107 /* 12 */ { 3, s_2_12, -1, -1, 0},
00108 /* 13 */ { 2, s_2_13, -1, -1, 0},
00109 /* 14 */ { 3, s_2_14, -1, -1, 0},
00110 /* 15 */ { 2, s_2_15, -1, -1, 0},
00111 /* 16 */ { 2, s_2_16, -1, -1, 0},
00112 /* 17 */ { 3, s_2_17, -1, -1, 0},
00113 /* 18 */ { 3, s_2_18, -1, -1, 0},
00114 /* 19 */ { 3, s_2_19, -1, -1, 0},
00115 /* 20 */ { 3, s_2_20, -1, -1, 0},
00116 /* 21 */ { 3, s_2_21, -1, -1, 0},
00117 /* 22 */ { 2, s_2_22, -1, -1, 0}
00118 };
00119 
00120 static const symbol s_3_0[2] = { 'a', 'l' };
00121 static const symbol s_3_1[2] = { 'e', 'l' };
00122 
00123 static const struct among a_3[2] =
00124 {
00125 /*  0 */ { 2, s_3_0, -1, 1, 0},
00126 /*  1 */ { 2, s_3_1, -1, 2, 0}
00127 };
00128 
00129 static const symbol s_4_0[2] = { 'b', 'a' };
00130 static const symbol s_4_1[2] = { 'r', 'a' };
00131 static const symbol s_4_2[2] = { 'b', 'e' };
00132 static const symbol s_4_3[2] = { 'r', 'e' };
00133 static const symbol s_4_4[2] = { 'i', 'g' };
00134 static const symbol s_4_5[3] = { 'n', 'a', 'k' };
00135 static const symbol s_4_6[3] = { 'n', 'e', 'k' };
00136 static const symbol s_4_7[3] = { 'v', 'a', 'l' };
00137 static const symbol s_4_8[3] = { 'v', 'e', 'l' };
00138 static const symbol s_4_9[2] = { 'u', 'l' };
00139 static const symbol s_4_10[3] = { 'n', 0xE1, 'l' };
00140 static const symbol s_4_11[3] = { 'n', 0xE9, 'l' };
00141 static const symbol s_4_12[3] = { 'b', 0xF3, 'l' };
00142 static const symbol s_4_13[3] = { 'r', 0xF3, 'l' };
00143 static const symbol s_4_14[3] = { 't', 0xF3, 'l' };
00144 static const symbol s_4_15[3] = { 'b', 0xF5, 'l' };
00145 static const symbol s_4_16[3] = { 'r', 0xF5, 'l' };
00146 static const symbol s_4_17[3] = { 't', 0xF5, 'l' };
00147 static const symbol s_4_18[2] = { 0xFC, 'l' };
00148 static const symbol s_4_19[1] = { 'n' };
00149 static const symbol s_4_20[2] = { 'a', 'n' };
00150 static const symbol s_4_21[3] = { 'b', 'a', 'n' };
00151 static const symbol s_4_22[2] = { 'e', 'n' };
00152 static const symbol s_4_23[3] = { 'b', 'e', 'n' };
00153 static const symbol s_4_24[6] = { 'k', 0xE9, 'p', 'p', 'e', 'n' };
00154 static const symbol s_4_25[2] = { 'o', 'n' };
00155 static const symbol s_4_26[2] = { 0xF6, 'n' };
00156 static const symbol s_4_27[4] = { 'k', 0xE9, 'p', 'p' };
00157 static const symbol s_4_28[3] = { 'k', 'o', 'r' };
00158 static const symbol s_4_29[1] = { 't' };
00159 static const symbol s_4_30[2] = { 'a', 't' };
00160 static const symbol s_4_31[2] = { 'e', 't' };
00161 static const symbol s_4_32[4] = { 'k', 0xE9, 'n', 't' };
00162 static const symbol s_4_33[6] = { 'a', 'n', 'k', 0xE9, 'n', 't' };
00163 static const symbol s_4_34[6] = { 'e', 'n', 'k', 0xE9, 'n', 't' };
00164 static const symbol s_4_35[6] = { 'o', 'n', 'k', 0xE9, 'n', 't' };
00165 static const symbol s_4_36[2] = { 'o', 't' };
00166 static const symbol s_4_37[3] = { 0xE9, 'r', 't' };
00167 static const symbol s_4_38[2] = { 0xF6, 't' };
00168 static const symbol s_4_39[3] = { 'h', 'e', 'z' };
00169 static const symbol s_4_40[3] = { 'h', 'o', 'z' };
00170 static const symbol s_4_41[3] = { 'h', 0xF6, 'z' };
00171 static const symbol s_4_42[2] = { 'v', 0xE1 };
00172 static const symbol s_4_43[2] = { 'v', 0xE9 };
00173 
00174 static const struct among a_4[44] =
00175 {
00176 /*  0 */ { 2, s_4_0, -1, -1, 0},
00177 /*  1 */ { 2, s_4_1, -1, -1, 0},
00178 /*  2 */ { 2, s_4_2, -1, -1, 0},
00179 /*  3 */ { 2, s_4_3, -1, -1, 0},
00180 /*  4 */ { 2, s_4_4, -1, -1, 0},
00181 /*  5 */ { 3, s_4_5, -1, -1, 0},
00182 /*  6 */ { 3, s_4_6, -1, -1, 0},
00183 /*  7 */ { 3, s_4_7, -1, -1, 0},
00184 /*  8 */ { 3, s_4_8, -1, -1, 0},
00185 /*  9 */ { 2, s_4_9, -1, -1, 0},
00186 /* 10 */ { 3, s_4_10, -1, -1, 0},
00187 /* 11 */ { 3, s_4_11, -1, -1, 0},
00188 /* 12 */ { 3, s_4_12, -1, -1, 0},
00189 /* 13 */ { 3, s_4_13, -1, -1, 0},
00190 /* 14 */ { 3, s_4_14, -1, -1, 0},
00191 /* 15 */ { 3, s_4_15, -1, -1, 0},
00192 /* 16 */ { 3, s_4_16, -1, -1, 0},
00193 /* 17 */ { 3, s_4_17, -1, -1, 0},
00194 /* 18 */ { 2, s_4_18, -1, -1, 0},
00195 /* 19 */ { 1, s_4_19, -1, -1, 0},
00196 /* 20 */ { 2, s_4_20, 19, -1, 0},
00197 /* 21 */ { 3, s_4_21, 20, -1, 0},
00198 /* 22 */ { 2, s_4_22, 19, -1, 0},
00199 /* 23 */ { 3, s_4_23, 22, -1, 0},
00200 /* 24 */ { 6, s_4_24, 22, -1, 0},
00201 /* 25 */ { 2, s_4_25, 19, -1, 0},
00202 /* 26 */ { 2, s_4_26, 19, -1, 0},
00203 /* 27 */ { 4, s_4_27, -1, -1, 0},
00204 /* 28 */ { 3, s_4_28, -1, -1, 0},
00205 /* 29 */ { 1, s_4_29, -1, -1, 0},
00206 /* 30 */ { 2, s_4_30, 29, -1, 0},
00207 /* 31 */ { 2, s_4_31, 29, -1, 0},
00208 /* 32 */ { 4, s_4_32, 29, -1, 0},
00209 /* 33 */ { 6, s_4_33, 32, -1, 0},
00210 /* 34 */ { 6, s_4_34, 32, -1, 0},
00211 /* 35 */ { 6, s_4_35, 32, -1, 0},
00212 /* 36 */ { 2, s_4_36, 29, -1, 0},
00213 /* 37 */ { 3, s_4_37, 29, -1, 0},
00214 /* 38 */ { 2, s_4_38, 29, -1, 0},
00215 /* 39 */ { 3, s_4_39, -1, -1, 0},
00216 /* 40 */ { 3, s_4_40, -1, -1, 0},
00217 /* 41 */ { 3, s_4_41, -1, -1, 0},
00218 /* 42 */ { 2, s_4_42, -1, -1, 0},
00219 /* 43 */ { 2, s_4_43, -1, -1, 0}
00220 };
00221 
00222 static const symbol s_5_0[2] = { 0xE1, 'n' };
00223 static const symbol s_5_1[2] = { 0xE9, 'n' };
00224 static const symbol s_5_2[6] = { 0xE1, 'n', 'k', 0xE9, 'n', 't' };
00225 
00226 static const struct among a_5[3] =
00227 {
00228 /*  0 */ { 2, s_5_0, -1, 2, 0},
00229 /*  1 */ { 2, s_5_1, -1, 1, 0},
00230 /*  2 */ { 6, s_5_2, -1, 3, 0}
00231 };
00232 
00233 static const symbol s_6_0[4] = { 's', 't', 'u', 'l' };
00234 static const symbol s_6_1[5] = { 'a', 's', 't', 'u', 'l' };
00235 static const symbol s_6_2[5] = { 0xE1, 's', 't', 'u', 'l' };
00236 static const symbol s_6_3[4] = { 's', 't', 0xFC, 'l' };
00237 static const symbol s_6_4[5] = { 'e', 's', 't', 0xFC, 'l' };
00238 static const symbol s_6_5[5] = { 0xE9, 's', 't', 0xFC, 'l' };
00239 
00240 static const struct among a_6[6] =
00241 {
00242 /*  0 */ { 4, s_6_0, -1, 2, 0},
00243 /*  1 */ { 5, s_6_1, 0, 1, 0},
00244 /*  2 */ { 5, s_6_2, 0, 3, 0},
00245 /*  3 */ { 4, s_6_3, -1, 2, 0},
00246 /*  4 */ { 5, s_6_4, 3, 1, 0},
00247 /*  5 */ { 5, s_6_5, 3, 4, 0}
00248 };
00249 
00250 static const symbol s_7_0[1] = { 0xE1 };
00251 static const symbol s_7_1[1] = { 0xE9 };
00252 
00253 static const struct among a_7[2] =
00254 {
00255 /*  0 */ { 1, s_7_0, -1, 1, 0},
00256 /*  1 */ { 1, s_7_1, -1, 2, 0}
00257 };
00258 
00259 static const symbol s_8_0[1] = { 'k' };
00260 static const symbol s_8_1[2] = { 'a', 'k' };
00261 static const symbol s_8_2[2] = { 'e', 'k' };
00262 static const symbol s_8_3[2] = { 'o', 'k' };
00263 static const symbol s_8_4[2] = { 0xE1, 'k' };
00264 static const symbol s_8_5[2] = { 0xE9, 'k' };
00265 static const symbol s_8_6[2] = { 0xF6, 'k' };
00266 
00267 static const struct among a_8[7] =
00268 {
00269 /*  0 */ { 1, s_8_0, -1, 7, 0},
00270 /*  1 */ { 2, s_8_1, 0, 4, 0},
00271 /*  2 */ { 2, s_8_2, 0, 6, 0},
00272 /*  3 */ { 2, s_8_3, 0, 5, 0},
00273 /*  4 */ { 2, s_8_4, 0, 1, 0},
00274 /*  5 */ { 2, s_8_5, 0, 2, 0},
00275 /*  6 */ { 2, s_8_6, 0, 3, 0}
00276 };
00277 
00278 static const symbol s_9_0[2] = { 0xE9, 'i' };
00279 static const symbol s_9_1[3] = { 0xE1, 0xE9, 'i' };
00280 static const symbol s_9_2[3] = { 0xE9, 0xE9, 'i' };
00281 static const symbol s_9_3[1] = { 0xE9 };
00282 static const symbol s_9_4[2] = { 'k', 0xE9 };
00283 static const symbol s_9_5[3] = { 'a', 'k', 0xE9 };
00284 static const symbol s_9_6[3] = { 'e', 'k', 0xE9 };
00285 static const symbol s_9_7[3] = { 'o', 'k', 0xE9 };
00286 static const symbol s_9_8[3] = { 0xE1, 'k', 0xE9 };
00287 static const symbol s_9_9[3] = { 0xE9, 'k', 0xE9 };
00288 static const symbol s_9_10[3] = { 0xF6, 'k', 0xE9 };
00289 static const symbol s_9_11[2] = { 0xE9, 0xE9 };
00290 
00291 static const struct among a_9[12] =
00292 {
00293 /*  0 */ { 2, s_9_0, -1, 7, 0},
00294 /*  1 */ { 3, s_9_1, 0, 6, 0},
00295 /*  2 */ { 3, s_9_2, 0, 5, 0},
00296 /*  3 */ { 1, s_9_3, -1, 9, 0},
00297 /*  4 */ { 2, s_9_4, 3, 4, 0},
00298 /*  5 */ { 3, s_9_5, 4, 1, 0},
00299 /*  6 */ { 3, s_9_6, 4, 1, 0},
00300 /*  7 */ { 3, s_9_7, 4, 1, 0},
00301 /*  8 */ { 3, s_9_8, 4, 3, 0},
00302 /*  9 */ { 3, s_9_9, 4, 2, 0},
00303 /* 10 */ { 3, s_9_10, 4, 1, 0},
00304 /* 11 */ { 2, s_9_11, 3, 8, 0}
00305 };
00306 
00307 static const symbol s_10_0[1] = { 'a' };
00308 static const symbol s_10_1[2] = { 'j', 'a' };
00309 static const symbol s_10_2[1] = { 'd' };
00310 static const symbol s_10_3[2] = { 'a', 'd' };
00311 static const symbol s_10_4[2] = { 'e', 'd' };
00312 static const symbol s_10_5[2] = { 'o', 'd' };
00313 static const symbol s_10_6[2] = { 0xE1, 'd' };
00314 static const symbol s_10_7[2] = { 0xE9, 'd' };
00315 static const symbol s_10_8[2] = { 0xF6, 'd' };
00316 static const symbol s_10_9[1] = { 'e' };
00317 static const symbol s_10_10[2] = { 'j', 'e' };
00318 static const symbol s_10_11[2] = { 'n', 'k' };
00319 static const symbol s_10_12[3] = { 'u', 'n', 'k' };
00320 static const symbol s_10_13[3] = { 0xE1, 'n', 'k' };
00321 static const symbol s_10_14[3] = { 0xE9, 'n', 'k' };
00322 static const symbol s_10_15[3] = { 0xFC, 'n', 'k' };
00323 static const symbol s_10_16[2] = { 'u', 'k' };
00324 static const symbol s_10_17[3] = { 'j', 'u', 'k' };
00325 static const symbol s_10_18[4] = { 0xE1, 'j', 'u', 'k' };
00326 static const symbol s_10_19[2] = { 0xFC, 'k' };
00327 static const symbol s_10_20[3] = { 'j', 0xFC, 'k' };
00328 static const symbol s_10_21[4] = { 0xE9, 'j', 0xFC, 'k' };
00329 static const symbol s_10_22[1] = { 'm' };
00330 static const symbol s_10_23[2] = { 'a', 'm' };
00331 static const symbol s_10_24[2] = { 'e', 'm' };
00332 static const symbol s_10_25[2] = { 'o', 'm' };
00333 static const symbol s_10_26[2] = { 0xE1, 'm' };
00334 static const symbol s_10_27[2] = { 0xE9, 'm' };
00335 static const symbol s_10_28[1] = { 'o' };
00336 static const symbol s_10_29[1] = { 0xE1 };
00337 static const symbol s_10_30[1] = { 0xE9 };
00338 
00339 static const struct among a_10[31] =
00340 {
00341 /*  0 */ { 1, s_10_0, -1, 18, 0},
00342 /*  1 */ { 2, s_10_1, 0, 17, 0},
00343 /*  2 */ { 1, s_10_2, -1, 16, 0},
00344 /*  3 */ { 2, s_10_3, 2, 13, 0},
00345 /*  4 */ { 2, s_10_4, 2, 13, 0},
00346 /*  5 */ { 2, s_10_5, 2, 13, 0},
00347 /*  6 */ { 2, s_10_6, 2, 14, 0},
00348 /*  7 */ { 2, s_10_7, 2, 15, 0},
00349 /*  8 */ { 2, s_10_8, 2, 13, 0},
00350 /*  9 */ { 1, s_10_9, -1, 18, 0},
00351 /* 10 */ { 2, s_10_10, 9, 17, 0},
00352 /* 11 */ { 2, s_10_11, -1, 4, 0},
00353 /* 12 */ { 3, s_10_12, 11, 1, 0},
00354 /* 13 */ { 3, s_10_13, 11, 2, 0},
00355 /* 14 */ { 3, s_10_14, 11, 3, 0},
00356 /* 15 */ { 3, s_10_15, 11, 1, 0},
00357 /* 16 */ { 2, s_10_16, -1, 8, 0},
00358 /* 17 */ { 3, s_10_17, 16, 7, 0},
00359 /* 18 */ { 4, s_10_18, 17, 5, 0},
00360 /* 19 */ { 2, s_10_19, -1, 8, 0},
00361 /* 20 */ { 3, s_10_20, 19, 7, 0},
00362 /* 21 */ { 4, s_10_21, 20, 6, 0},
00363 /* 22 */ { 1, s_10_22, -1, 12, 0},
00364 /* 23 */ { 2, s_10_23, 22, 9, 0},
00365 /* 24 */ { 2, s_10_24, 22, 9, 0},
00366 /* 25 */ { 2, s_10_25, 22, 9, 0},
00367 /* 26 */ { 2, s_10_26, 22, 10, 0},
00368 /* 27 */ { 2, s_10_27, 22, 11, 0},
00369 /* 28 */ { 1, s_10_28, -1, 18, 0},
00370 /* 29 */ { 1, s_10_29, -1, 19, 0},
00371 /* 30 */ { 1, s_10_30, -1, 20, 0}
00372 };
00373 
00374 static const symbol s_11_0[2] = { 'i', 'd' };
00375 static const symbol s_11_1[3] = { 'a', 'i', 'd' };
00376 static const symbol s_11_2[4] = { 'j', 'a', 'i', 'd' };
00377 static const symbol s_11_3[3] = { 'e', 'i', 'd' };
00378 static const symbol s_11_4[4] = { 'j', 'e', 'i', 'd' };
00379 static const symbol s_11_5[3] = { 0xE1, 'i', 'd' };
00380 static const symbol s_11_6[3] = { 0xE9, 'i', 'd' };
00381 static const symbol s_11_7[1] = { 'i' };
00382 static const symbol s_11_8[2] = { 'a', 'i' };
00383 static const symbol s_11_9[3] = { 'j', 'a', 'i' };
00384 static const symbol s_11_10[2] = { 'e', 'i' };
00385 static const symbol s_11_11[3] = { 'j', 'e', 'i' };
00386 static const symbol s_11_12[2] = { 0xE1, 'i' };
00387 static const symbol s_11_13[2] = { 0xE9, 'i' };
00388 static const symbol s_11_14[4] = { 'i', 't', 'e', 'k' };
00389 static const symbol s_11_15[5] = { 'e', 'i', 't', 'e', 'k' };
00390 static const symbol s_11_16[6] = { 'j', 'e', 'i', 't', 'e', 'k' };
00391 static const symbol s_11_17[5] = { 0xE9, 'i', 't', 'e', 'k' };
00392 static const symbol s_11_18[2] = { 'i', 'k' };
00393 static const symbol s_11_19[3] = { 'a', 'i', 'k' };
00394 static const symbol s_11_20[4] = { 'j', 'a', 'i', 'k' };
00395 static const symbol s_11_21[3] = { 'e', 'i', 'k' };
00396 static const symbol s_11_22[4] = { 'j', 'e', 'i', 'k' };
00397 static const symbol s_11_23[3] = { 0xE1, 'i', 'k' };
00398 static const symbol s_11_24[3] = { 0xE9, 'i', 'k' };
00399 static const symbol s_11_25[3] = { 'i', 'n', 'k' };
00400 static const symbol s_11_26[4] = { 'a', 'i', 'n', 'k' };
00401 static const symbol s_11_27[5] = { 'j', 'a', 'i', 'n', 'k' };
00402 static const symbol s_11_28[4] = { 'e', 'i', 'n', 'k' };
00403 static const symbol s_11_29[5] = { 'j', 'e', 'i', 'n', 'k' };
00404 static const symbol s_11_30[4] = { 0xE1, 'i', 'n', 'k' };
00405 static const symbol s_11_31[4] = { 0xE9, 'i', 'n', 'k' };
00406 static const symbol s_11_32[5] = { 'a', 'i', 't', 'o', 'k' };
00407 static const symbol s_11_33[6] = { 'j', 'a', 'i', 't', 'o', 'k' };
00408 static const symbol s_11_34[5] = { 0xE1, 'i', 't', 'o', 'k' };
00409 static const symbol s_11_35[2] = { 'i', 'm' };
00410 static const symbol s_11_36[3] = { 'a', 'i', 'm' };
00411 static const symbol s_11_37[4] = { 'j', 'a', 'i', 'm' };
00412 static const symbol s_11_38[3] = { 'e', 'i', 'm' };
00413 static const symbol s_11_39[4] = { 'j', 'e', 'i', 'm' };
00414 static const symbol s_11_40[3] = { 0xE1, 'i', 'm' };
00415 static const symbol s_11_41[3] = { 0xE9, 'i', 'm' };
00416 
00417 static const struct among a_11[42] =
00418 {
00419 /*  0 */ { 2, s_11_0, -1, 10, 0},
00420 /*  1 */ { 3, s_11_1, 0, 9, 0},
00421 /*  2 */ { 4, s_11_2, 1, 6, 0},
00422 /*  3 */ { 3, s_11_3, 0, 9, 0},
00423 /*  4 */ { 4, s_11_4, 3, 6, 0},
00424 /*  5 */ { 3, s_11_5, 0, 7, 0},
00425 /*  6 */ { 3, s_11_6, 0, 8, 0},
00426 /*  7 */ { 1, s_11_7, -1, 15, 0},
00427 /*  8 */ { 2, s_11_8, 7, 14, 0},
00428 /*  9 */ { 3, s_11_9, 8, 11, 0},
00429 /* 10 */ { 2, s_11_10, 7, 14, 0},
00430 /* 11 */ { 3, s_11_11, 10, 11, 0},
00431 /* 12 */ { 2, s_11_12, 7, 12, 0},
00432 /* 13 */ { 2, s_11_13, 7, 13, 0},
00433 /* 14 */ { 4, s_11_14, -1, 24, 0},
00434 /* 15 */ { 5, s_11_15, 14, 21, 0},
00435 /* 16 */ { 6, s_11_16, 15, 20, 0},
00436 /* 17 */ { 5, s_11_17, 14, 23, 0},
00437 /* 18 */ { 2, s_11_18, -1, 29, 0},
00438 /* 19 */ { 3, s_11_19, 18, 26, 0},
00439 /* 20 */ { 4, s_11_20, 19, 25, 0},
00440 /* 21 */ { 3, s_11_21, 18, 26, 0},
00441 /* 22 */ { 4, s_11_22, 21, 25, 0},
00442 /* 23 */ { 3, s_11_23, 18, 27, 0},
00443 /* 24 */ { 3, s_11_24, 18, 28, 0},
00444 /* 25 */ { 3, s_11_25, -1, 20, 0},
00445 /* 26 */ { 4, s_11_26, 25, 17, 0},
00446 /* 27 */ { 5, s_11_27, 26, 16, 0},
00447 /* 28 */ { 4, s_11_28, 25, 17, 0},
00448 /* 29 */ { 5, s_11_29, 28, 16, 0},
00449 /* 30 */ { 4, s_11_30, 25, 18, 0},
00450 /* 31 */ { 4, s_11_31, 25, 19, 0},
00451 /* 32 */ { 5, s_11_32, -1, 21, 0},
00452 /* 33 */ { 6, s_11_33, 32, 20, 0},
00453 /* 34 */ { 5, s_11_34, -1, 22, 0},
00454 /* 35 */ { 2, s_11_35, -1, 5, 0},
00455 /* 36 */ { 3, s_11_36, 35, 4, 0},
00456 /* 37 */ { 4, s_11_37, 36, 1, 0},
00457 /* 38 */ { 3, s_11_38, 35, 4, 0},
00458 /* 39 */ { 4, s_11_39, 38, 1, 0},
00459 /* 40 */ { 3, s_11_40, 35, 2, 0},
00460 /* 41 */ { 3, s_11_41, 35, 3, 0}
00461 };
00462 
00463 static const unsigned char g_v[] = { 17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 17, 52, 14 };
00464 
00465 static const symbol s_0[] = { 'a' };
00466 static const symbol s_1[] = { 'e' };
00467 static const symbol s_2[] = { 'e' };
00468 static const symbol s_3[] = { 'a' };
00469 static const symbol s_4[] = { 'a' };
00470 static const symbol s_5[] = { 'a' };
00471 static const symbol s_6[] = { 'e' };
00472 static const symbol s_7[] = { 'a' };
00473 static const symbol s_8[] = { 'e' };
00474 static const symbol s_9[] = { 'e' };
00475 static const symbol s_10[] = { 'a' };
00476 static const symbol s_11[] = { 'e' };
00477 static const symbol s_12[] = { 'a' };
00478 static const symbol s_13[] = { 'e' };
00479 static const symbol s_14[] = { 'a' };
00480 static const symbol s_15[] = { 'e' };
00481 static const symbol s_16[] = { 'a' };
00482 static const symbol s_17[] = { 'e' };
00483 static const symbol s_18[] = { 'a' };
00484 static const symbol s_19[] = { 'e' };
00485 static const symbol s_20[] = { 'a' };
00486 static const symbol s_21[] = { 'e' };
00487 static const symbol s_22[] = { 'a' };
00488 static const symbol s_23[] = { 'e' };
00489 static const symbol s_24[] = { 'a' };
00490 static const symbol s_25[] = { 'e' };
00491 static const symbol s_26[] = { 'a' };
00492 static const symbol s_27[] = { 'e' };
00493 static const symbol s_28[] = { 'a' };
00494 static const symbol s_29[] = { 'e' };
00495 static const symbol s_30[] = { 'a' };
00496 static const symbol s_31[] = { 'e' };
00497 static const symbol s_32[] = { 'a' };
00498 static const symbol s_33[] = { 'e' };
00499 static const symbol s_34[] = { 'a' };
00500 static const symbol s_35[] = { 'e' };
00501 
00502 static int r_mark_regions(struct SN_env * z) {
00503     z->I[0] = z->l;
00504     {   int c1 = z->c; /* or, line 51 */
00505         if (in_grouping(z, g_v, 97, 252, 0)) goto lab1;
00506         if (in_grouping(z, g_v, 97, 252, 1) < 0) goto lab1; /* goto */ /* non v, line 48 */
00507         {   int c2 = z->c; /* or, line 49 */
00508             if (z->c + 1 >= z->l || z->p[z->c + 1] >> 5 != 3 || !((101187584 >> (z->p[z->c + 1] & 0x1f)) & 1)) goto lab3;
00509             if (!(find_among(z, a_0, 8))) goto lab3; /* among, line 49 */
00510             goto lab2;
00511         lab3:
00512             z->c = c2;
00513             if (z->c >= z->l) goto lab1;
00514             z->c++; /* next, line 49 */
00515         }
00516     lab2:
00517         z->I[0] = z->c; /* setmark p1, line 50 */
00518         goto lab0;
00519     lab1:
00520         z->c = c1;
00521         if (out_grouping(z, g_v, 97, 252, 0)) return 0;
00522         {    /* gopast */ /* grouping v, line 53 */
00523             int ret = out_grouping(z, g_v, 97, 252, 1);
00524             if (ret < 0) return 0;
00525             z->c += ret;
00526         }
00527         z->I[0] = z->c; /* setmark p1, line 53 */
00528     }
00529 lab0:
00530     return 1;
00531 }
00532 
00533 static int r_R1(struct SN_env * z) {
00534     if (!(z->I[0] <= z->c)) return 0;
00535     return 1;
00536 }
00537 
00538 static int r_v_ending(struct SN_env * z) {
00539     int among_var;
00540     z->ket = z->c; /* [, line 61 */
00541     if (z->c <= z->lb || (z->p[z->c - 1] != 225 && z->p[z->c - 1] != 233)) return 0;
00542     among_var = find_among_b(z, a_1, 2); /* substring, line 61 */
00543     if (!(among_var)) return 0;
00544     z->bra = z->c; /* ], line 61 */
00545     {   int ret = r_R1(z);
00546         if (ret == 0) return 0; /* call R1, line 61 */
00547         if (ret < 0) return ret;
00548     }
00549     switch(among_var) {
00550         case 0: return 0;
00551         case 1:
00552             {   int ret = slice_from_s(z, 1, s_0); /* <-, line 62 */
00553                 if (ret < 0) return ret;
00554             }
00555             break;
00556         case 2:
00557             {   int ret = slice_from_s(z, 1, s_1); /* <-, line 63 */
00558                 if (ret < 0) return ret;
00559             }
00560             break;
00561     }
00562     return 1;
00563 }
00564 
00565 static int r_double(struct SN_env * z) {
00566     {   int m_test = z->l - z->c; /* test, line 68 */
00567         if (z->c - 1 <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((106790108 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
00568         if (!(find_among_b(z, a_2, 23))) return 0; /* among, line 68 */
00569         z->c = z->l - m_test;
00570     }
00571     return 1;
00572 }
00573 
00574 static int r_undouble(struct SN_env * z) {
00575     if (z->c <= z->lb) return 0;
00576     z->c--; /* next, line 73 */
00577     z->ket = z->c; /* [, line 73 */
00578     {   int ret = z->c - 1;
00579         if (z->lb > ret || ret > z->l) return 0;
00580         z->c = ret; /* hop, line 73 */
00581     }
00582     z->bra = z->c; /* ], line 73 */
00583     {   int ret = slice_del(z); /* delete, line 73 */
00584         if (ret < 0) return ret;
00585     }
00586     return 1;
00587 }
00588 
00589 static int r_instrum(struct SN_env * z) {
00590     int among_var;
00591     z->ket = z->c; /* [, line 77 */
00592     if (z->c - 1 <= z->lb || z->p[z->c - 1] != 108) return 0;
00593     among_var = find_among_b(z, a_3, 2); /* substring, line 77 */
00594     if (!(among_var)) return 0;
00595     z->bra = z->c; /* ], line 77 */
00596     {   int ret = r_R1(z);
00597         if (ret == 0) return 0; /* call R1, line 77 */
00598         if (ret < 0) return ret;
00599     }
00600     switch(among_var) {
00601         case 0: return 0;
00602         case 1:
00603             {   int ret = r_double(z);
00604                 if (ret == 0) return 0; /* call double, line 78 */
00605                 if (ret < 0) return ret;
00606             }
00607             break;
00608         case 2:
00609             {   int ret = r_double(z);
00610                 if (ret == 0) return 0; /* call double, line 79 */
00611                 if (ret < 0) return ret;
00612             }
00613             break;
00614     }
00615     {   int ret = slice_del(z); /* delete, line 81 */
00616         if (ret < 0) return ret;
00617     }
00618     {   int ret = r_undouble(z);
00619         if (ret == 0) return 0; /* call undouble, line 82 */
00620         if (ret < 0) return ret;
00621     }
00622     return 1;
00623 }
00624 
00625 static int r_case(struct SN_env * z) {
00626     z->ket = z->c; /* [, line 87 */
00627     if (!(find_among_b(z, a_4, 44))) return 0; /* substring, line 87 */
00628     z->bra = z->c; /* ], line 87 */
00629     {   int ret = r_R1(z);
00630         if (ret == 0) return 0; /* call R1, line 87 */
00631         if (ret < 0) return ret;
00632     }
00633     {   int ret = slice_del(z); /* delete, line 111 */
00634         if (ret < 0) return ret;
00635     }
00636     {   int ret = r_v_ending(z);
00637         if (ret == 0) return 0; /* call v_ending, line 112 */
00638         if (ret < 0) return ret;
00639     }
00640     return 1;
00641 }
00642 
00643 static int r_case_special(struct SN_env * z) {
00644     int among_var;
00645     z->ket = z->c; /* [, line 116 */
00646     if (z->c - 1 <= z->lb || (z->p[z->c - 1] != 110 && z->p[z->c - 1] != 116)) return 0;
00647     among_var = find_among_b(z, a_5, 3); /* substring, line 116 */
00648     if (!(among_var)) return 0;
00649     z->bra = z->c; /* ], line 116 */
00650     {   int ret = r_R1(z);
00651         if (ret == 0) return 0; /* call R1, line 116 */
00652         if (ret < 0) return ret;
00653     }
00654     switch(among_var) {
00655         case 0: return 0;
00656         case 1:
00657             {   int ret = slice_from_s(z, 1, s_2); /* <-, line 117 */
00658                 if (ret < 0) return ret;
00659             }
00660             break;
00661         case 2:
00662             {   int ret = slice_from_s(z, 1, s_3); /* <-, line 118 */
00663                 if (ret < 0) return ret;
00664             }
00665             break;
00666         case 3:
00667             {   int ret = slice_from_s(z, 1, s_4); /* <-, line 119 */
00668                 if (ret < 0) return ret;
00669             }
00670             break;
00671     }
00672     return 1;
00673 }
00674 
00675 static int r_case_other(struct SN_env * z) {
00676     int among_var;
00677     z->ket = z->c; /* [, line 124 */
00678     if (z->c - 3 <= z->lb || z->p[z->c - 1] != 108) return 0;
00679     among_var = find_among_b(z, a_6, 6); /* substring, line 124 */
00680     if (!(among_var)) return 0;
00681     z->bra = z->c; /* ], line 124 */
00682     {   int ret = r_R1(z);
00683         if (ret == 0) return 0; /* call R1, line 124 */
00684         if (ret < 0) return ret;
00685     }
00686     switch(among_var) {
00687         case 0: return 0;
00688         case 1:
00689             {   int ret = slice_del(z); /* delete, line 125 */
00690                 if (ret < 0) return ret;
00691             }
00692             break;
00693         case 2:
00694             {   int ret = slice_del(z); /* delete, line 126 */
00695                 if (ret < 0) return ret;
00696             }
00697             break;
00698         case 3:
00699             {   int ret = slice_from_s(z, 1, s_5); /* <-, line 127 */
00700                 if (ret < 0) return ret;
00701             }
00702             break;
00703         case 4:
00704             {   int ret = slice_from_s(z, 1, s_6); /* <-, line 128 */
00705                 if (ret < 0) return ret;
00706             }
00707             break;
00708     }
00709     return 1;
00710 }
00711 
00712 static int r_factive(struct SN_env * z) {
00713     int among_var;
00714     z->ket = z->c; /* [, line 133 */
00715     if (z->c <= z->lb || (z->p[z->c - 1] != 225 && z->p[z->c - 1] != 233)) return 0;
00716     among_var = find_among_b(z, a_7, 2); /* substring, line 133 */
00717     if (!(among_var)) return 0;
00718     z->bra = z->c; /* ], line 133 */
00719     {   int ret = r_R1(z);
00720         if (ret == 0) return 0; /* call R1, line 133 */
00721         if (ret < 0) return ret;
00722     }
00723     switch(among_var) {
00724         case 0: return 0;
00725         case 1:
00726             {   int ret = r_double(z);
00727                 if (ret == 0) return 0; /* call double, line 134 */
00728                 if (ret < 0) return ret;
00729             }
00730             break;
00731         case 2:
00732             {   int ret = r_double(z);
00733                 if (ret == 0) return 0; /* call double, line 135 */
00734                 if (ret < 0) return ret;
00735             }
00736             break;
00737     }
00738     {   int ret = slice_del(z); /* delete, line 137 */
00739         if (ret < 0) return ret;
00740     }
00741     {   int ret = r_undouble(z);
00742         if (ret == 0) return 0; /* call undouble, line 138 */
00743         if (ret < 0) return ret;
00744     }
00745     return 1;
00746 }
00747 
00748 static int r_plural(struct SN_env * z) {
00749     int among_var;
00750     z->ket = z->c; /* [, line 142 */
00751     if (z->c <= z->lb || z->p[z->c - 1] != 107) return 0;
00752     among_var = find_among_b(z, a_8, 7); /* substring, line 142 */
00753     if (!(among_var)) return 0;
00754     z->bra = z->c; /* ], line 142 */
00755     {   int ret = r_R1(z);
00756         if (ret == 0) return 0; /* call R1, line 142 */
00757         if (ret < 0) return ret;
00758     }
00759     switch(among_var) {
00760         case 0: return 0;
00761         case 1:
00762             {   int ret = slice_from_s(z, 1, s_7); /* <-, line 143 */
00763                 if (ret < 0) return ret;
00764             }
00765             break;
00766         case 2:
00767             {   int ret = slice_from_s(z, 1, s_8); /* <-, line 144 */
00768                 if (ret < 0) return ret;
00769             }
00770             break;
00771         case 3:
00772             {   int ret = slice_del(z); /* delete, line 145 */
00773                 if (ret < 0) return ret;
00774             }
00775             break;
00776         case 4:
00777             {   int ret = slice_del(z); /* delete, line 146 */
00778                 if (ret < 0) return ret;
00779             }
00780             break;
00781         case 5:
00782             {   int ret = slice_del(z); /* delete, line 147 */
00783                 if (ret < 0) return ret;
00784             }
00785             break;
00786         case 6:
00787             {   int ret = slice_del(z); /* delete, line 148 */
00788                 if (ret < 0) return ret;
00789             }
00790             break;
00791         case 7:
00792             {   int ret = slice_del(z); /* delete, line 149 */
00793                 if (ret < 0) return ret;
00794             }
00795             break;
00796     }
00797     return 1;
00798 }
00799 
00800 static int r_owned(struct SN_env * z) {
00801     int among_var;
00802     z->ket = z->c; /* [, line 154 */
00803     if (z->c <= z->lb || (z->p[z->c - 1] != 105 && z->p[z->c - 1] != 233)) return 0;
00804     among_var = find_among_b(z, a_9, 12); /* substring, line 154 */
00805     if (!(among_var)) return 0;
00806     z->bra = z->c; /* ], line 154 */
00807     {   int ret = r_R1(z);
00808         if (ret == 0) return 0; /* call R1, line 154 */
00809         if (ret < 0) return ret;
00810     }
00811     switch(among_var) {
00812         case 0: return 0;
00813         case 1:
00814             {   int ret = slice_del(z); /* delete, line 155 */
00815                 if (ret < 0) return ret;
00816             }
00817             break;
00818         case 2:
00819             {   int ret = slice_from_s(z, 1, s_9); /* <-, line 156 */
00820                 if (ret < 0) return ret;
00821             }
00822             break;
00823         case 3:
00824             {   int ret = slice_from_s(z, 1, s_10); /* <-, line 157 */
00825                 if (ret < 0) return ret;
00826             }
00827             break;
00828         case 4:
00829             {   int ret = slice_del(z); /* delete, line 158 */
00830                 if (ret < 0) return ret;
00831             }
00832             break;
00833         case 5:
00834             {   int ret = slice_from_s(z, 1, s_11); /* <-, line 159 */
00835                 if (ret < 0) return ret;
00836             }
00837             break;
00838         case 6:
00839             {   int ret = slice_from_s(z, 1, s_12); /* <-, line 160 */
00840                 if (ret < 0) return ret;
00841             }
00842             break;
00843         case 7:
00844             {   int ret = slice_del(z); /* delete, line 161 */
00845                 if (ret < 0) return ret;
00846             }
00847             break;
00848         case 8:
00849             {   int ret = slice_from_s(z, 1, s_13); /* <-, line 162 */
00850                 if (ret < 0) return ret;
00851             }
00852             break;
00853         case 9:
00854             {   int ret = slice_del(z); /* delete, line 163 */
00855                 if (ret < 0) return ret;
00856             }
00857             break;
00858     }
00859     return 1;
00860 }
00861 
00862 static int r_sing_owner(struct SN_env * z) {
00863     int among_var;
00864     z->ket = z->c; /* [, line 168 */
00865     among_var = find_among_b(z, a_10, 31); /* substring, line 168 */
00866     if (!(among_var)) return 0;
00867     z->bra = z->c; /* ], line 168 */
00868     {   int ret = r_R1(z);
00869         if (ret == 0) return 0; /* call R1, line 168 */
00870         if (ret < 0) return ret;
00871     }
00872     switch(among_var) {
00873         case 0: return 0;
00874         case 1:
00875             {   int ret = slice_del(z); /* delete, line 169 */
00876                 if (ret < 0) return ret;
00877             }
00878             break;
00879         case 2:
00880             {   int ret = slice_from_s(z, 1, s_14); /* <-, line 170 */
00881                 if (ret < 0) return ret;
00882             }
00883             break;
00884         case 3:
00885             {   int ret = slice_from_s(z, 1, s_15); /* <-, line 171 */
00886                 if (ret < 0) return ret;
00887             }
00888             break;
00889         case 4:
00890             {   int ret = slice_del(z); /* delete, line 172 */
00891                 if (ret < 0) return ret;
00892             }
00893             break;
00894         case 5:
00895             {   int ret = slice_from_s(z, 1, s_16); /* <-, line 173 */
00896                 if (ret < 0) return ret;
00897             }
00898             break;
00899         case 6:
00900             {   int ret = slice_from_s(z, 1, s_17); /* <-, line 174 */
00901                 if (ret < 0) return ret;
00902             }
00903             break;
00904         case 7:
00905             {   int ret = slice_del(z); /* delete, line 175 */
00906                 if (ret < 0) return ret;
00907             }
00908             break;
00909         case 8:
00910             {   int ret = slice_del(z); /* delete, line 176 */
00911                 if (ret < 0) return ret;
00912             }
00913             break;
00914         case 9:
00915             {   int ret = slice_del(z); /* delete, line 177 */
00916                 if (ret < 0) return ret;
00917             }
00918             break;
00919         case 10:
00920             {   int ret = slice_from_s(z, 1, s_18); /* <-, line 178 */
00921                 if (ret < 0) return ret;
00922             }
00923             break;
00924         case 11:
00925             {   int ret = slice_from_s(z, 1, s_19); /* <-, line 179 */
00926                 if (ret < 0) return ret;
00927             }
00928             break;
00929         case 12:
00930             {   int ret = slice_del(z); /* delete, line 180 */
00931                 if (ret < 0) return ret;
00932             }
00933             break;
00934         case 13:
00935             {   int ret = slice_del(z); /* delete, line 181 */
00936                 if (ret < 0) return ret;
00937             }
00938             break;
00939         case 14:
00940             {   int ret = slice_from_s(z, 1, s_20); /* <-, line 182 */
00941                 if (ret < 0) return ret;
00942             }
00943             break;
00944         case 15:
00945             {   int ret = slice_from_s(z, 1, s_21); /* <-, line 183 */
00946                 if (ret < 0) return ret;
00947             }
00948             break;
00949         case 16:
00950             {   int ret = slice_del(z); /* delete, line 184 */
00951                 if (ret < 0) return ret;
00952             }
00953             break;
00954         case 17:
00955             {   int ret = slice_del(z); /* delete, line 185 */
00956                 if (ret < 0) return ret;
00957             }
00958             break;
00959         case 18:
00960             {   int ret = slice_del(z); /* delete, line 186 */
00961                 if (ret < 0) return ret;
00962             }
00963             break;
00964         case 19:
00965             {   int ret = slice_from_s(z, 1, s_22); /* <-, line 187 */
00966                 if (ret < 0) return ret;
00967             }
00968             break;
00969         case 20:
00970             {   int ret = slice_from_s(z, 1, s_23); /* <-, line 188 */
00971                 if (ret < 0) return ret;
00972             }
00973             break;
00974     }
00975     return 1;
00976 }
00977 
00978 static int r_plur_owner(struct SN_env * z) {
00979     int among_var;
00980     z->ket = z->c; /* [, line 193 */
00981     if (z->c <= z->lb || z->p[z->c - 1] >> 5 != 3 || !((10768 >> (z->p[z->c - 1] & 0x1f)) & 1)) return 0;
00982     among_var = find_among_b(z, a_11, 42); /* substring, line 193 */
00983     if (!(among_var)) return 0;
00984     z->bra = z->c; /* ], line 193 */
00985     {   int ret = r_R1(z);
00986         if (ret == 0) return 0; /* call R1, line 193 */
00987         if (ret < 0) return ret;
00988     }
00989     switch(among_var) {
00990         case 0: return 0;
00991         case 1:
00992             {   int ret = slice_del(z); /* delete, line 194 */
00993                 if (ret < 0) return ret;
00994             }
00995             break;
00996         case 2:
00997             {   int ret = slice_from_s(z, 1, s_24); /* <-, line 195 */
00998                 if (ret < 0) return ret;
00999             }
01000             break;
01001         case 3:
01002             {   int ret = slice_from_s(z, 1, s_25); /* <-, line 196 */
01003                 if (ret < 0) return ret;
01004             }
01005             break;
01006         case 4:
01007             {   int ret = slice_del(z); /* delete, line 197 */
01008                 if (ret < 0) return ret;
01009             }
01010             break;
01011         case 5:
01012             {   int ret = slice_del(z); /* delete, line 198 */
01013                 if (ret < 0) return ret;
01014             }
01015             break;
01016         case 6:
01017             {   int ret = slice_del(z); /* delete, line 199 */
01018                 if (ret < 0) return ret;
01019             }
01020             break;
01021         case 7:
01022             {   int ret = slice_from_s(z, 1, s_26); /* <-, line 200 */
01023                 if (ret < 0) return ret;
01024             }
01025             break;
01026         case 8:
01027             {   int ret = slice_from_s(z, 1, s_27); /* <-, line 201 */
01028                 if (ret < 0) return ret;
01029             }
01030             break;
01031         case 9:
01032             {   int ret = slice_del(z); /* delete, line 202 */
01033                 if (ret < 0) return ret;
01034             }
01035             break;
01036         case 10:
01037             {   int ret = slice_del(z); /* delete, line 203 */
01038                 if (ret < 0) return ret;
01039             }
01040             break;
01041         case 11:
01042             {   int ret = slice_del(z); /* delete, line 204 */
01043                 if (ret < 0) return ret;
01044             }
01045             break;
01046         case 12:
01047             {   int ret = slice_from_s(z, 1, s_28); /* <-, line 205 */
01048                 if (ret < 0) return ret;
01049             }
01050             break;
01051         case 13:
01052             {   int ret = slice_from_s(z, 1, s_29); /* <-, line 206 */
01053                 if (ret < 0) return ret;
01054             }
01055             break;
01056         case 14:
01057             {   int ret = slice_del(z); /* delete, line 207 */
01058                 if (ret < 0) return ret;
01059             }
01060             break;
01061         case 15:
01062             {   int ret = slice_del(z); /* delete, line 208 */
01063                 if (ret < 0) return ret;
01064             }
01065             break;
01066         case 16:
01067             {   int ret = slice_del(z); /* delete, line 209 */
01068                 if (ret < 0) return ret;
01069             }
01070             break;
01071         case 17:
01072             {   int ret = slice_del(z); /* delete, line 210 */
01073                 if (ret < 0) return ret;
01074             }
01075             break;
01076         case 18:
01077             {   int ret = slice_from_s(z, 1, s_30); /* <-, line 211 */
01078                 if (ret < 0) return ret;
01079             }
01080             break;
01081         case 19:
01082             {   int ret = slice_from_s(z, 1, s_31); /* <-, line 212 */
01083                 if (ret < 0) return ret;
01084             }
01085             break;
01086         case 20:
01087             {   int ret = slice_del(z); /* delete, line 214 */
01088                 if (ret < 0) return ret;
01089             }
01090             break;
01091         case 21:
01092             {   int ret = slice_del(z); /* delete, line 215 */
01093                 if (ret < 0) return ret;
01094             }
01095             break;
01096         case 22:
01097             {   int ret = slice_from_s(z, 1, s_32); /* <-, line 216 */
01098                 if (ret < 0) return ret;
01099             }
01100             break;
01101         case 23:
01102             {   int ret = slice_from_s(z, 1, s_33); /* <-, line 217 */
01103                 if (ret < 0) return ret;
01104             }
01105             break;
01106         case 24:
01107             {   int ret = slice_del(z); /* delete, line 218 */
01108                 if (ret < 0) return ret;
01109             }
01110             break;
01111         case 25:
01112             {   int ret = slice_del(z); /* delete, line 219 */
01113                 if (ret < 0) return ret;
01114             }
01115             break;
01116         case 26:
01117             {   int ret = slice_del(z); /* delete, line 220 */
01118                 if (ret < 0) return ret;
01119             }
01120             break;
01121         case 27:
01122             {   int ret = slice_from_s(z, 1, s_34); /* <-, line 221 */
01123                 if (ret < 0) return ret;
01124             }
01125             break;
01126         case 28:
01127             {   int ret = slice_from_s(z, 1, s_35); /* <-, line 222 */
01128                 if (ret < 0) return ret;
01129             }
01130             break;
01131         case 29:
01132             {   int ret = slice_del(z); /* delete, line 223 */
01133                 if (ret < 0) return ret;
01134             }
01135             break;
01136     }
01137     return 1;
01138 }
01139 
01140 extern int hungarian_ISO_8859_1_stem(struct SN_env * z) {
01141     {   int c1 = z->c; /* do, line 229 */
01142         {   int ret = r_mark_regions(z);
01143             if (ret == 0) goto lab0; /* call mark_regions, line 229 */
01144             if (ret < 0) return ret;
01145         }
01146     lab0:
01147         z->c = c1;
01148     }
01149     z->lb = z->c; z->c = z->l; /* backwards, line 230 */
01150 
01151     {   int m2 = z->l - z->c; (void)m2; /* do, line 231 */
01152         {   int ret = r_instrum(z);
01153             if (ret == 0) goto lab1; /* call instrum, line 231 */
01154             if (ret < 0) return ret;
01155         }
01156     lab1:
01157         z->c = z->l - m2;
01158     }
01159     {   int m3 = z->l - z->c; (void)m3; /* do, line 232 */
01160         {   int ret = r_case(z);
01161             if (ret == 0) goto lab2; /* call case, line 232 */
01162             if (ret < 0) return ret;
01163         }
01164     lab2:
01165         z->c = z->l - m3;
01166     }
01167     {   int m4 = z->l - z->c; (void)m4; /* do, line 233 */
01168         {   int ret = r_case_special(z);
01169             if (ret == 0) goto lab3; /* call case_special, line 233 */
01170             if (ret < 0) return ret;
01171         }
01172     lab3:
01173         z->c = z->l - m4;
01174     }
01175     {   int m5 = z->l - z->c; (void)m5; /* do, line 234 */
01176         {   int ret = r_case_other(z);
01177             if (ret == 0) goto lab4; /* call case_other, line 234 */
01178             if (ret < 0) return ret;
01179         }
01180     lab4:
01181         z->c = z->l - m5;
01182     }
01183     {   int m6 = z->l - z->c; (void)m6; /* do, line 235 */
01184         {   int ret = r_factive(z);
01185             if (ret == 0) goto lab5; /* call factive, line 235 */
01186             if (ret < 0) return ret;
01187         }
01188     lab5:
01189         z->c = z->l - m6;
01190     }
01191     {   int m7 = z->l - z->c; (void)m7; /* do, line 236 */
01192         {   int ret = r_owned(z);
01193             if (ret == 0) goto lab6; /* call owned, line 236 */
01194             if (ret < 0) return ret;
01195         }
01196     lab6:
01197         z->c = z->l - m7;
01198     }
01199     {   int m8 = z->l - z->c; (void)m8; /* do, line 237 */
01200         {   int ret = r_sing_owner(z);
01201             if (ret == 0) goto lab7; /* call sing_owner, line 237 */
01202             if (ret < 0) return ret;
01203         }
01204     lab7:
01205         z->c = z->l - m8;
01206     }
01207     {   int m9 = z->l - z->c; (void)m9; /* do, line 238 */
01208         {   int ret = r_plur_owner(z);
01209             if (ret == 0) goto lab8; /* call plur_owner, line 238 */
01210             if (ret < 0) return ret;
01211         }
01212     lab8:
01213         z->c = z->l - m9;
01214     }
01215     {   int m10 = z->l - z->c; (void)m10; /* do, line 239 */
01216         {   int ret = r_plural(z);
01217             if (ret == 0) goto lab9; /* call plural, line 239 */
01218             if (ret < 0) return ret;
01219         }
01220     lab9:
01221         z->c = z->l - m10;
01222     }
01223     z->c = z->lb;
01224     return 1;
01225 }
01226 
01227 extern struct SN_env * hungarian_ISO_8859_1_create_env(void) { return SN_create_env(0, 1, 0); }
01228 
01229 extern void hungarian_ISO_8859_1_close_env(struct SN_env * z) { SN_close_env(z, 0); }
01230