prequel

-module(prequel@internals@extra@int).
-compile([no_auto_import, nowarn_unused_vars]).

-export([count_digits/1, is_next_to/2]).

-spec count_digits(integer()) -> integer().
count_digits(N) ->
    _assert_subject = gleam@int:digits(N, 10),
    {ok, Digits} = case _assert_subject of
        {ok, _} -> _assert_subject;
        _assert_fail ->
            erlang:error(#{gleam_error => let_assert,
                        message => <<"Assertion pattern match failed"/utf8>>,
                        value => _assert_fail,
                        module => <<"prequel/internals/extra/int"/utf8>>,
                        function => <<"count_digits"/utf8>>,
                        line => 19})
    end,
    gleam@list:length(Digits).

-spec is_next_to(integer(), integer()) -> boolean().
is_next_to(N, M) ->
    ((N + 1) =:= M) orelse ((N - 1) =:= M).