pylucene 3.5.0-3
[pylucene.git] / lucene-java-3.5.0 / lucene / contrib / analyzers / common / src / java / org / tartarus / snowball / ext / PortugueseStemmer.java
diff --git a/lucene-java-3.5.0/lucene/contrib/analyzers/common/src/java/org/tartarus/snowball/ext/PortugueseStemmer.java b/lucene-java-3.5.0/lucene/contrib/analyzers/common/src/java/org/tartarus/snowball/ext/PortugueseStemmer.java
new file mode 100644 (file)
index 0000000..cbd20d6
--- /dev/null
@@ -0,0 +1,1116 @@
+// 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 PortugueseStemmer extends SnowballProgram {
+
+        private Among a_0[] = {
+            new Among ( "", -1, 3, "", this),
+            new Among ( "\u00E3", 0, 1, "", this),
+            new Among ( "\u00F5", 0, 2, "", this)
+        };
+
+        private Among a_1[] = {
+            new Among ( "", -1, 3, "", this),
+            new Among ( "a~", 0, 1, "", this),
+            new Among ( "o~", 0, 2, "", this)
+        };
+
+        private Among a_2[] = {
+            new Among ( "ic", -1, -1, "", this),
+            new Among ( "ad", -1, -1, "", this),
+            new Among ( "os", -1, -1, "", this),
+            new Among ( "iv", -1, 1, "", this)
+        };
+
+        private Among a_3[] = {
+            new Among ( "ante", -1, 1, "", this),
+            new Among ( "avel", -1, 1, "", this),
+            new Among ( "\u00EDvel", -1, 1, "", this)
+        };
+
+        private Among a_4[] = {
+            new Among ( "ic", -1, 1, "", this),
+            new Among ( "abil", -1, 1, "", this),
+            new Among ( "iv", -1, 1, "", this)
+        };
+
+        private Among a_5[] = {
+            new Among ( "ica", -1, 1, "", this),
+            new Among ( "\u00E2ncia", -1, 1, "", this),
+            new Among ( "\u00EAncia", -1, 4, "", this),
+            new Among ( "ira", -1, 9, "", this),
+            new Among ( "adora", -1, 1, "", this),
+            new Among ( "osa", -1, 1, "", this),
+            new Among ( "ista", -1, 1, "", this),
+            new Among ( "iva", -1, 8, "", this),
+            new Among ( "eza", -1, 1, "", this),
+            new Among ( "log\u00EDa", -1, 2, "", this),
+            new Among ( "idade", -1, 7, "", this),
+            new Among ( "ante", -1, 1, "", this),
+            new Among ( "mente", -1, 6, "", this),
+            new Among ( "amente", 12, 5, "", this),
+            new Among ( "\u00E1vel", -1, 1, "", this),
+            new Among ( "\u00EDvel", -1, 1, "", this),
+            new Among ( "uci\u00F3n", -1, 3, "", this),
+            new Among ( "ico", -1, 1, "", this),
+            new Among ( "ismo", -1, 1, "", this),
+            new Among ( "oso", -1, 1, "", this),
+            new Among ( "amento", -1, 1, "", this),
+            new Among ( "imento", -1, 1, "", this),
+            new Among ( "ivo", -1, 8, "", this),
+            new Among ( "a\u00E7a~o", -1, 1, "", this),
+            new Among ( "ador", -1, 1, "", this),
+            new Among ( "icas", -1, 1, "", this),
+            new Among ( "\u00EAncias", -1, 4, "", this),
+            new Among ( "iras", -1, 9, "", this),
+            new Among ( "adoras", -1, 1, "", this),
+            new Among ( "osas", -1, 1, "", this),
+            new Among ( "istas", -1, 1, "", this),
+            new Among ( "ivas", -1, 8, "", this),
+            new Among ( "ezas", -1, 1, "", this),
+            new Among ( "log\u00EDas", -1, 2, "", this),
+            new Among ( "idades", -1, 7, "", this),
+            new Among ( "uciones", -1, 3, "", this),
+            new Among ( "adores", -1, 1, "", this),
+            new Among ( "antes", -1, 1, "", this),
+            new Among ( "a\u00E7o~es", -1, 1, "", this),
+            new Among ( "icos", -1, 1, "", this),
+            new Among ( "ismos", -1, 1, "", this),
+            new Among ( "osos", -1, 1, "", this),
+            new Among ( "amentos", -1, 1, "", this),
+            new Among ( "imentos", -1, 1, "", this),
+            new Among ( "ivos", -1, 8, "", this)
+        };
+
+        private Among a_6[] = {
+            new Among ( "ada", -1, 1, "", this),
+            new Among ( "ida", -1, 1, "", this),
+            new Among ( "ia", -1, 1, "", this),
+            new Among ( "aria", 2, 1, "", this),
+            new Among ( "eria", 2, 1, "", this),
+            new Among ( "iria", 2, 1, "", this),
+            new Among ( "ara", -1, 1, "", this),
+            new Among ( "era", -1, 1, "", this),
+            new Among ( "ira", -1, 1, "", this),
+            new Among ( "ava", -1, 1, "", this),
+            new Among ( "asse", -1, 1, "", this),
+            new Among ( "esse", -1, 1, "", this),
+            new Among ( "isse", -1, 1, "", this),
+            new Among ( "aste", -1, 1, "", this),
+            new Among ( "este", -1, 1, "", this),
+            new Among ( "iste", -1, 1, "", this),
+            new Among ( "ei", -1, 1, "", this),
+            new Among ( "arei", 16, 1, "", this),
+            new Among ( "erei", 16, 1, "", this),
+            new Among ( "irei", 16, 1, "", this),
+            new Among ( "am", -1, 1, "", this),
+            new Among ( "iam", 20, 1, "", this),
+            new Among ( "ariam", 21, 1, "", this),
+            new Among ( "eriam", 21, 1, "", this),
+            new Among ( "iriam", 21, 1, "", this),
+            new Among ( "aram", 20, 1, "", this),
+            new Among ( "eram", 20, 1, "", this),
+            new Among ( "iram", 20, 1, "", this),
+            new Among ( "avam", 20, 1, "", this),
+            new Among ( "em", -1, 1, "", this),
+            new Among ( "arem", 29, 1, "", this),
+            new Among ( "erem", 29, 1, "", this),
+            new Among ( "irem", 29, 1, "", this),
+            new Among ( "assem", 29, 1, "", this),
+            new Among ( "essem", 29, 1, "", this),
+            new Among ( "issem", 29, 1, "", this),
+            new Among ( "ado", -1, 1, "", this),
+            new Among ( "ido", -1, 1, "", this),
+            new Among ( "ando", -1, 1, "", this),
+            new Among ( "endo", -1, 1, "", this),
+            new Among ( "indo", -1, 1, "", this),
+            new Among ( "ara~o", -1, 1, "", this),
+            new Among ( "era~o", -1, 1, "", this),
+            new Among ( "ira~o", -1, 1, "", this),
+            new Among ( "ar", -1, 1, "", this),
+            new Among ( "er", -1, 1, "", this),
+            new Among ( "ir", -1, 1, "", this),
+            new Among ( "as", -1, 1, "", this),
+            new Among ( "adas", 47, 1, "", this),
+            new Among ( "idas", 47, 1, "", this),
+            new Among ( "ias", 47, 1, "", this),
+            new Among ( "arias", 50, 1, "", this),
+            new Among ( "erias", 50, 1, "", this),
+            new Among ( "irias", 50, 1, "", this),
+            new Among ( "aras", 47, 1, "", this),
+            new Among ( "eras", 47, 1, "", this),
+            new Among ( "iras", 47, 1, "", this),
+            new Among ( "avas", 47, 1, "", this),
+            new Among ( "es", -1, 1, "", this),
+            new Among ( "ardes", 58, 1, "", this),
+            new Among ( "erdes", 58, 1, "", this),
+            new Among ( "irdes", 58, 1, "", this),
+            new Among ( "ares", 58, 1, "", this),
+            new Among ( "eres", 58, 1, "", this),
+            new Among ( "ires", 58, 1, "", this),
+            new Among ( "asses", 58, 1, "", this),
+            new Among ( "esses", 58, 1, "", this),
+            new Among ( "isses", 58, 1, "", this),
+            new Among ( "astes", 58, 1, "", this),
+            new Among ( "estes", 58, 1, "", this),
+            new Among ( "istes", 58, 1, "", this),
+            new Among ( "is", -1, 1, "", this),
+            new Among ( "ais", 71, 1, "", this),
+            new Among ( "eis", 71, 1, "", this),
+            new Among ( "areis", 73, 1, "", this),
+            new Among ( "ereis", 73, 1, "", this),
+            new Among ( "ireis", 73, 1, "", this),
+            new Among ( "\u00E1reis", 73, 1, "", this),
+            new Among ( "\u00E9reis", 73, 1, "", this),
+            new Among ( "\u00EDreis", 73, 1, "", this),
+            new Among ( "\u00E1sseis", 73, 1, "", this),
+            new Among ( "\u00E9sseis", 73, 1, "", this),
+            new Among ( "\u00EDsseis", 73, 1, "", this),
+            new Among ( "\u00E1veis", 73, 1, "", this),
+            new Among ( "\u00EDeis", 73, 1, "", this),
+            new Among ( "ar\u00EDeis", 84, 1, "", this),
+            new Among ( "er\u00EDeis", 84, 1, "", this),
+            new Among ( "ir\u00EDeis", 84, 1, "", this),
+            new Among ( "ados", -1, 1, "", this),
+            new Among ( "idos", -1, 1, "", this),
+            new Among ( "amos", -1, 1, "", this),
+            new Among ( "\u00E1ramos", 90, 1, "", this),
+            new Among ( "\u00E9ramos", 90, 1, "", this),
+            new Among ( "\u00EDramos", 90, 1, "", this),
+            new Among ( "\u00E1vamos", 90, 1, "", this),
+            new Among ( "\u00EDamos", 90, 1, "", this),
+            new Among ( "ar\u00EDamos", 95, 1, "", this),
+            new Among ( "er\u00EDamos", 95, 1, "", this),
+            new Among ( "ir\u00EDamos", 95, 1, "", this),
+            new Among ( "emos", -1, 1, "", this),
+            new Among ( "aremos", 99, 1, "", this),
+            new Among ( "eremos", 99, 1, "", this),
+            new Among ( "iremos", 99, 1, "", this),
+            new Among ( "\u00E1ssemos", 99, 1, "", this),
+            new Among ( "\u00EAssemos", 99, 1, "", this),
+            new Among ( "\u00EDssemos", 99, 1, "", this),
+            new Among ( "imos", -1, 1, "", this),
+            new Among ( "armos", -1, 1, "", this),
+            new Among ( "ermos", -1, 1, "", this),
+            new Among ( "irmos", -1, 1, "", this),
+            new Among ( "\u00E1mos", -1, 1, "", this),
+            new Among ( "ar\u00E1s", -1, 1, "", this),
+            new Among ( "er\u00E1s", -1, 1, "", this),
+            new Among ( "ir\u00E1s", -1, 1, "", this),
+            new Among ( "eu", -1, 1, "", this),
+            new Among ( "iu", -1, 1, "", this),
+            new Among ( "ou", -1, 1, "", this),
+            new Among ( "ar\u00E1", -1, 1, "", this),
+            new Among ( "er\u00E1", -1, 1, "", this),
+            new Among ( "ir\u00E1", -1, 1, "", this)
+        };
+
+        private Among a_7[] = {
+            new Among ( "a", -1, 1, "", this),
+            new Among ( "i", -1, 1, "", this),
+            new Among ( "o", -1, 1, "", this),
+            new Among ( "os", -1, 1, "", this),
+            new Among ( "\u00E1", -1, 1, "", this),
+            new Among ( "\u00ED", -1, 1, "", this),
+            new Among ( "\u00F3", -1, 1, "", this)
+        };
+
+        private Among a_8[] = {
+            new Among ( "e", -1, 1, "", this),
+            new Among ( "\u00E7", -1, 2, "", this),
+            new Among ( "\u00E9", -1, 1, "", this),
+            new Among ( "\u00EA", -1, 1, "", this)
+        };
+
+        private static final char g_v[] = {17, 65, 16, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 3, 19, 12, 2 };
+
+        private int I_p2;
+        private int I_p1;
+        private int I_pV;
+
+        private void copy_from(PortugueseStemmer other) {
+            I_p2 = other.I_p2;
+            I_p1 = other.I_p1;
+            I_pV = other.I_pV;
+            super.copy_from(other);
+        }
+
+        private boolean r_prelude() {
+            int among_var;
+            int v_1;
+            // repeat, line 36
+            replab0: while(true)
+            {
+                v_1 = cursor;
+                lab1: do {
+                    // (, line 36
+                    // [, line 37
+                    bra = cursor;
+                    // substring, line 37
+                    among_var = find_among(a_0, 3);
+                    if (among_var == 0)
+                    {
+                        break lab1;
+                    }
+                    // ], line 37
+                    ket = cursor;
+                    switch(among_var) {
+                        case 0:
+                            break lab1;
+                        case 1:
+                            // (, line 38
+                            // <-, line 38
+                            slice_from("a~");
+                            break;
+                        case 2:
+                            // (, line 39
+                            // <-, line 39
+                            slice_from("o~");
+                            break;
+                        case 3:
+                            // (, line 40
+                            // next, line 40
+                            if (cursor >= limit)
+                            {
+                                break lab1;
+                            }
+                            cursor++;
+                            break;
+                    }
+                    continue replab0;
+                } while (false);
+                cursor = v_1;
+                break replab0;
+            }
+            return true;
+        }
+
+        private boolean r_mark_regions() {
+            int v_1;
+            int v_2;
+            int v_3;
+            int v_6;
+            int v_8;
+            // (, line 44
+            I_pV = limit;
+            I_p1 = limit;
+            I_p2 = limit;
+            // do, line 50
+            v_1 = cursor;
+            lab0: do {
+                // (, line 50
+                // or, line 52
+                lab1: do {
+                    v_2 = cursor;
+                    lab2: do {
+                        // (, line 51
+                        if (!(in_grouping(g_v, 97, 250)))
+                        {
+                            break lab2;
+                        }
+                        // or, line 51
+                        lab3: do {
+                            v_3 = cursor;
+                            lab4: do {
+                                // (, line 51
+                                if (!(out_grouping(g_v, 97, 250)))
+                                {
+                                    break lab4;
+                                }
+                                // gopast, line 51
+                                golab5: while(true)
+                                {
+                                    lab6: do {
+                                        if (!(in_grouping(g_v, 97, 250)))
+                                        {
+                                            break lab6;
+                                        }
+                                        break golab5;
+                                    } while (false);
+                                    if (cursor >= limit)
+                                    {
+                                        break lab4;
+                                    }
+                                    cursor++;
+                                }
+                                break lab3;
+                            } while (false);
+                            cursor = v_3;
+                            // (, line 51
+                            if (!(in_grouping(g_v, 97, 250)))
+                            {
+                                break lab2;
+                            }
+                            // gopast, line 51
+                            golab7: while(true)
+                            {
+                                lab8: do {
+                                    if (!(out_grouping(g_v, 97, 250)))
+                                    {
+                                        break lab8;
+                                    }
+                                    break golab7;
+                                } while (false);
+                                if (cursor >= limit)
+                                {
+                                    break lab2;
+                                }
+                                cursor++;
+                            }
+                        } while (false);
+                        break lab1;
+                    } while (false);
+                    cursor = v_2;
+                    // (, line 53
+                    if (!(out_grouping(g_v, 97, 250)))
+                    {
+                        break lab0;
+                    }
+                    // or, line 53
+                    lab9: do {
+                        v_6 = cursor;
+                        lab10: do {
+                            // (, line 53
+                            if (!(out_grouping(g_v, 97, 250)))
+                            {
+                                break lab10;
+                            }
+                            // gopast, line 53
+                            golab11: while(true)
+                            {
+                                lab12: do {
+                                    if (!(in_grouping(g_v, 97, 250)))
+                                    {
+                                        break lab12;
+                                    }
+                                    break golab11;
+                                } while (false);
+                                if (cursor >= limit)
+                                {
+                                    break lab10;
+                                }
+                                cursor++;
+                            }
+                            break lab9;
+                        } while (false);
+                        cursor = v_6;
+                        // (, line 53
+                        if (!(in_grouping(g_v, 97, 250)))
+                        {
+                            break lab0;
+                        }
+                        // next, line 53
+                        if (cursor >= limit)
+                        {
+                            break lab0;
+                        }
+                        cursor++;
+                    } while (false);
+                } while (false);
+                // setmark pV, line 54
+                I_pV = cursor;
+            } while (false);
+            cursor = v_1;
+            // do, line 56
+            v_8 = cursor;
+            lab13: do {
+                // (, line 56
+                // gopast, line 57
+                golab14: while(true)
+                {
+                    lab15: do {
+                        if (!(in_grouping(g_v, 97, 250)))
+                        {
+                            break lab15;
+                        }
+                        break golab14;
+                    } while (false);
+                    if (cursor >= limit)
+                    {
+                        break lab13;
+                    }
+                    cursor++;
+                }
+                // gopast, line 57
+                golab16: while(true)
+                {
+                    lab17: do {
+                        if (!(out_grouping(g_v, 97, 250)))
+                        {
+                            break lab17;
+                        }
+                        break golab16;
+                    } while (false);
+                    if (cursor >= limit)
+                    {
+                        break lab13;
+                    }
+                    cursor++;
+                }
+                // setmark p1, line 57
+                I_p1 = cursor;
+                // gopast, line 58
+                golab18: while(true)
+                {
+                    lab19: do {
+                        if (!(in_grouping(g_v, 97, 250)))
+                        {
+                            break lab19;
+                        }
+                        break golab18;
+                    } while (false);
+                    if (cursor >= limit)
+                    {
+                        break lab13;
+                    }
+                    cursor++;
+                }
+                // gopast, line 58
+                golab20: while(true)
+                {
+                    lab21: do {
+                        if (!(out_grouping(g_v, 97, 250)))
+                        {
+                            break lab21;
+                        }
+                        break golab20;
+                    } while (false);
+                    if (cursor >= limit)
+                    {
+                        break lab13;
+                    }
+                    cursor++;
+                }
+                // setmark p2, line 58
+                I_p2 = cursor;
+            } while (false);
+            cursor = v_8;
+            return true;
+        }
+
+        private boolean r_postlude() {
+            int among_var;
+            int v_1;
+            // repeat, line 62
+            replab0: while(true)
+            {
+                v_1 = cursor;
+                lab1: do {
+                    // (, line 62
+                    // [, line 63
+                    bra = cursor;
+                    // substring, line 63
+                    among_var = find_among(a_1, 3);
+                    if (among_var == 0)
+                    {
+                        break lab1;
+                    }
+                    // ], line 63
+                    ket = cursor;
+                    switch(among_var) {
+                        case 0:
+                            break lab1;
+                        case 1:
+                            // (, line 64
+                            // <-, line 64
+                            slice_from("\u00E3");
+                            break;
+                        case 2:
+                            // (, line 65
+                            // <-, line 65
+                            slice_from("\u00F5");
+                            break;
+                        case 3:
+                            // (, line 66
+                            // next, line 66
+                            if (cursor >= limit)
+                            {
+                                break lab1;
+                            }
+                            cursor++;
+                            break;
+                    }
+                    continue replab0;
+                } while (false);
+                cursor = v_1;
+                break replab0;
+            }
+            return true;
+        }
+
+        private boolean r_RV() {
+            if (!(I_pV <= cursor))
+            {
+                return 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_standard_suffix() {
+            int among_var;
+            int v_1;
+            int v_2;
+            int v_3;
+            int v_4;
+            // (, line 76
+            // [, line 77
+            ket = cursor;
+            // substring, line 77
+            among_var = find_among_b(a_5, 45);
+            if (among_var == 0)
+            {
+                return false;
+            }
+            // ], line 77
+            bra = cursor;
+            switch(among_var) {
+                case 0:
+                    return false;
+                case 1:
+                    // (, line 92
+                    // call R2, line 93
+                    if (!r_R2())
+                    {
+                        return false;
+                    }
+                    // delete, line 93
+                    slice_del();
+                    break;
+                case 2:
+                    // (, line 97
+                    // call R2, line 98
+                    if (!r_R2())
+                    {
+                        return false;
+                    }
+                    // <-, line 98
+                    slice_from("log");
+                    break;
+                case 3:
+                    // (, line 101
+                    // call R2, line 102
+                    if (!r_R2())
+                    {
+                        return false;
+                    }
+                    // <-, line 102
+                    slice_from("u");
+                    break;
+                case 4:
+                    // (, line 105
+                    // call R2, line 106
+                    if (!r_R2())
+                    {
+                        return false;
+                    }
+                    // <-, line 106
+                    slice_from("ente");
+                    break;
+                case 5:
+                    // (, line 109
+                    // call R1, line 110
+                    if (!r_R1())
+                    {
+                        return false;
+                    }
+                    // delete, line 110
+                    slice_del();
+                    // try, line 111
+                    v_1 = limit - cursor;
+                    lab0: do {
+                        // (, line 111
+                        // [, line 112
+                        ket = cursor;
+                        // substring, line 112
+                        among_var = find_among_b(a_2, 4);
+                        if (among_var == 0)
+                        {
+                            cursor = limit - v_1;
+                            break lab0;
+                        }
+                        // ], line 112
+                        bra = cursor;
+                        // call R2, line 112
+                        if (!r_R2())
+                        {
+                            cursor = limit - v_1;
+                            break lab0;
+                        }
+                        // delete, line 112
+                        slice_del();
+                        switch(among_var) {
+                            case 0:
+                                cursor = limit - v_1;
+                                break lab0;
+                            case 1:
+                                // (, line 113
+                                // [, line 113
+                                ket = cursor;
+                                // literal, line 113
+                                if (!(eq_s_b(2, "at")))
+                                {
+                                    cursor = limit - v_1;
+                                    break lab0;
+                                }
+                                // ], line 113
+                                bra = cursor;
+                                // call R2, line 113
+                                if (!r_R2())
+                                {
+                                    cursor = limit - v_1;
+                                    break lab0;
+                                }
+                                // delete, line 113
+                                slice_del();
+                                break;
+                        }
+                    } while (false);
+                    break;
+                case 6:
+                    // (, line 121
+                    // call R2, line 122
+                    if (!r_R2())
+                    {
+                        return false;
+                    }
+                    // delete, line 122
+                    slice_del();
+                    // try, line 123
+                    v_2 = limit - cursor;
+                    lab1: do {
+                        // (, line 123
+                        // [, line 124
+                        ket = cursor;
+                        // substring, line 124
+                        among_var = find_among_b(a_3, 3);
+                        if (among_var == 0)
+                        {
+                            cursor = limit - v_2;
+                            break lab1;
+                        }
+                        // ], line 124
+                        bra = cursor;
+                        switch(among_var) {
+                            case 0:
+                                cursor = limit - v_2;
+                                break lab1;
+                            case 1:
+                                // (, line 127
+                                // call R2, line 127
+                                if (!r_R2())
+                                {
+                                    cursor = limit - v_2;
+                                    break lab1;
+                                }
+                                // delete, line 127
+                                slice_del();
+                                break;
+                        }
+                    } while (false);
+                    break;
+                case 7:
+                    // (, line 133
+                    // call R2, line 134
+                    if (!r_R2())
+                    {
+                        return false;
+                    }
+                    // delete, line 134
+                    slice_del();
+                    // try, line 135
+                    v_3 = limit - cursor;
+                    lab2: do {
+                        // (, line 135
+                        // [, line 136
+                        ket = cursor;
+                        // substring, line 136
+                        among_var = find_among_b(a_4, 3);
+                        if (among_var == 0)
+                        {
+                            cursor = limit - v_3;
+                            break lab2;
+                        }
+                        // ], line 136
+                        bra = cursor;
+                        switch(among_var) {
+                            case 0:
+                                cursor = limit - v_3;
+                                break lab2;
+                            case 1:
+                                // (, line 139
+                                // call R2, line 139
+                                if (!r_R2())
+                                {
+                                    cursor = limit - v_3;
+                                    break lab2;
+                                }
+                                // delete, line 139
+                                slice_del();
+                                break;
+                        }
+                    } while (false);
+                    break;
+                case 8:
+                    // (, line 145
+                    // call R2, line 146
+                    if (!r_R2())
+                    {
+                        return false;
+                    }
+                    // delete, line 146
+                    slice_del();
+                    // try, line 147
+                    v_4 = limit - cursor;
+                    lab3: do {
+                        // (, line 147
+                        // [, line 148
+                        ket = cursor;
+                        // literal, line 148
+                        if (!(eq_s_b(2, "at")))
+                        {
+                            cursor = limit - v_4;
+                            break lab3;
+                        }
+                        // ], line 148
+                        bra = cursor;
+                        // call R2, line 148
+                        if (!r_R2())
+                        {
+                            cursor = limit - v_4;
+                            break lab3;
+                        }
+                        // delete, line 148
+                        slice_del();
+                    } while (false);
+                    break;
+                case 9:
+                    // (, line 152
+                    // call RV, line 153
+                    if (!r_RV())
+                    {
+                        return false;
+                    }
+                    // literal, line 153
+                    if (!(eq_s_b(1, "e")))
+                    {
+                        return false;
+                    }
+                    // <-, line 154
+                    slice_from("ir");
+                    break;
+            }
+            return true;
+        }
+
+        private boolean r_verb_suffix() {
+            int among_var;
+            int v_1;
+            int v_2;
+            // setlimit, line 159
+            v_1 = limit - cursor;
+            // tomark, line 159
+            if (cursor < I_pV)
+            {
+                return false;
+            }
+            cursor = I_pV;
+            v_2 = limit_backward;
+            limit_backward = cursor;
+            cursor = limit - v_1;
+            // (, line 159
+            // [, line 160
+            ket = cursor;
+            // substring, line 160
+            among_var = find_among_b(a_6, 120);
+            if (among_var == 0)
+            {
+                limit_backward = v_2;
+                return false;
+            }
+            // ], line 160
+            bra = cursor;
+            switch(among_var) {
+                case 0:
+                    limit_backward = v_2;
+                    return false;
+                case 1:
+                    // (, line 179
+                    // delete, line 179
+                    slice_del();
+                    break;
+            }
+            limit_backward = v_2;
+            return true;
+        }
+
+        private boolean r_residual_suffix() {
+            int among_var;
+            // (, line 183
+            // [, line 184
+            ket = cursor;
+            // substring, line 184
+            among_var = find_among_b(a_7, 7);
+            if (among_var == 0)
+            {
+                return false;
+            }
+            // ], line 184
+            bra = cursor;
+            switch(among_var) {
+                case 0:
+                    return false;
+                case 1:
+                    // (, line 187
+                    // call RV, line 187
+                    if (!r_RV())
+                    {
+                        return false;
+                    }
+                    // delete, line 187
+                    slice_del();
+                    break;
+            }
+            return true;
+        }
+
+        private boolean r_residual_form() {
+            int among_var;
+            int v_1;
+            int v_2;
+            int v_3;
+            // (, line 191
+            // [, line 192
+            ket = cursor;
+            // substring, line 192
+            among_var = find_among_b(a_8, 4);
+            if (among_var == 0)
+            {
+                return false;
+            }
+            // ], line 192
+            bra = cursor;
+            switch(among_var) {
+                case 0:
+                    return false;
+                case 1:
+                    // (, line 194
+                    // call RV, line 194
+                    if (!r_RV())
+                    {
+                        return false;
+                    }
+                    // delete, line 194
+                    slice_del();
+                    // [, line 194
+                    ket = cursor;
+                    // or, line 194
+                    lab0: do {
+                        v_1 = limit - cursor;
+                        lab1: do {
+                            // (, line 194
+                            // literal, line 194
+                            if (!(eq_s_b(1, "u")))
+                            {
+                                break lab1;
+                            }
+                            // ], line 194
+                            bra = cursor;
+                            // test, line 194
+                            v_2 = limit - cursor;
+                            // literal, line 194
+                            if (!(eq_s_b(1, "g")))
+                            {
+                                break lab1;
+                            }
+                            cursor = limit - v_2;
+                            break lab0;
+                        } while (false);
+                        cursor = limit - v_1;
+                        // (, line 195
+                        // literal, line 195
+                        if (!(eq_s_b(1, "i")))
+                        {
+                            return false;
+                        }
+                        // ], line 195
+                        bra = cursor;
+                        // test, line 195
+                        v_3 = limit - cursor;
+                        // literal, line 195
+                        if (!(eq_s_b(1, "c")))
+                        {
+                            return false;
+                        }
+                        cursor = limit - v_3;
+                    } while (false);
+                    // call RV, line 195
+                    if (!r_RV())
+                    {
+                        return false;
+                    }
+                    // delete, line 195
+                    slice_del();
+                    break;
+                case 2:
+                    // (, line 196
+                    // <-, line 196
+                    slice_from("c");
+                    break;
+            }
+            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;
+            // (, line 201
+            // do, line 202
+            v_1 = cursor;
+            lab0: do {
+                // call prelude, line 202
+                if (!r_prelude())
+                {
+                    break lab0;
+                }
+            } while (false);
+            cursor = v_1;
+            // do, line 203
+            v_2 = cursor;
+            lab1: do {
+                // call mark_regions, line 203
+                if (!r_mark_regions())
+                {
+                    break lab1;
+                }
+            } while (false);
+            cursor = v_2;
+            // backwards, line 204
+            limit_backward = cursor; cursor = limit;
+            // (, line 204
+            // do, line 205
+            v_3 = limit - cursor;
+            lab2: do {
+                // (, line 205
+                // or, line 209
+                lab3: do {
+                    v_4 = limit - cursor;
+                    lab4: do {
+                        // (, line 206
+                        // and, line 207
+                        v_5 = limit - cursor;
+                        // (, line 206
+                        // or, line 206
+                        lab5: do {
+                            v_6 = limit - cursor;
+                            lab6: do {
+                                // call standard_suffix, line 206
+                                if (!r_standard_suffix())
+                                {
+                                    break lab6;
+                                }
+                                break lab5;
+                            } while (false);
+                            cursor = limit - v_6;
+                            // call verb_suffix, line 206
+                            if (!r_verb_suffix())
+                            {
+                                break lab4;
+                            }
+                        } while (false);
+                        cursor = limit - v_5;
+                        // do, line 207
+                        v_7 = limit - cursor;
+                        lab7: do {
+                            // (, line 207
+                            // [, line 207
+                            ket = cursor;
+                            // literal, line 207
+                            if (!(eq_s_b(1, "i")))
+                            {
+                                break lab7;
+                            }
+                            // ], line 207
+                            bra = cursor;
+                            // test, line 207
+                            v_8 = limit - cursor;
+                            // literal, line 207
+                            if (!(eq_s_b(1, "c")))
+                            {
+                                break lab7;
+                            }
+                            cursor = limit - v_8;
+                            // call RV, line 207
+                            if (!r_RV())
+                            {
+                                break lab7;
+                            }
+                            // delete, line 207
+                            slice_del();
+                        } while (false);
+                        cursor = limit - v_7;
+                        break lab3;
+                    } while (false);
+                    cursor = limit - v_4;
+                    // call residual_suffix, line 209
+                    if (!r_residual_suffix())
+                    {
+                        break lab2;
+                    }
+                } while (false);
+            } while (false);
+            cursor = limit - v_3;
+            // do, line 211
+            v_9 = limit - cursor;
+            lab8: do {
+                // call residual_form, line 211
+                if (!r_residual_form())
+                {
+                    break lab8;
+                }
+            } while (false);
+            cursor = limit - v_9;
+            cursor = limit_backward;            // do, line 213
+            v_10 = cursor;
+            lab9: do {
+                // call postlude, line 213
+                if (!r_postlude())
+                {
+                    break lab9;
+                }
+            } while (false);
+            cursor = v_10;
+            return true;
+        }
+
+}
+