-- Hoogle documentation, generated by Haddock
-- See Hoogle, http://www.haskell.org/hoogle/


-- | Servant bindings to the Telegram bot API
--   
--   Please see the README on GitHub at
--   <a>https://github.com/poscat0x04/telegram-raw-api#readme</a>
@package telegram-raw-api
@version 0.1.0

module Web.Telegram.API.Actions.Data
data Kick
Kick :: ChatId -> Integer -> Maybe Integer -> Kick
[$sel:chatId:Kick] :: Kick -> ChatId
[$sel:userId:Kick] :: Kick -> Integer
[$sel:untilDate:Kick] :: Kick -> Maybe Integer
data Unban
Unban :: ChatId -> Integer -> Unban
[$sel:chatId:Unban] :: Unban -> ChatId
[$sel:userId:Unban] :: Unban -> Integer
data Restriction
Restriction :: ChatId -> Integer -> ChatPermissions -> Maybe Integer -> Restriction
[$sel:chatId:Restriction] :: Restriction -> ChatId
[$sel:userId:Restriction] :: Restriction -> Integer
[$sel:permissions:Restriction] :: Restriction -> ChatPermissions
[$sel:untilDate:Restriction] :: Restriction -> Maybe Integer
data Promotion
Promotion :: ChatId -> Integer -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Maybe Bool -> Promotion
[$sel:chatId:Promotion] :: Promotion -> ChatId
[$sel:userId:Promotion] :: Promotion -> Integer
[$sel:canChangeInfo:Promotion] :: Promotion -> Maybe Bool
[$sel:canPostMessages:Promotion] :: Promotion -> Maybe Bool
[$sel:canEditMessages:Promotion] :: Promotion -> Maybe Bool
[$sel:canDeleteMessages:Promotion] :: Promotion -> Maybe Bool
[$sel:canInviteUsers:Promotion] :: Promotion -> Maybe Bool
[$sel:canRestrictMembers:Promotion] :: Promotion -> Maybe Bool
[$sel:canPinMessages:Promotion] :: Promotion -> Maybe Bool
[$sel:canPromoteMembers:Promotion] :: Promotion -> Maybe Bool
data InlineQueryAnswer
InlineQueryAnswer :: Text -> [InlineQueryResult] -> Maybe Integer -> Maybe Bool -> Maybe Text -> Maybe Text -> Maybe Text -> InlineQueryAnswer
[$sel:inlineQueryId:InlineQueryAnswer] :: InlineQueryAnswer -> Text
[$sel:results:InlineQueryAnswer] :: InlineQueryAnswer -> [InlineQueryResult]
[$sel:cacheTime:InlineQueryAnswer] :: InlineQueryAnswer -> Maybe Integer
[$sel:isPersonal:InlineQueryAnswer] :: InlineQueryAnswer -> Maybe Bool
[$sel:nextOffset:InlineQueryAnswer] :: InlineQueryAnswer -> Maybe Text
[$sel:switchPmText:InlineQueryAnswer] :: InlineQueryAnswer -> Maybe Text
[$sel:switchPmParameter:InlineQueryAnswer] :: InlineQueryAnswer -> Maybe Text
data CallbackQueryAnswer
CQAns :: Text -> Maybe Text -> Maybe Bool -> Maybe Text -> Maybe Integer -> CallbackQueryAnswer
[$sel:callbackQueryId:CQAns] :: CallbackQueryAnswer -> Text
[$sel:text:CQAns] :: CallbackQueryAnswer -> Maybe Text
[$sel:showAlert:CQAns] :: CallbackQueryAnswer -> Maybe Bool
[$sel:url:CQAns] :: CallbackQueryAnswer -> Maybe Text
[$sel:cacheTime:CQAns] :: CallbackQueryAnswer -> Maybe Integer
newtype CommandSet
CommandSet :: [BotCommand] -> CommandSet
[$sel:commands:CommandSet] :: CommandSet -> [BotCommand]
instance Data.Aeson.Types.FromJSON.FromJSON Web.Telegram.API.Actions.Data.CommandSet
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Actions.Data.CommandSet
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Actions.Data.CommandSet
instance GHC.Generics.Generic Web.Telegram.API.Actions.Data.CommandSet
instance GHC.Classes.Eq Web.Telegram.API.Actions.Data.CommandSet
instance GHC.Show.Show Web.Telegram.API.Actions.Data.CommandSet
instance Data.Aeson.Types.FromJSON.FromJSON Web.Telegram.API.Actions.Data.CallbackQueryAnswer
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Actions.Data.CallbackQueryAnswer
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Actions.Data.CallbackQueryAnswer
instance GHC.Generics.Generic Web.Telegram.API.Actions.Data.CallbackQueryAnswer
instance GHC.Classes.Eq Web.Telegram.API.Actions.Data.CallbackQueryAnswer
instance GHC.Show.Show Web.Telegram.API.Actions.Data.CallbackQueryAnswer
instance Data.Aeson.Types.FromJSON.FromJSON Web.Telegram.API.Actions.Data.InlineQueryAnswer
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Actions.Data.InlineQueryAnswer
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Actions.Data.InlineQueryAnswer
instance GHC.Generics.Generic Web.Telegram.API.Actions.Data.InlineQueryAnswer
instance GHC.Classes.Eq Web.Telegram.API.Actions.Data.InlineQueryAnswer
instance GHC.Show.Show Web.Telegram.API.Actions.Data.InlineQueryAnswer
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Actions.Data.Promotion
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Actions.Data.Promotion
instance GHC.Generics.Generic Web.Telegram.API.Actions.Data.Promotion
instance GHC.Classes.Eq Web.Telegram.API.Actions.Data.Promotion
instance GHC.Show.Show Web.Telegram.API.Actions.Data.Promotion
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Actions.Data.Restriction
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Actions.Data.Restriction
instance GHC.Generics.Generic Web.Telegram.API.Actions.Data.Restriction
instance GHC.Classes.Eq Web.Telegram.API.Actions.Data.Restriction
instance GHC.Show.Show Web.Telegram.API.Actions.Data.Restriction
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Actions.Data.Unban
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Actions.Data.Unban
instance GHC.Generics.Generic Web.Telegram.API.Actions.Data.Unban
instance GHC.Classes.Eq Web.Telegram.API.Actions.Data.Unban
instance GHC.Show.Show Web.Telegram.API.Actions.Data.Unban
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Actions.Data.Kick
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Actions.Data.Kick
instance GHC.Generics.Generic Web.Telegram.API.Actions.Data.Kick
instance GHC.Classes.Eq Web.Telegram.API.Actions.Data.Kick
instance GHC.Show.Show Web.Telegram.API.Actions.Data.Kick


