chrislit / abydos

    # Step 1

    _r1 = word[r1_start:]

    if _r1[-7:] == 'erendes':

        word = word[:-7]

    elif _r1[-6:] in {'erende', 'hedens'}:

        word = word[:-6]

    elif _r1[-5:] in {'ethed', 'erede', 'heden', 'heder', 'endes', 'ernes',

                      'erens', 'erets'}:

        word = word[:-5]

    elif _r1[-4:] in {'ered', 'ende', 'erne', 'eren', 'erer', 'heds', 'enes',

                      'eres', 'eret'}:

        word = word[:-4]

    elif _r1[-3:] in {'hed', 'ene', 'ere', 'ens', 'ers', 'ets'}:

        word = word[:-3]

    elif _r1[-2:] in {'en', 'er', 'es', 'et'}:

        word = word[:-2]

    elif _r1[-1:] == 'e':

        word = word[:-1]

    elif _r1[-1:] == 's':

        if len(word) > 1 and word[-2] in _s_endings:

            word = word[:-1]

    # Step 2

    if word[r1_start:][-2:] in {'gd', 'dt', 'gt', 'kt'}:

    # Step 1

    _r1 = word[r1_start:]

    if _r1[-7:] == 'heterna':

        word = word[:-7]

    elif _r1[-6:] == 'hetens':

        word = word[:-6]

    elif _r1[-5:] in {'anden', 'heten', 'heter', 'arnas', 'ernas', 'ornas',

                      'andes', 'arens', 'andet'}:

        word = word[:-5]

    elif _r1[-4:] in {'arna', 'erna', 'orna', 'ande', 'arne', 'aste', 'aren',

                      'ades', 'erns'}:

        word = word[:-4]

    elif _r1[-3:] in {'ade', 'are', 'ern', 'ens', 'het', 'ast'}:

        word = word[:-3]

    elif _r1[-2:] in {'ad', 'en', 'ar', 'er', 'or', 'as', 'es', 'at'}:

        word = word[:-2]

    elif _r1[-1:] in {'a', 'e'}:

        word = word[:-1]

    elif _r1[-1:] == 's':

        if len(word) > 1 and word[-2] in _s_endings:

            word = word[:-1]

    # Step 2

    if word[r1_start:][-2:] in {'dd', 'gd', 'nn', 'dt', 'gt', 'kt', 'tt'}: