Packages
text_stemmer
0.1.0
Pre-compiled Snowball stemmers for Elixir. Ships 36 stemming algorithms covering a wide range of natural languages, accessible through a single `Text.Stemmer.stem/2` entry point.
Current section
Files
Jump to
Current section
Files
lib/text/stemmer/stemmers/italian.ex
# Generated by Snowball.Generator — do not edit by hand.
defmodule Text.Stemmer.Stemmers.Italian do
@moduledoc """
Snowball stemmer for italian.
Generated from the canonical Snowball algorithm source.
"""
alias Snowball.Runtime
alias Snowball.Grouping
# Groupings
@g_AEIO Grouping.from_string("aeioà èìò")
@g_CG Grouping.from_string("cg")
@g_v Grouping.from_string("aeiouà èìòù")
# Among tables
@a_0 [
{"isca", -1, 1, nil},
{"enda", -1, 1, nil},
{"ata", -1, 1, nil},
{"ita", -1, 1, nil},
{"uta", -1, 1, nil},
{"ava", -1, 1, nil},
{"eva", -1, 1, nil},
{"iva", -1, 1, nil},
{"erebbe", -1, 1, nil},
{"irebbe", -1, 1, nil},
{"isce", -1, 1, nil},
{"ende", -1, 1, nil},
{"are", -1, 1, nil},
{"ere", -1, 1, nil},
{"ire", -1, 1, nil},
{"asse", -1, 1, nil},
{"ate", -1, 1, nil},
{"avate", 16, 1, nil},
{"evate", 16, 1, nil},
{"ivate", 16, 1, nil},
{"ete", -1, 1, nil},
{"erete", 20, 1, nil},
{"irete", 20, 1, nil},
{"ite", -1, 1, nil},
{"ereste", -1, 1, nil},
{"ireste", -1, 1, nil},
{"ute", -1, 1, nil},
{"erai", -1, 1, nil},
{"irai", -1, 1, nil},
{"isci", -1, 1, nil},
{"endi", -1, 1, nil},
{"erei", -1, 1, nil},
{"irei", -1, 1, nil},
{"assi", -1, 1, nil},
{"ati", -1, 1, nil},
{"iti", -1, 1, nil},
{"eresti", -1, 1, nil},
{"iresti", -1, 1, nil},
{"uti", -1, 1, nil},
{"avi", -1, 1, nil},
{"evi", -1, 1, nil},
{"ivi", -1, 1, nil},
{"isco", -1, 1, nil},
{"ando", -1, 1, nil},
{"endo", -1, 1, nil},
{"Yamo", -1, 1, nil},
{"iamo", -1, 1, nil},
{"avamo", -1, 1, nil},
{"evamo", -1, 1, nil},
{"ivamo", -1, 1, nil},
{"eremo", -1, 1, nil},
{"iremo", -1, 1, nil},
{"assimo", -1, 1, nil},
{"ammo", -1, 1, nil},
{"emmo", -1, 1, nil},
{"eremmo", 54, 1, nil},
{"iremmo", 54, 1, nil},
{"immo", -1, 1, nil},
{"ano", -1, 1, nil},
{"iscano", 58, 1, nil},
{"avano", 58, 1, nil},
{"evano", 58, 1, nil},
{"ivano", 58, 1, nil},
{"eranno", -1, 1, nil},
{"iranno", -1, 1, nil},
{"ono", -1, 1, nil},
{"iscono", 65, 1, nil},
{"arono", 65, 1, nil},
{"erono", 65, 1, nil},
{"irono", 65, 1, nil},
{"erebbero", -1, 1, nil},
{"irebbero", -1, 1, nil},
{"assero", -1, 1, nil},
{"essero", -1, 1, nil},
{"issero", -1, 1, nil},
{"ato", -1, 1, nil},
{"ito", -1, 1, nil},
{"uto", -1, 1, nil},
{"avo", -1, 1, nil},
{"evo", -1, 1, nil},
{"ivo", -1, 1, nil},
{"ar", -1, 1, nil},
{"ir", -1, 1, nil},
{"erà ", -1, 1, nil},
{"irà ", -1, 1, nil},
{"erò", -1, 1, nil},
{"irò", -1, 1, nil}
]
@a_1 [
{"ic", -1, -1, nil},
{"abil", -1, -1, nil},
{"os", -1, -1, nil},
{"iv", -1, 1, nil}
]
@a_2 [
{"ic", -1, 1, nil},
{"abil", -1, 1, nil},
{"iv", -1, 1, nil}
]
@a_3 [
{"ica", -1, 1, nil},
{"logia", -1, 3, nil},
{"osa", -1, 1, nil},
{"ista", -1, 1, nil},
{"iva", -1, 9, nil},
{"anza", -1, 1, nil},
{"enza", -1, 5, nil},
{"ice", -1, 1, nil},
{"atrice", 7, 1, nil},
{"iche", -1, 1, nil},
{"logie", -1, 3, nil},
{"abile", -1, 1, nil},
{"ibile", -1, 1, nil},
{"usione", -1, 4, nil},
{"azione", -1, 2, nil},
{"uzione", -1, 4, nil},
{"atore", -1, 2, nil},
{"ose", -1, 1, nil},
{"ante", -1, 1, nil},
{"mente", -1, 1, nil},
{"amente", 19, 7, nil},
{"iste", -1, 1, nil},
{"ive", -1, 9, nil},
{"anze", -1, 1, nil},
{"enze", -1, 5, nil},
{"ici", -1, 1, nil},
{"atrici", 25, 1, nil},
{"ichi", -1, 1, nil},
{"abili", -1, 1, nil},
{"ibili", -1, 1, nil},
{"ismi", -1, 1, nil},
{"usioni", -1, 4, nil},
{"azioni", -1, 2, nil},
{"uzioni", -1, 4, nil},
{"atori", -1, 2, nil},
{"osi", -1, 1, nil},
{"anti", -1, 1, nil},
{"amenti", -1, 6, nil},
{"imenti", -1, 6, nil},
{"isti", -1, 1, nil},
{"ivi", -1, 9, nil},
{"ico", -1, 1, nil},
{"ismo", -1, 1, nil},
{"oso", -1, 1, nil},
{"amento", -1, 6, nil},
{"imento", -1, 6, nil},
{"ivo", -1, 9, nil},
{"ità ", -1, 8, nil},
{"istà ", -1, 1, nil},
{"istè", -1, 1, nil},
{"istì", -1, 1, nil}
]
@a_4 [
{"la", -1, -1, nil},
{"cela", 0, -1, nil},
{"gliela", 0, -1, nil},
{"mela", 0, -1, nil},
{"tela", 0, -1, nil},
{"vela", 0, -1, nil},
{"le", -1, -1, nil},
{"cele", 6, -1, nil},
{"gliele", 6, -1, nil},
{"mele", 6, -1, nil},
{"tele", 6, -1, nil},
{"vele", 6, -1, nil},
{"ne", -1, -1, nil},
{"cene", 12, -1, nil},
{"gliene", 12, -1, nil},
{"mene", 12, -1, nil},
{"sene", 12, -1, nil},
{"tene", 12, -1, nil},
{"vene", 12, -1, nil},
{"ci", -1, -1, nil},
{"li", -1, -1, nil},
{"celi", 20, -1, nil},
{"glieli", 20, -1, nil},
{"meli", 20, -1, nil},
{"teli", 20, -1, nil},
{"veli", 20, -1, nil},
{"gli", 20, -1, nil},
{"mi", -1, -1, nil},
{"si", -1, -1, nil},
{"ti", -1, -1, nil},
{"vi", -1, -1, nil},
{"lo", -1, -1, nil},
{"celo", 31, -1, nil},
{"glielo", 31, -1, nil},
{"melo", 31, -1, nil},
{"telo", 31, -1, nil},
{"velo", 31, -1, nil}
]
@a_5 [
{"ando", -1, 1, nil},
{"endo", -1, 1, nil},
{"ar", -1, 2, nil},
{"er", -1, 2, nil},
{"ir", -1, 2, nil}
]
@a_6 [
{"", -1, 7, nil},
{"qu", 0, 6, nil},
{"á", 0, 1, nil},
{"é", 0, 2, nil},
{"Ã", 0, 3, nil},
{"ó", 0, 4, nil},
{"ú", 0, 5, nil}
]
@a_7 [
{"", -1, 3, nil},
{"I", 0, 1, nil},
{"U", 0, 2, nil}
]
@doc """
Stem a word.
### Arguments
* `word` is a UTF-8 binary.
### Returns
* The stemmed UTF-8 binary.
"""
@spec stem(binary()) :: binary()
def stem(word) when is_binary(word) do
state = Runtime.new(word) |> init_vars()
state = run_stem(state)
Runtime.assign_to(state)
end
defp init_vars(state), do: %{state | vars: %{p1: 0, p2: 0, pV: 0}}
defp run_stem(%Runtime{} = state) do
{_, state} = r_stem(state)
state
end
# Snowball runtime helpers.
defp snowball_do_f(state, fun) do
saved_c = state.cursor
{_, s} = fun.(state)
%{s | cursor: saved_c}
end
defp snowball_do_b(state, fun) do
rel = state.limit - state.cursor
{_, s} = fun.(state)
%{s | cursor: s.limit - rel}
end
defp snowball_test_f(state, fun) do
saved_c = state.cursor
case fun.(state) do
{:ok, s} -> {:ok, %{s | cursor: saved_c}}
{:fail, s} -> {:fail, %{s | cursor: saved_c}}
end
end
defp snowball_try(state, fun) do
rel = state.limit - state.cursor
case fun.(state) do
{:ok, s} -> s
{:fail, s} -> %{s | cursor: s.limit - rel}
end
end
defp snowball_or(state, fun1, fun2) do
rel = state.limit - state.cursor
case fun1.(state) do
{:ok, s} -> {:ok, s}
{:fail, s} -> fun2.(%{s | cursor: s.limit - rel})
end
end
defp lift(state, :fail), do: {:fail, state}
defp lift(_state, %Runtime{} = s), do: {:ok, s}
defp next_codepoint(%Runtime{cursor: c, limit: lim, current: cur} = state) do
case Runtime.codepoint_at(cur, c, lim) do
{_cp, size} -> {:ok, %{state | cursor: c + size}}
:error -> {:fail, state}
end
end
defp r_vowel_suffix(%Runtime{} = state) do
case (fn state ->
{:ok, snowball_try(state, fn state ->
case (fn state ->
{:ok, %{state | ket: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
lift(state, Runtime.in_grouping_b(state, @g_AEIO))
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, %{state | bra: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
r_RV(state)
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, Runtime.slice_del(state)}
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, %{state | ket: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
lift(state, Runtime.eq_s_b(state, "i"))
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, %{state | bra: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
r_RV(state)
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_del(state)}
r -> r
end
end
r -> r
end
end
end
r -> r
end
end
r -> r
end
end
end)}
end).(state) do
{:ok, state} ->
{:ok, snowball_try(state, fn state ->
case (fn state ->
{:ok, %{state | ket: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
lift(state, Runtime.eq_s_b(state, "h"))
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, %{state | bra: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
lift(state, Runtime.in_grouping_b(state, @g_CG))
end).(state) do
{:ok, state} ->
case (fn state ->
r_RV(state)
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_del(state)}
r -> r
end
r -> r
end
end
r -> r
end
end
end)}
end
end
defp r_verb_suffix(%Runtime{} = state) do
(fn ->
case (fn state ->
(fn ->
target = state.vars[:pV]
if target < state.limit_backward or target > state.limit do
{:fail, state}
else
{:ok, %{state | cursor: target}}
end
end).()
end).(state) do
{:fail, _} -> {:fail, state}
{:ok, limit_state} ->
old_lb = state.limit_backward
state = %{state | limit_backward: limit_state.cursor}
case (fn state ->
(fn ->
state = %{state | ket: state.cursor}
case Runtime.find_among_b(state, @a_0) do
:fail -> {:fail, state}
{%Runtime{} = s, result} ->
state = %{s | bra: s.cursor}
case result do
1 ->
{:ok, Runtime.slice_del(state)}
_ -> {:ok, state}
end
end
end).()
end).(state) do
{:ok, s} -> {:ok, %{s | limit_backward: old_lb}}
{:fail, s} -> {:fail, %{s | limit_backward: old_lb}}
end
end
end).()
end
defp r_standard_suffix(%Runtime{} = state) do
(fn ->
state = %{state | ket: state.cursor}
case Runtime.find_among_b(state, @a_3) do
:fail -> {:fail, state}
{%Runtime{} = s, result} ->
state = %{s | bra: s.cursor}
case result do
1 ->
case (fn state ->
r_R2(state)
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_del(state)}
r -> r
end
2 ->
case (fn state ->
r_R2(state)
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, Runtime.slice_del(state)}
end).(state) do
{:ok, state} ->
{:ok, snowball_try(state, fn state ->
case (fn state ->
{:ok, %{state | ket: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
lift(state, Runtime.eq_s_b(state, "ic"))
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, %{state | bra: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
r_R2(state)
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_del(state)}
r -> r
end
end
r -> r
end
end
end)}
end
r -> r
end
3 ->
case (fn state ->
r_R2(state)
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_from(state, "log")}
r -> r
end
4 ->
case (fn state ->
r_R2(state)
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_from(state, "u")}
r -> r
end
5 ->
case (fn state ->
r_R2(state)
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_from(state, "ente")}
r -> r
end
6 ->
case (fn state ->
r_RV(state)
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_del(state)}
r -> r
end
7 ->
case (fn state ->
r_R1(state)
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, Runtime.slice_del(state)}
end).(state) do
{:ok, state} ->
{:ok, snowball_try(state, fn state ->
(fn ->
state = %{state | ket: state.cursor}
case Runtime.find_among_b(state, @a_1) do
:fail -> {:fail, state}
{%Runtime{} = s, result} ->
state = %{s | bra: s.cursor}
case (fn state ->
case (fn state ->
r_R2(state)
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_del(state)}
r -> r
end
end).(state) do
{:ok, state} ->
case result do
1 ->
case (fn state ->
{:ok, %{state | ket: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
lift(state, Runtime.eq_s_b(state, "at"))
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, %{state | bra: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
r_R2(state)
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_del(state)}
r -> r
end
end
r -> r
end
end
_ -> {:ok, state}
end
r -> r
end
end
end).()
end)}
end
r -> r
end
8 ->
case (fn state ->
r_R2(state)
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, Runtime.slice_del(state)}
end).(state) do
{:ok, state} ->
{:ok, snowball_try(state, fn state ->
(fn ->
state = %{state | ket: state.cursor}
case Runtime.find_among_b(state, @a_2) do
:fail -> {:fail, state}
{%Runtime{} = s, result} ->
state = %{s | bra: s.cursor}
case result do
1 ->
case (fn state ->
r_R2(state)
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_del(state)}
r -> r
end
_ -> {:ok, state}
end
end
end).()
end)}
end
r -> r
end
9 ->
case (fn state ->
r_R2(state)
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, Runtime.slice_del(state)}
end).(state) do
{:ok, state} ->
{:ok, snowball_try(state, fn state ->
case (fn state ->
{:ok, %{state | ket: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
lift(state, Runtime.eq_s_b(state, "at"))
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, %{state | bra: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
r_R2(state)
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, Runtime.slice_del(state)}
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, %{state | ket: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
lift(state, Runtime.eq_s_b(state, "ic"))
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, %{state | bra: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
r_R2(state)
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_del(state)}
r -> r
end
end
r -> r
end
end
end
r -> r
end
end
r -> r
end
end
end)}
end
r -> r
end
_ -> {:ok, state}
end
end
end).()
end
defp r_attached_pronoun(%Runtime{} = state) do
case (fn state ->
(fn ->
state = %{state | ket: state.cursor}
case Runtime.find_among_b(state, @a_4) do
:fail -> {:fail, state}
{%Runtime{} = s, _result} ->
state = %{s | bra: s.cursor}
{:ok, state}
end
end).()
end).(state) do
{:ok, state} ->
(fn ->
case Runtime.find_among_b(state, @a_5) do
:fail -> {:fail, state}
{%Runtime{} = s, result} ->
state = s
case (fn state ->
r_RV(state)
end).(state) do
{:ok, state} ->
case result do
1 ->
{:ok, Runtime.slice_del(state)}
2 ->
{:ok, Runtime.slice_from(state, "e")}
_ -> {:ok, s}
end
r -> r
end
end
end).()
r -> r
end
end
defp r_R2(%Runtime{} = state) do
if state.vars[:p2] <= state.cursor, do: {:ok, state}, else: {:fail, state}
end
defp r_R1(%Runtime{} = state) do
if state.vars[:p1] <= state.cursor, do: {:ok, state}, else: {:fail, state}
end
defp r_RV(%Runtime{} = state) do
if state.vars[:pV] <= state.cursor, do: {:ok, state}, else: {:fail, state}
end
defp r_prelude(%Runtime{} = state) do
case (fn state ->
snowball_test_f(state, fn state ->
(fn loop_fn ->
loop_fn.(loop_fn, state)
end).(fn loop_fn, state ->
case (fn state ->
(fn ->
state = %{state | bra: state.cursor}
case Runtime.find_among(state, @a_6) do
:fail -> {:fail, state}
{%Runtime{} = s, result} ->
state = %{s | ket: s.cursor}
case result do
1 ->
{:ok, Runtime.slice_from(state, "Ã ")}
2 ->
{:ok, Runtime.slice_from(state, "è")}
3 ->
{:ok, Runtime.slice_from(state, "ì")}
4 ->
{:ok, Runtime.slice_from(state, "ò")}
5 ->
{:ok, Runtime.slice_from(state, "ù")}
6 ->
{:ok, Runtime.slice_from(state, "qU")}
7 ->
next_codepoint(state)
_ -> {:ok, state}
end
end
end).()
end).(state) do
{:ok, s} -> loop_fn.(loop_fn, s)
{:fail, s} -> {:ok, %{s | cursor: state.cursor}}
end
end)
end)
end).(state) do
{:ok, state} ->
(fn loop_fn ->
loop_fn.(loop_fn, state)
end).(fn loop_fn, state ->
case (fn state ->
(fn loop_fn ->
loop_fn.(loop_fn, state)
end).(fn loop_fn, state ->
v = state.cursor
case (fn state ->
case (fn state ->
lift(state, Runtime.in_grouping(state, @g_v))
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, %{state | bra: state.cursor}}
end).(state) do
{:ok, state} ->
snowball_or(state,
fn state ->
case (fn state ->
lift(state, Runtime.eq_s(state, "u"))
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, %{state | ket: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
lift(state, Runtime.in_grouping(state, @g_v))
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_from(state, "U")}
r -> r
end
end
r -> r
end
end,
fn state ->
case (fn state ->
lift(state, Runtime.eq_s(state, "i"))
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, %{state | ket: state.cursor}}
end).(state) do
{:ok, state} ->
case (fn state ->
lift(state, Runtime.in_grouping(state, @g_v))
end).(state) do
{:ok, state} ->
{:ok, Runtime.slice_from(state, "I")}
r -> r
end
end
r -> r
end
end)
end
r -> r
end
end).(state) do
{:ok, s} -> {:ok, %{s | cursor: v}}
{:fail, _} ->
case next_codepoint(%{state | cursor: v}) do
{:ok, s} -> loop_fn.(loop_fn, s)
{:fail, _} -> {:fail, state}
end
end
end)
end).(state) do
{:ok, s} -> loop_fn.(loop_fn, s)
{:fail, s} -> {:ok, %{s | cursor: state.cursor}}
end
end)
r -> r
end
end
defp r_mark_regions(%Runtime{} = state) do
case (fn state ->
{:ok, put_in(state.vars[:pV], state.limit)}
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, put_in(state.vars[:p1], state.limit)}
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, put_in(state.vars[:p2], state.limit)}
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, snowball_do_f(state, fn state ->
case (fn state ->
snowball_or(state,
fn state ->
snowball_or(state,
fn state ->
case (fn state ->
lift(state, Runtime.in_grouping(state, @g_v))
end).(state) do
{:ok, state} ->
snowball_or(state,
fn state ->
case (fn state ->
lift(state, Runtime.out_grouping(state, @g_v))
end).(state) do
{:ok, state} ->
case Runtime.go_out_grouping(state, @g_v) do
:fail -> {:fail, state}
%Runtime{} = s -> next_codepoint(s)
end
r -> r
end
end,
fn state ->
case (fn state ->
lift(state, Runtime.in_grouping(state, @g_v))
end).(state) do
{:ok, state} ->
case Runtime.go_in_grouping(state, @g_v) do
:fail -> {:fail, state}
%Runtime{} = s -> next_codepoint(s)
end
r -> r
end
end)
r -> r
end
end,
fn state ->
lift(state, Runtime.eq_s(state, "divan"))
end)
end,
fn state ->
case (fn state ->
lift(state, Runtime.out_grouping(state, @g_v))
end).(state) do
{:ok, state} ->
snowball_or(state,
fn state ->
case (fn state ->
lift(state, Runtime.out_grouping(state, @g_v))
end).(state) do
{:ok, state} ->
case Runtime.go_out_grouping(state, @g_v) do
:fail -> {:fail, state}
%Runtime{} = s -> next_codepoint(s)
end
r -> r
end
end,
fn state ->
case (fn state ->
lift(state, Runtime.in_grouping(state, @g_v))
end).(state) do
{:ok, state} ->
next_codepoint(state)
r -> r
end
end)
r -> r
end
end)
end).(state) do
{:ok, state} ->
{:ok, put_in(state.vars[:pV], state.cursor)}
r -> r
end
end)}
end).(state) do
{:ok, state} ->
{:ok, snowball_do_f(state, fn state ->
case (fn state ->
case Runtime.go_out_grouping(state, @g_v) do
:fail -> {:fail, state}
%Runtime{} = s -> next_codepoint(s)
end
end).(state) do
{:ok, state} ->
case (fn state ->
case Runtime.go_in_grouping(state, @g_v) do
:fail -> {:fail, state}
%Runtime{} = s -> next_codepoint(s)
end
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, put_in(state.vars[:p1], state.cursor)}
end).(state) do
{:ok, state} ->
case (fn state ->
case Runtime.go_out_grouping(state, @g_v) do
:fail -> {:fail, state}
%Runtime{} = s -> next_codepoint(s)
end
end).(state) do
{:ok, state} ->
case (fn state ->
case Runtime.go_in_grouping(state, @g_v) do
:fail -> {:fail, state}
%Runtime{} = s -> next_codepoint(s)
end
end).(state) do
{:ok, state} ->
{:ok, put_in(state.vars[:p2], state.cursor)}
r -> r
end
r -> r
end
end
r -> r
end
r -> r
end
end)}
end
end
end
end
end
defp r_postlude(%Runtime{} = state) do
(fn loop_fn ->
loop_fn.(loop_fn, state)
end).(fn loop_fn, state ->
case (fn state ->
(fn ->
state = %{state | bra: state.cursor}
case Runtime.find_among(state, @a_7) do
:fail -> {:fail, state}
{%Runtime{} = s, result} ->
state = %{s | ket: s.cursor}
case result do
1 ->
{:ok, Runtime.slice_from(state, "i")}
2 ->
{:ok, Runtime.slice_from(state, "u")}
3 ->
next_codepoint(state)
_ -> {:ok, state}
end
end
end).()
end).(state) do
{:ok, s} -> loop_fn.(loop_fn, s)
{:fail, s} -> {:ok, %{s | cursor: state.cursor}}
end
end)
end
defp r_stem(%Runtime{} = state) do
case (fn state ->
{:ok, snowball_do_f(state, fn state ->
r_prelude(state)
end)}
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, snowball_do_f(state, fn state ->
r_mark_regions(state)
end)}
end).(state) do
{:ok, state} ->
case (fn state ->
(fn state ->
old_cursor = state.cursor
old_lb = state.limit_backward
state = %{state | cursor: state.limit, limit_backward: old_cursor}
{tag, s} = (fn state ->
case (fn state ->
{:ok, snowball_do_b(state, fn state ->
r_attached_pronoun(state)
end)}
end).(state) do
{:ok, state} ->
case (fn state ->
{:ok, snowball_do_b(state, fn state ->
snowball_or(state,
fn state ->
r_standard_suffix(state)
end,
fn state ->
r_verb_suffix(state)
end)
end)}
end).(state) do
{:ok, state} ->
{:ok, snowball_do_b(state, fn state ->
r_vowel_suffix(state)
end)}
end
end
end).(state)
{tag, %{s | cursor: old_cursor, limit_backward: old_lb}}
end).(state)
end).(state) do
{:ok, state} ->
{:ok, snowball_do_f(state, fn state ->
r_postlude(state)
end)}
end
end
end
end
end