-- | Compound parameters
module Web.Telegram.API.CompoundParam
data CompoundParam (tag :: Type) (sym :: Symbol) (a :: Type)
data CompoundParams (tag :: Type) (sym :: Symbol) (a :: Type)
newtype Warp a
Warp :: a -> Warp a
instance (GHC.TypeLits.KnownSymbol sym, Web.Internal.HttpApiData.ToHttpApiData a, Servant.Client.Core.HasClient.HasClient m api, Servant.Multipart.ToMultipart tag a, Servant.Multipart.MultipartBackend tag) => Servant.Client.Core.HasClient.HasClient m (Web.Telegram.API.CompoundParam.CompoundParams tag sym a Servant.API.Sub.:> api)
instance GHC.Base.Semigroup (Web.Telegram.API.CompoundParam.Fold (Servant.Multipart.MultipartData tag))
instance GHC.Base.Monoid (Web.Telegram.API.CompoundParam.Fold (Servant.Multipart.MultipartData tag))
instance Servant.Multipart.ToMultipart tag a => Servant.Multipart.ToMultipart tag (Web.Telegram.API.CompoundParam.Fold [a])
instance Web.Internal.HttpApiData.ToHttpApiData a => Web.Internal.HttpApiData.ToHttpApiData (Web.Telegram.API.CompoundParam.Warp [a])
instance (GHC.TypeLits.KnownSymbol sym, Web.Internal.HttpApiData.ToHttpApiData a, Servant.Client.Core.HasClient.HasClient m api, Servant.Multipart.ToMultipart tag a, Servant.Multipart.MultipartBackend tag) => Servant.Client.Core.HasClient.HasClient m (Web.Telegram.API.CompoundParam.CompoundParam tag sym a Servant.API.Sub.:> api)


-- | Actions that the bot can perform
module Web.Telegram.API.Actions
type KickChatMember = Base :> "kickChatmember" :> ReqBody '[JSON] Kick :> Get '[JSON] (ReqResult Bool)
data Kick
type UnbanChatMember = Base :> "unbanChatMember" :> ReqBody '[JSON] Unban :> Get '[JSON] (ReqResult Bool)
data Unban
type RestrictChatMember = Base :> "restrictChatMember" :> ReqBody '[JSON] Restriction :> Get '[JSON] (ReqResult Bool)
data Restriction
type PromoteChatMember = Base :> "promoteChatMember" :> ReqBody '[JSON] Promotion :> Get '[JSON] (ReqResult Bool)
data Promotion
type SetChatAdministratorCustomTitle = Base :> "setChatAdministratorCustomTitle" :> QueryR "chat_id" ChatId :> QueryR "user_id" Integer :> QueryParam "custom_title" Text :> Get '[JSON] (ReqResult Bool)
type SetChatPermissions = Base :> "setChatPermissions" :> QueryR "chat_id" ChatId :> QueryR "permissions" ChatPermissions :> Get '[JSON] (ReqResult Bool)
type ExportChatInviteLink = Base :> "exportChatInviteLink" :> QueryR "chat_id" ChatId :> Get '[JSON] (ReqResult Text)
type SetChatPhoto = Base :> "setChatPhoto" :> QueryR "chat_id" ChatId :> CompoundParam Mem "photo" InputFile :> Get '[JSON] (ReqResult Bool)
type DeleteChatPhoto = Base :> "deleteChatPhoto" :> QueryR "chat_id" ChatId :> Get '[JSON] (ReqResult Bool)
type SetChatTitle = Base :> "setChatTitle" :> QueryR "chat_id" ChatId :> QueryR "title" Text :> Get '[JSON] (ReqResult Bool)
type SetChatDescription = Base :> "setChatDescription" :> QueryR "chat_id" ChatId :> QueryParam "description" Text :> Get '[JSON] (ReqResult Bool)
type PinChatMessage = Base :> "pinChatMessage" :> QueryR "chat_id" ChatId :> QueryR "message_id" Integer :> QueryParam "disable_notification" Bool :> Get '[JSON] (ReqResult Bool)
type UnpinChatMessage = Base :> "unpinChatMessage" :> QueryR "chat_id" ChatId :> Get '[JSON] (ReqResult Bool)
type LeaveChat = Base :> "leaveChat" :> QueryR "chat_id" ChatId :> Get '[JSON] (ReqResult Bool)
type SetChatStickerSet = Base :> "setChatStickerSet" :> QueryR "chat_id" ChatId :> QueryR "sticker_set_name" Text :> Get '[JSON] (ReqResult Bool)
type DeleteChatStickerSet = Base :> "deleteChatStickerSet" :> QueryR "chat_id" ChatId :> Get '[JSON] (ReqResult Bool)
type UploadStickerFileU = UploadStickerFile' (MultipartForm Mem PngSticker)
type UploadStickerFile = UploadStickerFile' (QueryR "png_sticker" Text)
type CreateNewStickerSetU = CreateNewStickerSet' (MultipartForm Mem PngSticker)
type CreateNewStickerSet = CreateNewStickerSet' (QueryR "png_sticker" Text)
type AddStickerToSetU = AddStickerToSet' (MultipartForm Mem PngSticker)
type AddStickerToSet = AddStickerToSet' (QueryR "png_sticker" Text)
type SetStickerPositionInSet = Base :> "setStickerPositionInSet" :> QueryR "sticker" Text :> QueryR "positon" Integer :> Get '[JSON] (ReqResult Bool)
type DeleteStickerFromSet = Base :> "deleteStickerFromSet" :> QueryR "sticker" Text :> Get '[JSON] (ReqResult Bool)
type SetStickerSetThumbU = SetStickerSetThumb' (MultipartForm Mem PngSticker)
type SetStickerSetThumb = SetStickerSetThumb' (QueryR "thumb" Text)
type AnswerInlineQuery = Base :> "answerInlineQuery" :> ReqBody '[JSON] InlineQueryAnswer :> Get '[JSON] (ReqResult Bool)
data InlineQueryAnswer

