content: // 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;
          }
  
  }
  
  