-module(telega@model). -compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]). -export([new_botcommand_parameters/0, decode_bot_command/1, bot_commands_from/1, decode_user/1, decode_message_entity/1, decode_inline_button/1, decode_inline_markup/1, decode_message/1, decode_update/1, new_send_dice_parameters/1, decode_webhook_info/1, bot_command_scope_to_json/1, encode_botcommand_parameters/1, encode_user/1, encode_message_entity/1, encode_reply_parameters/1, encode_send_dice_parameters/1]). -export_type([update/0, chat/0, message/0, bot_command/0, bot_command_scope/0, bot_command_parameters/0, user/0, message_entity/0, inline_keyboard_button/0, inline_keyboard_markup/0, keyboard/0, reply_parameters/0, reply_markup/0, send_dice_parameters/0, webhook_info/0, int_or_string/0]). -type update() :: {update, message(), integer()}. -type chat() :: {chat, integer(), gleam@option:option(binary()), gleam@option:option(binary()), gleam@option:option(binary()), gleam@option:option(boolean())}. -type message() :: {message, integer(), gleam@option:option(integer()), gleam@option:option(user()), gleam@option:option(chat()), gleam@option:option(integer()), integer(), chat(), gleam@option:option(boolean()), gleam@option:option(boolean()), gleam@option:option(message()), gleam@option:option(user()), gleam@option:option(integer()), gleam@option:option(boolean()), gleam@option:option(binary()), gleam@option:option(binary()), gleam@option:option(binary()), gleam@option:option(list(message_entity())), gleam@option:option(binary()), gleam@option:option(list(message_entity())), gleam@option:option(boolean()), gleam@option:option(list(user())), gleam@option:option(user()), gleam@option:option(binary()), gleam@option:option(boolean()), gleam@option:option(boolean()), gleam@option:option(boolean()), gleam@option:option(boolean()), gleam@option:option(integer()), gleam@option:option(integer()), gleam@option:option(binary()), gleam@option:option(inline_keyboard_markup())}. -type bot_command() :: {bot_command, binary(), binary()}. -type bot_command_scope() :: bot_command_default_scope | bot_command_all_private_chats_scope | bot_command_scope_all_group_chats | bot_command_scope_all_chat_administrators | {bot_command_scope_chat, integer()} | {bot_command_scope_chat_string, int_or_string()} | {bot_command_scope_chat_administrators, int_or_string()} | {bot_command_scope_chat_member, int_or_string(), integer()}. -type bot_command_parameters() :: {bot_command_parameters, gleam@option:option(bot_command_scope()), gleam@option:option(binary())}. -type user() :: {user, integer(), boolean(), binary(), gleam@option:option(binary()), gleam@option:option(binary()), gleam@option:option(binary()), gleam@option:option(boolean()), gleam@option:option(boolean())}. -type message_entity() :: {message_entity, binary(), integer(), integer(), gleam@option:option(binary()), gleam@option:option(user()), gleam@option:option(binary()), gleam@option:option(binary())}. -type inline_keyboard_button() :: {inline_keyboard_button, binary(), gleam@option:option(binary()), gleam@option:option(binary()), gleam@option:option(binary()), gleam@option:option(binary()), gleam@option:option(boolean())}. -type inline_keyboard_markup() :: {inline_keyboard_markup, list(list(inline_keyboard_button()))}. -type keyboard() :: keyboard. -type reply_parameters() :: {reply_parameters, integer(), gleam@option:option(int_or_string()), gleam@option:option(boolean()), gleam@option:option(binary()), gleam@option:option(binary()), gleam@option:option(list(message_entity())), gleam@option:option(integer())}. -type reply_markup() :: {reply_inline_keyboard_markup, list(list(inline_keyboard_button()))} | {reply_keyboard_markup, list(list(keyboard())), gleam@option:option(boolean()), gleam@option:option(boolean()), gleam@option:option(boolean()), gleam@option:option(binary()), gleam@option:option(boolean())} | {reply_keyboard_remove, boolean(), gleam@option:option(boolean())}. -type send_dice_parameters() :: {send_dice_parameters, integer(), gleam@option:option(integer()), gleam@option:option(binary()), gleam@option:option(boolean()), gleam@option:option(boolean()), gleam@option:option(reply_parameters())}. -type webhook_info() :: {webhook_info, binary(), boolean(), integer(), gleam@option:option(binary()), gleam@option:option(integer()), gleam@option:option(binary()), gleam@option:option(integer()), gleam@option:option(integer()), gleam@option:option(list(binary()))}. -type int_or_string() :: {int, integer()} | {string, binary()}. -spec decode_chat(gleam@dynamic:dynamic_()) -> {ok, chat()} | {error, list(gleam@dynamic:decode_error())}. decode_chat(Json) -> _pipe = Json, (gleam@dynamic:decode5( fun(Field@0, Field@1, Field@2, Field@3, Field@4) -> {chat, Field@0, Field@1, Field@2, Field@3, Field@4} end, gleam@dynamic:field(<<"id"/utf8>>, fun gleam@dynamic:int/1), gleam@dynamic:optional_field( <<"username"/utf8>>, fun gleam@dynamic:string/1 ), gleam@dynamic:optional_field( <<"first_name"/utf8>>, fun gleam@dynamic:string/1 ), gleam@dynamic:optional_field( <<"last_name"/utf8>>, fun gleam@dynamic:string/1 ), gleam@dynamic:optional_field( <<"is_forum"/utf8>>, fun gleam@dynamic:bool/1 ) ))(_pipe). -spec all_errors({ok, any()} | {error, list(gleam@dynamic:decode_error())}) -> list(gleam@dynamic:decode_error()). all_errors(Result) -> case Result of {ok, _} -> []; {error, Errors} -> Errors end. -spec new_botcommand_parameters() -> bot_command_parameters(). new_botcommand_parameters() -> {bot_command_parameters, none, none}. -spec decode_bot_command(gleam@dynamic:dynamic_()) -> {ok, list(bot_command())} | {error, list(gleam@dynamic:decode_error())}. decode_bot_command(Json) -> _pipe = Json, (gleam@dynamic:list( gleam@dynamic:decode2( fun(Field@0, Field@1) -> {bot_command, Field@0, Field@1} end, gleam@dynamic:field(<<"command"/utf8>>, fun gleam@dynamic:string/1), gleam@dynamic:field( <<"description"/utf8>>, fun gleam@dynamic:string/1 ) ) ))(_pipe). -spec bot_commands_from(list({binary(), binary()})) -> list(bot_command()). bot_commands_from(Commands) -> _pipe = Commands, gleam@list:map( _pipe, fun(Command) -> {Command@1, Description} = Command, {bot_command, Command@1, Description} end ). -spec decode_user(gleam@dynamic:dynamic_()) -> {ok, user()} | {error, list(gleam@dynamic:decode_error())}. decode_user(Json) -> _pipe = Json, (gleam@dynamic:decode8( fun(Field@0, Field@1, Field@2, Field@3, Field@4, Field@5, Field@6, Field@7) -> {user, Field@0, Field@1, Field@2, Field@3, Field@4, Field@5, Field@6, Field@7} end, gleam@dynamic:field(<<"id"/utf8>>, fun gleam@dynamic:int/1), gleam@dynamic:field(<<"is_bot"/utf8>>, fun gleam@dynamic:bool/1), gleam@dynamic:field(<<"first_name"/utf8>>, fun gleam@dynamic:string/1), gleam@dynamic:optional_field( <<"last_name"/utf8>>, fun gleam@dynamic:string/1 ), gleam@dynamic:optional_field( <<"username"/utf8>>, fun gleam@dynamic:string/1 ), gleam@dynamic:optional_field( <<"language_code"/utf8>>, fun gleam@dynamic:string/1 ), gleam@dynamic:optional_field( <<"is_premium"/utf8>>, fun gleam@dynamic:bool/1 ), gleam@dynamic:optional_field( <<"added_to_attachment_menu"/utf8>>, fun gleam@dynamic:bool/1 ) ))(_pipe). -spec decode_message_entity(gleam@dynamic:dynamic_()) -> {ok, message_entity()} | {error, list(gleam@dynamic:decode_error())}. decode_message_entity(Json) -> _pipe = Json, (gleam@dynamic:decode7( fun(Field@0, Field@1, Field@2, Field@3, Field@4, Field@5, Field@6) -> {message_entity, Field@0, Field@1, Field@2, Field@3, Field@4, Field@5, Field@6} end, gleam@dynamic:field(<<"type"/utf8>>, fun gleam@dynamic:string/1), gleam@dynamic:field(<<"offset"/utf8>>, fun gleam@dynamic:int/1), gleam@dynamic:field(<<"length"/utf8>>, fun gleam@dynamic:int/1), gleam@dynamic:optional_field(<<"url"/utf8>>, fun gleam@dynamic:string/1), gleam@dynamic:optional_field(<<"user"/utf8>>, fun decode_user/1), gleam@dynamic:optional_field( <<"language"/utf8>>, fun gleam@dynamic:string/1 ), gleam@dynamic:optional_field( <<"custom_emoji_id"/utf8>>, fun gleam@dynamic:string/1 ) ))(_pipe). -spec decode_inline_button(gleam@dynamic:dynamic_()) -> {ok, inline_keyboard_button()} | {error, list(gleam@dynamic:decode_error())}. decode_inline_button(Json) -> _pipe = Json, (gleam@dynamic:decode6( fun(Field@0, Field@1, Field@2, Field@3, Field@4, Field@5) -> {inline_keyboard_button, Field@0, Field@1, Field@2, Field@3, Field@4, Field@5} end, gleam@dynamic:field(<<"text"/utf8>>, fun gleam@dynamic:string/1), gleam@dynamic:optional_field(<<"url"/utf8>>, fun gleam@dynamic:string/1), gleam@dynamic:optional_field( <<"callback_data"/utf8>>, fun gleam@dynamic:string/1 ), gleam@dynamic:optional_field( <<"switch_inline_query"/utf8>>, fun gleam@dynamic:string/1 ), gleam@dynamic:optional_field( <<"switch_inline_query_current_chat"/utf8>>, fun gleam@dynamic:string/1 ), gleam@dynamic:optional_field(<<"pay"/utf8>>, fun gleam@dynamic:bool/1) ))(_pipe). -spec decode_inline_markup(gleam@dynamic:dynamic_()) -> {ok, inline_keyboard_markup()} | {error, list(gleam@dynamic:decode_error())}. decode_inline_markup(Json) -> _pipe = Json, (gleam@dynamic:decode1( fun(Field@0) -> {inline_keyboard_markup, Field@0} end, gleam@dynamic:field( <<"inline_keyboard"/utf8>>, gleam@dynamic:list(gleam@dynamic:list(fun decode_inline_button/1)) ) ))(_pipe). -spec decode_message(gleam@dynamic:dynamic_()) -> {ok, message()} | {error, list(gleam@dynamic:decode_error())}. decode_message(Json) -> Decode_message_id = gleam@dynamic:field( <<"message_id"/utf8>>, fun gleam@dynamic:int/1 ), Decode_message_thread_id = gleam@dynamic:optional_field( <<"message_thread_id"/utf8>>, fun gleam@dynamic:int/1 ), Decode_from = gleam@dynamic:optional_field( <<"from"/utf8>>, fun decode_user/1 ), Decode_sender_chat = gleam@dynamic:optional_field( <<"sender_chat"/utf8>>, fun decode_chat/1 ), Decode_sender_boost_count = gleam@dynamic:optional_field( <<"sender_boost_count"/utf8>>, fun gleam@dynamic:int/1 ), Decode_date = gleam@dynamic:field(<<"date"/utf8>>, fun gleam@dynamic:int/1), Decode_chat = gleam@dynamic:field(<<"chat"/utf8>>, fun decode_chat/1), Decode_is_topic_message = gleam@dynamic:optional_field( <<"is_topic_message"/utf8>>, fun gleam@dynamic:bool/1 ), Decode_is_automatic_forward = gleam@dynamic:optional_field( <<"is_automatic_forward"/utf8>>, fun gleam@dynamic:bool/1 ), Decode_reply_to_message = gleam@dynamic:optional_field( <<"reply_to_message"/utf8>>, fun decode_message/1 ), Decode_via_bot = gleam@dynamic:optional_field( <<"via_bot"/utf8>>, fun decode_user/1 ), Decode_edit_date = gleam@dynamic:optional_field( <<"edit_date"/utf8>>, fun gleam@dynamic:int/1 ), Decode_has_protected_content = gleam@dynamic:optional_field( <<"has_protected_content"/utf8>>, fun gleam@dynamic:bool/1 ), Decode_media_group_id = gleam@dynamic:optional_field( <<"media_group_id"/utf8>>, fun gleam@dynamic:string/1 ), Decode_author_signature = gleam@dynamic:optional_field( <<"author_signature"/utf8>>, fun gleam@dynamic:string/1 ), Decode_text = gleam@dynamic:optional_field( <<"text"/utf8>>, fun gleam@dynamic:string/1 ), Decode_entities = gleam@dynamic:optional_field( <<"entities"/utf8>>, gleam@dynamic:list(fun decode_message_entity/1) ), Decode_caption = gleam@dynamic:optional_field( <<"caption"/utf8>>, fun gleam@dynamic:string/1 ), Decode_caption_entities = gleam@dynamic:optional_field( <<"caption_entities"/utf8>>, gleam@dynamic:list(fun decode_message_entity/1) ), Decode_has_media_spoiler = gleam@dynamic:optional_field( <<"has_media_spoiler"/utf8>>, fun gleam@dynamic:bool/1 ), Decode_new_chat_members = gleam@dynamic:optional_field( <<"new_chat_members"/utf8>>, gleam@dynamic:list(fun decode_user/1) ), Decode_left_chat_member = gleam@dynamic:optional_field( <<"left_chat_member"/utf8>>, fun decode_user/1 ), Decode_new_chat_title = gleam@dynamic:optional_field( <<"new_chat_title"/utf8>>, fun gleam@dynamic:string/1 ), Decode_delete_chat_photo = gleam@dynamic:optional_field( <<"delete_chat_photo"/utf8>>, fun gleam@dynamic:bool/1 ), Decode_group_chat_created = gleam@dynamic:optional_field( <<"group_chat_created"/utf8>>, fun gleam@dynamic:bool/1 ), Decode_supergroup_chat_created = gleam@dynamic:optional_field( <<"supergroup_chat_created"/utf8>>, fun gleam@dynamic:bool/1 ), Decode_channel_chat_created = gleam@dynamic:optional_field( <<"channel_chat_created"/utf8>>, fun gleam@dynamic:bool/1 ), Decode_migrate_to_chat_id = gleam@dynamic:optional_field( <<"migrate_to_chat_id"/utf8>>, fun gleam@dynamic:int/1 ), Decode_migrate_from_chat_id = gleam@dynamic:optional_field( <<"migrate_from_chat_id"/utf8>>, fun gleam@dynamic:int/1 ), Decode_connected_website = gleam@dynamic:optional_field( <<"connected_website"/utf8>>, fun gleam@dynamic:string/1 ), Decode_inline_keyboard_markup = gleam@dynamic:optional_field( <<"reply_markup"/utf8>>, fun decode_inline_markup/1 ), case {Decode_message_id(Json), Decode_message_thread_id(Json), Decode_from(Json), Decode_sender_chat(Json), Decode_sender_boost_count(Json), Decode_date(Json), Decode_chat(Json), Decode_is_topic_message(Json), Decode_is_automatic_forward(Json), Decode_reply_to_message(Json), Decode_via_bot(Json), Decode_edit_date(Json), Decode_has_protected_content(Json), Decode_media_group_id(Json), Decode_author_signature(Json), Decode_text(Json), Decode_entities(Json), Decode_caption(Json), Decode_caption_entities(Json), Decode_has_media_spoiler(Json), Decode_new_chat_members(Json), Decode_left_chat_member(Json), Decode_new_chat_title(Json), Decode_delete_chat_photo(Json), Decode_group_chat_created(Json), Decode_supergroup_chat_created(Json), Decode_channel_chat_created(Json), Decode_migrate_to_chat_id(Json), Decode_migrate_from_chat_id(Json), Decode_connected_website(Json), Decode_inline_keyboard_markup(Json)} of {{ok, Message_id}, {ok, Message_thread_id}, {ok, From}, {ok, Sender_chat}, {ok, Sender_boost_count}, {ok, Date}, {ok, Chat}, {ok, Is_topic_message}, {ok, Is_automatic_forward}, {ok, Reply_to_message}, {ok, Via_bot}, {ok, Edit_date}, {ok, Has_protected_content}, {ok, Media_group_id}, {ok, Author_signature}, {ok, Text}, {ok, Entities}, {ok, Caption}, {ok, Caption_entities}, {ok, Has_media_spoiler}, {ok, New_chat_members}, {ok, Left_chat_member}, {ok, New_chat_title}, {ok, Delete_chat_photo}, {ok, Group_chat_created}, {ok, Supergroup_chat_created}, {ok, Channel_chat_created}, {ok, Migrate_to_chat_id}, {ok, Migrate_from_chat_id}, {ok, Connected_website}, {ok, Inline_keyboard_markup}} -> {ok, {message, Message_id, Message_thread_id, From, Sender_chat, Sender_boost_count, Date, Chat, Is_topic_message, Is_automatic_forward, Reply_to_message, Via_bot, Edit_date, Has_protected_content, Media_group_id, Author_signature, Text, Entities, Caption, Caption_entities, Has_media_spoiler, New_chat_members, Left_chat_member, New_chat_title, Delete_chat_photo, Group_chat_created, Supergroup_chat_created, Channel_chat_created, Migrate_to_chat_id, Migrate_from_chat_id, Connected_website, Inline_keyboard_markup}}; {Message_id@1, Message_thread_id@1, From@1, Sender_chat@1, Sender_boost_count@1, Date@1, Chat@1, Is_topic_message@1, Is_automatic_forward@1, Reply_to_message@1, Via_bot@1, Edit_date@1, Has_protected_content@1, Media_group_id@1, Author_signature@1, Text@1, Entities@1, Caption@1, Caption_entities@1, Has_media_spoiler@1, New_chat_members@1, Left_chat_member@1, New_chat_title@1, Delete_chat_photo@1, Group_chat_created@1, Supergroup_chat_created@1, Channel_chat_created@1, Migrate_to_chat_id@1, Migrate_from_chat_id@1, Connected_website@1, Inline_keyboard_markup@1} -> {error, gleam@list:concat( [all_errors(Message_id@1), all_errors(Message_thread_id@1), all_errors(From@1), all_errors(Sender_chat@1), all_errors(Sender_boost_count@1), all_errors(Date@1), all_errors(Chat@1), all_errors(Is_topic_message@1), all_errors(Is_automatic_forward@1), all_errors(Reply_to_message@1), all_errors(Via_bot@1), all_errors(Edit_date@1), all_errors(Has_protected_content@1), all_errors(Media_group_id@1), all_errors(Author_signature@1), all_errors(Text@1), all_errors(Entities@1), all_errors(Caption@1), all_errors(Caption_entities@1), all_errors(Has_media_spoiler@1), all_errors(New_chat_members@1), all_errors(Left_chat_member@1), all_errors(New_chat_title@1), all_errors(Delete_chat_photo@1), all_errors(Group_chat_created@1), all_errors(Supergroup_chat_created@1), all_errors(Channel_chat_created@1), all_errors(Migrate_to_chat_id@1), all_errors(Migrate_from_chat_id@1), all_errors(Connected_website@1), all_errors(Inline_keyboard_markup@1)] )} end. -spec decode_update(gleam@dynamic:dynamic_()) -> {ok, update()} | {error, list(gleam@dynamic:decode_error())}. decode_update(Json) -> _pipe = Json, (gleam@dynamic:decode2( fun(Field@0, Field@1) -> {update, Field@0, Field@1} end, gleam@dynamic:field(<<"message"/utf8>>, fun decode_message/1), gleam@dynamic:field(<<"update_id"/utf8>>, fun gleam@dynamic:int/1) ))(_pipe). -spec new_send_dice_parameters(integer()) -> send_dice_parameters(). new_send_dice_parameters(Chat_id) -> {send_dice_parameters, Chat_id, none, none, none, none, none}. -spec decode_webhook_info(gleam@dynamic:dynamic_()) -> {ok, webhook_info()} | {error, list(gleam@dynamic:decode_error())}. decode_webhook_info(Json) -> _pipe = Json, (gleam@dynamic:decode9( fun(Field@0, Field@1, Field@2, Field@3, Field@4, Field@5, Field@6, Field@7, Field@8) -> {webhook_info, Field@0, Field@1, Field@2, Field@3, Field@4, Field@5, Field@6, Field@7, Field@8} end, gleam@dynamic:field(<<"url"/utf8>>, fun gleam@dynamic:string/1), gleam@dynamic:field( <<"has_custom_certificate"/utf8>>, fun gleam@dynamic:bool/1 ), gleam@dynamic:field( <<"pending_update_count"/utf8>>, fun gleam@dynamic:int/1 ), gleam@dynamic:optional_field( <<"ip_address"/utf8>>, fun gleam@dynamic:string/1 ), gleam@dynamic:optional_field( <<"last_error_date"/utf8>>, fun gleam@dynamic:int/1 ), gleam@dynamic:optional_field( <<"last_error_message"/utf8>>, fun gleam@dynamic:string/1 ), gleam@dynamic:optional_field( <<"last_synchronization_error_date"/utf8>>, fun gleam@dynamic:int/1 ), gleam@dynamic:optional_field( <<"max_connections"/utf8>>, fun gleam@dynamic:int/1 ), gleam@dynamic:optional_field( <<"allowed_updates"/utf8>>, gleam@dynamic:list(fun gleam@dynamic:string/1) ) ))(_pipe). -spec string_or_int_to_json(int_or_string()) -> gleam@json:json(). string_or_int_to_json(Value) -> case Value of {int, Value@1} -> gleam@json:int(Value@1); {string, Value@2} -> gleam@json:string(Value@2) end. -spec bot_command_scope_to_json(bot_command_scope()) -> gleam@json:json(). bot_command_scope_to_json(Scope) -> case Scope of bot_command_default_scope -> gleam@json:object( [{<<"type"/utf8>>, gleam@json:string(<<"default"/utf8>>)}] ); bot_command_all_private_chats_scope -> gleam@json:object( [{<<"type"/utf8>>, gleam@json:string(<<"all_private_chats"/utf8>>)}] ); bot_command_scope_all_group_chats -> gleam@json:object( [{<<"type"/utf8>>, gleam@json:string(<<"all_group_chats"/utf8>>)}] ); bot_command_scope_all_chat_administrators -> gleam@json:object( [{<<"type"/utf8>>, gleam@json:string(<<"all_chat_administrators"/utf8>>)}] ); {bot_command_scope_chat, Chat_id} -> gleam@json:object( [{<<"type"/utf8>>, gleam@json:string(<<"chat"/utf8>>)}, {<<"chat_id"/utf8>>, gleam@json:int(Chat_id)}] ); {bot_command_scope_chat_string, Chat_id@1} -> gleam@json:object( [{<<"type"/utf8>>, gleam@json:string(<<"chat"/utf8>>)}, {<<"chat_id"/utf8>>, string_or_int_to_json(Chat_id@1)}] ); {bot_command_scope_chat_administrators, Chat_id@2} -> gleam@json:object( [{<<"type"/utf8>>, gleam@json:string(<<"chat_administrators"/utf8>>)}, {<<"chat_id"/utf8>>, string_or_int_to_json(Chat_id@2)}] ); {bot_command_scope_chat_member, Chat_id@3, User_id} -> gleam@json:object( [{<<"type"/utf8>>, gleam@json:string(<<"chat_member"/utf8>>)}, {<<"chat_id"/utf8>>, string_or_int_to_json(Chat_id@3)}, {<<"user_id"/utf8>>, gleam@json:int(User_id)}] ) end. -spec option_to_json_object_list( gleam@option:option(OLG), binary(), fun((OLG) -> gleam@json:json()) ) -> list({binary(), gleam@json:json()}). option_to_json_object_list(Value, Field, Encoder) -> _pipe = gleam@option:map(Value, fun(V) -> [{Field, Encoder(V)}] end), gleam@option:unwrap(_pipe, []). -spec encode_botcommand_parameters(bot_command_parameters()) -> list({binary(), gleam@json:json()}). encode_botcommand_parameters(Params) -> Scope = option_to_json_object_list( erlang:element(2, Params), <<"scope"/utf8>>, fun bot_command_scope_to_json/1 ), Language_code = option_to_json_object_list( erlang:element(3, Params), <<"language_code"/utf8>>, fun gleam@json:string/1 ), gleam@list:concat([Scope, Language_code]). -spec encode_user(user()) -> gleam@json:json(). encode_user(User) -> Id = [{<<"id"/utf8>>, gleam@json:int(erlang:element(2, User))}], Is_bot = [{<<"is_bot"/utf8>>, gleam@json:bool(erlang:element(3, User))}], First_name = [{<<"first_name"/utf8>>, gleam@json:string(erlang:element(4, User))}], Last_name = option_to_json_object_list( erlang:element(5, User), <<"last_name"/utf8>>, fun gleam@json:string/1 ), Username = option_to_json_object_list( erlang:element(6, User), <<"username"/utf8>>, fun gleam@json:string/1 ), Language_code = option_to_json_object_list( erlang:element(7, User), <<"language_code"/utf8>>, fun gleam@json:string/1 ), Is_premium = option_to_json_object_list( erlang:element(8, User), <<"is_premium"/utf8>>, fun gleam@json:bool/1 ), Added_to_attachment_menu = option_to_json_object_list( erlang:element(9, User), <<"added_to_attachment_menu"/utf8>>, fun gleam@json:bool/1 ), _pipe = [Id, Is_bot, First_name, Last_name, Username, Language_code, Is_premium, Added_to_attachment_menu], _pipe@1 = gleam@list:concat(_pipe), gleam@json:object(_pipe@1). -spec encode_message_entity(message_entity()) -> gleam@json:json(). encode_message_entity(Message_entity) -> Entity_type = [{<<"entity_type"/utf8>>, gleam@json:string(erlang:element(2, Message_entity))}], Offset = [{<<"offset"/utf8>>, gleam@json:int(erlang:element(3, Message_entity))}], Length = [{<<"length"/utf8>>, gleam@json:int(erlang:element(4, Message_entity))}], Url = option_to_json_object_list( erlang:element(5, Message_entity), <<"url"/utf8>>, fun gleam@json:string/1 ), User = option_to_json_object_list( erlang:element(6, Message_entity), <<"user"/utf8>>, fun encode_user/1 ), Language = option_to_json_object_list( erlang:element(7, Message_entity), <<"language"/utf8>>, fun gleam@json:string/1 ), Custom_emoji_id = option_to_json_object_list( erlang:element(8, Message_entity), <<"custom_emoji_id"/utf8>>, fun gleam@json:string/1 ), _pipe = [Entity_type, Offset, Length, Url, User, Language, Custom_emoji_id], _pipe@1 = gleam@list:concat(_pipe), gleam@json:object(_pipe@1). -spec encode_reply_parameters(reply_parameters()) -> gleam@json:json(). encode_reply_parameters(Reply_parameters) -> Message_id = [{<<"message_id"/utf8>>, gleam@json:int(erlang:element(2, Reply_parameters))}], Chat_id = option_to_json_object_list( erlang:element(3, Reply_parameters), <<"chat_id"/utf8>>, fun string_or_int_to_json/1 ), Allow_sending_without_reply = option_to_json_object_list( erlang:element(4, Reply_parameters), <<"allow_sending_without_reply"/utf8>>, fun gleam@json:bool/1 ), Quote = option_to_json_object_list( erlang:element(5, Reply_parameters), <<"quote"/utf8>>, fun gleam@json:string/1 ), Quote_parse_mode = option_to_json_object_list( erlang:element(6, Reply_parameters), <<"quote_parse_mode"/utf8>>, fun gleam@json:string/1 ), Quote_entities = option_to_json_object_list( erlang:element(7, Reply_parameters), <<"quote_entities"/utf8>>, fun(_capture) -> gleam@json:array(_capture, fun encode_message_entity/1) end ), Quote_position = option_to_json_object_list( erlang:element(8, Reply_parameters), <<"quote_position"/utf8>>, fun gleam@json:int/1 ), _pipe = [Message_id, Chat_id, Allow_sending_without_reply, Quote, Quote_parse_mode, Quote_entities, Quote_position], _pipe@1 = gleam@list:concat(_pipe), gleam@json:object(_pipe@1). -spec encode_send_dice_parameters(send_dice_parameters()) -> gleam@json:json(). encode_send_dice_parameters(Params) -> Chat_id = [{<<"chat_id"/utf8>>, gleam@json:int(erlang:element(2, Params))}], Message_thread_id = option_to_json_object_list( erlang:element(3, Params), <<"message_thread_id"/utf8>>, fun gleam@json:int/1 ), Emoji = option_to_json_object_list( erlang:element(4, Params), <<"emoji"/utf8>>, fun gleam@json:string/1 ), Disable_notification = option_to_json_object_list( erlang:element(5, Params), <<"disable_notification"/utf8>>, fun gleam@json:bool/1 ), Protect_content = option_to_json_object_list( erlang:element(6, Params), <<"protect_content"/utf8>>, fun gleam@json:bool/1 ), Reply_parameters = option_to_json_object_list( erlang:element(7, Params), <<"reply_parameters"/utf8>>, fun encode_reply_parameters/1 ), _pipe = [Chat_id, Message_thread_id, Emoji, Disable_notification, Protect_content, Reply_parameters], _pipe@1 = gleam@list:concat(_pipe), gleam@json:object(_pipe@1).