module Web.Telegram.API.Editing.Data
data TextEdit
TextE :: Maybe ChatId -> Maybe Integer -> Maybe Text -> Text -> Maybe ParseMode -> Maybe Bool -> Maybe InlineKeyboardMarkup -> TextEdit
[$sel:chatId:TextE] :: TextEdit -> Maybe ChatId
[$sel:messageId:TextE] :: TextEdit -> Maybe Integer
[$sel:inlineMessageId:TextE] :: TextEdit -> Maybe Text
[$sel:text:TextE] :: TextEdit -> Text
[$sel:parseMode:TextE] :: TextEdit -> Maybe ParseMode
[$sel:disalbeWebPagePreview:TextE] :: TextEdit -> Maybe Bool
[$sel:replyMarkup:TextE] :: TextEdit -> Maybe InlineKeyboardMarkup
data CaptionEdit
CaptionE :: Maybe ChatId -> Maybe Integer -> Maybe Text -> Maybe Text -> Maybe ParseMode -> Maybe InlineKeyboardMarkup -> CaptionEdit
[$sel:chatId:CaptionE] :: CaptionEdit -> Maybe ChatId
[$sel:messageId:CaptionE] :: CaptionEdit -> Maybe Integer
[$sel:inlineMessageId:CaptionE] :: CaptionEdit -> Maybe Text
[$sel:caption:CaptionE] :: CaptionEdit -> Maybe Text
[$sel:parseMode:CaptionE] :: CaptionEdit -> Maybe ParseMode
[$sel:replyMarkup:CaptionE] :: CaptionEdit -> Maybe InlineKeyboardMarkup
data MediaEdit
MediaE :: Maybe ChatId -> Maybe Integer -> Maybe Text -> InputMedia -> MediaEdit
[$sel:chatId:MediaE] :: MediaEdit -> Maybe ChatId
[$sel:messageId:MediaE] :: MediaEdit -> Maybe Integer
[$sel:inlineMessageId:MediaE] :: MediaEdit -> Maybe Text
[$sel:media:MediaE] :: MediaEdit -> InputMedia
data MarkupEdit
MarkupEdit :: Maybe ChatId -> Maybe Integer -> Maybe Text -> Maybe InlineKeyboardMarkup -> MarkupEdit
[$sel:chatId:MarkupEdit] :: MarkupEdit -> Maybe ChatId
[$sel:messageId:MarkupEdit] :: MarkupEdit -> Maybe Integer
[$sel:inlineMessageId:MarkupEdit] :: MarkupEdit -> Maybe Text
[$sel:replyMarkup:MarkupEdit] :: MarkupEdit -> Maybe InlineKeyboardMarkup
data PollStop
PollStop :: ChatId -> Integer -> Maybe InlineKeyboardMarkup -> PollStop
[$sel:chatId:PollStop] :: PollStop -> ChatId
[$sel:messageId:PollStop] :: PollStop -> Integer
[$sel:replyMarkup:PollStop] :: PollStop -> Maybe InlineKeyboardMarkup
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Editing.Data.PollStop
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Editing.Data.PollStop
instance GHC.Generics.Generic Web.Telegram.API.Editing.Data.PollStop
instance GHC.Classes.Eq Web.Telegram.API.Editing.Data.PollStop
instance GHC.Show.Show Web.Telegram.API.Editing.Data.PollStop
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Editing.Data.MarkupEdit
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Editing.Data.MarkupEdit
instance GHC.Generics.Generic Web.Telegram.API.Editing.Data.MarkupEdit
instance GHC.Classes.Eq Web.Telegram.API.Editing.Data.MarkupEdit
instance GHC.Show.Show Web.Telegram.API.Editing.Data.MarkupEdit
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Editing.Data.MediaEdit
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Editing.Data.MediaEdit
instance GHC.Generics.Generic Web.Telegram.API.Editing.Data.MediaEdit
instance GHC.Classes.Eq Web.Telegram.API.Editing.Data.MediaEdit
instance GHC.Show.Show Web.Telegram.API.Editing.Data.MediaEdit
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Editing.Data.CaptionEdit
instance Data.Aeson.Types.FromJSON.FromJSON Web.Telegram.API.Editing.Data.CaptionEdit
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Editing.Data.CaptionEdit
instance GHC.Generics.Generic Web.Telegram.API.Editing.Data.CaptionEdit
instance GHC.Classes.Eq Web.Telegram.API.Editing.Data.CaptionEdit
instance GHC.Show.Show Web.Telegram.API.Editing.Data.CaptionEdit
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Editing.Data.TextEdit
instance Data.Aeson.Types.FromJSON.FromJSON Web.Telegram.API.Editing.Data.TextEdit
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Editing.Data.TextEdit
instance GHC.Generics.Generic Web.Telegram.API.Editing.Data.TextEdit
instance GHC.Classes.Eq Web.Telegram.API.Editing.Data.TextEdit
instance GHC.Show.Show Web.Telegram.API.Editing.Data.TextEdit

module Web.Telegram.API.Editing
type EditMessageText = Base :> "editMessageText" :> ReqBody '[JSON] TextEdit :> Res
type EditMessageCaption = Base :> "editMessageCaption" :> CaptionEdit :> Res
type EditMessageMedia = Base :> "editMessageMedia" :> QueryParam "chat_id" ChatId :> QueryParam "message_id" Integer :> QueryParam "inline_message_id" Text :> CompoundParam Mem "media" InputMedia :> Res
type EditMessageReplyMarkup = Base :> "editMessageReplyMarkup" :> ReqBody '[JSON] MarkupEdit :> Res
type StopPoll = Base :> "stopPoll" :> ReqBody '[JSON] PollStop :> Get '[JSON] (ReqResult Poll)
type DeleteMessage = Base :> "deleteMessage" :> QueryR "chat_id" ChatId :> QueryR "message_id" Integer :> Get '[JSON] (ReqResult Bool)
data TextEdit
data CaptionEdit
data MediaEdit
data MarkupEdit
data PollStop

