mirror of https://github.com/ogoun/Zero.git
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1745 lines
61 KiB
1745 lines
61 KiB
6 years ago
|
/*
|
||
|
|
* Port of Snowball stemmers on C#
|
||
|
|
* Original stemmers can be found on http://snowball.tartarus.org
|
||
|
|
* Licence still BSD: http://snowball.tartarus.org/license.php
|
||
|
|
*
|
||
|
|
* Most of stemmers are ported from Java by Iveonik Systems ltd. (www.iveonik.com)
|
||
|
|
*/
|
||
|
|
using ZeroLevel.Services.Semantic;
|
||
|
|
|
||
|
|
namespace Iveonik.Stemmers
|
||
|
|
{
|
||
|
|
public class FrenchStemmer : StemmerOperations, ILexer
|
||
|
|
{
|
||
|
|
private readonly static FrenchStemmer methodObject = new FrenchStemmer();
|
||
|
|
|
||
|
|
private readonly static Among[] a_0 =
|
||
|
|
{
|
||
|
|
new Among ( "col", -1, -1, null ),
|
||
|
|
new Among ( "par", -1, -1, null ),
|
||
|
|
new Among ( "tap", -1, -1, null )
|
||
|
|
};
|
||
|
|
|
||
|
|
private readonly static Among[] a_1 =
|
||
|
|
{
|
||
|
|
new Among ( "", -1, 4, null ),
|
||
|
|
new Among ( "I", 0, 1, null ),
|
||
|
|
new Among ( "U", 0, 2, null ),
|
||
|
|
new Among ( "Y", 0, 3, null )
|
||
|
|
};
|
||
|
|
|
||
|
|
private readonly static Among[] a_2 =
|
||
|
|
{
|
||
|
|
new Among ( "iqU", -1, 3, null ),
|
||
|
|
new Among ( "abl", -1, 3, null ),
|
||
|
|
new Among ( "I\u00E8r", -1, 4, null ),
|
||
|
|
new Among ( "i\u00E8r", -1, 4, null ),
|
||
|
|
new Among ( "eus", -1, 2, null ),
|
||
|
|
new Among ( "iv", -1, 1, null )
|
||
|
|
};
|
||
|
|
|
||
|
|
private readonly static Among[] a_3 =
|
||
|
|
{
|
||
|
|
new Among ( "ic", -1, 2, null ),
|
||
|
|
new Among ( "abil", -1, 1, null ),
|
||
|
|
new Among ( "iv", -1, 3, null )
|
||
|
|
};
|
||
|
|
|
||
|
|
private readonly static Among[] a_4 =
|
||
|
|
{
|
||
|
|
new Among ( "iqUe", -1, 1, null ),
|
||
|
|
new Among ( "atrice", -1, 2, null ),
|
||
|
|
new Among ( "ance", -1, 1, null ),
|
||
|
|
new Among ( "ence", -1, 5, null ),
|
||
|
|
new Among ( "logie", -1, 3, null ),
|
||
|
|
new Among ( "able", -1, 1, null ),
|
||
|
|
new Among ( "isme", -1, 1, null ),
|
||
|
|
new Among ( "euse", -1, 11, null ),
|
||
|
|
new Among ( "iste", -1, 1, null ),
|
||
|
|
new Among ( "ive", -1, 8, null ),
|
||
|
|
new Among ( "if", -1, 8, null ),
|
||
|
|
new Among ( "usion", -1, 4, null ),
|
||
|
|
new Among ( "ation", -1, 2, null ),
|
||
|
|
new Among ( "ution", -1, 4, null ),
|
||
|
|
new Among ( "ateur", -1, 2, null ),
|
||
|
|
new Among ( "iqUes", -1, 1, null ),
|
||
|
|
new Among ( "atrices", -1, 2, null ),
|
||
|
|
new Among ( "ances", -1, 1, null ),
|
||
|
|
new Among ( "ences", -1, 5, null ),
|
||
|
|
new Among ( "logies", -1, 3, null ),
|
||
|
|
new Among ( "ables", -1, 1, null ),
|
||
|
|
new Among ( "ismes", -1, 1, null ),
|
||
|
|
new Among ( "euses", -1, 11, null ),
|
||
|
|
new Among ( "istes", -1, 1, null ),
|
||
|
|
new Among ( "ives", -1, 8, null ),
|
||
|
|
new Among ( "ifs", -1, 8, null ),
|
||
|
|
new Among ( "usions", -1, 4, null ),
|
||
|
|
new Among ( "ations", -1, 2, null ),
|
||
|
|
new Among ( "utions", -1, 4, null ),
|
||
|
|
new Among ( "ateurs", -1, 2, null ),
|
||
|
|
new Among ( "ments", -1, 15, null ),
|
||
|
|
new Among ( "ements", 30, 6, null ),
|
||
|
|
new Among ( "issements", 31, 12, null ),
|
||
|
|
new Among ( "it\u00E9s", -1, 7, null ),
|
||
|
|
new Among ( "ment", -1, 15, null ),
|
||
|
|
new Among ( "ement", 34, 6, null ),
|
||
|
|
new Among ( "issement", 35, 12, null ),
|
||
|
|
new Among ( "amment", 34, 13, null ),
|
||
|
|
new Among ( "emment", 34, 14, null ),
|
||
|
|
new Among ( "aux", -1, 10, null ),
|
||
|
|
new Among ( "eaux", 39, 9, null ),
|
||
|
|
new Among ( "eux", -1, 1, null ),
|
||
|
|
new Among ( "it\u00E9", -1, 7, null )
|
||
|
|
};
|
||
|
|
|
||
|
|
private readonly static Among[] a_5 =
|
||
|
|
{
|
||
|
|
new Among ( "ira", -1, 1, null ),
|
||
|
|
new Among ( "ie", -1, 1, null ),
|
||
|
|
new Among ( "isse", -1, 1, null ),
|
||
|
|
new Among ( "issante", -1, 1, null ),
|
||
|
|
new Among ( "i", -1, 1, null ),
|
||
|
|
new Among ( "irai", 4, 1, null ),
|
||
|
|
new Among ( "ir", -1, 1, null ),
|
||
|
|
new Among ( "iras", -1, 1, null ),
|
||
|
|
new Among ( "ies", -1, 1, null ),
|
||
|
|
new Among ( "\u00EEmes", -1, 1, null ),
|
||
|
|
new Among ( "isses", -1, 1, null ),
|
||
|
|
new Among ( "issantes", -1, 1, null ),
|
||
|
|
new Among ( "\u00EEtes", -1, 1, null ),
|
||
|
|
new Among ( "is", -1, 1, null ),
|
||
|
|
new Among ( "irais", 13, 1, null ),
|
||
|
|
new Among ( "issais", 13, 1, null ),
|
||
|
|
new Among ( "irions", -1, 1, null ),
|
||
|
|
new Among ( "issions", -1, 1, null ),
|
||
|
|
new Among ( "irons", -1, 1, null ),
|
||
|
|
new Among ( "issons", -1, 1, null ),
|
||
|
|
new Among ( "issants", -1, 1, null ),
|
||
|
|
new Among ( "it", -1, 1, null ),
|
||
|
|
new Among ( "irait", 21, 1, null ),
|
||
|
|
new Among ( "issait", 21, 1, null ),
|
||
|
|
new Among ( "issant", -1, 1, null ),
|
||
|
|
new Among ( "iraIent", -1, 1, null ),
|
||
|
|
new Among ( "issaIent", -1, 1, null ),
|
||
|
|
new Among ( "irent", -1, 1, null ),
|
||
|
|
new Among ( "issent", -1, 1, null ),
|
||
|
|
new Among ( "iront", -1, 1, null ),
|
||
|
|
new Among ( "\u00EEt", -1, 1, null ),
|
||
|
|
new Among ( "iriez", -1, 1, null ),
|
||
|
|
new Among ( "issiez", -1, 1, null ),
|
||
|
|
new Among ( "irez", -1, 1, null ),
|
||
|
|
new Among ( "issez", -1, 1, null )
|
||
|
|
};
|
||
|
|
|
||
|
|
private readonly static Among[] a_6 =
|
||
|
|
{
|
||
|
|
new Among ( "a", -1, 3, null ),
|
||
|
|
new Among ( "era", 0, 2, null ),
|
||
|
|
new Among ( "asse", -1, 3, null ),
|
||
|
|
new Among ( "ante", -1, 3, null ),
|
||
|
|
new Among ( "\u00E9e", -1, 2, null ),
|
||
|
|
new Among ( "ai", -1, 3, null ),
|
||
|
|
new Among ( "erai", 5, 2, null ),
|
||
|
|
new Among ( "er", -1, 2, null ),
|
||
|
|
new Among ( "as", -1, 3, null ),
|
||
|
|
new Among ( "eras", 8, 2, null ),
|
||
|
|
new Among ( "\u00E2mes", -1, 3, null ),
|
||
|
|
new Among ( "asses", -1, 3, null ),
|
||
|
|
new Among ( "antes", -1, 3, null ),
|
||
|
|
new Among ( "\u00E2tes", -1, 3, null ),
|
||
|
|
new Among ( "\u00E9es", -1, 2, null ),
|
||
|
|
new Among ( "ais", -1, 3, null ),
|
||
|
|
new Among ( "erais", 15, 2, null ),
|
||
|
|
new Among ( "ions", -1, 1, null ),
|
||
|
|
new Among ( "erions", 17, 2, null ),
|
||
|
|
new Among ( "assions", 17, 3, null ),
|
||
|
|
new Among ( "erons", -1, 2, null ),
|
||
|
|
new Among ( "ants", -1, 3, null ),
|
||
|
|
new Among ( "\u00E9s", -1, 2, null ),
|
||
|
|
new Among ( "ait", -1, 3, null ),
|
||
|
|
new Among ( "erait", 23, 2, null ),
|
||
|
|
new Among ( "ant", -1, 3, null ),
|
||
|
|
new Among ( "aIent", -1, 3, null ),
|
||
|
|
new Among ( "eraIent", 26, 2, null ),
|
||
|
|
new Among ( "\u00E8rent", -1, 2, null ),
|
||
|
|
new Among ( "assent", -1, 3, null ),
|
||
|
|
new Among ( "eront", -1, 2, null ),
|
||
|
|
new Among ( "\u00E2t", -1, 3, null ),
|
||
|
|
new Among ( "ez", -1, 2, null ),
|
||
|
|
new Among ( "iez", 32, 2, null ),
|
||
|
|
new Among ( "eriez", 33, 2, null ),
|
||
|
|
new Among ( "assiez", 33, 3, null ),
|
||
|
|
new Among ( "erez", 32, 2, null ),
|
||
|
|
new Among ( "\u00E9", -1, 2, null )
|
||
|
|
};
|
||
|
|
|
||
|
|
private readonly static Among[] a_7 =
|
||
|
|
{
|
||
|
|
new Among ( "e", -1, 3, null ),
|
||
|
|
new Among ( "I\u00E8re", 0, 2, null ),
|
||
|
|
new Among ( "i\u00E8re", 0, 2, null ),
|
||
|
|
new Among ( "ion", -1, 1, null ),
|
||
|
|
new Among ( "Ier", -1, 2, null ),
|
||
|
|
new Among ( "ier", -1, 2, null ),
|
||
|
|
new Among ( "\u00EB", -1, 4, null )
|
||
|
|
|
||
|
|
};
|
||
|
|
|
||
|
|
private readonly static Among[] a_8 =
|
||
|
|
{
|
||
|
|
new Among ( "ell", -1, -1, null ),
|
||
|
|
new Among ( "eill", -1, -1, null ),
|
||
|
|
new Among ( "enn", -1, -1, null ),
|
||
|
|
new Among ( "onn", -1, -1, null ),
|
||
|
|
new Among ( "ett", -1, -1, null )
|
||
|
|
};
|
||
|
|
|
||
|
|
private static readonly char[] g_v = {(char)17, (char)65, (char)16, (char)1, (char)0,
|
||
|
|
(char)0,(char)0, (char)0, (char)0, (char)0, (char)0,
|
||
|
|
(char)0, (char)0, (char)0,(char)0, (char)128, (char)130,
|
||
|
|
(char)103, (char)8, (char)5 };
|
||
|
|
private static readonly char[] g_keep_with_s = {(char)1, (char)65, (char)20, (char)0, (char)0, (char)0,
|
||
|
|
(char)0, (char)0, (char)0, (char)0, (char)0, (char)0,
|
||
|
|
(char)0, (char)0, (char)0, (char)0, (char)128 };
|
||
|
|
|
||
|
|
private int I_p2;
|
||
|
|
private int I_p1;
|
||
|
|
private int I_pV;
|
||
|
|
|
||
|
|
private void copy_from(FrenchStemmer other)
|
||
|
|
{
|
||
|
|
I_p2 = other.I_p2;
|
||
|
|
I_p1 = other.I_p1;
|
||
|
|
I_pV = other.I_pV;
|
||
|
|
base.copy_from(other);
|
||
|
|
}
|
||
|
|
|
||
|
|
private bool r_prelude()
|
||
|
|
{
|
||
|
|
bool subroot = false;
|
||
|
|
int v_1;
|
||
|
|
int v_2;
|
||
|
|
int v_3;
|
||
|
|
int v_4;
|
||
|
|
// repeat, line 38
|
||
|
|
replab0: while (true)
|
||
|
|
{
|
||
|
|
v_1 = cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// goto, line 38
|
||
|
|
while (true)
|
||
|
|
{
|
||
|
|
v_2 = cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 38
|
||
|
|
// or, line 44
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_3 = cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 40
|
||
|
|
if (!(in_grouping(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// [, line 40
|
||
|
|
bra = cursor;
|
||
|
|
// or, line 40
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_4 = cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 40
|
||
|
|
// literal, line 40
|
||
|
|
if (!(eq_s(1, "u")))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 40
|
||
|
|
ket = cursor;
|
||
|
|
if (!(in_grouping(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// <-, line 40
|
||
|
|
slice_from("U");
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
cursor = v_4;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 41
|
||
|
|
// literal, line 41
|
||
|
|
if (!(eq_s(1, "i")))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 41
|
||
|
|
ket = cursor;
|
||
|
|
if (!(in_grouping(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// <-, line 41
|
||
|
|
slice_from("I");
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
cursor = v_4;
|
||
|
|
// (, line 42
|
||
|
|
// literal, line 42
|
||
|
|
if (!(eq_s(1, "y")))
|
||
|
|
{
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 42
|
||
|
|
ket = cursor;
|
||
|
|
// <-, line 42
|
||
|
|
slice_from("Y");
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
cursor = v_3;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 45
|
||
|
|
// [, line 45
|
||
|
|
bra = cursor;
|
||
|
|
// literal, line 45
|
||
|
|
if (!(eq_s(1, "y")))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 45
|
||
|
|
ket = cursor;
|
||
|
|
if (!(in_grouping(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// <-, line 45
|
||
|
|
slice_from("Y");
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
cursor = v_3;
|
||
|
|
// (, line 47
|
||
|
|
// literal, line 47
|
||
|
|
if (!(eq_s(1, "q")))
|
||
|
|
{
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// [, line 47
|
||
|
|
bra = cursor;
|
||
|
|
// literal, line 47
|
||
|
|
if (!(eq_s(1, "u")))
|
||
|
|
{
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 47
|
||
|
|
ket = cursor;
|
||
|
|
// <-, line 47
|
||
|
|
slice_from("U");
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
cursor = v_2;
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
cursor = v_2;
|
||
|
|
if (cursor >= limit)
|
||
|
|
{
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
cursor++;
|
||
|
|
}
|
||
|
|
if (subroot)
|
||
|
|
{
|
||
|
|
subroot = false;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
else if (!subroot)
|
||
|
|
{ goto replab0; }
|
||
|
|
} while (false);
|
||
|
|
cursor = v_1;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
private bool r_mark_regions()
|
||
|
|
{
|
||
|
|
|
||
|
|
bool subroot = false;
|
||
|
|
bool root = false;
|
||
|
|
int v_1;
|
||
|
|
int v_2;
|
||
|
|
int v_4;
|
||
|
|
// (, line 50
|
||
|
|
I_pV = limit;
|
||
|
|
I_p1 = limit;
|
||
|
|
I_p2 = limit;
|
||
|
|
// do, line 56
|
||
|
|
v_1 = cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 56
|
||
|
|
// or, line 58
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_2 = cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 57
|
||
|
|
if (!(in_grouping(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
if (!(in_grouping(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// next, line 57
|
||
|
|
if (cursor >= limit)
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
cursor++;
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
cursor = v_2;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// among, line 59
|
||
|
|
if (find_among(a_0, 3) == 0)
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
cursor = v_2;
|
||
|
|
// (, line 66
|
||
|
|
// next, line 66
|
||
|
|
if (cursor >= limit)
|
||
|
|
{
|
||
|
|
root = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
cursor++;
|
||
|
|
// gopast, line 66
|
||
|
|
while (true)
|
||
|
|
{
|
||
|
|
do
|
||
|
|
{
|
||
|
|
if (!(in_grouping(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
if (cursor >= limit)
|
||
|
|
{
|
||
|
|
root = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
cursor++;
|
||
|
|
}
|
||
|
|
} while (false);
|
||
|
|
if (root) { root = false; break; }
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
// setmark pV, line 67
|
||
|
|
I_pV = cursor;
|
||
|
|
} while (false);
|
||
|
|
cursor = v_1;
|
||
|
|
// do, line 69
|
||
|
|
subroot = false;
|
||
|
|
v_4 = cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 69
|
||
|
|
// gopast, line 70
|
||
|
|
while (true)
|
||
|
|
{
|
||
|
|
do
|
||
|
|
{
|
||
|
|
if (!(in_grouping(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
if (cursor >= limit)
|
||
|
|
{
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
cursor++;
|
||
|
|
}
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
// gopast, line 70
|
||
|
|
while (true)
|
||
|
|
{
|
||
|
|
do
|
||
|
|
{
|
||
|
|
if (!(out_grouping(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
if (cursor >= limit)
|
||
|
|
{
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
cursor++;
|
||
|
|
}
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
// setmark p1, line 70
|
||
|
|
I_p1 = cursor;
|
||
|
|
// gopast, line 71
|
||
|
|
while (true)
|
||
|
|
{
|
||
|
|
do
|
||
|
|
{
|
||
|
|
if (!(in_grouping(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
if (cursor >= limit)
|
||
|
|
{
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
cursor++;
|
||
|
|
}
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
// gopast, line 71
|
||
|
|
while (true)
|
||
|
|
{
|
||
|
|
do
|
||
|
|
{
|
||
|
|
if (!(out_grouping(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
if (cursor >= limit)
|
||
|
|
{
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
cursor++;
|
||
|
|
}
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
// setmark p2, line 71
|
||
|
|
I_p2 = cursor;
|
||
|
|
} while (false);
|
||
|
|
cursor = v_4;
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
private bool r_postlude()
|
||
|
|
{
|
||
|
|
bool subroot = false;
|
||
|
|
int among_var;
|
||
|
|
int v_1;
|
||
|
|
// repeat, line 75
|
||
|
|
replab0: while (true)
|
||
|
|
{
|
||
|
|
v_1 = cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 75
|
||
|
|
// [, line 77
|
||
|
|
bra = cursor;
|
||
|
|
// substring, line 77
|
||
|
|
among_var = find_among(a_1, 4);
|
||
|
|
if (among_var == 0)
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 77
|
||
|
|
ket = cursor;
|
||
|
|
switch (among_var)
|
||
|
|
{
|
||
|
|
case 0:
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
case 1:
|
||
|
|
// (, line 78
|
||
|
|
// <-, line 78
|
||
|
|
slice_from("i");
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
// (, line 79
|
||
|
|
// <-, line 79
|
||
|
|
slice_from("u");
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
// (, line 80
|
||
|
|
// <-, line 80
|
||
|
|
slice_from("y");
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
// (, line 81
|
||
|
|
// next, line 81
|
||
|
|
if (cursor >= limit)
|
||
|
|
{
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
cursor++;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
else if (!subroot)
|
||
|
|
{
|
||
|
|
goto replab0;
|
||
|
|
}
|
||
|
|
} while (false);
|
||
|
|
cursor = v_1;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
private bool r_RV()
|
||
|
|
{
|
||
|
|
if (!(I_pV <= cursor))
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
private bool r_R1()
|
||
|
|
{
|
||
|
|
if (!(I_p1 <= cursor))
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
private bool r_R2()
|
||
|
|
{
|
||
|
|
if (!(I_p2 <= cursor))
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
private bool r_standard_suffix()
|
||
|
|
{
|
||
|
|
bool subroot = false;
|
||
|
|
int among_var;
|
||
|
|
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;
|
||
|
|
// (, line 91
|
||
|
|
// [, line 92
|
||
|
|
ket = cursor;
|
||
|
|
// substring, line 92
|
||
|
|
among_var = find_among_b(a_4, 43);
|
||
|
|
if (among_var == 0)
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// ], line 92
|
||
|
|
bra = cursor;
|
||
|
|
switch (among_var)
|
||
|
|
{
|
||
|
|
case 0:
|
||
|
|
return false;
|
||
|
|
case 1:
|
||
|
|
// (, line 96
|
||
|
|
// call R2, line 96
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// delete, line 96
|
||
|
|
slice_del();
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
// (, line 99
|
||
|
|
// call R2, line 99
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// delete, line 99
|
||
|
|
slice_del();
|
||
|
|
// try, line 100
|
||
|
|
v_1 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 100
|
||
|
|
// [, line 100
|
||
|
|
ket = cursor;
|
||
|
|
// literal, line 100
|
||
|
|
if (!(eq_s_b(2, "ic")))
|
||
|
|
{
|
||
|
|
cursor = limit - v_1;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 100
|
||
|
|
bra = cursor;
|
||
|
|
// or, line 100
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_2 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 100
|
||
|
|
// call R2, line 100
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// delete, line 100
|
||
|
|
slice_del();
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
cursor = limit - v_2;
|
||
|
|
// <-, line 100
|
||
|
|
slice_from("iqU");
|
||
|
|
} while (false);
|
||
|
|
} while (false);
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
// (, line 104
|
||
|
|
// call R2, line 104
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// <-, line 104
|
||
|
|
slice_from("log");
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
// (, line 107
|
||
|
|
// call R2, line 107
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// <-, line 107
|
||
|
|
slice_from("u");
|
||
|
|
break;
|
||
|
|
case 5:
|
||
|
|
// (, line 110
|
||
|
|
// call R2, line 110
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// <-, line 110
|
||
|
|
slice_from("ent");
|
||
|
|
break;
|
||
|
|
case 6:
|
||
|
|
// (, line 113
|
||
|
|
// call RV, line 114
|
||
|
|
if (!r_RV())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// delete, line 114
|
||
|
|
slice_del();
|
||
|
|
// try, line 115
|
||
|
|
v_3 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 115
|
||
|
|
// [, line 116
|
||
|
|
ket = cursor;
|
||
|
|
// substring, line 116
|
||
|
|
among_var = find_among_b(a_2, 6);
|
||
|
|
if (among_var == 0)
|
||
|
|
{
|
||
|
|
cursor = limit - v_3;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 116
|
||
|
|
bra = cursor;
|
||
|
|
switch (among_var)
|
||
|
|
{
|
||
|
|
case 0:
|
||
|
|
cursor = limit - v_3;
|
||
|
|
subroot = true;
|
||
|
|
goto exitLab3;
|
||
|
|
case 1:
|
||
|
|
// (, line 117
|
||
|
|
// call R2, line 117
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
cursor = limit - v_3;
|
||
|
|
subroot = true;
|
||
|
|
goto exitLab3;
|
||
|
|
}
|
||
|
|
// delete, line 117
|
||
|
|
slice_del();
|
||
|
|
// [, line 117
|
||
|
|
ket = cursor;
|
||
|
|
// literal, line 117
|
||
|
|
if (!(eq_s_b(2, "at")))
|
||
|
|
{
|
||
|
|
cursor = limit - v_3;
|
||
|
|
subroot = true;
|
||
|
|
goto exitLab3;
|
||
|
|
}
|
||
|
|
// ], line 117
|
||
|
|
bra = cursor;
|
||
|
|
// call R2, line 117
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
cursor = limit - v_3;
|
||
|
|
subroot = true;
|
||
|
|
goto exitLab3;
|
||
|
|
}
|
||
|
|
// delete, line 117
|
||
|
|
slice_del();
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
// (, line 118
|
||
|
|
// or, line 118
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_4 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 118
|
||
|
|
// call R2, line 118
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// delete, line 118
|
||
|
|
slice_del();
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
cursor = limit - v_4;
|
||
|
|
// (, line 118
|
||
|
|
// call R1, line 118
|
||
|
|
if (!r_R1())
|
||
|
|
{
|
||
|
|
cursor = limit - v_3;
|
||
|
|
subroot = true;
|
||
|
|
goto exitLab3;
|
||
|
|
}
|
||
|
|
// <-, line 118
|
||
|
|
slice_from("eux");
|
||
|
|
} while (false);
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
// (, line 120
|
||
|
|
// call R2, line 120
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
cursor = limit - v_3;
|
||
|
|
subroot = true;
|
||
|
|
goto exitLab3;
|
||
|
|
}
|
||
|
|
// delete, line 120
|
||
|
|
slice_del();
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
// (, line 122
|
||
|
|
// call RV, line 122
|
||
|
|
if (!r_RV())
|
||
|
|
{
|
||
|
|
cursor = limit - v_3;
|
||
|
|
subroot = true;
|
||
|
|
goto exitLab3;
|
||
|
|
}
|
||
|
|
// <-, line 122
|
||
|
|
slice_from("i");
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
exitLab3: if (subroot) { subroot = false; break; }
|
||
|
|
} while (false);
|
||
|
|
break;
|
||
|
|
case 7:
|
||
|
|
// (, line 128
|
||
|
|
// call R2, line 129
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// delete, line 129
|
||
|
|
slice_del();
|
||
|
|
// try, line 130
|
||
|
|
v_5 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 130
|
||
|
|
// [, line 131
|
||
|
|
ket = cursor;
|
||
|
|
// substring, line 131
|
||
|
|
among_var = find_among_b(a_3, 3);
|
||
|
|
if (among_var == 0)
|
||
|
|
{
|
||
|
|
cursor = limit - v_5;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 131
|
||
|
|
bra = cursor;
|
||
|
|
switch (among_var)
|
||
|
|
{
|
||
|
|
case 0:
|
||
|
|
cursor = limit - v_5;
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
case 1:
|
||
|
|
// (, line 132
|
||
|
|
// or, line 132
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_6 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 132
|
||
|
|
// call R2, line 132
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// delete, line 132
|
||
|
|
slice_del();
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
cursor = limit - v_6;
|
||
|
|
// <-, line 132
|
||
|
|
slice_from("abl");
|
||
|
|
} while (false);
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
// (, line 133
|
||
|
|
// or, line 133
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_7 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 133
|
||
|
|
// call R2, line 133
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// delete, line 133
|
||
|
|
slice_del();
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
cursor = limit - v_7;
|
||
|
|
// <-, line 133
|
||
|
|
slice_from("iqU");
|
||
|
|
} while (false);
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
// (, line 134
|
||
|
|
// call R2, line 134
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
cursor = limit - v_5;
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// delete, line 134
|
||
|
|
slice_del();
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
} while (false);
|
||
|
|
break;
|
||
|
|
case 8:
|
||
|
|
// (, line 140
|
||
|
|
// call R2, line 141
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// delete, line 141
|
||
|
|
slice_del();
|
||
|
|
// try, line 142
|
||
|
|
v_8 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 142
|
||
|
|
// [, line 142
|
||
|
|
ket = cursor;
|
||
|
|
// literal, line 142
|
||
|
|
if (!(eq_s_b(2, "at")))
|
||
|
|
{
|
||
|
|
cursor = limit - v_8;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 142
|
||
|
|
bra = cursor;
|
||
|
|
// call R2, line 142
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
cursor = limit - v_8;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// delete, line 142
|
||
|
|
slice_del();
|
||
|
|
// [, line 142
|
||
|
|
ket = cursor;
|
||
|
|
// literal, line 142
|
||
|
|
if (!(eq_s_b(2, "ic")))
|
||
|
|
{
|
||
|
|
cursor = limit - v_8;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 142
|
||
|
|
bra = cursor;
|
||
|
|
// or, line 142
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_9 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 142
|
||
|
|
// call R2, line 142
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// delete, line 142
|
||
|
|
slice_del();
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
cursor = limit - v_9;
|
||
|
|
// <-, line 142
|
||
|
|
slice_from("iqU");
|
||
|
|
} while (false);
|
||
|
|
} while (false);
|
||
|
|
break;
|
||
|
|
case 9:
|
||
|
|
// (, line 144
|
||
|
|
// <-, line 144
|
||
|
|
slice_from("eau");
|
||
|
|
break;
|
||
|
|
case 10:
|
||
|
|
// (, line 145
|
||
|
|
// call R1, line 145
|
||
|
|
if (!r_R1())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// <-, line 145
|
||
|
|
slice_from("al");
|
||
|
|
break;
|
||
|
|
case 11:
|
||
|
|
// (, line 147
|
||
|
|
// or, line 147
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_10 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 147
|
||
|
|
// call R2, line 147
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// delete, line 147
|
||
|
|
slice_del();
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
cursor = limit - v_10;
|
||
|
|
// (, line 147
|
||
|
|
// call R1, line 147
|
||
|
|
if (!r_R1())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// <-, line 147
|
||
|
|
slice_from("eux");
|
||
|
|
} while (false);
|
||
|
|
break;
|
||
|
|
case 12:
|
||
|
|
// (, line 150
|
||
|
|
// call R1, line 150
|
||
|
|
if (!r_R1())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
if (!(out_grouping_b(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// delete, line 150
|
||
|
|
slice_del();
|
||
|
|
break;
|
||
|
|
case 13:
|
||
|
|
// (, line 155
|
||
|
|
// call RV, line 155
|
||
|
|
if (!r_RV())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// fail, line 155
|
||
|
|
// (, line 155
|
||
|
|
// <-, line 155
|
||
|
|
slice_from("ant");
|
||
|
|
return false;
|
||
|
|
case 14:
|
||
|
|
// (, line 156
|
||
|
|
// call RV, line 156
|
||
|
|
if (!r_RV())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// fail, line 156
|
||
|
|
// (, line 156
|
||
|
|
// <-, line 156
|
||
|
|
slice_from("ent");
|
||
|
|
return false;
|
||
|
|
case 15:
|
||
|
|
// (, line 158
|
||
|
|
// test, line 158
|
||
|
|
v_11 = limit - cursor;
|
||
|
|
// (, line 158
|
||
|
|
if (!(in_grouping_b(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// call RV, line 158
|
||
|
|
if (!r_RV())
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
cursor = limit - v_11;
|
||
|
|
// fail, line 158
|
||
|
|
// (, line 158
|
||
|
|
// delete, line 158
|
||
|
|
slice_del();
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
private bool r_i_verb_suffix()
|
||
|
|
{
|
||
|
|
int among_var;
|
||
|
|
int v_1;
|
||
|
|
int v_2;
|
||
|
|
// setlimit, line 163
|
||
|
|
v_1 = limit - cursor;
|
||
|
|
// tomark, line 163
|
||
|
|
if (cursor < I_pV)
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
cursor = I_pV;
|
||
|
|
v_2 = limit_backward;
|
||
|
|
limit_backward = cursor;
|
||
|
|
cursor = limit - v_1;
|
||
|
|
// (, line 163
|
||
|
|
// [, line 164
|
||
|
|
ket = cursor;
|
||
|
|
// substring, line 164
|
||
|
|
among_var = find_among_b(a_5, 35);
|
||
|
|
if (among_var == 0)
|
||
|
|
{
|
||
|
|
limit_backward = v_2;
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// ], line 164
|
||
|
|
bra = cursor;
|
||
|
|
switch (among_var)
|
||
|
|
{
|
||
|
|
case 0:
|
||
|
|
limit_backward = v_2;
|
||
|
|
return false;
|
||
|
|
case 1:
|
||
|
|
// (, line 170
|
||
|
|
if (!(out_grouping_b(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
limit_backward = v_2;
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// delete, line 170
|
||
|
|
slice_del();
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
limit_backward = v_2;
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
private bool r_verb_suffix()
|
||
|
|
{
|
||
|
|
int among_var;
|
||
|
|
int v_1;
|
||
|
|
int v_2;
|
||
|
|
int v_3;
|
||
|
|
// setlimit, line 174
|
||
|
|
v_1 = limit - cursor;
|
||
|
|
// tomark, line 174
|
||
|
|
if (cursor < I_pV)
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
cursor = I_pV;
|
||
|
|
v_2 = limit_backward;
|
||
|
|
limit_backward = cursor;
|
||
|
|
cursor = limit - v_1;
|
||
|
|
// (, line 174
|
||
|
|
// [, line 175
|
||
|
|
ket = cursor;
|
||
|
|
// substring, line 175
|
||
|
|
among_var = find_among_b(a_6, 38);
|
||
|
|
if (among_var == 0)
|
||
|
|
{
|
||
|
|
limit_backward = v_2;
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// ], line 175
|
||
|
|
bra = cursor;
|
||
|
|
switch (among_var)
|
||
|
|
{
|
||
|
|
case 0:
|
||
|
|
limit_backward = v_2;
|
||
|
|
return false;
|
||
|
|
case 1:
|
||
|
|
// (, line 177
|
||
|
|
// call R2, line 177
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
limit_backward = v_2;
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// delete, line 177
|
||
|
|
slice_del();
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
// (, line 185
|
||
|
|
// delete, line 185
|
||
|
|
slice_del();
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
// (, line 190
|
||
|
|
// delete, line 190
|
||
|
|
slice_del();
|
||
|
|
// try, line 191
|
||
|
|
v_3 = limit - cursor;
|
||
|
|
// lab0:
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 191
|
||
|
|
// [, line 191
|
||
|
|
ket = cursor;
|
||
|
|
// literal, line 191
|
||
|
|
if (!(eq_s_b(1, "e")))
|
||
|
|
{
|
||
|
|
cursor = limit - v_3;
|
||
|
|
// break lab0;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 191
|
||
|
|
bra = cursor;
|
||
|
|
// delete, line 191
|
||
|
|
slice_del();
|
||
|
|
} while (false);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
limit_backward = v_2;
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
private bool r_residual_suffix()
|
||
|
|
{
|
||
|
|
bool subroot = false;
|
||
|
|
int among_var;
|
||
|
|
int v_1;
|
||
|
|
int v_2;
|
||
|
|
int v_3;
|
||
|
|
int v_4;
|
||
|
|
int v_5;
|
||
|
|
// (, line 198
|
||
|
|
// try, line 199
|
||
|
|
v_1 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 199
|
||
|
|
// [, line 199
|
||
|
|
ket = cursor;
|
||
|
|
// literal, line 199
|
||
|
|
if (!(eq_s_b(1, "s")))
|
||
|
|
{
|
||
|
|
cursor = limit - v_1;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 199
|
||
|
|
bra = cursor;
|
||
|
|
// test, line 199
|
||
|
|
v_2 = limit - cursor;
|
||
|
|
if (!(out_grouping_b(g_keep_with_s, 97, 232)))
|
||
|
|
{
|
||
|
|
cursor = limit - v_1;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
cursor = limit - v_2;
|
||
|
|
// delete, line 199
|
||
|
|
slice_del();
|
||
|
|
} while (false);
|
||
|
|
// setlimit, line 200
|
||
|
|
v_3 = limit - cursor;
|
||
|
|
// tomark, line 200
|
||
|
|
if (cursor < I_pV)
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
cursor = I_pV;
|
||
|
|
v_4 = limit_backward;
|
||
|
|
limit_backward = cursor;
|
||
|
|
cursor = limit - v_3;
|
||
|
|
// (, line 200
|
||
|
|
// [, line 201
|
||
|
|
ket = cursor;
|
||
|
|
// substring, line 201
|
||
|
|
among_var = find_among_b(a_7, 7);
|
||
|
|
if (among_var == 0)
|
||
|
|
{
|
||
|
|
limit_backward = v_4;
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// ], line 201
|
||
|
|
bra = cursor;
|
||
|
|
switch (among_var)
|
||
|
|
{
|
||
|
|
case 0:
|
||
|
|
limit_backward = v_4;
|
||
|
|
return false;
|
||
|
|
case 1:
|
||
|
|
// (, line 202
|
||
|
|
// call R2, line 202
|
||
|
|
if (!r_R2())
|
||
|
|
{
|
||
|
|
limit_backward = v_4;
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// or, line 202
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_5 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// literal, line 202
|
||
|
|
if (!(eq_s_b(1, "s")))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
|
||
|
|
} while (false);
|
||
|
|
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
cursor = limit - v_5;
|
||
|
|
// literal, line 202
|
||
|
|
if (!(eq_s_b(1, "t")))
|
||
|
|
{
|
||
|
|
limit_backward = v_4;
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
} while (false);
|
||
|
|
// delete, line 202
|
||
|
|
slice_del();
|
||
|
|
break;
|
||
|
|
case 2:
|
||
|
|
// (, line 204
|
||
|
|
// <-, line 204
|
||
|
|
slice_from("i");
|
||
|
|
break;
|
||
|
|
case 3:
|
||
|
|
// (, line 205
|
||
|
|
// delete, line 205
|
||
|
|
slice_del();
|
||
|
|
break;
|
||
|
|
case 4:
|
||
|
|
// (, line 206
|
||
|
|
// literal, line 206
|
||
|
|
if (!(eq_s_b(2, "gu")))
|
||
|
|
{
|
||
|
|
limit_backward = v_4;
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
// delete, line 206
|
||
|
|
slice_del();
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
limit_backward = v_4;
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
private bool r_un_double()
|
||
|
|
{
|
||
|
|
int v_1;
|
||
|
|
// (, line 211
|
||
|
|
// test, line 212
|
||
|
|
v_1 = limit - cursor;
|
||
|
|
// among, line 212
|
||
|
|
if (find_among_b(a_8, 5) == 0)
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
cursor = limit - v_1;
|
||
|
|
// [, line 212
|
||
|
|
ket = cursor;
|
||
|
|
// next, line 212
|
||
|
|
if (cursor <= limit_backward)
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
cursor--;
|
||
|
|
// ], line 212
|
||
|
|
bra = cursor;
|
||
|
|
// delete, line 212
|
||
|
|
slice_del();
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
private bool r_un_accent()
|
||
|
|
{
|
||
|
|
bool subroot = false;
|
||
|
|
int v_3;
|
||
|
|
// (, line 215
|
||
|
|
// atleast, line 216
|
||
|
|
{
|
||
|
|
int v_1 = 1;
|
||
|
|
// atleast, line 216
|
||
|
|
replab0: while (true)
|
||
|
|
{
|
||
|
|
//lab1:
|
||
|
|
do
|
||
|
|
{
|
||
|
|
if (!(out_grouping_b(g_v, 97, 251)))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
v_1--;
|
||
|
|
if (!subroot)
|
||
|
|
{
|
||
|
|
goto replab0;
|
||
|
|
}
|
||
|
|
} while (false);
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
if (v_1 > 0)
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
// [, line 217
|
||
|
|
ket = cursor;
|
||
|
|
// or, line 217
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_3 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// literal, line 217
|
||
|
|
if (!(eq_s_b(1, "\u00E9")))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
cursor = limit - v_3;
|
||
|
|
// literal, line 217
|
||
|
|
if (!(eq_s_b(1, "\u00E8")))
|
||
|
|
{
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
} while (false);
|
||
|
|
// ], line 217
|
||
|
|
bra = cursor;
|
||
|
|
// <-, line 217
|
||
|
|
slice_from("e");
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
private bool CanStem()
|
||
|
|
{
|
||
|
|
bool subroot = false;
|
||
|
|
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;
|
||
|
|
// (, line 221
|
||
|
|
// do, line 223
|
||
|
|
v_1 = cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// call prelude, line 223
|
||
|
|
if (!r_prelude())
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
} while (false);
|
||
|
|
cursor = v_1;
|
||
|
|
// do, line 224
|
||
|
|
v_2 = cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// call mark_regions, line 224
|
||
|
|
if (!r_mark_regions())
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
} while (false);
|
||
|
|
cursor = v_2;
|
||
|
|
// backwards, line 225
|
||
|
|
limit_backward = cursor; cursor = limit;
|
||
|
|
// (, line 225
|
||
|
|
// do, line 227
|
||
|
|
v_3 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 227
|
||
|
|
// or, line 237
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_4 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 228
|
||
|
|
// and, line 233
|
||
|
|
v_5 = limit - cursor;
|
||
|
|
// (, line 229
|
||
|
|
// or, line 229
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_6 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// call standard_suffix, line 229
|
||
|
|
if (!r_standard_suffix())
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
cursor = limit - v_6;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// call i_verb_suffix, line 230
|
||
|
|
if (!r_i_verb_suffix())
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
cursor = limit - v_6;
|
||
|
|
// call verb_suffix, line 231
|
||
|
|
if (!r_verb_suffix())
|
||
|
|
{
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
} while (false);
|
||
|
|
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
cursor = limit - v_5;
|
||
|
|
// try, line 234
|
||
|
|
v_7 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 234
|
||
|
|
// [, line 234
|
||
|
|
ket = cursor;
|
||
|
|
// or, line 234
|
||
|
|
do
|
||
|
|
{
|
||
|
|
v_8 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// (, line 234
|
||
|
|
// literal, line 234
|
||
|
|
if (!(eq_s_b(1, "Y")))
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 234
|
||
|
|
bra = cursor;
|
||
|
|
// <-, line 234
|
||
|
|
slice_from("i");
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
cursor = limit - v_8;
|
||
|
|
// (, line 235
|
||
|
|
// literal, line 235
|
||
|
|
if (!(eq_s_b(1, "\u00E7")))
|
||
|
|
{
|
||
|
|
cursor = limit - v_7;
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
// ], line 235
|
||
|
|
bra = cursor;
|
||
|
|
// <-, line 235
|
||
|
|
slice_from("c");
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
} while (false);
|
||
|
|
subroot = true;
|
||
|
|
if (subroot) break;
|
||
|
|
} while (false);
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
cursor = limit - v_4;
|
||
|
|
// call residual_suffix, line 238
|
||
|
|
if (!r_residual_suffix())
|
||
|
|
{
|
||
|
|
subroot = true;
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
} while (false);
|
||
|
|
|
||
|
|
if (subroot) { subroot = false; break; }
|
||
|
|
|
||
|
|
} while (false);
|
||
|
|
cursor = limit - v_3;
|
||
|
|
// do, line 243
|
||
|
|
v_9 = limit - cursor;
|
||
|
|
// lab11:
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// call un_double, line 243
|
||
|
|
if (!r_un_double())
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
} while (false);
|
||
|
|
cursor = limit - v_9;
|
||
|
|
// do, line 244
|
||
|
|
v_10 = limit - cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// call un_accent, line 244
|
||
|
|
if (!r_un_accent())
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
} while (false);
|
||
|
|
cursor = limit - v_10;
|
||
|
|
cursor = limit_backward; // do, line 246
|
||
|
|
v_11 = cursor;
|
||
|
|
do
|
||
|
|
{
|
||
|
|
// call postlude, line 246
|
||
|
|
if (!r_postlude())
|
||
|
|
{
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
} while (false);
|
||
|
|
cursor = v_11;
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
|
||
|
|
public string Lex(string s)
|
||
|
|
{
|
||
|
|
this.setCurrent(s.ToLowerInvariant());
|
||
|
|
this.CanStem();
|
||
|
|
return this.getCurrent();
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|