--- /dev/null
+// 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 DanishStemmer extends SnowballProgram {
+
+ private Among a_0[] = {
+ new Among ( "hed", -1, 1, "", this),
+ new Among ( "ethed", 0, 1, "", this),
+ new Among ( "ered", -1, 1, "", this),
+ new Among ( "e", -1, 1, "", this),
+ new Among ( "erede", 3, 1, "", this),
+ new Among ( "ende", 3, 1, "", this),
+ new Among ( "erende", 5, 1, "", this),
+ new Among ( "ene", 3, 1, "", this),
+ new Among ( "erne", 3, 1, "", this),
+ new Among ( "ere", 3, 1, "", this),
+ new Among ( "en", -1, 1, "", this),
+ new Among ( "heden", 10, 1, "", this),
+ new Among ( "eren", 10, 1, "", this),
+ new Among ( "er", -1, 1, "", this),
+ new Among ( "heder", 13, 1, "", this),
+ new Among ( "erer", 13, 1, "", this),
+ new Among ( "s", -1, 2, "", this),
+ new Among ( "heds", 16, 1, "", this),
+ new Among ( "es", 16, 1, "", this),
+ new Among ( "endes", 18, 1, "", this),
+ new Among ( "erendes", 19, 1, "", this),
+ new Among ( "enes", 18, 1, "", this),
+ new Among ( "ernes", 18, 1, "", this),
+ new Among ( "eres", 18, 1, "", this),
+ new Among ( "ens", 16, 1, "", this),
+ new Among ( "hedens", 24, 1, "", this),
+ new Among ( "erens", 24, 1, "", this),
+ new Among ( "ers", 16, 1, "", this),
+ new Among ( "ets", 16, 1, "", this),
+ new Among ( "erets", 28, 1, "", this),
+ new Among ( "et", -1, 1, "", this),
+ new Among ( "eret", 30, 1, "", this)
+ };
+
+ private Among a_1[] = {
+ new Among ( "gd", -1, -1, "", this),
+ new Among ( "dt", -1, -1, "", this),
+ new Among ( "gt", -1, -1, "", this),
+ new Among ( "kt", -1, -1, "", this)
+ };
+
+ private Among a_2[] = {
+ new Among ( "ig", -1, 1, "", this),
+ new Among ( "lig", 0, 1, "", this),
+ new Among ( "elig", 1, 1, "", this),
+ new Among ( "els", -1, 1, "", this),
+ new Among ( "l\u00F8st", -1, 2, "", this)
+ };
+
+ private static final char g_v[] = {17, 65, 16, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 48, 0, 128 };
+
+ private static final char g_s_ending[] = {239, 254, 42, 3, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 16 };
+
+ private int I_x;
+ private int I_p1;
+ private StringBuilder S_ch = new StringBuilder();
+
+ private void copy_from(DanishStemmer other) {
+ I_x = other.I_x;
+ I_p1 = other.I_p1;
+ S_ch = other.S_ch;
+ super.copy_from(other);
+ }
+
+ private boolean r_mark_regions() {
+ int v_1;
+ int v_2;
+ // (, line 29
+ I_p1 = limit;
+ // test, line 33
+ v_1 = cursor;
+ // (, line 33
+ // hop, line 33
+ {
+ int c = cursor + 3;
+ if (0 > c || c > limit)
+ {
+ return false;
+ }
+ cursor = c;
+ }
+ // setmark x, line 33
+ I_x = cursor;
+ cursor = v_1;
+ // goto, line 34
+ golab0: while(true)
+ {
+ v_2 = cursor;
+ lab1: do {
+ if (!(in_grouping(g_v, 97, 248)))
+ {
+ break lab1;
+ }
+ cursor = v_2;
+ break golab0;
+ } while (false);
+ cursor = v_2;
+ if (cursor >= limit)
+ {
+ return false;
+ }
+ cursor++;
+ }
+ // gopast, line 34
+ golab2: while(true)
+ {
+ lab3: do {
+ if (!(out_grouping(g_v, 97, 248)))
+ {
+ break lab3;
+ }
+ break golab2;
+ } while (false);
+ if (cursor >= limit)
+ {
+ return false;
+ }
+ cursor++;
+ }
+ // setmark p1, line 34
+ I_p1 = cursor;
+ // try, line 35
+ lab4: do {
+ // (, line 35
+ if (!(I_p1 < I_x))
+ {
+ break lab4;
+ }
+ I_p1 = I_x;
+ } while (false);
+ return true;
+ }
+
+ private boolean r_main_suffix() {
+ int among_var;
+ int v_1;
+ int v_2;
+ // (, line 40
+ // setlimit, line 41
+ v_1 = limit - cursor;
+ // tomark, line 41
+ if (cursor < I_p1)
+ {
+ return false;
+ }
+ cursor = I_p1;
+ v_2 = limit_backward;
+ limit_backward = cursor;
+ cursor = limit - v_1;
+ // (, line 41
+ // [, line 41
+ ket = cursor;
+ // substring, line 41
+ among_var = find_among_b(a_0, 32);
+ if (among_var == 0)
+ {
+ limit_backward = v_2;
+ return false;
+ }
+ // ], line 41
+ bra = cursor;
+ limit_backward = v_2;
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 48
+ // delete, line 48
+ slice_del();
+ break;
+ case 2:
+ // (, line 50
+ if (!(in_grouping_b(g_s_ending, 97, 229)))
+ {
+ return false;
+ }
+ // delete, line 50
+ slice_del();
+ break;
+ }
+ return true;
+ }
+
+ private boolean r_consonant_pair() {
+ int v_1;
+ int v_2;
+ int v_3;
+ // (, line 54
+ // test, line 55
+ v_1 = limit - cursor;
+ // (, line 55
+ // setlimit, line 56
+ v_2 = limit - cursor;
+ // tomark, line 56
+ if (cursor < I_p1)
+ {
+ return false;
+ }
+ cursor = I_p1;
+ v_3 = limit_backward;
+ limit_backward = cursor;
+ cursor = limit - v_2;
+ // (, line 56
+ // [, line 56
+ ket = cursor;
+ // substring, line 56
+ if (find_among_b(a_1, 4) == 0)
+ {
+ limit_backward = v_3;
+ return false;
+ }
+ // ], line 56
+ bra = cursor;
+ limit_backward = v_3;
+ cursor = limit - v_1;
+ // next, line 62
+ if (cursor <= limit_backward)
+ {
+ return false;
+ }
+ cursor--;
+ // ], line 62
+ bra = cursor;
+ // delete, line 62
+ slice_del();
+ return true;
+ }
+
+ private boolean r_other_suffix() {
+ int among_var;
+ int v_1;
+ int v_2;
+ int v_3;
+ int v_4;
+ // (, line 65
+ // do, line 66
+ v_1 = limit - cursor;
+ lab0: do {
+ // (, line 66
+ // [, line 66
+ ket = cursor;
+ // literal, line 66
+ if (!(eq_s_b(2, "st")))
+ {
+ break lab0;
+ }
+ // ], line 66
+ bra = cursor;
+ // literal, line 66
+ if (!(eq_s_b(2, "ig")))
+ {
+ break lab0;
+ }
+ // delete, line 66
+ slice_del();
+ } while (false);
+ cursor = limit - v_1;
+ // setlimit, line 67
+ v_2 = limit - cursor;
+ // tomark, line 67
+ if (cursor < I_p1)
+ {
+ return false;
+ }
+ cursor = I_p1;
+ v_3 = limit_backward;
+ limit_backward = cursor;
+ cursor = limit - v_2;
+ // (, line 67
+ // [, line 67
+ ket = cursor;
+ // substring, line 67
+ among_var = find_among_b(a_2, 5);
+ if (among_var == 0)
+ {
+ limit_backward = v_3;
+ return false;
+ }
+ // ], line 67
+ bra = cursor;
+ limit_backward = v_3;
+ switch(among_var) {
+ case 0:
+ return false;
+ case 1:
+ // (, line 70
+ // delete, line 70
+ slice_del();
+ // do, line 70
+ v_4 = limit - cursor;
+ lab1: do {
+ // call consonant_pair, line 70
+ if (!r_consonant_pair())
+ {
+ break lab1;
+ }
+ } while (false);
+ cursor = limit - v_4;
+ break;
+ case 2:
+ // (, line 72
+ // <-, line 72
+ slice_from("l\u00F8s");
+ break;
+ }
+ return true;
+ }
+
+ private boolean r_undouble() {
+ int v_1;
+ int v_2;
+ // (, line 75
+ // setlimit, line 76
+ v_1 = limit - cursor;
+ // tomark, line 76
+ if (cursor < I_p1)
+ {
+ return false;
+ }
+ cursor = I_p1;
+ v_2 = limit_backward;
+ limit_backward = cursor;
+ cursor = limit - v_1;
+ // (, line 76
+ // [, line 76
+ ket = cursor;
+ if (!(out_grouping_b(g_v, 97, 248)))
+ {
+ limit_backward = v_2;
+ return false;
+ }
+ // ], line 76
+ bra = cursor;
+ // -> ch, line 76
+ S_ch = slice_to(S_ch);
+ limit_backward = v_2;
+ // name ch, line 77
+ if (!(eq_v_b(S_ch)))
+ {
+ return false;
+ }
+ // delete, line 78
+ slice_del();
+ return true;
+ }
+
+ public boolean stem() {
+ int v_1;
+ int v_2;
+ int v_3;
+ int v_4;
+ int v_5;
+ // (, line 82
+ // do, line 84
+ v_1 = cursor;
+ lab0: do {
+ // call mark_regions, line 84
+ if (!r_mark_regions())
+ {
+ break lab0;
+ }
+ } while (false);
+ cursor = v_1;
+ // backwards, line 85
+ limit_backward = cursor; cursor = limit;
+ // (, line 85
+ // do, line 86
+ v_2 = limit - cursor;
+ lab1: do {
+ // call main_suffix, line 86
+ if (!r_main_suffix())
+ {
+ break lab1;
+ }
+ } while (false);
+ cursor = limit - v_2;
+ // do, line 87
+ v_3 = limit - cursor;
+ lab2: do {
+ // call consonant_pair, line 87
+ if (!r_consonant_pair())
+ {
+ break lab2;
+ }
+ } while (false);
+ cursor = limit - v_3;
+ // do, line 88
+ v_4 = limit - cursor;
+ lab3: do {
+ // call other_suffix, line 88
+ if (!r_other_suffix())
+ {
+ break lab3;
+ }
+ } while (false);
+ cursor = limit - v_4;
+ // do, line 89
+ v_5 = limit - cursor;
+ lab4: do {
+ // call undouble, line 89
+ if (!r_undouble())
+ {
+ break lab4;
+ }
+ } while (false);
+ cursor = limit - v_5;
+ cursor = limit_backward; return true;
+ }
+
+}
+