module Web.Telegram.API.Getting
type GetMe = Base :> "getMe" :> Get '[JSON] (ReqResult User)
type GetUserProfilePhotos = Base :> "getUserProfilePhotos" :> QueryR "user_id" Integer :> QueryParam "offset" Integer :> QueryParam "limit" Integer :> Get '[JSON] (ReqResult UserProfilePhotos)
type GetFile = Base :> "getFile" :> QueryR "file_id" Text :> Get '[JSON] (ReqResult File)
type GetChat = Base :> "getChat" :> QueryR "chat_id" ChatId :> Get '[JSON] (ReqResult Chat)
type GetChatAdministrators = Base :> "getChatAdministrators" :> QueryR "chat_id" ChatId :> Get '[JSON] (ReqResult [ChatMember])
type GetChatMembersCount = Base :> "getChatMembersCount" :> QueryR "chat_id" ChatId :> Get '[JSON] (ReqResult Integer)
type GetChatMember = Base :> "getChatMember" :> QueryR "chat_id" ChatId :> QueryR "user_id" Integer :> Get '[JSON] (ReqResult ChatMember)
type GetMyCommands = Base :> "getMyCommands" :> Get '[JSON] (ReqResult [BotCommand])
type GetStickerSet = Base :> "getStickerSet" :> QueryR "name" Text :> Get '[JSON] (ReqResult StickerSet)


-- | <i>Deprecated: Use labels from generics-lens instead</i>
module Web.Telegram.API.Lens
disableWebPagePreview :: HasField "disableWebPagePreview" s t a b => Lens s t a b
parseMode :: HasField "parseMode" s t a b => Lens s t a b
disableNotification :: HasField "disableNotification" s t a b => Lens s t a b
replyToMessageId :: HasField "replyToMessageId" s t a b => Lens s t a b
fromChatId :: HasField "fromChatId" s t a b => Lens s t a b
action :: HasField "action" s t a b => Lens s t a b
inlineMessageId :: HasField "inlineMessageId" s t a b => Lens s t a b
inlineQueryId :: HasField "inlineQueryId" s t a b => Lens s t a b
results :: HasField "results" s t a b => Lens s t a b
cacheTime :: HasField "cacheTime" s t a b => Lens s t a b
isPersonal :: HasField "isPersonal" s t a b => Lens s t a b
nextOffset :: HasField "nextOffset" s t a b => Lens s t a b
switchPmText :: HasField "switchPmText" s t a b => Lens s t a b
switchPmParameter :: HasField "switchPmParameter" s t a b => Lens s t a b
offset :: HasField "offset" s t a b => Lens s t a b
limit :: HasField "limit" s t a b => Lens s t a b
timeout :: HasField "timeout" s t a b => Lens s t a b
allowedUpdates :: HasField "allowedUpdates" s t a b => Lens s t a b
url :: HasField "url" s t a b => Lens s t a b
maxConnections :: HasField "maxConnections" s t a b => Lens s t a b

