tallgrass

-module(tallgrass@internal@common@effect).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).

-export([effect/0, effect_entry/0]).
-export_type([effect/0, effect_entry/0]).

-type effect() :: {effect,
        binary(),
        binary(),
        tallgrass@internal@common@affordance:affordance()}.

-type effect_entry() :: {effect_entry,
        binary(),
        tallgrass@internal@common@affordance:affordance()}.

-spec effect() -> decode:decoder(effect()).
effect() ->
    _pipe = decode:into(
        (decode:parameter(
            fun(Effect) ->
                decode:parameter(
                    fun(Short_effect) ->
                        decode:parameter(
                            fun(Language) ->
                                {effect, Effect, Short_effect, Language}
                            end
                        )
                    end
                )
            end
        ))
    ),
    _pipe@1 = decode:field(
        _pipe,
        <<"effect"/utf8>>,
        {decoder, fun gleam@dynamic:string/1}
    ),
    _pipe@2 = decode:field(
        _pipe@1,
        <<"short_effect"/utf8>>,
        {decoder, fun gleam@dynamic:string/1}
    ),
    decode:field(
        _pipe@2,
        <<"language"/utf8>>,
        tallgrass@internal@common@affordance:affordance()
    ).

-spec effect_entry() -> decode:decoder(effect_entry()).
effect_entry() ->
    _pipe = decode:into(
        (decode:parameter(
            fun(Effect) ->
                decode:parameter(
                    fun(Language) -> {effect_entry, Effect, Language} end
                )
            end
        ))
    ),
    _pipe@1 = decode:field(
        _pipe,
        <<"effect"/utf8>>,
        {decoder, fun gleam@dynamic:string/1}
    ),
    decode:field(
        _pipe@1,
        <<"language"/utf8>>,
        tallgrass@internal@common@affordance:affordance()
    ).