You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@uima.apache.org by mb...@apache.org on 2007/01/04 15:09:15 UTC
svn commit: r492573 [2/6] - in
/incubator/uima/sandbox/trunk/SnowballAnnotator: ./
src/main/java/org/apache/uima/annotator/ src/main/java/org/tartarus/
src/main/java/org/tartarus/snowball/ src/main/java/org/tartarus/snowball/ext/
Added: incubator/uima/sandbox/trunk/SnowballAnnotator/src/main/java/org/tartarus/snowball/ext/englishStemmer.java
URL: http://svn.apache.org/viewvc/incubator/uima/sandbox/trunk/SnowballAnnotator/src/main/java/org/tartarus/snowball/ext/englishStemmer.java?view=auto&rev=492573
==============================================================================
--- incubator/uima/sandbox/trunk/SnowballAnnotator/src/main/java/org/tartarus/snowball/ext/englishStemmer.java (added)
+++ incubator/uima/sandbox/trunk/SnowballAnnotator/src/main/java/org/tartarus/snowball/ext/englishStemmer.java Thu Jan 4 06:09:14 2007
@@ -0,0 +1,1314 @@
+// This file was generated automatically by the Snowball to Java compiler
+
+package org.tartarus.snowball.ext;
+import org.tartarus.snowball.SnowballProgram;
+import org.tartarus.snowball.Among;
+
+/**
+ * Generated class implementing code defined by a snowball script.
+ */
+public class englishStemmer extends SnowballProgram {
+
+ private Among a_0[] = {
+ new Among ( "arsen", -1, -1, "", this),
+ new Among ( "commun", -1, -1, "", this),
+ new Among ( "gener", -1, -1, "", this)
+ };
+
+ private Among a_1[] = {
+ new Among ( "'", -1, 1, "", this),
+ new Among ( "'s'", 0, 1, "", this),
+ new Among ( "'s", -1, 1, "", this)
+ };
+
+ private Among a_2[] = {
+ new Among ( "ied", -1, 2, "", this),
+ new Among ( "s", -1, 3, "", this),
+ new Among ( "ies", 1, 2, "", this),
+ new Among ( "sses", 1, 1, "", this),
+ new Among ( "ss", 1, -1, "", this),
+ new Among ( "us", 1, -1, "", this)
+ };
+
+ private Among a_3[] = {
+ new Among ( "", -1, 3, "", this),
+ new Among ( "bb", 0, 2, "", this),
+ new Among ( "dd", 0, 2, "", this),
+ new Among ( "ff", 0, 2, "", this),
+ new Among ( "gg", 0, 2, "", this),
+ new Among ( "bl", 0, 1, "", this),
+ new Among ( "mm", 0, 2, "", this),
+ new Among ( "nn", 0, 2, "", this),
+ new Among ( "pp", 0, 2, "", this),
+ new Among ( "rr", 0, 2, "", this),
+ new Among ( "at", 0, 1, "", this),
+ new Among ( "tt", 0, 2, "", this),
+ new Among ( "iz", 0, 1, "", this)
+ };
+
+ private Among a_4[] = {
+ new Among ( "ed", -1, 2, "", this),
+ new Among ( "eed", 0, 1, "", this),
+ new Among ( "ing", -1, 2, "", this),
+ new Among ( "edly", -1, 2, "", this),
+ new Among ( "eedly", 3, 1, "", this),
+ new Among ( "ingly", -1, 2, "", this)
+ };
+
+ private Among a_5[] = {
+ new Among ( "anci", -1, 3, "", this),
+ new Among ( "enci", -1, 2, "", this),
+ new Among ( "ogi", -1, 13, "", this),
+ new Among ( "li", -1, 16, "", this),
+ new Among ( "bli", 3, 12, "", this),
+ new Among ( "abli", 4, 4, "", this),
+ new Among ( "alli", 3, 8, "", this),
+ new Among ( "fulli", 3, 14, "", this),
+ new Among ( "lessli", 3, 15, "", this),
+ new Among ( "ousli", 3, 10, "", this),
+ new Among ( "entli", 3, 5, "", this),
+ new Among ( "aliti", -1, 8, "", this),
+ new Among ( "biliti", -1, 12, "", this),
+ new Among ( "iviti", -1, 11, "", this),
+ new Among ( "tional", -1, 1, "", this),
+ new Among ( "ational", 14, 7, "", this),
+ new Among ( "alism", -1, 8, "", this),
+ new Among ( "ation", -1, 7, "", this),
+ new Among ( "ization", 17, 6, "", this),
+ new Among ( "izer", -1, 6, "", this),
+ new Among ( "ator", -1, 7, "", this),
+ new Among ( "iveness", -1, 11, "", this),
+ new Among ( "fulness", -1, 9, "", this),
+ new Among ( "ousness", -1, 10, "", this)
+ };
+
+ private Among a_6[] = {
+ new Among ( "icate", -1, 4, "", this),
+ new Among ( "ative", -1, 6, "", this),
+ new Among ( "alize", -1, 3, "", this),
+ new Among ( "iciti", -1, 4, "", this),
+ new Among ( "ical", -1, 4, "", this),
+ new Among ( "tional", -1, 1, "", this),
+ new Among ( "ational", 5, 2, "", this),
+ new Among ( "ful", -1, 5, "", this),
+ new Among ( "ness", -1, 5, "", this)
+ };
+
+ private Among a_7[] = {
+ new Among ( "ic", -1, 1, "", this),
+ new Among ( "ance", -1, 1, "", this),
+ new Among ( "ence", -1, 1, "", this),
+ new Among ( "able", -1, 1, "", this),
+ new Among ( "ible", -1, 1, "", this),
+ new Among ( "ate", -1, 1, "", this),
+ new Among ( "ive", -1, 1, "", this),
+ new Among ( "ize", -1, 1, "", this),
+ new Among ( "iti", -1, 1, "", this),
+ new Among ( "al", -1, 1, "", this),
+ new Among ( "ism", -1, 1, "", this),
+ new Among ( "ion", -1, 2, "", this),
+ new Among ( "er", -1, 1, "", this),
+ new Among ( "ous", -1, 1, "", this),
+ new Among ( "ant", -1, 1, "", this),
+ new Among ( "ent", -1, 1, "", this),
+ new Among ( "ment", 15, 1, "", this),
+ new Among ( "ement", 16, 1, "", this)
+ };
+
+ private Among a_8[] = {
+ new Among ( "e", -1, 1, "", this),
+ new Among ( "l", -1, 2, "", this)
+ };
+
+ private Among a_9[] = {
+ new Among ( "succeed", -1, -1, "", this),
+ new Among ( "proceed", -1, -1, "", this),
+ new Among ( "exceed", -1, -1, "", this),
+ new Among ( "canning", -1, -1, "", this),
+ new Among ( "inning", -1, -1, "", this),
+ new Among ( "earring", -1, -1, "", this),
+ new Among ( "herring", -1, -1, "", this),
+ new Among ( "outing", -1, -1, "", this)
+ };
+
+ private Among a_10[] = {
+ new Among ( "andes", -1, -1, "", this),
+ new Among ( "atlas", -1, -1, "", this),
+ new Among ( "bias", -1, -1, "", this),
+ new Among ( "cosmos", -1, -1, "", this),
+ new Among ( "dying", -1, 3, "", this),
+ new Among ( "early", -1, 9, "", this),
+ new Among ( "gently", -1, 7, "", this),
+ new Among ( "howe", -1, -1, "", this),
+ new Among ( "idly", -1, 6, "", this),
+ new Among ( "lying", -1, 4, "", this),
+ new Among ( "news", -1, -1, "", this),
+ new Among ( "only", -1, 10, "", this),
+ new Among ( "singly", -1, 11, "", this),
+ new Among ( "skies", -1, 2, "", this),
+ new Among ( "skis", -1, 1, "", this),
+ new Among ( "sky", -1, -1, "", this),
+ new Among ( "tying", -1, 5, "", this),
+ new Among ( "ugly", -1, 8, "", this)
+ };
+
+ private static final char g_v[] = {17, 65, 16, 1 };
+
+ private static final char g_v_WXY[] = {1, 17, 65, 208, 1 };
+
+ private static final char g_valid_LI[] = {55, 141, 2 };
+
+ private boolean B_Y_found;
+ private int I_p2;
+ private int I_p1;
+
+ private void copy_from(englishStemmer other) {
+ B_Y_found = other.B_Y_found;
+ I_p2 = other.I_p2;
+ I_p1 = other.I_p1;
+ super.copy_from(other);
+ }
+
+ private boolean r_prelude() {
+ int v_1;
+ int v_2;
+ int v_3;
+ int v_4;
+ int v_5;
+ // (, line 25
+ // unset Y_found, line 26
+ B_Y_found = false;
+ // do, line 27
+ v_1 = cursor;
+ lab0: do {
+ // (, line 27
+ // [, line 27
+ bra = cursor;
+ // literal, line 27
+ if (!(eq_s(1, "'")))
+ {
+ break lab0;
+ }
+ // ], line 27
+ ket = cursor;
+ // delete, line 27
+ slice_del();
+ } while (false);
+ cursor = v_1;
+ // do, line 28
+ v_2 = cursor;
+ lab1: do {
+ // (, line 28
+ // [, line 28
+ bra = cursor;
+ // literal, line 28
+ if (!(eq_s(1, "y")))
+ {
+ break lab1;
+ }
+ // ], line 28
+ ket = cursor;
+ // <-, line 28
+ slice_from("Y");
+ // set Y_found, line 28
+ B_Y_found = true;
+ } while (false);
+ cursor = v_2;
+ // do, line 29
+ v_3 = cursor;
+ lab2: do {
+ // repeat, line 29
+ replab3: while(true)
+ {
+ v_4 = cursor;
+ lab4: do {
+ // (, line 29
+ // goto, line 29
+ golab5: while(true)
+ {
+ v_5 = cursor;
+ lab6: do {
+ // (, line 29
+ if (!(in_grouping(g_v, 97, 121)))
+ {
+ break lab6;
+ }
+ // [, line 29
+ bra = cursor;
+ // literal, line 29
+ if (!(eq_s(1, "y")))
+ {
+ break lab6;
+ }
+ // ], line 29
+ ket = cursor;
+ cursor = v_5;
+ break golab5;
+ } while (false);
+ cursor = v_5;
+ if (cursor >= limit)
+ {
+ break lab4;
+ }
+ cursor++;
+ }
+ // <-, line 29
+ slice_from("Y");
+ // set Y_found, line 29
+ B_Y_found = true;
+ continue replab3;
+ } while (false);
+ cursor = v_4;
+ break replab3;
+ }
+ } while (false);
+ cursor = v_3;
+ return true;
+ }
+
+ private boolean r_mark_regions() {
+ int v_1;
+ int v_2;
+ // (, line 32
+ I_p1 = limit;
+ I_p2 = limit;
+ // do, line 35
+ v_1 = cursor;
+ lab0: do {
+ // (, line 35
+ // or, line 41
+ lab1: do {
+ v_2 = cursor;
+ lab2: do {
+ // among, line 36
+ if (find_among(a_0, 3) == 0)
+ {
+ break lab2;
+ }
+ break lab1;
+ } while (false);
+ cursor = v_2;
+ // (, line 41
+ // gopast, line 41
+ golab3: while(true)
+ {
+ lab4: do {
+ if (!(in_grouping(g_v, 97, 121)))
+ {
+ break lab4;
+ }
+ break golab3;
+ } while (false);
+ if (cursor >= limit)
+ {
+ break lab0;
+ }
+ cursor++;
+ }
+ // gopast, line 41
+ golab5: while(true)
+ {
+ lab6: do {
+ if (!(out_grouping(g_v, 97, 121)))
+ {
+ break lab6;
+ }
+ break golab5;
+ } while (false);
+ if (cursor >= limit)
+ {
+ break lab0;
+ }
+ cursor++;
+ }
+ } while (false);
+ // setmark p1, line 42
+ I_p1 = cursor;
+ // gopast, line 43
+ golab7: while(true)
+ {
+ lab8: do {
+ if (!(in_grouping(g_v, 97, 121)))
+ {
+ break lab8;
+ }
+ break golab7;
+ } while (false);
+ if (cursor >= limit)
+ {
+ break lab0;
+ }
+ cursor++;
+ }
+ // gopast, line 43
+ golab9: while(true)
+ {
+ lab10: do {
+ if (!(out_grouping(g_v, 97, 121)))
+ {
+ break lab10;
+ }
+ break golab9;
+ } while (false);
+ if (cursor >= limit)
+ {
+ break lab0;
+ }
+ cursor++;
+ }
+ // setmark p2, line 43
+ I_p2 = cursor;
+ } while (false);
+ cursor = v_1;
+ return true;
+ }
+
+ private boolean r_shortv() {
+ int v_1;
+ // (, line 49
+ // or, line 51
+ lab0: do {
+ v_1 = limit - cursor;
+ lab1: do {
+ // (, line 50
+ if (!(out_grouping_b(g_v_WXY, 89, 121)))
+ {
+ break lab1;
+ }
+ if (!(in_grouping_b(g_v, 97, 121)))
+ {
+ break lab1;
+ }
+ if (!(out_grouping_b(g_v, 97, 121)))
+ {
+ break lab1;
+ }
+ break lab0;
+ } while (false);
+ cursor = limit - v_1;
+ // (, line 52
+ if (!(out_grouping_b(g_v, 97, 121)))
+ {
+ return false;
+ }
+ if (!(in_grouping_b(g_v, 97, 121)))
+ {
+ return false;
+ }
+ // atlimit, line 52
+ if (cursor > limit_backward)
+ {
+ return false;
+ }
+ } while (false);
+ return true;
+ }
+
+ private boolean r_R1() {
+ if (!(I_p1 <= cursor))
+ {
+ return false;
+ }
+ return true;
+ }
+
+ private boolean r_R2() {
+ if (!(I_p2 <= cursor))
+ {
+ return false;
+ }
+ return true;
+ }
+
+ private boolean r_Step_1a() {
+ int among_var;
+ int v_1;
+ int v_2;
+ // (, line 58
+ // try, line 59
+ v_1 = limit - cursor;
+ lab0: do {
+ // (, line 59
+ // [, line 60
+ ket = cursor;
+ // substring, line 60
+ among_var = find_among_b(a_1, 3);
+ if (among_var == 0)
+ {
+ cursor = limit - v_1;
+ break lab0;
+ }
+ // ], line 60
+ bra = cursor;
+ switch(among_var) {
+ case 0:
+ cursor = limit - v_1;
+ break lab0;
+ case 1:
+ // (, line 62
+ // delete, line 62
+ slice_del();
+ break;
+ }
+ } while (false);
+ // [, line 65
+ ket = cursor;
+ // substring, line 65
+ among_var = find_among_b(a_2, 6);
+ if (among_var == 0)
+ {
+ return false;
+ }
+ // ], line 65
+ bra = cursor;
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 66
+ // <-, line 66
+ slice_from("ss");
+ break;
+ case 2:
+ // (, line 68
+ // or, line 68
+ lab1: do {
+ v_2 = limit - cursor;
+ lab2: do {
+ // (, line 68
+ // hop, line 68
+ {
+ int c = cursor - 2;
+ if (limit_backward > c || c > limit)
+ {
+ break lab2;
+ }
+ cursor = c;
+ }
+ // <-, line 68
+ slice_from("i");
+ break lab1;
+ } while (false);
+ cursor = limit - v_2;
+ // <-, line 68
+ slice_from("ie");
+ } while (false);
+ break;
+ case 3:
+ // (, line 69
+ // next, line 69
+ if (cursor <= limit_backward)
+ {
+ return false;
+ }
+ cursor--;
+ // gopast, line 69
+ golab3: while(true)
+ {
+ lab4: do {
+ if (!(in_grouping_b(g_v, 97, 121)))
+ {
+ break lab4;
+ }
+ break golab3;
+ } while (false);
+ if (cursor <= limit_backward)
+ {
+ return false;
+ }
+ cursor--;
+ }
+ // delete, line 69
+ slice_del();
+ break;
+ }
+ return true;
+ }
+
+ private boolean r_Step_1b() {
+ int among_var;
+ int v_1;
+ int v_3;
+ int v_4;
+ // (, line 74
+ // [, line 75
+ ket = cursor;
+ // substring, line 75
+ among_var = find_among_b(a_4, 6);
+ if (among_var == 0)
+ {
+ return false;
+ }
+ // ], line 75
+ bra = cursor;
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 77
+ // call R1, line 77
+ if (!r_R1())
+ {
+ return false;
+ }
+ // <-, line 77
+ slice_from("ee");
+ break;
+ case 2:
+ // (, line 79
+ // test, line 80
+ v_1 = limit - cursor;
+ // gopast, line 80
+ golab0: while(true)
+ {
+ lab1: do {
+ if (!(in_grouping_b(g_v, 97, 121)))
+ {
+ break lab1;
+ }
+ break golab0;
+ } while (false);
+ if (cursor <= limit_backward)
+ {
+ return false;
+ }
+ cursor--;
+ }
+ cursor = limit - v_1;
+ // delete, line 80
+ slice_del();
+ // test, line 81
+ v_3 = limit - cursor;
+ // substring, line 81
+ among_var = find_among_b(a_3, 13);
+ if (among_var == 0)
+ {
+ return false;
+ }
+ cursor = limit - v_3;
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 83
+ // <+, line 83
+ {
+ int c = cursor;
+ insert(cursor, cursor, "e");
+ cursor = c;
+ }
+ break;
+ case 2:
+ // (, line 86
+ // [, line 86
+ ket = cursor;
+ // next, line 86
+ if (cursor <= limit_backward)
+ {
+ return false;
+ }
+ cursor--;
+ // ], line 86
+ bra = cursor;
+ // delete, line 86
+ slice_del();
+ break;
+ case 3:
+ // (, line 87
+ // atmark, line 87
+ if (cursor != I_p1)
+ {
+ return false;
+ }
+ // test, line 87
+ v_4 = limit - cursor;
+ // call shortv, line 87
+ if (!r_shortv())
+ {
+ return false;
+ }
+ cursor = limit - v_4;
+ // <+, line 87
+ {
+ int c = cursor;
+ insert(cursor, cursor, "e");
+ cursor = c;
+ }
+ break;
+ }
+ break;
+ }
+ return true;
+ }
+
+ private boolean r_Step_1c() {
+ int v_1;
+ int v_2;
+ // (, line 93
+ // [, line 94
+ ket = cursor;
+ // or, line 94
+ lab0: do {
+ v_1 = limit - cursor;
+ lab1: do {
+ // literal, line 94
+ if (!(eq_s_b(1, "y")))
+ {
+ break lab1;
+ }
+ break lab0;
+ } while (false);
+ cursor = limit - v_1;
+ // literal, line 94
+ if (!(eq_s_b(1, "Y")))
+ {
+ return false;
+ }
+ } while (false);
+ // ], line 94
+ bra = cursor;
+ if (!(out_grouping_b(g_v, 97, 121)))
+ {
+ return false;
+ }
+ // not, line 95
+ {
+ v_2 = limit - cursor;
+ lab2: do {
+ // atlimit, line 95
+ if (cursor > limit_backward)
+ {
+ break lab2;
+ }
+ return false;
+ } while (false);
+ cursor = limit - v_2;
+ }
+ // <-, line 96
+ slice_from("i");
+ return true;
+ }
+
+ private boolean r_Step_2() {
+ int among_var;
+ // (, line 99
+ // [, line 100
+ ket = cursor;
+ // substring, line 100
+ among_var = find_among_b(a_5, 24);
+ if (among_var == 0)
+ {
+ return false;
+ }
+ // ], line 100
+ bra = cursor;
+ // call R1, line 100
+ if (!r_R1())
+ {
+ return false;
+ }
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 101
+ // <-, line 101
+ slice_from("tion");
+ break;
+ case 2:
+ // (, line 102
+ // <-, line 102
+ slice_from("ence");
+ break;
+ case 3:
+ // (, line 103
+ // <-, line 103
+ slice_from("ance");
+ break;
+ case 4:
+ // (, line 104
+ // <-, line 104
+ slice_from("able");
+ break;
+ case 5:
+ // (, line 105
+ // <-, line 105
+ slice_from("ent");
+ break;
+ case 6:
+ // (, line 107
+ // <-, line 107
+ slice_from("ize");
+ break;
+ case 7:
+ // (, line 109
+ // <-, line 109
+ slice_from("ate");
+ break;
+ case 8:
+ // (, line 111
+ // <-, line 111
+ slice_from("al");
+ break;
+ case 9:
+ // (, line 112
+ // <-, line 112
+ slice_from("ful");
+ break;
+ case 10:
+ // (, line 114
+ // <-, line 114
+ slice_from("ous");
+ break;
+ case 11:
+ // (, line 116
+ // <-, line 116
+ slice_from("ive");
+ break;
+ case 12:
+ // (, line 118
+ // <-, line 118
+ slice_from("ble");
+ break;
+ case 13:
+ // (, line 119
+ // literal, line 119
+ if (!(eq_s_b(1, "l")))
+ {
+ return false;
+ }
+ // <-, line 119
+ slice_from("og");
+ break;
+ case 14:
+ // (, line 120
+ // <-, line 120
+ slice_from("ful");
+ break;
+ case 15:
+ // (, line 121
+ // <-, line 121
+ slice_from("less");
+ break;
+ case 16:
+ // (, line 122
+ if (!(in_grouping_b(g_valid_LI, 99, 116)))
+ {
+ return false;
+ }
+ // delete, line 122
+ slice_del();
+ break;
+ }
+ return true;
+ }
+
+ private boolean r_Step_3() {
+ int among_var;
+ // (, line 126
+ // [, line 127
+ ket = cursor;
+ // substring, line 127
+ among_var = find_among_b(a_6, 9);
+ if (among_var == 0)
+ {
+ return false;
+ }
+ // ], line 127
+ bra = cursor;
+ // call R1, line 127
+ if (!r_R1())
+ {
+ return false;
+ }
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 128
+ // <-, line 128
+ slice_from("tion");
+ break;
+ case 2:
+ // (, line 129
+ // <-, line 129
+ slice_from("ate");
+ break;
+ case 3:
+ // (, line 130
+ // <-, line 130
+ slice_from("al");
+ break;
+ case 4:
+ // (, line 132
+ // <-, line 132
+ slice_from("ic");
+ break;
+ case 5:
+ // (, line 134
+ // delete, line 134
+ slice_del();
+ break;
+ case 6:
+ // (, line 136
+ // call R2, line 136
+ if (!r_R2())
+ {
+ return false;
+ }
+ // delete, line 136
+ slice_del();
+ break;
+ }
+ return true;
+ }
+
+ private boolean r_Step_4() {
+ int among_var;
+ int v_1;
+ // (, line 140
+ // [, line 141
+ ket = cursor;
+ // substring, line 141
+ among_var = find_among_b(a_7, 18);
+ if (among_var == 0)
+ {
+ return false;
+ }
+ // ], line 141
+ bra = cursor;
+ // call R2, line 141
+ if (!r_R2())
+ {
+ return false;
+ }
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 144
+ // delete, line 144
+ slice_del();
+ break;
+ case 2:
+ // (, line 145
+ // or, line 145
+ lab0: do {
+ v_1 = limit - cursor;
+ lab1: do {
+ // literal, line 145
+ if (!(eq_s_b(1, "s")))
+ {
+ break lab1;
+ }
+ break lab0;
+ } while (false);
+ cursor = limit - v_1;
+ // literal, line 145
+ if (!(eq_s_b(1, "t")))
+ {
+ return false;
+ }
+ } while (false);
+ // delete, line 145
+ slice_del();
+ break;
+ }
+ return true;
+ }
+
+ private boolean r_Step_5() {
+ int among_var;
+ int v_1;
+ int v_2;
+ // (, line 149
+ // [, line 150
+ ket = cursor;
+ // substring, line 150
+ among_var = find_among_b(a_8, 2);
+ if (among_var == 0)
+ {
+ return false;
+ }
+ // ], line 150
+ bra = cursor;
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 151
+ // or, line 151
+ lab0: do {
+ v_1 = limit - cursor;
+ lab1: do {
+ // call R2, line 151
+ if (!r_R2())
+ {
+ break lab1;
+ }
+ break lab0;
+ } while (false);
+ cursor = limit - v_1;
+ // (, line 151
+ // call R1, line 151
+ if (!r_R1())
+ {
+ return false;
+ }
+ // not, line 151
+ {
+ v_2 = limit - cursor;
+ lab2: do {
+ // call shortv, line 151
+ if (!r_shortv())
+ {
+ break lab2;
+ }
+ return false;
+ } while (false);
+ cursor = limit - v_2;
+ }
+ } while (false);
+ // delete, line 151
+ slice_del();
+ break;
+ case 2:
+ // (, line 152
+ // call R2, line 152
+ if (!r_R2())
+ {
+ return false;
+ }
+ // literal, line 152
+ if (!(eq_s_b(1, "l")))
+ {
+ return false;
+ }
+ // delete, line 152
+ slice_del();
+ break;
+ }
+ return true;
+ }
+
+ private boolean r_exception2() {
+ // (, line 156
+ // [, line 158
+ ket = cursor;
+ // substring, line 158
+ if (find_among_b(a_9, 8) == 0)
+ {
+ return false;
+ }
+ // ], line 158
+ bra = cursor;
+ // atlimit, line 158
+ if (cursor > limit_backward)
+ {
+ return false;
+ }
+ return true;
+ }
+
+ private boolean r_exception1() {
+ int among_var;
+ // (, line 168
+ // [, line 170
+ bra = cursor;
+ // substring, line 170
+ among_var = find_among(a_10, 18);
+ if (among_var == 0)
+ {
+ return false;
+ }
+ // ], line 170
+ ket = cursor;
+ // atlimit, line 170
+ if (cursor < limit)
+ {
+ return false;
+ }
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 174
+ // <-, line 174
+ slice_from("ski");
+ break;
+ case 2:
+ // (, line 175
+ // <-, line 175
+ slice_from("sky");
+ break;
+ case 3:
+ // (, line 176
+ // <-, line 176
+ slice_from("die");
+ break;
+ case 4:
+ // (, line 177
+ // <-, line 177
+ slice_from("lie");
+ break;
+ case 5:
+ // (, line 178
+ // <-, line 178
+ slice_from("tie");
+ break;
+ case 6:
+ // (, line 182
+ // <-, line 182
+ slice_from("idl");
+ break;
+ case 7:
+ // (, line 183
+ // <-, line 183
+ slice_from("gentl");
+ break;
+ case 8:
+ // (, line 184
+ // <-, line 184
+ slice_from("ugli");
+ break;
+ case 9:
+ // (, line 185
+ // <-, line 185
+ slice_from("earli");
+ break;
+ case 10:
+ // (, line 186
+ // <-, line 186
+ slice_from("onli");
+ break;
+ case 11:
+ // (, line 187
+ // <-, line 187
+ slice_from("singl");
+ break;
+ }
+ return true;
+ }
+
+ private boolean r_postlude() {
+ int v_1;
+ int v_2;
+ // (, line 203
+ // Boolean test Y_found, line 203
+ if (!(B_Y_found))
+ {
+ return false;
+ }
+ // repeat, line 203
+ replab0: while(true)
+ {
+ v_1 = cursor;
+ lab1: do {
+ // (, line 203
+ // goto, line 203
+ golab2: while(true)
+ {
+ v_2 = cursor;
+ lab3: do {
+ // (, line 203
+ // [, line 203
+ bra = cursor;
+ // literal, line 203
+ if (!(eq_s(1, "Y")))
+ {
+ break lab3;
+ }
+ // ], line 203
+ ket = cursor;
+ cursor = v_2;
+ break golab2;
+ } while (false);
+ cursor = v_2;
+ if (cursor >= limit)
+ {
+ break lab1;
+ }
+ cursor++;
+ }
+ // <-, line 203
+ slice_from("y");
+ continue replab0;
+ } while (false);
+ cursor = v_1;
+ break replab0;
+ }
+ return true;
+ }
+
+ public boolean stem() {
+ int v_1;
+ int v_2;
+ int v_3;
+ int v_4;
+ int v_5;
+ int v_6;
+ int v_7;
+ int v_8;
+ int v_9;
+ int v_10;
+ int v_11;
+ int v_12;
+ int v_13;
+ // (, line 205
+ // or, line 207
+ lab0: do {
+ v_1 = cursor;
+ lab1: do {
+ // call exception1, line 207
+ if (!r_exception1())
+ {
+ break lab1;
+ }
+ break lab0;
+ } while (false);
+ cursor = v_1;
+ lab2: do {
+ // not, line 208
+ {
+ v_2 = cursor;
+ lab3: do {
+ // hop, line 208
+ {
+ int c = cursor + 3;
+ if (0 > c || c > limit)
+ {
+ break lab3;
+ }
+ cursor = c;
+ }
+ break lab2;
+ } while (false);
+ cursor = v_2;
+ }
+ break lab0;
+ } while (false);
+ cursor = v_1;
+ // (, line 208
+ // do, line 209
+ v_3 = cursor;
+ lab4: do {
+ // call prelude, line 209
+ if (!r_prelude())
+ {
+ break lab4;
+ }
+ } while (false);
+ cursor = v_3;
+ // do, line 210
+ v_4 = cursor;
+ lab5: do {
+ // call mark_regions, line 210
+ if (!r_mark_regions())
+ {
+ break lab5;
+ }
+ } while (false);
+ cursor = v_4;
+ // backwards, line 211
+ limit_backward = cursor; cursor = limit;
+ // (, line 211
+ // do, line 213
+ v_5 = limit - cursor;
+ lab6: do {
+ // call Step_1a, line 213
+ if (!r_Step_1a())
+ {
+ break lab6;
+ }
+ } while (false);
+ cursor = limit - v_5;
+ // or, line 215
+ lab7: do {
+ v_6 = limit - cursor;
+ lab8: do {
+ // call exception2, line 215
+ if (!r_exception2())
+ {
+ break lab8;
+ }
+ break lab7;
+ } while (false);
+ cursor = limit - v_6;
+ // (, line 215
+ // do, line 217
+ v_7 = limit - cursor;
+ lab9: do {
+ // call Step_1b, line 217
+ if (!r_Step_1b())
+ {
+ break lab9;
+ }
+ } while (false);
+ cursor = limit - v_7;
+ // do, line 218
+ v_8 = limit - cursor;
+ lab10: do {
+ // call Step_1c, line 218
+ if (!r_Step_1c())
+ {
+ break lab10;
+ }
+ } while (false);
+ cursor = limit - v_8;
+ // do, line 220
+ v_9 = limit - cursor;
+ lab11: do {
+ // call Step_2, line 220
+ if (!r_Step_2())
+ {
+ break lab11;
+ }
+ } while (false);
+ cursor = limit - v_9;
+ // do, line 221
+ v_10 = limit - cursor;
+ lab12: do {
+ // call Step_3, line 221
+ if (!r_Step_3())
+ {
+ break lab12;
+ }
+ } while (false);
+ cursor = limit - v_10;
+ // do, line 222
+ v_11 = limit - cursor;
+ lab13: do {
+ // call Step_4, line 222
+ if (!r_Step_4())
+ {
+ break lab13;
+ }
+ } while (false);
+ cursor = limit - v_11;
+ // do, line 224
+ v_12 = limit - cursor;
+ lab14: do {
+ // call Step_5, line 224
+ if (!r_Step_5())
+ {
+ break lab14;
+ }
+ } while (false);
+ cursor = limit - v_12;
+ } while (false);
+ cursor = limit_backward; // do, line 227
+ v_13 = cursor;
+ lab15: do {
+ // call postlude, line 227
+ if (!r_postlude())
+ {
+ break lab15;
+ }
+ } while (false);
+ cursor = v_13;
+ } while (false);
+ return true;
+ }
+
+}
+
Added: incubator/uima/sandbox/trunk/SnowballAnnotator/src/main/java/org/tartarus/snowball/ext/finnishStemmer.java
URL: http://svn.apache.org/viewvc/incubator/uima/sandbox/trunk/SnowballAnnotator/src/main/java/org/tartarus/snowball/ext/finnishStemmer.java?view=auto&rev=492573
==============================================================================
--- incubator/uima/sandbox/trunk/SnowballAnnotator/src/main/java/org/tartarus/snowball/ext/finnishStemmer.java (added)
+++ incubator/uima/sandbox/trunk/SnowballAnnotator/src/main/java/org/tartarus/snowball/ext/finnishStemmer.java Thu Jan 4 06:09:14 2007
@@ -0,0 +1,1034 @@
+// This file was generated automatically by the Snowball to Java compiler
+
+package org.tartarus.snowball.ext;
+import org.tartarus.snowball.SnowballProgram;
+import org.tartarus.snowball.Among;
+
+/**
+ * Generated class implementing code defined by a snowball script.
+ */
+public class finnishStemmer extends SnowballProgram {
+
+ private Among a_0[] = {
+ new Among ( "pa", -1, 1, "", this),
+ new Among ( "sti", -1, 2, "", this),
+ new Among ( "kaan", -1, 1, "", this),
+ new Among ( "han", -1, 1, "", this),
+ new Among ( "kin", -1, 1, "", this),
+ new Among ( "h\u00E4n", -1, 1, "", this),
+ new Among ( "k\u00E4\u00E4n", -1, 1, "", this),
+ new Among ( "ko", -1, 1, "", this),
+ new Among ( "p\u00E4", -1, 1, "", this),
+ new Among ( "k\u00F6", -1, 1, "", this)
+ };
+
+ private Among a_1[] = {
+ new Among ( "lla", -1, -1, "", this),
+ new Among ( "na", -1, -1, "", this),
+ new Among ( "ssa", -1, -1, "", this),
+ new Among ( "ta", -1, -1, "", this),
+ new Among ( "lta", 3, -1, "", this),
+ new Among ( "sta", 3, -1, "", this)
+ };
+
+ private Among a_2[] = {
+ new Among ( "ll\u00E4", -1, -1, "", this),
+ new Among ( "n\u00E4", -1, -1, "", this),
+ new Among ( "ss\u00E4", -1, -1, "", this),
+ new Among ( "t\u00E4", -1, -1, "", this),
+ new Among ( "lt\u00E4", 3, -1, "", this),
+ new Among ( "st\u00E4", 3, -1, "", this)
+ };
+
+ private Among a_3[] = {
+ new Among ( "lle", -1, -1, "", this),
+ new Among ( "ine", -1, -1, "", this)
+ };
+
+ private Among a_4[] = {
+ new Among ( "nsa", -1, 3, "", this),
+ new Among ( "mme", -1, 3, "", this),
+ new Among ( "nne", -1, 3, "", this),
+ new Among ( "ni", -1, 2, "", this),
+ new Among ( "si", -1, 1, "", this),
+ new Among ( "an", -1, 4, "", this),
+ new Among ( "en", -1, 6, "", this),
+ new Among ( "\u00E4n", -1, 5, "", this),
+ new Among ( "ns\u00E4", -1, 3, "", this)
+ };
+
+ private Among a_5[] = {
+ new Among ( "aa", -1, -1, "", this),
+ new Among ( "ee", -1, -1, "", this),
+ new Among ( "ii", -1, -1, "", this),
+ new Among ( "oo", -1, -1, "", this),
+ new Among ( "uu", -1, -1, "", this),
+ new Among ( "\u00E4\u00E4", -1, -1, "", this),
+ new Among ( "\u00F6\u00F6", -1, -1, "", this)
+ };
+
+ private Among a_6[] = {
+ new Among ( "a", -1, 8, "", this),
+ new Among ( "lla", 0, -1, "", this),
+ new Among ( "na", 0, -1, "", this),
+ new Among ( "ssa", 0, -1, "", this),
+ new Among ( "ta", 0, -1, "", this),
+ new Among ( "lta", 4, -1, "", this),
+ new Among ( "sta", 4, -1, "", this),
+ new Among ( "tta", 4, 9, "", this),
+ new Among ( "lle", -1, -1, "", this),
+ new Among ( "ine", -1, -1, "", this),
+ new Among ( "ksi", -1, -1, "", this),
+ new Among ( "n", -1, 7, "", this),
+ new Among ( "han", 11, 1, "", this),
+ new Among ( "den", 11, -1, "r_VI", this),
+ new Among ( "seen", 11, -1, "r_LONG", this),
+ new Among ( "hen", 11, 2, "", this),
+ new Among ( "tten", 11, -1, "r_VI", this),
+ new Among ( "hin", 11, 3, "", this),
+ new Among ( "siin", 11, -1, "r_VI", this),
+ new Among ( "hon", 11, 4, "", this),
+ new Among ( "h\u00E4n", 11, 5, "", this),
+ new Among ( "h\u00F6n", 11, 6, "", this),
+ new Among ( "\u00E4", -1, 8, "", this),
+ new Among ( "ll\u00E4", 22, -1, "", this),
+ new Among ( "n\u00E4", 22, -1, "", this),
+ new Among ( "ss\u00E4", 22, -1, "", this),
+ new Among ( "t\u00E4", 22, -1, "", this),
+ new Among ( "lt\u00E4", 26, -1, "", this),
+ new Among ( "st\u00E4", 26, -1, "", this),
+ new Among ( "tt\u00E4", 26, 9, "", this)
+ };
+
+ private Among a_7[] = {
+ new Among ( "eja", -1, -1, "", this),
+ new Among ( "mma", -1, 1, "", this),
+ new Among ( "imma", 1, -1, "", this),
+ new Among ( "mpa", -1, 1, "", this),
+ new Among ( "impa", 3, -1, "", this),
+ new Among ( "mmi", -1, 1, "", this),
+ new Among ( "immi", 5, -1, "", this),
+ new Among ( "mpi", -1, 1, "", this),
+ new Among ( "impi", 7, -1, "", this),
+ new Among ( "ej\u00E4", -1, -1, "", this),
+ new Among ( "mm\u00E4", -1, 1, "", this),
+ new Among ( "imm\u00E4", 10, -1, "", this),
+ new Among ( "mp\u00E4", -1, 1, "", this),
+ new Among ( "imp\u00E4", 12, -1, "", this)
+ };
+
+ private Among a_8[] = {
+ new Among ( "i", -1, -1, "", this),
+ new Among ( "j", -1, -1, "", this)
+ };
+
+ private Among a_9[] = {
+ new Among ( "mma", -1, 1, "", this),
+ new Among ( "imma", 0, -1, "", this)
+ };
+
+ private static final char g_AEI[] = {17, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8 };
+
+ private static final char g_V1[] = {17, 65, 16, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 0, 32 };
+
+ private static final char g_V2[] = {17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 0, 32 };
+
+ private static final char g_particle_end[] = {17, 97, 24, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 8, 0, 32 };
+
+ private boolean B_ending_removed;
+ private StringBuffer S_x = new StringBuffer();
+ private int I_p2;
+ private int I_p1;
+
+ private void copy_from(finnishStemmer other) {
+ B_ending_removed = other.B_ending_removed;
+ S_x = other.S_x;
+ I_p2 = other.I_p2;
+ I_p1 = other.I_p1;
+ super.copy_from(other);
+ }
+
+ private boolean r_mark_regions() {
+ int v_1;
+ int v_3;
+ // (, line 41
+ I_p1 = limit;
+ I_p2 = limit;
+ // goto, line 46
+ golab0: while(true)
+ {
+ v_1 = cursor;
+ lab1: do {
+ if (!(in_grouping(g_V1, 97, 246)))
+ {
+ break lab1;
+ }
+ cursor = v_1;
+ break golab0;
+ } while (false);
+ cursor = v_1;
+ if (cursor >= limit)
+ {
+ return false;
+ }
+ cursor++;
+ }
+ // gopast, line 46
+ golab2: while(true)
+ {
+ lab3: do {
+ if (!(out_grouping(g_V1, 97, 246)))
+ {
+ break lab3;
+ }
+ break golab2;
+ } while (false);
+ if (cursor >= limit)
+ {
+ return false;
+ }
+ cursor++;
+ }
+ // setmark p1, line 46
+ I_p1 = cursor;
+ // goto, line 47
+ golab4: while(true)
+ {
+ v_3 = cursor;
+ lab5: do {
+ if (!(in_grouping(g_V1, 97, 246)))
+ {
+ break lab5;
+ }
+ cursor = v_3;
+ break golab4;
+ } while (false);
+ cursor = v_3;
+ if (cursor >= limit)
+ {
+ return false;
+ }
+ cursor++;
+ }
+ // gopast, line 47
+ golab6: while(true)
+ {
+ lab7: do {
+ if (!(out_grouping(g_V1, 97, 246)))
+ {
+ break lab7;
+ }
+ break golab6;
+ } while (false);
+ if (cursor >= limit)
+ {
+ return false;
+ }
+ cursor++;
+ }
+ // setmark p2, line 47
+ I_p2 = cursor;
+ return true;
+ }
+
+ private boolean r_R2() {
+ if (!(I_p2 <= cursor))
+ {
+ return false;
+ }
+ return true;
+ }
+
+ private boolean r_particle_etc() {
+ int among_var;
+ int v_1;
+ int v_2;
+ // (, line 54
+ // setlimit, line 55
+ v_1 = limit - cursor;
+ // tomark, line 55
+ if (cursor < I_p1)
+ {
+ return false;
+ }
+ cursor = I_p1;
+ v_2 = limit_backward;
+ limit_backward = cursor;
+ cursor = limit - v_1;
+ // (, line 55
+ // [, line 55
+ ket = cursor;
+ // substring, line 55
+ among_var = find_among_b(a_0, 10);
+ if (among_var == 0)
+ {
+ limit_backward = v_2;
+ return false;
+ }
+ // ], line 55
+ bra = cursor;
+ limit_backward = v_2;
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 62
+ if (!(in_grouping_b(g_particle_end, 97, 246)))
+ {
+ return false;
+ }
+ break;
+ case 2:
+ // (, line 64
+ // call R2, line 64
+ if (!r_R2())
+ {
+ return false;
+ }
+ break;
+ }
+ // delete, line 66
+ slice_del();
+ return true;
+ }
+
+ private boolean r_possessive() {
+ int among_var;
+ int v_1;
+ int v_2;
+ int v_3;
+ // (, line 68
+ // setlimit, line 69
+ v_1 = limit - cursor;
+ // tomark, line 69
+ if (cursor < I_p1)
+ {
+ return false;
+ }
+ cursor = I_p1;
+ v_2 = limit_backward;
+ limit_backward = cursor;
+ cursor = limit - v_1;
+ // (, line 69
+ // [, line 69
+ ket = cursor;
+ // substring, line 69
+ among_var = find_among_b(a_4, 9);
+ if (among_var == 0)
+ {
+ limit_backward = v_2;
+ return false;
+ }
+ // ], line 69
+ bra = cursor;
+ limit_backward = v_2;
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 72
+ // not, line 72
+ {
+ v_3 = limit - cursor;
+ lab0: do {
+ // literal, line 72
+ if (!(eq_s_b(1, "k")))
+ {
+ break lab0;
+ }
+ return false;
+ } while (false);
+ cursor = limit - v_3;
+ }
+ // delete, line 72
+ slice_del();
+ break;
+ case 2:
+ // (, line 74
+ // delete, line 74
+ slice_del();
+ // [, line 74
+ ket = cursor;
+ // literal, line 74
+ if (!(eq_s_b(3, "kse")))
+ {
+ return false;
+ }
+ // ], line 74
+ bra = cursor;
+ // <-, line 74
+ slice_from("ksi");
+ break;
+ case 3:
+ // (, line 78
+ // delete, line 78
+ slice_del();
+ break;
+ case 4:
+ // (, line 81
+ // among, line 81
+ if (find_among_b(a_1, 6) == 0)
+ {
+ return false;
+ }
+ // delete, line 81
+ slice_del();
+ break;
+ case 5:
+ // (, line 83
+ // among, line 83
+ if (find_among_b(a_2, 6) == 0)
+ {
+ return false;
+ }
+ // delete, line 84
+ slice_del();
+ break;
+ case 6:
+ // (, line 86
+ // among, line 86
+ if (find_among_b(a_3, 2) == 0)
+ {
+ return false;
+ }
+ // delete, line 86
+ slice_del();
+ break;
+ }
+ return true;
+ }
+
+ private boolean r_LONG() {
+ // among, line 91
+ if (find_among_b(a_5, 7) == 0)
+ {
+ return false;
+ }
+ return true;
+ }
+
+ private boolean r_VI() {
+ // (, line 93
+ // literal, line 93
+ if (!(eq_s_b(1, "i")))
+ {
+ return false;
+ }
+ if (!(in_grouping_b(g_V2, 97, 246)))
+ {
+ return false;
+ }
+ return true;
+ }
+
+ private boolean r_case_ending() {
+ int among_var;
+ int v_1;
+ int v_2;
+ int v_3;
+ int v_4;
+ int v_5;
+ // (, line 95
+ // setlimit, line 96
+ v_1 = limit - cursor;
+ // tomark, line 96
+ if (cursor < I_p1)
+ {
+ return false;
+ }
+ cursor = I_p1;
+ v_2 = limit_backward;
+ limit_backward = cursor;
+ cursor = limit - v_1;
+ // (, line 96
+ // [, line 96
+ ket = cursor;
+ // substring, line 96
+ among_var = find_among_b(a_6, 30);
+ if (among_var == 0)
+ {
+ limit_backward = v_2;
+ return false;
+ }
+ // ], line 96
+ bra = cursor;
+ limit_backward = v_2;
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 98
+ // literal, line 98
+ if (!(eq_s_b(1, "a")))
+ {
+ return false;
+ }
+ break;
+ case 2:
+ // (, line 99
+ // literal, line 99
+ if (!(eq_s_b(1, "e")))
+ {
+ return false;
+ }
+ break;
+ case 3:
+ // (, line 100
+ // literal, line 100
+ if (!(eq_s_b(1, "i")))
+ {
+ return false;
+ }
+ break;
+ case 4:
+ // (, line 101
+ // literal, line 101
+ if (!(eq_s_b(1, "o")))
+ {
+ return false;
+ }
+ break;
+ case 5:
+ // (, line 102
+ // literal, line 102
+ if (!(eq_s_b(1, "\u00E4")))
+ {
+ return false;
+ }
+ break;
+ case 6:
+ // (, line 103
+ // literal, line 103
+ if (!(eq_s_b(1, "\u00F6")))
+ {
+ return false;
+ }
+ break;
+ case 7:
+ // (, line 111
+ // try, line 111
+ v_3 = limit - cursor;
+ lab0: do {
+ // (, line 111
+ // and, line 113
+ v_4 = limit - cursor;
+ // or, line 112
+ lab1: do {
+ v_5 = limit - cursor;
+ lab2: do {
+ // call LONG, line 111
+ if (!r_LONG())
+ {
+ break lab2;
+ }
+ break lab1;
+ } while (false);
+ cursor = limit - v_5;
+ // literal, line 112
+ if (!(eq_s_b(2, "ie")))
+ {
+ cursor = limit - v_3;
+ break lab0;
+ }
+ } while (false);
+ cursor = limit - v_4;
+ // next, line 113
+ if (cursor <= limit_backward)
+ {
+ cursor = limit - v_3;
+ break lab0;
+ }
+ cursor--;
+ // ], line 113
+ bra = cursor;
+ } while (false);
+ break;
+ case 8:
+ // (, line 119
+ if (!(in_grouping_b(g_V1, 97, 246)))
+ {
+ return false;
+ }
+ if (!(out_grouping_b(g_V1, 97, 246)))
+ {
+ return false;
+ }
+ break;
+ case 9:
+ // (, line 121
+ // literal, line 121
+ if (!(eq_s_b(1, "e")))
+ {
+ return false;
+ }
+ break;
+ }
+ // delete, line 138
+ slice_del();
+ // set ending_removed, line 139
+ B_ending_removed = true;
+ return true;
+ }
+
+ private boolean r_other_endings() {
+ int among_var;
+ int v_1;
+ int v_2;
+ int v_3;
+ // (, line 141
+ // setlimit, line 142
+ v_1 = limit - cursor;
+ // tomark, line 142
+ if (cursor < I_p2)
+ {
+ return false;
+ }
+ cursor = I_p2;
+ v_2 = limit_backward;
+ limit_backward = cursor;
+ cursor = limit - v_1;
+ // (, line 142
+ // [, line 142
+ ket = cursor;
+ // substring, line 142
+ among_var = find_among_b(a_7, 14);
+ if (among_var == 0)
+ {
+ limit_backward = v_2;
+ return false;
+ }
+ // ], line 142
+ bra = cursor;
+ limit_backward = v_2;
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 146
+ // not, line 146
+ {
+ v_3 = limit - cursor;
+ lab0: do {
+ // literal, line 146
+ if (!(eq_s_b(2, "po")))
+ {
+ break lab0;
+ }
+ return false;
+ } while (false);
+ cursor = limit - v_3;
+ }
+ break;
+ }
+ // delete, line 151
+ slice_del();
+ return true;
+ }
+
+ private boolean r_i_plural() {
+ int v_1;
+ int v_2;
+ // (, line 153
+ // setlimit, line 154
+ v_1 = limit - cursor;
+ // tomark, line 154
+ if (cursor < I_p1)
+ {
+ return false;
+ }
+ cursor = I_p1;
+ v_2 = limit_backward;
+ limit_backward = cursor;
+ cursor = limit - v_1;
+ // (, line 154
+ // [, line 154
+ ket = cursor;
+ // substring, line 154
+ if (find_among_b(a_8, 2) == 0)
+ {
+ limit_backward = v_2;
+ return false;
+ }
+ // ], line 154
+ bra = cursor;
+ limit_backward = v_2;
+ // delete, line 158
+ slice_del();
+ return true;
+ }
+
+ private boolean r_t_plural() {
+ int among_var;
+ int v_1;
+ int v_2;
+ int v_3;
+ int v_4;
+ int v_5;
+ int v_6;
+ // (, line 160
+ // setlimit, line 161
+ v_1 = limit - cursor;
+ // tomark, line 161
+ if (cursor < I_p1)
+ {
+ return false;
+ }
+ cursor = I_p1;
+ v_2 = limit_backward;
+ limit_backward = cursor;
+ cursor = limit - v_1;
+ // (, line 161
+ // [, line 162
+ ket = cursor;
+ // literal, line 162
+ if (!(eq_s_b(1, "t")))
+ {
+ limit_backward = v_2;
+ return false;
+ }
+ // ], line 162
+ bra = cursor;
+ // test, line 162
+ v_3 = limit - cursor;
+ if (!(in_grouping_b(g_V1, 97, 246)))
+ {
+ limit_backward = v_2;
+ return false;
+ }
+ cursor = limit - v_3;
+ // delete, line 163
+ slice_del();
+ limit_backward = v_2;
+ // setlimit, line 165
+ v_4 = limit - cursor;
+ // tomark, line 165
+ if (cursor < I_p2)
+ {
+ return false;
+ }
+ cursor = I_p2;
+ v_5 = limit_backward;
+ limit_backward = cursor;
+ cursor = limit - v_4;
+ // (, line 165
+ // [, line 165
+ ket = cursor;
+ // substring, line 165
+ among_var = find_among_b(a_9, 2);
+ if (among_var == 0)
+ {
+ limit_backward = v_5;
+ return false;
+ }
+ // ], line 165
+ bra = cursor;
+ limit_backward = v_5;
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 167
+ // not, line 167
+ {
+ v_6 = limit - cursor;
+ lab0: do {
+ // literal, line 167
+ if (!(eq_s_b(2, "po")))
+ {
+ break lab0;
+ }
+ return false;
+ } while (false);
+ cursor = limit - v_6;
+ }
+ break;
+ }
+ // delete, line 170
+ slice_del();
+ return true;
+ }
+
+ private boolean r_tidy() {
+ int v_1;
+ int v_2;
+ int v_3;
+ int v_4;
+ int v_5;
+ int v_6;
+ int v_7;
+ int v_8;
+ int v_9;
+ // (, line 172
+ // setlimit, line 173
+ v_1 = limit - cursor;
+ // tomark, line 173
+ if (cursor < I_p1)
+ {
+ return false;
+ }
+ cursor = I_p1;
+ v_2 = limit_backward;
+ limit_backward = cursor;
+ cursor = limit - v_1;
+ // (, line 173
+ // do, line 174
+ v_3 = limit - cursor;
+ lab0: do {
+ // (, line 174
+ // and, line 174
+ v_4 = limit - cursor;
+ // call LONG, line 174
+ if (!r_LONG())
+ {
+ break lab0;
+ }
+ cursor = limit - v_4;
+ // (, line 174
+ // [, line 174
+ ket = cursor;
+ // next, line 174
+ if (cursor <= limit_backward)
+ {
+ break lab0;
+ }
+ cursor--;
+ // ], line 174
+ bra = cursor;
+ // delete, line 174
+ slice_del();
+ } while (false);
+ cursor = limit - v_3;
+ // do, line 175
+ v_5 = limit - cursor;
+ lab1: do {
+ // (, line 175
+ // [, line 175
+ ket = cursor;
+ if (!(in_grouping_b(g_AEI, 97, 228)))
+ {
+ break lab1;
+ }
+ // ], line 175
+ bra = cursor;
+ if (!(out_grouping_b(g_V1, 97, 246)))
+ {
+ break lab1;
+ }
+ // delete, line 175
+ slice_del();
+ } while (false);
+ cursor = limit - v_5;
+ // do, line 176
+ v_6 = limit - cursor;
+ lab2: do {
+ // (, line 176
+ // [, line 176
+ ket = cursor;
+ // literal, line 176
+ if (!(eq_s_b(1, "j")))
+ {
+ break lab2;
+ }
+ // ], line 176
+ bra = cursor;
+ // or, line 176
+ lab3: do {
+ v_7 = limit - cursor;
+ lab4: do {
+ // literal, line 176
+ if (!(eq_s_b(1, "o")))
+ {
+ break lab4;
+ }
+ break lab3;
+ } while (false);
+ cursor = limit - v_7;
+ // literal, line 176
+ if (!(eq_s_b(1, "u")))
+ {
+ break lab2;
+ }
+ } while (false);
+ // delete, line 176
+ slice_del();
+ } while (false);
+ cursor = limit - v_6;
+ // do, line 177
+ v_8 = limit - cursor;
+ lab5: do {
+ // (, line 177
+ // [, line 177
+ ket = cursor;
+ // literal, line 177
+ if (!(eq_s_b(1, "o")))
+ {
+ break lab5;
+ }
+ // ], line 177
+ bra = cursor;
+ // literal, line 177
+ if (!(eq_s_b(1, "j")))
+ {
+ break lab5;
+ }
+ // delete, line 177
+ slice_del();
+ } while (false);
+ cursor = limit - v_8;
+ limit_backward = v_2;
+ // goto, line 179
+ golab6: while(true)
+ {
+ v_9 = limit - cursor;
+ lab7: do {
+ if (!(out_grouping_b(g_V1, 97, 246)))
+ {
+ break lab7;
+ }
+ cursor = limit - v_9;
+ break golab6;
+ } while (false);
+ cursor = limit - v_9;
+ if (cursor <= limit_backward)
+ {
+ return false;
+ }
+ cursor--;
+ }
+ // [, line 179
+ ket = cursor;
+ // next, line 179
+ if (cursor <= limit_backward)
+ {
+ return false;
+ }
+ cursor--;
+ // ], line 179
+ bra = cursor;
+ // -> x, line 179
+ S_x = slice_to(S_x);
+ // name x, line 179
+ if (!(eq_v_b(S_x)))
+ {
+ return false;
+ }
+ // delete, line 179
+ slice_del();
+ return true;
+ }
+
+ public boolean stem() {
+ int v_1;
+ int v_2;
+ int v_3;
+ int v_4;
+ int v_5;
+ int v_6;
+ int v_7;
+ int v_8;
+ int v_9;
+ // (, line 183
+ // do, line 185
+ v_1 = cursor;
+ lab0: do {
+ // call mark_regions, line 185
+ if (!r_mark_regions())
+ {
+ break lab0;
+ }
+ } while (false);
+ cursor = v_1;
+ // unset ending_removed, line 186
+ B_ending_removed = false;
+ // backwards, line 187
+ limit_backward = cursor; cursor = limit;
+ // (, line 187
+ // do, line 188
+ v_2 = limit - cursor;
+ lab1: do {
+ // call particle_etc, line 188
+ if (!r_particle_etc())
+ {
+ break lab1;
+ }
+ } while (false);
+ cursor = limit - v_2;
+ // do, line 189
+ v_3 = limit - cursor;
+ lab2: do {
+ // call possessive, line 189
+ if (!r_possessive())
+ {
+ break lab2;
+ }
+ } while (false);
+ cursor = limit - v_3;
+ // do, line 190
+ v_4 = limit - cursor;
+ lab3: do {
+ // call case_ending, line 190
+ if (!r_case_ending())
+ {
+ break lab3;
+ }
+ } while (false);
+ cursor = limit - v_4;
+ // do, line 191
+ v_5 = limit - cursor;
+ lab4: do {
+ // call other_endings, line 191
+ if (!r_other_endings())
+ {
+ break lab4;
+ }
+ } while (false);
+ cursor = limit - v_5;
+ // or, line 192
+ lab5: do {
+ v_6 = limit - cursor;
+ lab6: do {
+ // (, line 192
+ // Boolean test ending_removed, line 192
+ if (!(B_ending_removed))
+ {
+ break lab6;
+ }
+ // do, line 192
+ v_7 = limit - cursor;
+ lab7: do {
+ // call i_plural, line 192
+ if (!r_i_plural())
+ {
+ break lab7;
+ }
+ } while (false);
+ cursor = limit - v_7;
+ break lab5;
+ } while (false);
+ cursor = limit - v_6;
+ // do, line 192
+ v_8 = limit - cursor;
+ lab8: do {
+ // call t_plural, line 192
+ if (!r_t_plural())
+ {
+ break lab8;
+ }
+ } while (false);
+ cursor = limit - v_8;
+ } while (false);
+ // do, line 193
+ v_9 = limit - cursor;
+ lab9: do {
+ // call tidy, line 193
+ if (!r_tidy())
+ {
+ break lab9;
+ }
+ } while (false);
+ cursor = limit - v_9;
+ cursor = limit_backward; return true;
+ }
+
+}
+