module Web.Telegram.API.Sending.Data
data SMessage
SMsg :: ChatId -> Text -> Maybe Bool -> Maybe ParseMode -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> SMessage
[$sel:chatId:SMsg] :: SMessage -> ChatId
[$sel:text:SMsg] :: SMessage -> Text
[$sel:disableWebPagePreview:SMsg] :: SMessage -> Maybe Bool
[$sel:parseMode:SMsg] :: SMessage -> Maybe ParseMode
[$sel:disableNotification:SMsg] :: SMessage -> Maybe Bool
[$sel:replyToMessageId:SMsg] :: SMessage -> Maybe Integer
[$sel:replyMarkup:SMsg] :: SMessage -> Maybe ReplyMarkup
data FwdMessage
FwdMsg :: ChatId -> ChatId -> Integer -> Maybe Bool -> FwdMessage
[$sel:chatId:FwdMsg] :: FwdMessage -> ChatId
[$sel:fromChatId:FwdMsg] :: FwdMessage -> ChatId
[$sel:messageId:FwdMsg] :: FwdMessage -> Integer
[$sel:disableNotification:FwdMsg] :: FwdMessage -> Maybe Bool
data PhotoMessage a
PhotoMsg :: ChatId -> a -> Maybe Text -> Maybe Bool -> Maybe ParseMode -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> PhotoMessage a
[$sel:chatId:PhotoMsg] :: PhotoMessage a -> ChatId
[$sel:photo:PhotoMsg] :: PhotoMessage a -> a
[$sel:caption:PhotoMsg] :: PhotoMessage a -> Maybe Text
[$sel:disableWebPagePreview:PhotoMsg] :: PhotoMessage a -> Maybe Bool
[$sel:parseMode:PhotoMsg] :: PhotoMessage a -> Maybe ParseMode
[$sel:disableNotification:PhotoMsg] :: PhotoMessage a -> Maybe Bool
[$sel:replyToMessageId:PhotoMsg] :: PhotoMessage a -> Maybe Integer
[$sel:replyMarkup:PhotoMsg] :: PhotoMessage a -> Maybe ReplyMarkup
data AudioMessage a
AudioMsg :: ChatId -> a -> Maybe Text -> Maybe Integer -> Maybe Text -> Maybe Text -> Maybe ParseMode -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> AudioMessage a
[$sel:chatId:AudioMsg] :: AudioMessage a -> ChatId
[$sel:audio:AudioMsg] :: AudioMessage a -> a
[$sel:caption:AudioMsg] :: AudioMessage a -> Maybe Text
[$sel:duration:AudioMsg] :: AudioMessage a -> Maybe Integer
[$sel:performer:AudioMsg] :: AudioMessage a -> Maybe Text
[$sel:title:AudioMsg] :: AudioMessage a -> Maybe Text
[$sel:parseMode:AudioMsg] :: AudioMessage a -> Maybe ParseMode
[$sel:disableNotification:AudioMsg] :: AudioMessage a -> Maybe Bool
[$sel:replyToMessageId:AudioMsg] :: AudioMessage a -> Maybe Integer
[$sel:replyMarkup:AudioMsg] :: AudioMessage a -> Maybe ReplyMarkup
data DocMessage a
DocMsg :: ChatId -> a -> Maybe Text -> Maybe ParseMode -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> DocMessage a
[$sel:chatId:DocMsg] :: DocMessage a -> ChatId
[$sel:document:DocMsg] :: DocMessage a -> a
[$sel:caption:DocMsg] :: DocMessage a -> Maybe Text
[$sel:parseMode:DocMsg] :: DocMessage a -> Maybe ParseMode
[$sel:disableNotification:DocMsg] :: DocMessage a -> Maybe Bool
[$sel:replyToMessageId:DocMsg] :: DocMessage a -> Maybe Integer
[$sel:replyMarkup:DocMsg] :: DocMessage a -> Maybe ReplyMarkup
data VidMessage a
VidMsg :: ChatId -> a -> Maybe Integer -> Maybe Integer -> Maybe Integer -> Maybe Text -> Maybe Bool -> Maybe ParseMode -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> VidMessage a
[$sel:chatId:VidMsg] :: VidMessage a -> ChatId
[$sel:video:VidMsg] :: VidMessage a -> a
[$sel:duration:VidMsg] :: VidMessage a -> Maybe Integer
[$sel:width:VidMsg] :: VidMessage a -> Maybe Integer
[$sel:height:VidMsg] :: VidMessage a -> Maybe Integer
[$sel:caption:VidMsg] :: VidMessage a -> Maybe Text
[$sel:supportsStreaming:VidMsg] :: VidMessage a -> Maybe Bool
[$sel:parseMode:VidMsg] :: VidMessage a -> Maybe ParseMode
[$sel:disableNotification:VidMsg] :: VidMessage a -> Maybe Bool
[$sel:replyToMessageId:VidMsg] :: VidMessage a -> Maybe Integer
[$sel:replyMarkup:VidMsg] :: VidMessage a -> Maybe ReplyMarkup
data AnimationMessage a
AniMsg :: ChatId -> a -> Maybe Integer -> Maybe Integer -> Maybe Integer -> Maybe Text -> Maybe ParseMode -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> AnimationMessage a
[$sel:chatId:AniMsg] :: AnimationMessage a -> ChatId
[$sel:animation:AniMsg] :: AnimationMessage a -> a
[$sel:duration:AniMsg] :: AnimationMessage a -> Maybe Integer
[$sel:width:AniMsg] :: AnimationMessage a -> Maybe Integer
[$sel:height:AniMsg] :: AnimationMessage a -> Maybe Integer
[$sel:caption:AniMsg] :: AnimationMessage a -> Maybe Text
[$sel:parseMode:AniMsg] :: AnimationMessage a -> Maybe ParseMode
[$sel:disableNotification:AniMsg] :: AnimationMessage a -> Maybe Bool
[$sel:replyToMessageId:AniMsg] :: AnimationMessage a -> Maybe Integer
[$sel:replyMarkup:AniMsg] :: AnimationMessage a -> Maybe ReplyMarkup
data VoiceMessage a
VoiceMsg :: ChatId -> a -> Maybe Integer -> Maybe Text -> Maybe ParseMode -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> VoiceMessage a
[$sel:chatId:VoiceMsg] :: VoiceMessage a -> ChatId
[$sel:voice:VoiceMsg] :: VoiceMessage a -> a
[$sel:duration:VoiceMsg] :: VoiceMessage a -> Maybe Integer
[$sel:caption:VoiceMsg] :: VoiceMessage a -> Maybe Text
[$sel:parseMode:VoiceMsg] :: VoiceMessage a -> Maybe ParseMode
[$sel:disableNotification:VoiceMsg] :: VoiceMessage a -> Maybe Bool
[$sel:replyToMessageId:VoiceMsg] :: VoiceMessage a -> Maybe Integer
[$sel:replyMarkup:VoiceMsg] :: VoiceMessage a -> Maybe ReplyMarkup
data VNMessage a
VNMsg :: ChatId -> Text -> Maybe Integer -> Maybe Integer -> Maybe ParseMode -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> VNMessage a
[$sel:chatId:VNMsg] :: VNMessage a -> ChatId
[$sel:video_note:VNMsg] :: VNMessage a -> Text
[$sel:duration:VNMsg] :: VNMessage a -> Maybe Integer
[$sel:length:VNMsg] :: VNMessage a -> Maybe Integer
[$sel:parseMode:VNMsg] :: VNMessage a -> Maybe ParseMode
[$sel:disableNotification:VNMsg] :: VNMessage a -> Maybe Bool
[$sel:replyToMessageId:VNMsg] :: VNMessage a -> Maybe Integer
[$sel:replyMarkup:VNMsg] :: VNMessage a -> Maybe ReplyMarkup
data LocationMessage
LocationMsg :: ChatId -> Float -> Float -> Maybe Integer -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> LocationMessage
[$sel:chatId:LocationMsg] :: LocationMessage -> ChatId
[$sel:latitude:LocationMsg] :: LocationMessage -> Float
[$sel:longitude:LocationMsg] :: LocationMessage -> Float
[$sel:livePeriod:LocationMsg] :: LocationMessage -> Maybe Integer
[$sel:disableNotification:LocationMsg] :: LocationMessage -> Maybe Bool
[$sel:replyToMessageId:LocationMsg] :: LocationMessage -> Maybe Integer
[$sel:replyMarkup:LocationMsg] :: LocationMessage -> Maybe ReplyMarkup
data LocationEdit
LocationEdit :: Maybe ChatId -> Maybe Integer -> Maybe Text -> Float -> Float -> Maybe ReplyMarkup -> LocationEdit
[$sel:chatId:LocationEdit] :: LocationEdit -> Maybe ChatId
[$sel:messageId:LocationEdit] :: LocationEdit -> Maybe Integer
[$sel:inlineMessageId:LocationEdit] :: LocationEdit -> Maybe Text
[$sel:latitude:LocationEdit] :: LocationEdit -> Float
[$sel:longitude:LocationEdit] :: LocationEdit -> Float
[$sel:replyMarkup:LocationEdit] :: LocationEdit -> Maybe ReplyMarkup
data LocationStop
LocationStop :: Maybe ChatId -> Maybe Integer -> Maybe Text -> Maybe ReplyMarkup -> LocationStop
[$sel:chatId:LocationStop] :: LocationStop -> Maybe ChatId
[$sel:messageId:LocationStop] :: LocationStop -> Maybe Integer
[$sel:inlineMessageId:LocationStop] :: LocationStop -> Maybe Text
[$sel:replyMarkup:LocationStop] :: LocationStop -> Maybe ReplyMarkup
data VenueMessage
VenueMessage :: ChatId -> Float -> Float -> Text -> Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> VenueMessage
[$sel:chatId:VenueMessage] :: VenueMessage -> ChatId
[$sel:latitude:VenueMessage] :: VenueMessage -> Float
[$sel:longitude:VenueMessage] :: VenueMessage -> Float
[$sel:title:VenueMessage] :: VenueMessage -> Text
[$sel:address:VenueMessage] :: VenueMessage -> Text
[$sel:foursquareId:VenueMessage] :: VenueMessage -> Maybe Text
[$sel:foursquareType:VenueMessage] :: VenueMessage -> Maybe Text
[$sel:disableNotification:VenueMessage] :: VenueMessage -> Maybe Bool
[$sel:replyToMessageId:VenueMessage] :: VenueMessage -> Maybe Integer
[$sel:replyMarkup:VenueMessage] :: VenueMessage -> Maybe ReplyMarkup
data ContactMessage
ContactMessage :: ChatId -> Text -> Text -> Maybe Text -> Maybe Text -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> ContactMessage
[$sel:chatId:ContactMessage] :: ContactMessage -> ChatId
[$sel:phoneNumber:ContactMessage] :: ContactMessage -> Text
[$sel:firstName:ContactMessage] :: ContactMessage -> Text
[$sel:lastName:ContactMessage] :: ContactMessage -> Maybe Text
[$sel:vcard:ContactMessage] :: ContactMessage -> Maybe Text
[$sel:disableNotification:ContactMessage] :: ContactMessage -> Maybe Bool
[$sel:replyToMessageId:ContactMessage] :: ContactMessage -> Maybe Integer
[$sel:replyMarkup:ContactMessage] :: ContactMessage -> Maybe ReplyMarkup
data PollMessage
PollMsg :: ChatId -> Text -> [Text] -> Bool -> Maybe PollType -> Maybe Bool -> Maybe Integer -> Maybe Bool -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> PollMessage
[$sel:chatid:PollMsg] :: PollMessage -> ChatId
[$sel:question:PollMsg] :: PollMessage -> Text
[$sel:options:PollMsg] :: PollMessage -> [Text]
[$sel:isAnonymous:PollMsg] :: PollMessage -> Bool
[$sel:pollType:PollMsg] :: PollMessage -> Maybe PollType
[$sel:allowsMultipleAnswers:PollMsg] :: PollMessage -> Maybe Bool
[$sel:correctOptionId:PollMsg] :: PollMessage -> Maybe Integer
[$sel:isClosed:PollMsg] :: PollMessage -> Maybe Bool
[$sel:disableNotification:PollMsg] :: PollMessage -> Maybe Bool
[$sel:replyToMessageId:PollMsg] :: PollMessage -> Maybe Integer
[$sel:replyMarkup:PollMsg] :: PollMessage -> Maybe ReplyMarkup
data DiceMessage
DiceMessage :: ChatId -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> DiceMessage
[$sel:chatId:DiceMessage] :: DiceMessage -> ChatId
[$sel:disableNotification:DiceMessage] :: DiceMessage -> Maybe Bool
[$sel:replyToMessageId:DiceMessage] :: DiceMessage -> Maybe Integer
[$sel:replyMarkup:DiceMessage] :: DiceMessage -> Maybe ReplyMarkup
data ChatAction
ChatAction :: ChatId -> Action -> ChatAction
[$sel:chatId:ChatAction] :: ChatAction -> ChatId
[$sel:action:ChatAction] :: ChatAction -> Action
data StickerMessage
StickerMessage :: ChatId -> Text -> Maybe Bool -> Maybe Integer -> Maybe ReplyMarkup -> StickerMessage
[$sel:chatId:StickerMessage] :: StickerMessage -> ChatId
[$sel:sticker:StickerMessage] :: StickerMessage -> Text
[$sel:disableNotification:StickerMessage] :: StickerMessage -> Maybe Bool
[$sel:replyToMessageId:StickerMessage] :: StickerMessage -> Maybe Integer
[$sel:replyMarkup:StickerMessage] :: StickerMessage -> Maybe ReplyMarkup
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Sending.Data.StickerMessage
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Sending.Data.StickerMessage
instance GHC.Generics.Generic Web.Telegram.API.Sending.Data.StickerMessage
instance GHC.Classes.Eq Web.Telegram.API.Sending.Data.StickerMessage
instance GHC.Show.Show Web.Telegram.API.Sending.Data.StickerMessage
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Sending.Data.ChatAction
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Sending.Data.ChatAction
instance GHC.Generics.Generic Web.Telegram.API.Sending.Data.ChatAction
instance GHC.Classes.Eq Web.Telegram.API.Sending.Data.ChatAction
instance GHC.Show.Show Web.Telegram.API.Sending.Data.ChatAction
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Sending.Data.DiceMessage
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Sending.Data.DiceMessage
instance GHC.Generics.Generic Web.Telegram.API.Sending.Data.DiceMessage
instance GHC.Classes.Eq Web.Telegram.API.Sending.Data.DiceMessage
instance GHC.Show.Show Web.Telegram.API.Sending.Data.DiceMessage
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Sending.Data.PollMessage
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Sending.Data.PollMessage
instance GHC.Generics.Generic Web.Telegram.API.Sending.Data.PollMessage
instance GHC.Classes.Eq Web.Telegram.API.Sending.Data.PollMessage
instance GHC.Show.Show Web.Telegram.API.Sending.Data.PollMessage
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Sending.Data.ContactMessage
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Sending.Data.ContactMessage
instance GHC.Generics.Generic Web.Telegram.API.Sending.Data.ContactMessage
instance GHC.Classes.Eq Web.Telegram.API.Sending.Data.ContactMessage
instance GHC.Show.Show Web.Telegram.API.Sending.Data.ContactMessage
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Sending.Data.VenueMessage
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Sending.Data.VenueMessage
instance GHC.Generics.Generic Web.Telegram.API.Sending.Data.VenueMessage
instance GHC.Classes.Eq Web.Telegram.API.Sending.Data.VenueMessage
instance GHC.Show.Show Web.Telegram.API.Sending.Data.VenueMessage
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Sending.Data.LocationStop
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Sending.Data.LocationStop
instance GHC.Generics.Generic Web.Telegram.API.Sending.Data.LocationStop
instance GHC.Classes.Eq Web.Telegram.API.Sending.Data.LocationStop
instance GHC.Show.Show Web.Telegram.API.Sending.Data.LocationStop
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Sending.Data.LocationEdit
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Sending.Data.LocationEdit
instance GHC.Generics.Generic Web.Telegram.API.Sending.Data.LocationEdit
instance GHC.Classes.Eq Web.Telegram.API.Sending.Data.LocationEdit
instance GHC.Show.Show Web.Telegram.API.Sending.Data.LocationEdit
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Sending.Data.LocationMessage
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Sending.Data.LocationMessage
instance GHC.Generics.Generic Web.Telegram.API.Sending.Data.LocationMessage
instance GHC.Classes.Eq Web.Telegram.API.Sending.Data.LocationMessage
instance GHC.Show.Show Web.Telegram.API.Sending.Data.LocationMessage
instance Data.Aeson.Types.ToJSON.ToJSON (Web.Telegram.API.Sending.Data.VNMessage a)
instance Web.Telegram.Types.Internal.Utils.Default.Default (Web.Telegram.API.Sending.Data.VNMessage a)
instance GHC.Generics.Generic (Web.Telegram.API.Sending.Data.VNMessage a)
instance GHC.Classes.Eq (Web.Telegram.API.Sending.Data.VNMessage a)
instance GHC.Show.Show (Web.Telegram.API.Sending.Data.VNMessage a)
instance Data.Aeson.Types.ToJSON.ToJSON a => Data.Aeson.Types.ToJSON.ToJSON (Web.Telegram.API.Sending.Data.VoiceMessage a)
instance Web.Telegram.Types.Internal.Utils.Default.Default a => Web.Telegram.Types.Internal.Utils.Default.Default (Web.Telegram.API.Sending.Data.VoiceMessage a)
instance GHC.Generics.Generic (Web.Telegram.API.Sending.Data.VoiceMessage a)
instance GHC.Classes.Eq a => GHC.Classes.Eq (Web.Telegram.API.Sending.Data.VoiceMessage a)
instance GHC.Show.Show a => GHC.Show.Show (Web.Telegram.API.Sending.Data.VoiceMessage a)
instance Data.Aeson.Types.ToJSON.ToJSON a => Data.Aeson.Types.ToJSON.ToJSON (Web.Telegram.API.Sending.Data.AnimationMessage a)
instance Web.Telegram.Types.Internal.Utils.Default.Default a => Web.Telegram.Types.Internal.Utils.Default.Default (Web.Telegram.API.Sending.Data.AnimationMessage a)
instance GHC.Generics.Generic (Web.Telegram.API.Sending.Data.AnimationMessage a)
instance GHC.Classes.Eq a => GHC.Classes.Eq (Web.Telegram.API.Sending.Data.AnimationMessage a)
instance GHC.Show.Show a => GHC.Show.Show (Web.Telegram.API.Sending.Data.AnimationMessage a)
instance Data.Aeson.Types.ToJSON.ToJSON a => Data.Aeson.Types.ToJSON.ToJSON (Web.Telegram.API.Sending.Data.VidMessage a)
instance Web.Telegram.Types.Internal.Utils.Default.Default a => Web.Telegram.Types.Internal.Utils.Default.Default (Web.Telegram.API.Sending.Data.VidMessage a)
instance GHC.Generics.Generic (Web.Telegram.API.Sending.Data.VidMessage a)
instance GHC.Classes.Eq a => GHC.Classes.Eq (Web.Telegram.API.Sending.Data.VidMessage a)
instance GHC.Show.Show a => GHC.Show.Show (Web.Telegram.API.Sending.Data.VidMessage a)
instance Data.Aeson.Types.ToJSON.ToJSON a => Data.Aeson.Types.ToJSON.ToJSON (Web.Telegram.API.Sending.Data.DocMessage a)
instance Web.Telegram.Types.Internal.Utils.Default.Default a => Web.Telegram.Types.Internal.Utils.Default.Default (Web.Telegram.API.Sending.Data.DocMessage a)
instance GHC.Generics.Generic (Web.Telegram.API.Sending.Data.DocMessage a)
instance GHC.Classes.Eq a => GHC.Classes.Eq (Web.Telegram.API.Sending.Data.DocMessage a)
instance GHC.Show.Show a => GHC.Show.Show (Web.Telegram.API.Sending.Data.DocMessage a)
instance Data.Aeson.Types.ToJSON.ToJSON a => Data.Aeson.Types.ToJSON.ToJSON (Web.Telegram.API.Sending.Data.AudioMessage a)
instance Web.Telegram.Types.Internal.Utils.Default.Default a => Web.Telegram.Types.Internal.Utils.Default.Default (Web.Telegram.API.Sending.Data.AudioMessage a)
instance GHC.Generics.Generic (Web.Telegram.API.Sending.Data.AudioMessage a)
instance GHC.Classes.Eq a => GHC.Classes.Eq (Web.Telegram.API.Sending.Data.AudioMessage a)
instance GHC.Show.Show a => GHC.Show.Show (Web.Telegram.API.Sending.Data.AudioMessage a)
instance Data.Aeson.Types.ToJSON.ToJSON a => Data.Aeson.Types.ToJSON.ToJSON (Web.Telegram.API.Sending.Data.PhotoMessage a)
instance Web.Telegram.Types.Internal.Utils.Default.Default a => Web.Telegram.Types.Internal.Utils.Default.Default (Web.Telegram.API.Sending.Data.PhotoMessage a)
instance GHC.Generics.Generic (Web.Telegram.API.Sending.Data.PhotoMessage a)
instance GHC.Classes.Eq a => GHC.Classes.Eq (Web.Telegram.API.Sending.Data.PhotoMessage a)
instance GHC.Show.Show a => GHC.Show.Show (Web.Telegram.API.Sending.Data.PhotoMessage a)
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Sending.Data.FwdMessage
instance Data.Aeson.Types.FromJSON.FromJSON Web.Telegram.API.Sending.Data.FwdMessage
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Sending.Data.FwdMessage
instance GHC.Generics.Generic Web.Telegram.API.Sending.Data.FwdMessage
instance GHC.Classes.Eq Web.Telegram.API.Sending.Data.FwdMessage
instance GHC.Show.Show Web.Telegram.API.Sending.Data.FwdMessage
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Sending.Data.SMessage
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Sending.Data.SMessage
instance GHC.Generics.Generic Web.Telegram.API.Sending.Data.SMessage
instance GHC.Classes.Eq Web.Telegram.API.Sending.Data.SMessage
instance GHC.Show.Show Web.Telegram.API.Sending.Data.SMessage


