alvinalexander.com | career | drupal | java | mac | mysql | perl | scala | uml | unix  

Lucene example source code file (SpanishStemmer.java)

This example Lucene source code file (SpanishStemmer.java) is included in the DevDaily.com "Java Source Code Warehouse" project. The intent of this project is to help you "Learn Java by Example" TM.

Java - Lucene tags/keywords

among, among, i_p1, i_p1, i_p2, i_p2, i_pv, i_pv, snowballprogram, spanishstemmer

The Lucene SpanishStemmer.java source code

// 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 SpanishStemmer extends SnowballProgram {

        private Among a_0[] = {
            new Among ( "", -1, 6, "", this),
            new Among ( "\u00E1", 0, 1, "", this),
            new Among ( "\u00E9", 0, 2, "", this),
            new Among ( "\u00ED", 0, 3, "", this),
            new Among ( "\u00F3", 0, 4, "", this),
            new Among ( "\u00FA", 0, 5, "", this)
        };

        private Among a_1[] = {
            new Among ( "la", -1, -1, "", this),
            new Among ( "sela", 0, -1, "", this),
            new Among ( "le", -1, -1, "", this),
            new Among ( "me", -1, -1, "", this),
            new Among ( "se", -1, -1, "", this),
            new Among ( "lo", -1, -1, "", this),
            new Among ( "selo", 5, -1, "", this),
            new Among ( "las", -1, -1, "", this),
            new Among ( "selas", 7, -1, "", this),
            new Among ( "les", -1, -1, "", this),
            new Among ( "los", -1, -1, "", this),
            new Among ( "selos", 10, -1, "", this),
            new Among ( "nos", -1, -1, "", this)
        };

        private Among a_2[] = {
            new Among ( "ando", -1, 6, "", this),
            new Among ( "iendo", -1, 6, "", this),
            new Among ( "yendo", -1, 7, "", this),
            new Among ( "\u00E1ndo", -1, 2, "", this),
            new Among ( "i\u00E9ndo", -1, 1, "", this),
            new Among ( "ar", -1, 6, "", this),
            new Among ( "er", -1, 6, "", this),
            new Among ( "ir", -1, 6, "", this),
            new Among ( "\u00E1r", -1, 3, "", this),
            new Among ( "\u00E9r", -1, 4, "", this),
            new Among ( "\u00EDr", -1, 5, "", this)
        };

        private Among a_3[] = {
            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_4[] = {
            new Among ( "able", -1, 1, "", this),
            new Among ( "ible", -1, 1, "", this),
            new Among ( "ante", -1, 1, "", this)
        };

        private Among a_5[] = {
            new Among ( "ic", -1, 1, "", this),
            new Among ( "abil", -1, 1, "", this),
            new Among ( "iv", -1, 1, "", this)
        };

        private Among a_6[] = {
            new Among ( "ica", -1, 1, "", this),
            new Among ( "ancia", -1, 2, "", this),
            new Among ( "encia", -1, 5, "", this),
            new Among ( "adora", -1, 2, "", this),
            new Among ( "osa", -1, 1, "", this),
            new Among ( "ista", -1, 1, "", this),
            new Among ( "iva", -1, 9, "", this),
            new Among ( "anza", -1, 1, "", this),
            new Among ( "log\u00EDa", -1, 3, "", this),
            new Among ( "idad", -1, 8, "", this),
            new Among ( "able", -1, 1, "", this),
            new Among ( "ible", -1, 1, "", this),
            new Among ( "ante", -1, 2, "", this),
            new Among ( "mente", -1, 7, "", this),
            new Among ( "amente", 13, 6, "", this),
            new Among ( "aci\u00F3n", -1, 2, "", this),
            new Among ( "uci\u00F3n", -1, 4, "", this),
            new Among ( "ico", -1, 1, "", this),
            new Among ( "ismo", -1, 1, "", this),
            new Among ( "oso", -1, 1, "", this),
            new Among ( "amiento", -1, 1, "", this),
            new Among ( "imiento", -1, 1, "", this),
            new Among ( "ivo", -1, 9, "", this),
            new Among ( "ador", -1, 2, "", this),
            new Among ( "icas", -1, 1, "", this),
            new Among ( "ancias", -1, 2, "", this),
            new Among ( "encias", -1, 5, "", this),
            new Among ( "adoras", -1, 2, "", this),
            new Among ( "osas", -1, 1, "", this),
            new Among ( "istas", -1, 1, "", this),
            new Among ( "ivas", -1, 9, "", this),
            new Among ( "anzas", -1, 1, "", this),
            new Among ( "log\u00EDas", -1, 3, "", this),
            new Among ( "idades", -1, 8, "", this),
            new Among ( "ables", -1, 1, "", this),
            new Among ( "ibles", -1, 1, "", this),
            new Among ( "aciones", -1, 2, "", this),
            new Among ( "uciones", -1, 4, "", this),
            new Among ( "adores", -1, 2, "", this),
            new Among ( "antes", -1, 2, "", this),
            new Among ( "icos", -1, 1, "", this),
            new Among ( "ismos", -1, 1, "", this),
            new Among ( "osos", -1, 1, "", this),
            new Among ( "amientos", -1, 1, "", this),
            new Among ( "imientos", -1, 1, "", this),
            new Among ( "ivos", -1, 9, "", this)
        };

        private Among a_7[] = {
            new Among ( "ya", -1, 1, "", this),
            new Among ( "ye", -1, 1, "", this),
            new Among ( "yan", -1, 1, "", this),
            new Among ( "yen", -1, 1, "", this),
            new Among ( "yeron", -1, 1, "", this),
            new Among ( "yendo", -1, 1, "", this),
            new Among ( "yo", -1, 1, "", this),
            new Among ( "yas", -1, 1, "", this),
            new Among ( "yes", -1, 1, "", this),
            new Among ( "yais", -1, 1, "", this),
            new Among ( "yamos", -1, 1, "", this),
            new Among ( "y\u00F3", -1, 1, "", this)
        };

        private Among a_8[] = {
            new Among ( "aba", -1, 2, "", this),
            new Among ( "ada", -1, 2, "", this),
            new Among ( "ida", -1, 2, "", this),
            new Among ( "ara", -1, 2, "", this),
            new Among ( "iera", -1, 2, "", this),
            new Among ( "\u00EDa", -1, 2, "", this),
            new Among ( "ar\u00EDa", 5, 2, "", this),
            new Among ( "er\u00EDa", 5, 2, "", this),
            new Among ( "ir\u00EDa", 5, 2, "", this),
            new Among ( "ad", -1, 2, "", this),
            new Among ( "ed", -1, 2, "", this),
            new Among ( "id", -1, 2, "", this),
            new Among ( "ase", -1, 2, "", this),
            new Among ( "iese", -1, 2, "", this),
            new Among ( "aste", -1, 2, "", this),
            new Among ( "iste", -1, 2, "", this),
            new Among ( "an", -1, 2, "", this),
            new Among ( "aban", 16, 2, "", this),
            new Among ( "aran", 16, 2, "", this),
            new Among ( "ieran", 16, 2, "", this),
            new Among ( "\u00EDan", 16, 2, "", this),
            new Among ( "ar\u00EDan", 20, 2, "", this),
            new Among ( "er\u00EDan", 20, 2, "", this),
            new Among ( "ir\u00EDan", 20, 2, "", this),
            new Among ( "en", -1, 1, "", this),
            new Among ( "asen", 24, 2, "", this),
            new Among ( "iesen", 24, 2, "", this),
            new Among ( "aron", -1, 2, "", this),
            new Among ( "ieron", -1, 2, "", this),
            new Among ( "ar\u00E1n", -1, 2, "", this),
            new Among ( "er\u00E1n", -1, 2, "", this),
            new Among ( "ir\u00E1n", -1, 2, "", this),
            new Among ( "ado", -1, 2, "", this),
            new Among ( "ido", -1, 2, "", this),
            new Among ( "ando", -1, 2, "", this),
            new Among ( "iendo", -1, 2, "", this),
            new Among ( "ar", -1, 2, "", this),
            new Among ( "er", -1, 2, "", this),
            new Among ( "ir", -1, 2, "", this),
            new Among ( "as", -1, 2, "", this),
            new Among ( "abas", 39, 2, "", this),
            new Among ( "adas", 39, 2, "", this),
            new Among ( "idas", 39, 2, "", this),
            new Among ( "aras", 39, 2, "", this),
            new Among ( "ieras", 39, 2, "", this),
            new Among ( "\u00EDas", 39, 2, "", this),
            new Among ( "ar\u00EDas", 45, 2, "", this),
            new Among ( "er\u00EDas", 45, 2, "", this),
            new Among ( "ir\u00EDas", 45, 2, "", this),
            new Among ( "es", -1, 1, "", this),
            new Among ( "ases", 49, 2, "", this),
            new Among ( "ieses", 49, 2, "", this),
            new Among ( "abais", -1, 2, "", this),
            new Among ( "arais", -1, 2, "", this),
            new Among ( "ierais", -1, 2, "", this),
            new Among ( "\u00EDais", -1, 2, "", this),
            new Among ( "ar\u00EDais", 55, 2, "", this),
            new Among ( "er\u00EDais", 55, 2, "", this),
            new Among ( "ir\u00EDais", 55, 2, "", this),
            new Among ( "aseis", -1, 2, "", this),
            new Among ( "ieseis", -1, 2, "", this),
            new Among ( "asteis", -1, 2, "", this),
            new Among ( "isteis", -1, 2, "", this),
            new Among ( "\u00E1is", -1, 2, "", this),
            new Among ( "\u00E9is", -1, 1, "", this),
            new Among ( "ar\u00E9is", 64, 2, "", this),
            new Among ( "er\u00E9is", 64, 2, "", this),
            new Among ( "ir\u00E9is", 64, 2, "", this),
            new Among ( "ados", -1, 2, "", this),
            new Among ( "idos", -1, 2, "", this),
            new Among ( "amos", -1, 2, "", this),
            new Among ( "\u00E1bamos", 70, 2, "", this),
            new Among ( "\u00E1ramos", 70, 2, "", this),
            new Among ( "i\u00E9ramos", 70, 2, "", this),
            new Among ( "\u00EDamos", 70, 2, "", this),
            new Among ( "ar\u00EDamos", 74, 2, "", this),
            new Among ( "er\u00EDamos", 74, 2, "", this),
            new Among ( "ir\u00EDamos", 74, 2, "", this),
            new Among ( "emos", -1, 1, "", this),
            new Among ( "aremos", 78, 2, "", this),
            new Among ( "eremos", 78, 2, "", this),
            new Among ( "iremos", 78, 2, "", this),
            new Among ( "\u00E1semos", 78, 2, "", this),
            new Among ( "i\u00E9semos", 78, 2, "", this),
            new Among ( "imos", -1, 2, "", this),
            new Among ( "ar\u00E1s", -1, 2, "", this),
            new Among ( "er\u00E1s", -1, 2, "", this),
            new Among ( "ir\u00E1s", -1, 2, "", this),
            new Among ( "\u00EDs", -1, 2, "", this),
            new Among ( "ar\u00E1", -1, 2, "", this),
            new Among ( "er\u00E1", -1, 2, "", this),
            new Among ( "ir\u00E1", -1, 2, "", this),
            new Among ( "ar\u00E9", -1, 2, "", this),
            new Among ( "er\u00E9", -1, 2, "", this),
            new Among ( "ir\u00E9", -1, 2, "", this),
            new Among ( "i\u00F3", -1, 2, "", this)
        };

        private Among a_9[] = {
            new Among ( "a", -1, 1, "", this),
            new Among ( "e", -1, 2, "", this),
            new Among ( "o", -1, 1, "", this),
            new Among ( "os", -1, 1, "", this),
            new Among ( "\u00E1", -1, 1, "", this),
            new Among ( "\u00E9", -1, 2, "", this),
            new Among ( "\u00ED", -1, 1, "", this),
            new Among ( "\u00F3", -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, 1, 17, 4, 10 };

        private int I_p2;
        private int I_p1;
        private int I_pV;

        private void copy_from(SpanishStemmer other) {
            I_p2 = other.I_p2;
            I_p1 = other.I_p1;
            I_pV = other.I_pV;
            super.copy_from(other);
        }

        private boolean r_mark_regions() {
            int v_1;
            int v_2;
            int v_3;
            int v_6;
            int v_8;
            // (, line 31
            I_pV = limit;
            I_p1 = limit;
            I_p2 = limit;
            // do, line 37
            v_1 = cursor;
            lab0: do {
                // (, line 37
                // or, line 39
                lab1: do {
                    v_2 = cursor;
                    lab2: do {
                        // (, line 38
                        if (!(in_grouping(g_v, 97, 252)))
                        {
                            break lab2;
                        }
                        // or, line 38
                        lab3: do {
                            v_3 = cursor;
                            lab4: do {
                                // (, line 38
                                if (!(out_grouping(g_v, 97, 252)))
                                {
                                    break lab4;
                                }
                                // gopast, line 38
                                golab5: while(true)
                                {
                                    lab6: do {
                                        if (!(in_grouping(g_v, 97, 252)))
                                        {
                                            break lab6;
                                        }
                                        break golab5;
                                    } while (false);
                                    if (cursor >= limit)
                                    {
                                        break lab4;
                                    }
                                    cursor++;
                                }
                                break lab3;
                            } while (false);
                            cursor = v_3;
                            // (, line 38
                            if (!(in_grouping(g_v, 97, 252)))
                            {
                                break lab2;
                            }
                            // gopast, line 38
                            golab7: while(true)
                            {
                                lab8: do {
                                    if (!(out_grouping(g_v, 97, 252)))
                                    {
                                        break lab8;
                                    }
                                    break golab7;
                                } while (false);
                                if (cursor >= limit)
                                {
                                    break lab2;
                                }
                                cursor++;
                            }
                        } while (false);
                        break lab1;
                    } while (false);
                    cursor = v_2;
                    // (, line 40
                    if (!(out_grouping(g_v, 97, 252)))
                    {
                        break lab0;
                    }
                    // or, line 40
                    lab9: do {
                        v_6 = cursor;
                        lab10: do {
                            // (, line 40
                            if (!(out_grouping(g_v, 97, 252)))
                            {
                                break lab10;
                            }
                            // gopast, line 40
                            golab11: while(true)
                            {
                                lab12: do {
                                    if (!(in_grouping(g_v, 97, 252)))
                                    {
                                        break lab12;
                                    }
                                    break golab11;
                                } while (false);
                                if (cursor >= limit)
                                {
                                    break lab10;
                                }
                                cursor++;
                            }
                            break lab9;
                        } while (false);
                        cursor = v_6;
                        // (, line 40
                        if (!(in_grouping(g_v, 97, 252)))
                        {
                            break lab0;
                        }
                        // next, line 40
                        if (cursor >= limit)
                        {
                            break lab0;
                        }
                        cursor++;
                    } while (false);
                } while (false);
                // setmark pV, line 41
                I_pV = cursor;
            } while (false);
            cursor = v_1;
            // do, line 43
            v_8 = cursor;
            lab13: do {
                // (, line 43
                // gopast, line 44
                golab14: while(true)
                {
                    lab15: do {
                        if (!(in_grouping(g_v, 97, 252)))
                        {
                            break lab15;
                        }
                        break golab14;
                    } while (false);
                    if (cursor >= limit)
                    {
                        break lab13;
                    }
                    cursor++;
                }
                // gopast, line 44
                golab16: while(true)
                {
                    lab17: do {
                        if (!(out_grouping(g_v, 97, 252)))
                        {
                            break lab17;
                        }
                        break golab16;
                    } while (false);
                    if (cursor >= limit)
                    {
                        break lab13;
                    }
                    cursor++;
                }
                // setmark p1, line 44
                I_p1 = cursor;
                // gopast, line 45
                golab18: while(true)
                {
                    lab19: do {
                        if (!(in_grouping(g_v, 97, 252)))
                        {
                            break lab19;
                        }
                        break golab18;
                    } while (false);
                    if (cursor >= limit)
                    {
                        break lab13;
                    }
                    cursor++;
                }
                // gopast, line 45
                golab20: while(true)
                {
                    lab21: do {
                        if (!(out_grouping(g_v, 97, 252)))
                        {
                            break lab21;
                        }
                        break golab20;
                    } while (false);
                    if (cursor >= limit)
                    {
                        break lab13;
                    }
                    cursor++;
                }
                // setmark p2, line 45
                I_p2 = cursor;
            } while (false);
            cursor = v_8;
            return true;
        }

        private boolean r_postlude() {
            int among_var;
            int v_1;
            // repeat, line 49
            replab0: while(true)
            {
                v_1 = cursor;
                lab1: do {
                    // (, line 49
                    // [, line 50
                    bra = cursor;
                    // substring, line 50
                    among_var = find_among(a_0, 6);
                    if (among_var == 0)
                    {
                        break lab1;
                    }
                    // ], line 50
                    ket = cursor;
                    switch(among_var) {
                        case 0:
                            break lab1;
                        case 1:
                            // (, line 51
                            // <-, line 51
                            slice_from("a");
                            break;
                        case 2:
                            // (, line 52
                            // <-, line 52
                            slice_from("e");
                            break;
                        case 3:
                            // (, line 53
                            // <-, line 53
                            slice_from("i");
                            break;
                        case 4:
                            // (, line 54
                            // <-, line 54
                            slice_from("o");
                            break;
                        case 5:
                            // (, line 55
                            // <-, line 55
                            slice_from("u");
                            break;
                        case 6:
                            // (, line 57
                            // next, line 57
                            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_attached_pronoun() {
            int among_var;
            // (, line 67
            // [, line 68
            ket = cursor;
            // substring, line 68
            if (find_among_b(a_1, 13) == 0)
            {
                return false;
            }
            // ], line 68
            bra = cursor;
            // substring, line 72
            among_var = find_among_b(a_2, 11);
            if (among_var == 0)
            {
                return false;
            }
            // call RV, line 72
            if (!r_RV())
            {
                return false;
            }
            switch(among_var) {
                case 0:
                    return false;
                case 1:
                    // (, line 73
                    // ], line 73
                    bra = cursor;
                    // <-, line 73
                    slice_from("iendo");
                    break;
                case 2:
                    // (, line 74
                    // ], line 74
                    bra = cursor;
                    // <-, line 74
                    slice_from("ando");
                    break;
                case 3:
                    // (, line 75
                    // ], line 75
                    bra = cursor;
                    // <-, line 75
                    slice_from("ar");
                    break;
                case 4:
                    // (, line 76
                    // ], line 76
                    bra = cursor;
                    // <-, line 76
                    slice_from("er");
                    break;
                case 5:
                    // (, line 77
                    // ], line 77
                    bra = cursor;
                    // <-, line 77
                    slice_from("ir");
                    break;
                case 6:
                    // (, line 81
                    // delete, line 81
                    slice_del();
                    break;
                case 7:
                    // (, line 82
                    // literal, line 82
                    if (!(eq_s_b(1, "u")))
                    {
                        return false;
                    }
                    // delete, line 82
                    slice_del();
                    break;
            }
            return true;
        }

        private boolean r_standard_suffix() {
            int among_var;
            int v_1;
            int v_2;
            int v_3;
            int v_4;
            int v_5;
            // (, line 86
            // [, line 87
            ket = cursor;
            // substring, line 87
            among_var = find_among_b(a_6, 46);
            if (among_var == 0)
            {
                return false;
            }
            // ], line 87
            bra = cursor;
            switch(among_var) {
                case 0:
                    return false;
                case 1:
                    // (, line 98
                    // call R2, line 99
                    if (!r_R2())
                    {
                        return false;
                    }
                    // delete, line 99
                    slice_del();
                    break;
                case 2:
                    // (, line 104
                    // call R2, line 105
                    if (!r_R2())
                    {
                        return false;
                    }
                    // delete, line 105
                    slice_del();
                    // try, line 106
                    v_1 = limit - cursor;
                    lab0: do {
                        // (, line 106
                        // [, line 106
                        ket = cursor;
                        // literal, line 106
                        if (!(eq_s_b(2, "ic")))
                        {
                            cursor = limit - v_1;
                            break lab0;
                        }
                        // ], line 106
                        bra = cursor;
                        // call R2, line 106
                        if (!r_R2())
                        {
                            cursor = limit - v_1;
                            break lab0;
                        }
                        // delete, line 106
                        slice_del();
                    } while (false);
                    break;
                case 3:
                    // (, line 110
                    // call R2, line 111
                    if (!r_R2())
                    {
                        return false;
                    }
                    // <-, line 111
                    slice_from("log");
                    break;
                case 4:
                    // (, line 114
                    // call R2, line 115
                    if (!r_R2())
                    {
                        return false;
                    }
                    // <-, line 115
                    slice_from("u");
                    break;
                case 5:
                    // (, line 118
                    // call R2, line 119
                    if (!r_R2())
                    {
                        return false;
                    }
                    // <-, line 119
                    slice_from("ente");
                    break;
                case 6:
                    // (, line 122
                    // call R1, line 123
                    if (!r_R1())
                    {
                        return false;
                    }
                    // delete, line 123
                    slice_del();
                    // try, line 124
                    v_2 = limit - cursor;
                    lab1: do {
                        // (, line 124
                        // [, line 125
                        ket = cursor;
                        // substring, line 125
                        among_var = find_among_b(a_3, 4);
                        if (among_var == 0)
                        {
                            cursor = limit - v_2;
                            break lab1;
                        }
                        // ], line 125
                        bra = cursor;
                        // call R2, line 125
                        if (!r_R2())
                        {
                            cursor = limit - v_2;
                            break lab1;
                        }
                        // delete, line 125
                        slice_del();
                        switch(among_var) {
                            case 0:
                                cursor = limit - v_2;
                                break lab1;
                            case 1:
                                // (, line 126
                                // [, line 126
                                ket = cursor;
                                // literal, line 126
                                if (!(eq_s_b(2, "at")))
                                {
                                    cursor = limit - v_2;
                                    break lab1;
                                }
                                // ], line 126
                                bra = cursor;
                                // call R2, line 126
                                if (!r_R2())
                                {
                                    cursor = limit - v_2;
                                    break lab1;
                                }
                                // delete, line 126
                                slice_del();
                                break;
                        }
                    } while (false);
                    break;
                case 7:
                    // (, line 134
                    // call R2, line 135
                    if (!r_R2())
                    {
                        return false;
                    }
                    // delete, line 135
                    slice_del();
                    // try, line 136
                    v_3 = limit - cursor;
                    lab2: do {
                        // (, line 136
                        // [, line 137
                        ket = cursor;
                        // substring, line 137
                        among_var = find_among_b(a_4, 3);
                        if (among_var == 0)
                        {
                            cursor = limit - v_3;
                            break lab2;
                        }
                        // ], line 137
                        bra = cursor;
                        switch(among_var) {
                            case 0:
                                cursor = limit - v_3;
                                break lab2;
                            case 1:
                                // (, line 140
                                // call R2, line 140
                                if (!r_R2())
                                {
                                    cursor = limit - v_3;
                                    break lab2;
                                }
                                // delete, line 140
                                slice_del();
                                break;
                        }
                    } while (false);
                    break;
                case 8:
                    // (, line 146
                    // call R2, line 147
                    if (!r_R2())
                    {
                        return false;
                    }
                    // delete, line 147
                    slice_del();
                    // try, line 148
                    v_4 = limit - cursor;
                    lab3: do {
                        // (, line 148
                        // [, line 149
                        ket = cursor;
                        // substring, line 149
                        among_var = find_among_b(a_5, 3);
                        if (among_var == 0)
                        {
                            cursor = limit - v_4;
                            break lab3;
                        }
                        // ], line 149
                        bra = cursor;
                        switch(among_var) {
                            case 0:
                                cursor = limit - v_4;
                                break lab3;
                            case 1:
                                // (, line 152
                                // call R2, line 152
                                if (!r_R2())
                                {
                                    cursor = limit - v_4;
                                    break lab3;
                                }
                                // delete, line 152
                                slice_del();
                                break;
                        }
                    } while (false);
                    break;
                case 9:
                    // (, line 158
                    // call R2, line 159
                    if (!r_R2())
                    {
                        return false;
                    }
                    // delete, line 159
                    slice_del();
                    // try, line 160
                    v_5 = limit - cursor;
                    lab4: do {
                        // (, line 160
                        // [, line 161
                        ket = cursor;
                        // literal, line 161
                        if (!(eq_s_b(2, "at")))
                        {
                            cursor = limit - v_5;
                            break lab4;
                        }
                        // ], line 161
                        bra = cursor;
                        // call R2, line 161
                        if (!r_R2())
                        {
                            cursor = limit - v_5;
                            break lab4;
                        }
                        // delete, line 161
                        slice_del();
                    } while (false);
                    break;
            }
            return true;
        }

        private boolean r_y_verb_suffix() {
            int among_var;
            int v_1;
            int v_2;
            // (, line 167
            // setlimit, line 168
            v_1 = limit - cursor;
            // tomark, line 168
            if (cursor < I_pV)
            {
                return false;
            }
            cursor = I_pV;
            v_2 = limit_backward;
            limit_backward = cursor;
            cursor = limit - v_1;
            // (, line 168
            // [, line 168
            ket = cursor;
            // substring, line 168
            among_var = find_among_b(a_7, 12);
            if (among_var == 0)
            {
                limit_backward = v_2;
                return false;
            }
            // ], line 168
            bra = cursor;
            limit_backward = v_2;
            switch(among_var) {
                case 0:
                    return false;
                case 1:
                    // (, line 171
                    // literal, line 171
                    if (!(eq_s_b(1, "u")))
                    {
                        return false;
                    }
                    // delete, line 171
                    slice_del();
                    break;
            }
            return true;
        }

        private boolean r_verb_suffix() {
            int among_var;
            int v_1;
            int v_2;
            int v_3;
            int v_4;
            // (, line 175
            // setlimit, line 176
            v_1 = limit - cursor;
            // tomark, line 176
            if (cursor < I_pV)
            {
                return false;
            }
            cursor = I_pV;
            v_2 = limit_backward;
            limit_backward = cursor;
            cursor = limit - v_1;
            // (, line 176
            // [, line 176
            ket = cursor;
            // substring, line 176
            among_var = find_among_b(a_8, 96);
            if (among_var == 0)
            {
                limit_backward = v_2;
                return false;
            }
            // ], line 176
            bra = cursor;
            limit_backward = v_2;
            switch(among_var) {
                case 0:
                    return false;
                case 1:
                    // (, line 179
                    // try, line 179
                    v_3 = limit - cursor;
                    lab0: do {
                        // (, line 179
                        // literal, line 179
                        if (!(eq_s_b(1, "u")))
                        {
                            cursor = limit - v_3;
                            break lab0;
                        }
                        // test, line 179
                        v_4 = limit - cursor;
                        // literal, line 179
                        if (!(eq_s_b(1, "g")))
                        {
                            cursor = limit - v_3;
                            break lab0;
                        }
                        cursor = limit - v_4;
                    } while (false);
                    // ], line 179
                    bra = cursor;
                    // delete, line 179
                    slice_del();
                    break;
                case 2:
                    // (, line 200
                    // delete, line 200
                    slice_del();
                    break;
            }
            return true;
        }

        private boolean r_residual_suffix() {
            int among_var;
            int v_1;
            int v_2;
            // (, line 204
            // [, line 205
            ket = cursor;
            // substring, line 205
            among_var = find_among_b(a_9, 8);
            if (among_var == 0)
            {
                return false;
            }
            // ], line 205
            bra = cursor;
            switch(among_var) {
                case 0:
                    return false;
                case 1:
                    // (, line 208
                    // call RV, line 208
                    if (!r_RV())
                    {
                        return false;
                    }
                    // delete, line 208
                    slice_del();
                    break;
                case 2:
                    // (, line 210
                    // call RV, line 210
                    if (!r_RV())
                    {
                        return false;
                    }
                    // delete, line 210
                    slice_del();
                    // try, line 210
                    v_1 = limit - cursor;
                    lab0: do {
                        // (, line 210
                        // [, line 210
                        ket = cursor;
                        // literal, line 210
                        if (!(eq_s_b(1, "u")))
                        {
                            cursor = limit - v_1;
                            break lab0;
                        }
                        // ], line 210
                        bra = cursor;
                        // test, line 210
                        v_2 = limit - cursor;
                        // literal, line 210
                        if (!(eq_s_b(1, "g")))
                        {
                            cursor = limit - v_1;
                            break lab0;
                        }
                        cursor = limit - v_2;
                        // call RV, line 210
                        if (!r_RV())
                        {
                            cursor = limit - v_1;
                            break lab0;
                        }
                        // delete, line 210
                        slice_del();
                    } while (false);
                    break;
            }
            return true;
        }

        public boolean stem() {
            int v_1;
            int v_2;
            int v_3;
            int v_4;
            int v_5;
            int v_6;
            // (, line 215
            // do, line 216
            v_1 = cursor;
            lab0: do {
                // call mark_regions, line 216
                if (!r_mark_regions())
                {
                    break lab0;
                }
            } while (false);
            cursor = v_1;
            // backwards, line 217
            limit_backward = cursor; cursor = limit;
            // (, line 217
            // do, line 218
            v_2 = limit - cursor;
            lab1: do {
                // call attached_pronoun, line 218
                if (!r_attached_pronoun())
                {
                    break lab1;
                }
            } while (false);
            cursor = limit - v_2;
            // do, line 219
            v_3 = limit - cursor;
            lab2: do {
                // (, line 219
                // or, line 219
                lab3: do {
                    v_4 = limit - cursor;
                    lab4: do {
                        // call standard_suffix, line 219
                        if (!r_standard_suffix())
                        {
                            break lab4;
                        }
                        break lab3;
                    } while (false);
                    cursor = limit - v_4;
                    lab5: do {
                        // call y_verb_suffix, line 220
                        if (!r_y_verb_suffix())
                        {
                            break lab5;
                        }
                        break lab3;
                    } while (false);
                    cursor = limit - v_4;
                    // call verb_suffix, line 221
                    if (!r_verb_suffix())
                    {
                        break lab2;
                    }
                } while (false);
            } while (false);
            cursor = limit - v_3;
            // do, line 223
            v_5 = limit - cursor;
            lab6: do {
                // call residual_suffix, line 223
                if (!r_residual_suffix())
                {
                    break lab6;
                }
            } while (false);
            cursor = limit - v_5;
            cursor = limit_backward;            // do, line 225
            v_6 = cursor;
            lab7: do {
                // call postlude, line 225
                if (!r_postlude())
                {
                    break lab7;
                }
            } while (false);
            cursor = v_6;
            return true;
        }

}

Other Lucene examples (source code examples)

Here is a short list of links related to this Lucene SpanishStemmer.java source code file:

... this post is sponsored by my books ...

#1 New Release!

FP Best Seller

 

new blog posts

 

Copyright 1998-2021 Alvin Alexander, alvinalexander.com
All Rights Reserved.

A percentage of advertising revenue from
pages under the /java/jwarehouse URI on this website is
paid back to open source projects.