-- | Sending stuff
module Web.Telegram.API.Sending
type SendMessage = Base :> "sendMessage" :> ReqBody '[JSON] SMessage :> Res
type ForwardMessage = Base :> "forwardMessage" :> ReqBody '[JSON] FwdMessage :> Res
type SendPhoto = Base :> "sendPhoto" :> ReqBody '[JSON] (PhotoMessage Text) :> Res
type SendPhoto' photo = Base :> "sendPhoto" :> QueryR "chat_id" ChatId :> MultipartForm Mem Photo :> QueryParam "caption" Text :> MessageR
type SendAudio = Base :> "sendAudio" :> ReqBody '[JSON] (AudioMessage Text) :> Res
type SendAudio' audio = Base :> "sendAudio" :> QueryR "chat_id" ChatId :> MultipartForm Mem Audio :> QueryParam "caption" Text :> QueryParam "duration" Integer :> QueryParam "performer" Text :> QueryParam "title" Text :> MessageR
type SendDocument = Base :> "sendDocument" :> ReqBody '[JSON] (DocMessage Text) :> Res
type SendDocument' doc = Base :> "sendDocument" :> QueryR "chat_id" ChatId :> MultipartForm Mem Doc :> QueryParam "caption" Text :> MessageR
type SendVideo = Base :> "sendVideo" :> ReqBody '[JSON] (VidMessage Text) :> Res
type SendVideo' = Base :> "sendVideo" :> QueryR "chat_id" ChatId :> MultipartForm Mem Video :> QueryParam "duration" Integer :> QueryParam "width" Integer :> QueryParam "height" Integer :> QueryParam "caption" Text :> QueryParam "supports_streaming" Bool :> MessageR
type SendAnimation = Base :> "sendAnimation" :> ReqBody '[JSON] (AnimationMessage Text) :> Res
type SendAnimation' = Base :> "sendAnimation" :> QueryR "chat_id" ChatId :> MultipartForm Mem Animation :> QueryParam "duration" Integer :> QueryParam "width" Integer :> QueryParam "height" Integer :> QueryParam "caption" Text :> MessageR
type SendVoice = Base :> "sendVoice" :> ReqBody '[JSON] (VoiceMessage Text) :> Res
type SendVoice' = Base :> "sendVoice" :> QueryR "chat_id" ChatId :> MultipartForm Mem Voice :> QueryParam "duration" Integer :> QueryParam "caption" Text :> MessageR
type SendVideoNote = Base :> "sendVideoNote" :> ReqBody '[JSON] (VNMessage Text) :> Res
type SendVideoNote' = Base :> "sendVideoNote" :> QueryR "chat_id" ChatId :> MultipartForm Mem VideoNote :> QueryParam "duration" Integer :> QueryParam "length" Integer :> MessageR
type SendMediaGroup = Base :> "sendMediaGroup" :> QueryR "chat_id" ChatId :> CompoundParams Mem "media" VideoOrPhoto :> QueryParam "disable_notification" Bool :> QueryParam "reply_to_message_id" Integer :> Get '[JSON] (ReqResult [Message])
type SendLocation = Base :> "sendLocation" :> ReqBody '[JSON] LocationMessage :> Res
type EditMessageLiveLocation = Base :> "editMessageLiveLocation" :> ReqBody '[JSON] LocationEdit :> Get '[JSON] (ReqResult (ReqEither Message Bool))
type StopMessageLiveLocation = Base :> "stopMessageLiveLocation" :> ReqBody '[JSON] LocationStop :> Get '[JSON] (ReqResult (ReqEither Message Bool))
type SendVenue = Base :> "sendVenue" :> ReqBody '[JSON] VenueMessage :> Res
type SendContact = Base :> "sendContact" :> ReqBody '[JSON] ContactMessage :> Res
type SendPoll = Base :> "sendPoll" :> ReqBody '[JSON] PollMessage :> Res
type SendDice = Base :> "sendDice" :> ReqBody '[JSON] DiceMessage :> Res
type SendChatAction = Base :> "sendChatAction" :> ReqBody '[JSON] ChatAction :> Get '[JSON] (ReqResult Bool)
type SendSticker = Base :> "sendSticker" :> ReqBody '[JSON] StickerMessage :> Res
type SendSticker' sticker = Base :> "sendSticker" :> QueryR "chat_id" ChatId :> MultipartForm Mem Sticker :> MessageR'
data SMessage
data FwdMessage
data PhotoMessage a
data AudioMessage a
data DocMessage a
data VidMessage a
data AnimationMessage a
data VoiceMessage a
data VNMessage a
data LocationEdit
data LocationStop
data VenueMessage
data ContactMessage
data PollMessage
data DiceMessage
data ChatAction
data StickerMessage

module Web.Telegram.API.Update
data Polling
Polling :: Maybe Integer -> Maybe Integer -> Maybe Integer -> Maybe Text -> Polling
[$sel:offset:Polling] :: Polling -> Maybe Integer
[$sel:limit:Polling] :: Polling -> Maybe Integer
[$sel:timeout:Polling] :: Polling -> Maybe Integer
[$sel:allowedUpdates:Polling] :: Polling -> Maybe Text
data WebhookSetting
WebhookSetting :: Text -> Maybe Integer -> Maybe [UpdateType] -> WebhookSetting
[$sel:url:WebhookSetting] :: WebhookSetting -> Text
[$sel:maxConnections:WebhookSetting] :: WebhookSetting -> Maybe Integer
[$sel:allowedUpdates:WebhookSetting] :: WebhookSetting -> Maybe [UpdateType]
type GetUpdates = Base :> "getUpdates" :> ReqBody '[JSON] Polling :> Get '[JSON] (ReqResult [Update])
type SetWebhook = Base :> "setWebhook" :> ReqBody '[JSON] WebhookSetting :> Get '[JSON] (ReqResult Bool)
type DeleteWebhook = Base :> "deleteWebhook" :> Get '[JSON] (ReqResult Bool)
type GetWebhookInfo = Base :> "getWebhookInfo" :> Get '[JSON] (ReqResult WebhookInfo)
instance Data.Aeson.Types.FromJSON.FromJSON Web.Telegram.API.Update.WebhookSetting
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Update.WebhookSetting
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Update.WebhookSetting
instance GHC.Generics.Generic Web.Telegram.API.Update.WebhookSetting
instance GHC.Classes.Eq Web.Telegram.API.Update.WebhookSetting
instance GHC.Show.Show Web.Telegram.API.Update.WebhookSetting
instance Data.Aeson.Types.FromJSON.FromJSON Web.Telegram.API.Update.Polling
instance Data.Aeson.Types.ToJSON.ToJSON Web.Telegram.API.Update.Polling
instance Web.Telegram.Types.Internal.Utils.Default.Default Web.Telegram.API.Update.Polling
instance GHC.Generics.Generic Web.Telegram.API.Update.Polling
instance GHC.Classes.Eq Web.Telegram.API.Update.Polling
instance GHC.Show.Show Web.Telegram.API.Update.Polling

module Web.Telegram.API
newtype Token
Token :: Text -> Token