{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DeriveAnyClass #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE TemplateHaskell #-}

-- | TD API data types generated by tdlib-gen
module TDLib.Generated.Types where

import GHC.Generics
import Language.Haskell.Codegen.TH
import Data.ByteString.Base64.Type
import qualified Data.Text as T
import Language.TL.I64

type I53 = Int
type I32 = Int
type T = T.Text


data Error
  = -- | An object of this type can be returned on every function call, in case of an error
  Error
    { -- | Error code; subject to future changes. If the error code is 406, the error message must not be processed in any way and must not be displayed to the user
      Error -> I32
code :: I32,
      -- | Error message; subject to future changes
      Error -> T
message :: T
    }
  deriving (I32 -> Error -> ShowS
[Error] -> ShowS
Error -> String
(I32 -> Error -> ShowS)
-> (Error -> String) -> ([Error] -> ShowS) -> Show Error
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Error] -> ShowS
$cshowList :: [Error] -> ShowS
show :: Error -> String
$cshow :: Error -> String
showsPrec :: I32 -> Error -> ShowS
$cshowsPrec :: I32 -> Error -> ShowS
Show, Error -> Error -> Bool
(Error -> Error -> Bool) -> (Error -> Error -> Bool) -> Eq Error
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Error -> Error -> Bool
$c/= :: Error -> Error -> Bool
== :: Error -> Error -> Bool
$c== :: Error -> Error -> Bool
Eq, (forall x. Error -> Rep Error x)
-> (forall x. Rep Error x -> Error) -> Generic Error
forall x. Rep Error x -> Error
forall x. Error -> Rep Error x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Error x -> Error
$cfrom :: forall x. Error -> Rep Error x
Generic)
data Ok
  = -- | An object of this type is returned on a successful function call for certain functions
  Ok
    { 
    }
  deriving (I32 -> Ok -> ShowS
[Ok] -> ShowS
Ok -> String
(I32 -> Ok -> ShowS)
-> (Ok -> String) -> ([Ok] -> ShowS) -> Show Ok
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Ok] -> ShowS
$cshowList :: [Ok] -> ShowS
show :: Ok -> String
$cshow :: Ok -> String
showsPrec :: I32 -> Ok -> ShowS
$cshowsPrec :: I32 -> Ok -> ShowS
Show, Ok -> Ok -> Bool
(Ok -> Ok -> Bool) -> (Ok -> Ok -> Bool) -> Eq Ok
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Ok -> Ok -> Bool
$c/= :: Ok -> Ok -> Bool
== :: Ok -> Ok -> Bool
$c== :: Ok -> Ok -> Bool
Eq, (forall x. Ok -> Rep Ok x)
-> (forall x. Rep Ok x -> Ok) -> Generic Ok
forall x. Rep Ok x -> Ok
forall x. Ok -> Rep Ok x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Ok x -> Ok
$cfrom :: forall x. Ok -> Rep Ok x
Generic)
data TdlibParameters
  = -- | Contains parameters for TDLib initialization
  TdlibParameters
    { -- | If set to true, the Telegram test environment will be used instead of the production environment
      TdlibParameters -> Bool
useTestDc :: Bool,
      -- | The path to the directory for the persistent database; if empty, the current working directory will be used
      TdlibParameters -> T
databaseDirectory :: T,
      -- | The path to the directory for storing files; if empty, database_directory will be used
      TdlibParameters -> T
filesDirectory :: T,
      -- | If set to true, information about downloaded and uploaded files will be saved between application restarts
      TdlibParameters -> Bool
useFileDatabase :: Bool,
      -- | If set to true, the library will maintain a cache of users, basic groups, supergroups, channels and secret chats. Implies use_file_database
      TdlibParameters -> Bool
useChatInfoDatabase :: Bool,
      -- | If set to true, the library will maintain a cache of chats and messages. Implies use_chat_info_database
      TdlibParameters -> Bool
useMessageDatabase :: Bool,
      -- | If set to true, support for secret chats will be enabled
      TdlibParameters -> Bool
useSecretChats :: Bool,
      -- | Application identifier for Telegram API access, which can be obtained at https://my.telegram.org
      TdlibParameters -> I32
apiId :: I32,
      -- | Application identifier hash for Telegram API access, which can be obtained at https://my.telegram.org
      TdlibParameters -> T
apiHash :: T,
      -- | IETF language tag of the user's operating system language; must be non-empty
      TdlibParameters -> T
systemLanguageCode :: T,
      -- | Model of the device the application is being run on; must be non-empty
      TdlibParameters -> T
deviceModel :: T,
      -- | Version of the operating system the application is being run on; must be non-empty
      TdlibParameters -> T
systemVersion :: T,
      -- | Application version; must be non-empty
      TdlibParameters -> T
applicationVersion :: T,
      -- | If set to true, old files will automatically be deleted
      TdlibParameters -> Bool
enableStorageOptimizer :: Bool,
      -- | If set to true, original file names will be ignored. Otherwise, downloaded files will be saved under names as close as possible to the original name
      TdlibParameters -> Bool
ignoreFileNames :: Bool
    }
  deriving (I32 -> TdlibParameters -> ShowS
[TdlibParameters] -> ShowS
TdlibParameters -> String
(I32 -> TdlibParameters -> ShowS)
-> (TdlibParameters -> String)
-> ([TdlibParameters] -> ShowS)
-> Show TdlibParameters
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [TdlibParameters] -> ShowS
$cshowList :: [TdlibParameters] -> ShowS
show :: TdlibParameters -> String
$cshow :: TdlibParameters -> String
showsPrec :: I32 -> TdlibParameters -> ShowS
$cshowsPrec :: I32 -> TdlibParameters -> ShowS
Show, TdlibParameters -> TdlibParameters -> Bool
(TdlibParameters -> TdlibParameters -> Bool)
-> (TdlibParameters -> TdlibParameters -> Bool)
-> Eq TdlibParameters
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TdlibParameters -> TdlibParameters -> Bool
$c/= :: TdlibParameters -> TdlibParameters -> Bool
== :: TdlibParameters -> TdlibParameters -> Bool
$c== :: TdlibParameters -> TdlibParameters -> Bool
Eq, (forall x. TdlibParameters -> Rep TdlibParameters x)
-> (forall x. Rep TdlibParameters x -> TdlibParameters)
-> Generic TdlibParameters
forall x. Rep TdlibParameters x -> TdlibParameters
forall x. TdlibParameters -> Rep TdlibParameters x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep TdlibParameters x -> TdlibParameters
$cfrom :: forall x. TdlibParameters -> Rep TdlibParameters x
Generic)
-- | Provides information about the method by which an authentication code is delivered to the user
data AuthenticationCodeType
  = -- | An authentication code is delivered via a private Telegram message, which can be viewed in another client 
  AuthenticationCodeTypeTelegramMessage
    { -- | Length of the code
      AuthenticationCodeType -> I32
length :: I32
    }
  | -- | An authentication code is delivered via an SMS message to the specified phone number 
  AuthenticationCodeTypeSms
    { -- | Length of the code
      length :: I32
    }
  | -- | An authentication code is delivered via a phone call to the specified phone number 
  AuthenticationCodeTypeCall
    { -- | Length of the code
      length :: I32
    }
  | -- | An authentication code is delivered by an immediately cancelled call to the specified phone number. The number from which the call was made is the code 
  AuthenticationCodeTypeFlashCall
    { -- | Pattern of the phone number from which the call will be made
      AuthenticationCodeType -> T
pattern_ :: T
    }
  deriving (I32 -> AuthenticationCodeType -> ShowS
[AuthenticationCodeType] -> ShowS
AuthenticationCodeType -> String
(I32 -> AuthenticationCodeType -> ShowS)
-> (AuthenticationCodeType -> String)
-> ([AuthenticationCodeType] -> ShowS)
-> Show AuthenticationCodeType
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [AuthenticationCodeType] -> ShowS
$cshowList :: [AuthenticationCodeType] -> ShowS
show :: AuthenticationCodeType -> String
$cshow :: AuthenticationCodeType -> String
showsPrec :: I32 -> AuthenticationCodeType -> ShowS
$cshowsPrec :: I32 -> AuthenticationCodeType -> ShowS
Show, AuthenticationCodeType -> AuthenticationCodeType -> Bool
(AuthenticationCodeType -> AuthenticationCodeType -> Bool)
-> (AuthenticationCodeType -> AuthenticationCodeType -> Bool)
-> Eq AuthenticationCodeType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: AuthenticationCodeType -> AuthenticationCodeType -> Bool
$c/= :: AuthenticationCodeType -> AuthenticationCodeType -> Bool
== :: AuthenticationCodeType -> AuthenticationCodeType -> Bool
$c== :: AuthenticationCodeType -> AuthenticationCodeType -> Bool
Eq, (forall x. AuthenticationCodeType -> Rep AuthenticationCodeType x)
-> (forall x.
    Rep AuthenticationCodeType x -> AuthenticationCodeType)
-> Generic AuthenticationCodeType
forall x. Rep AuthenticationCodeType x -> AuthenticationCodeType
forall x. AuthenticationCodeType -> Rep AuthenticationCodeType x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep AuthenticationCodeType x -> AuthenticationCodeType
$cfrom :: forall x. AuthenticationCodeType -> Rep AuthenticationCodeType x
Generic)
data AuthenticationCodeInfo
  = -- | Information about the authentication code that was sent 
  AuthenticationCodeInfo
    { -- | A phone number that is being authenticated 
      AuthenticationCodeInfo -> T
phoneNumber :: T,
      -- | Describes the way the code was sent to the user 
      AuthenticationCodeInfo -> AuthenticationCodeType
type_ :: AuthenticationCodeType,
      -- | Describes the way the next code will be sent to the user; may be null 
      AuthenticationCodeInfo -> Maybe AuthenticationCodeType
nextType :: (Maybe) (AuthenticationCodeType),
      -- | Timeout before the code should be re-sent, in seconds
      AuthenticationCodeInfo -> I32
timeout :: I32
    }
  deriving (I32 -> AuthenticationCodeInfo -> ShowS
[AuthenticationCodeInfo] -> ShowS
AuthenticationCodeInfo -> String
(I32 -> AuthenticationCodeInfo -> ShowS)
-> (AuthenticationCodeInfo -> String)
-> ([AuthenticationCodeInfo] -> ShowS)
-> Show AuthenticationCodeInfo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [AuthenticationCodeInfo] -> ShowS
$cshowList :: [AuthenticationCodeInfo] -> ShowS
show :: AuthenticationCodeInfo -> String
$cshow :: AuthenticationCodeInfo -> String
showsPrec :: I32 -> AuthenticationCodeInfo -> ShowS
$cshowsPrec :: I32 -> AuthenticationCodeInfo -> ShowS
Show, AuthenticationCodeInfo -> AuthenticationCodeInfo -> Bool
(AuthenticationCodeInfo -> AuthenticationCodeInfo -> Bool)
-> (AuthenticationCodeInfo -> AuthenticationCodeInfo -> Bool)
-> Eq AuthenticationCodeInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: AuthenticationCodeInfo -> AuthenticationCodeInfo -> Bool
$c/= :: AuthenticationCodeInfo -> AuthenticationCodeInfo -> Bool
== :: AuthenticationCodeInfo -> AuthenticationCodeInfo -> Bool
$c== :: AuthenticationCodeInfo -> AuthenticationCodeInfo -> Bool
Eq, (forall x. AuthenticationCodeInfo -> Rep AuthenticationCodeInfo x)
-> (forall x.
    Rep AuthenticationCodeInfo x -> AuthenticationCodeInfo)
-> Generic AuthenticationCodeInfo
forall x. Rep AuthenticationCodeInfo x -> AuthenticationCodeInfo
forall x. AuthenticationCodeInfo -> Rep AuthenticationCodeInfo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep AuthenticationCodeInfo x -> AuthenticationCodeInfo
$cfrom :: forall x. AuthenticationCodeInfo -> Rep AuthenticationCodeInfo x
Generic)
data EmailAddressAuthenticationCodeInfo
  = -- | Information about the email address authentication code that was sent 
  EmailAddressAuthenticationCodeInfo
    { -- | Pattern of the email address to which an authentication code was sent 
      EmailAddressAuthenticationCodeInfo -> T
emailAddressPattern :: T,
      -- | Length of the code; 0 if unknown
      EmailAddressAuthenticationCodeInfo -> I32
length :: I32
    }
  deriving (I32 -> EmailAddressAuthenticationCodeInfo -> ShowS
[EmailAddressAuthenticationCodeInfo] -> ShowS
EmailAddressAuthenticationCodeInfo -> String
(I32 -> EmailAddressAuthenticationCodeInfo -> ShowS)
-> (EmailAddressAuthenticationCodeInfo -> String)
-> ([EmailAddressAuthenticationCodeInfo] -> ShowS)
-> Show EmailAddressAuthenticationCodeInfo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [EmailAddressAuthenticationCodeInfo] -> ShowS
$cshowList :: [EmailAddressAuthenticationCodeInfo] -> ShowS
show :: EmailAddressAuthenticationCodeInfo -> String
$cshow :: EmailAddressAuthenticationCodeInfo -> String
showsPrec :: I32 -> EmailAddressAuthenticationCodeInfo -> ShowS
$cshowsPrec :: I32 -> EmailAddressAuthenticationCodeInfo -> ShowS
Show, EmailAddressAuthenticationCodeInfo
-> EmailAddressAuthenticationCodeInfo -> Bool
(EmailAddressAuthenticationCodeInfo
 -> EmailAddressAuthenticationCodeInfo -> Bool)
-> (EmailAddressAuthenticationCodeInfo
    -> EmailAddressAuthenticationCodeInfo -> Bool)
-> Eq EmailAddressAuthenticationCodeInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: EmailAddressAuthenticationCodeInfo
-> EmailAddressAuthenticationCodeInfo -> Bool
$c/= :: EmailAddressAuthenticationCodeInfo
-> EmailAddressAuthenticationCodeInfo -> Bool
== :: EmailAddressAuthenticationCodeInfo
-> EmailAddressAuthenticationCodeInfo -> Bool
$c== :: EmailAddressAuthenticationCodeInfo
-> EmailAddressAuthenticationCodeInfo -> Bool
Eq, (forall x.
 EmailAddressAuthenticationCodeInfo
 -> Rep EmailAddressAuthenticationCodeInfo x)
-> (forall x.
    Rep EmailAddressAuthenticationCodeInfo x
    -> EmailAddressAuthenticationCodeInfo)
-> Generic EmailAddressAuthenticationCodeInfo
forall x.
Rep EmailAddressAuthenticationCodeInfo x
-> EmailAddressAuthenticationCodeInfo
forall x.
EmailAddressAuthenticationCodeInfo
-> Rep EmailAddressAuthenticationCodeInfo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep EmailAddressAuthenticationCodeInfo x
-> EmailAddressAuthenticationCodeInfo
$cfrom :: forall x.
EmailAddressAuthenticationCodeInfo
-> Rep EmailAddressAuthenticationCodeInfo x
Generic)
data TextEntity
  = -- | Represents a part of the text that needs to be formatted in some unusual way 
  TextEntity
    { -- | Offset of the entity in UTF-16 code units 
      TextEntity -> I32
offset :: I32,
      -- | Length of the entity, in UTF-16 code units 
      TextEntity -> I32
length :: I32,
      -- | Type of the entity
      TextEntity -> TextEntityType
type_ :: TextEntityType
    }
  deriving (I32 -> TextEntity -> ShowS
[TextEntity] -> ShowS
TextEntity -> String
(I32 -> TextEntity -> ShowS)
-> (TextEntity -> String)
-> ([TextEntity] -> ShowS)
-> Show TextEntity
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [TextEntity] -> ShowS
$cshowList :: [TextEntity] -> ShowS
show :: TextEntity -> String
$cshow :: TextEntity -> String
showsPrec :: I32 -> TextEntity -> ShowS
$cshowsPrec :: I32 -> TextEntity -> ShowS
Show, TextEntity -> TextEntity -> Bool
(TextEntity -> TextEntity -> Bool)
-> (TextEntity -> TextEntity -> Bool) -> Eq TextEntity
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TextEntity -> TextEntity -> Bool
$c/= :: TextEntity -> TextEntity -> Bool
== :: TextEntity -> TextEntity -> Bool
$c== :: TextEntity -> TextEntity -> Bool
Eq, (forall x. TextEntity -> Rep TextEntity x)
-> (forall x. Rep TextEntity x -> TextEntity) -> Generic TextEntity
forall x. Rep TextEntity x -> TextEntity
forall x. TextEntity -> Rep TextEntity x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep TextEntity x -> TextEntity
$cfrom :: forall x. TextEntity -> Rep TextEntity x
Generic)
data TextEntities
  = -- | Contains a list of text entities 
  TextEntities
    { -- | List of text entities
      TextEntities -> [TextEntity]
entities :: [TextEntity]
    }
  deriving (I32 -> TextEntities -> ShowS
[TextEntities] -> ShowS
TextEntities -> String
(I32 -> TextEntities -> ShowS)
-> (TextEntities -> String)
-> ([TextEntities] -> ShowS)
-> Show TextEntities
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [TextEntities] -> ShowS
$cshowList :: [TextEntities] -> ShowS
show :: TextEntities -> String
$cshow :: TextEntities -> String
showsPrec :: I32 -> TextEntities -> ShowS
$cshowsPrec :: I32 -> TextEntities -> ShowS
Show, TextEntities -> TextEntities -> Bool
(TextEntities -> TextEntities -> Bool)
-> (TextEntities -> TextEntities -> Bool) -> Eq TextEntities
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TextEntities -> TextEntities -> Bool
$c/= :: TextEntities -> TextEntities -> Bool
== :: TextEntities -> TextEntities -> Bool
$c== :: TextEntities -> TextEntities -> Bool
Eq, (forall x. TextEntities -> Rep TextEntities x)
-> (forall x. Rep TextEntities x -> TextEntities)
-> Generic TextEntities
forall x. Rep TextEntities x -> TextEntities
forall x. TextEntities -> Rep TextEntities x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep TextEntities x -> TextEntities
$cfrom :: forall x. TextEntities -> Rep TextEntities x
Generic)
data FormattedText
  = -- | A text with some entities 
  FormattedText
    { -- | The text 
      FormattedText -> T
text :: T,
      -- | Entities contained in the text. Entities can be nested, but must not mutually intersect with each other.
      FormattedText -> [TextEntity]
entities :: [TextEntity]
    }
  deriving (I32 -> FormattedText -> ShowS
[FormattedText] -> ShowS
FormattedText -> String
(I32 -> FormattedText -> ShowS)
-> (FormattedText -> String)
-> ([FormattedText] -> ShowS)
-> Show FormattedText
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [FormattedText] -> ShowS
$cshowList :: [FormattedText] -> ShowS
show :: FormattedText -> String
$cshow :: FormattedText -> String
showsPrec :: I32 -> FormattedText -> ShowS
$cshowsPrec :: I32 -> FormattedText -> ShowS
Show, FormattedText -> FormattedText -> Bool
(FormattedText -> FormattedText -> Bool)
-> (FormattedText -> FormattedText -> Bool) -> Eq FormattedText
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: FormattedText -> FormattedText -> Bool
$c/= :: FormattedText -> FormattedText -> Bool
== :: FormattedText -> FormattedText -> Bool
$c== :: FormattedText -> FormattedText -> Bool
Eq, (forall x. FormattedText -> Rep FormattedText x)
-> (forall x. Rep FormattedText x -> FormattedText)
-> Generic FormattedText
forall x. Rep FormattedText x -> FormattedText
forall x. FormattedText -> Rep FormattedText x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep FormattedText x -> FormattedText
$cfrom :: forall x. FormattedText -> Rep FormattedText x
Generic)
data TermsOfService
  = -- | Contains Telegram terms of service 
  TermsOfService
    { -- | Text of the terms of service 
      TermsOfService -> FormattedText
text :: FormattedText,
      -- | The minimum age of a user to be able to accept the terms; 0 if any 
      TermsOfService -> I32
minUserAge :: I32,
      -- | True, if a blocking popup with terms of service must be shown to the user
      TermsOfService -> Bool
showPopup :: Bool
    }
  deriving (I32 -> TermsOfService -> ShowS
[TermsOfService] -> ShowS
TermsOfService -> String
(I32 -> TermsOfService -> ShowS)
-> (TermsOfService -> String)
-> ([TermsOfService] -> ShowS)
-> Show TermsOfService
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [TermsOfService] -> ShowS
$cshowList :: [TermsOfService] -> ShowS
show :: TermsOfService -> String
$cshow :: TermsOfService -> String
showsPrec :: I32 -> TermsOfService -> ShowS
$cshowsPrec :: I32 -> TermsOfService -> ShowS
Show, TermsOfService -> TermsOfService -> Bool
(TermsOfService -> TermsOfService -> Bool)
-> (TermsOfService -> TermsOfService -> Bool) -> Eq TermsOfService
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TermsOfService -> TermsOfService -> Bool
$c/= :: TermsOfService -> TermsOfService -> Bool
== :: TermsOfService -> TermsOfService -> Bool
$c== :: TermsOfService -> TermsOfService -> Bool
Eq, (forall x. TermsOfService -> Rep TermsOfService x)
-> (forall x. Rep TermsOfService x -> TermsOfService)
-> Generic TermsOfService
forall x. Rep TermsOfService x -> TermsOfService
forall x. TermsOfService -> Rep TermsOfService x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep TermsOfService x -> TermsOfService
$cfrom :: forall x. TermsOfService -> Rep TermsOfService x
Generic)
-- | Represents the current authorization state of the client
data AuthorizationState
  = -- | TDLib needs TdlibParameters for initialization
  AuthorizationStateWaitTdlibParameters
    { 
    }
  | -- | TDLib needs an encryption key to decrypt the local database 
  AuthorizationStateWaitEncryptionKey
    { -- | True, if the database is currently encrypted
      AuthorizationState -> Bool
isEncrypted :: Bool
    }
  | -- | TDLib needs the user's phone number to authorize. Call `setAuthenticationPhoneNumber` to provide the phone number, or use `requestQrCodeAuthentication`, or `checkAuthenticationBotToken` for other authentication options
  AuthorizationStateWaitPhoneNumber
    { 
    }
  | -- | TDLib needs the user's authentication code to authorize 
  AuthorizationStateWaitCode
    { -- | Information about the authorization code that was sent
      AuthorizationState -> AuthenticationCodeInfo
codeInfo :: AuthenticationCodeInfo
    }
  | -- | The user needs to confirm authorization on another logged in device by scanning a QR code with the provided link 
  AuthorizationStateWaitOtherDeviceConfirmation
    { -- | A tg:// URL for the QR code. The link will be updated frequently
      AuthorizationState -> T
link :: T
    }
  | -- | The user is unregistered and need to accept terms of service and enter their first name and last name to finish registration 
  AuthorizationStateWaitRegistration
    { -- | Telegram terms of service
      AuthorizationState -> TermsOfService
termsOfService :: TermsOfService
    }
  | -- | The user has been authorized, but needs to enter a password to start using the application 
  AuthorizationStateWaitPassword
    { -- | Hint for the password; may be empty 
      AuthorizationState -> T
passwordHint :: T,
      -- | True, if a recovery email address has been set up
      AuthorizationState -> Bool
hasRecoveryEmailAddress :: Bool,
      -- | Pattern of the email address to which the recovery email was sent; empty until a recovery email has been sent
      AuthorizationState -> T
recoveryEmailAddressPattern :: T
    }
  | -- | The user has been successfully authorized. TDLib is now ready to answer queries
  AuthorizationStateReady
    { 
    }
  | -- | The user is currently logging out
  AuthorizationStateLoggingOut
    { 
    }
  | -- | TDLib is closing, all subsequent queries will be answered with the error 500. Note that closing TDLib can take a while. All resources will be freed only after authorizationStateClosed has been received
  AuthorizationStateClosing
    { 
    }
  | -- | TDLib client is in its final state. All databases are closed and all resources are released. No other updates will be received after this. All queries will be responded to
  AuthorizationStateClosed
    { 
    }
  deriving (I32 -> AuthorizationState -> ShowS
[AuthorizationState] -> ShowS
AuthorizationState -> String
(I32 -> AuthorizationState -> ShowS)
-> (AuthorizationState -> String)
-> ([AuthorizationState] -> ShowS)
-> Show AuthorizationState
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [AuthorizationState] -> ShowS
$cshowList :: [AuthorizationState] -> ShowS
show :: AuthorizationState -> String
$cshow :: AuthorizationState -> String
showsPrec :: I32 -> AuthorizationState -> ShowS
$cshowsPrec :: I32 -> AuthorizationState -> ShowS
Show, AuthorizationState -> AuthorizationState -> Bool
(AuthorizationState -> AuthorizationState -> Bool)
-> (AuthorizationState -> AuthorizationState -> Bool)
-> Eq AuthorizationState
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: AuthorizationState -> AuthorizationState -> Bool
$c/= :: AuthorizationState -> AuthorizationState -> Bool
== :: AuthorizationState -> AuthorizationState -> Bool
$c== :: AuthorizationState -> AuthorizationState -> Bool
Eq, (forall x. AuthorizationState -> Rep AuthorizationState x)
-> (forall x. Rep AuthorizationState x -> AuthorizationState)
-> Generic AuthorizationState
forall x. Rep AuthorizationState x -> AuthorizationState
forall x. AuthorizationState -> Rep AuthorizationState x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep AuthorizationState x -> AuthorizationState
$cfrom :: forall x. AuthorizationState -> Rep AuthorizationState x
Generic)
data PasswordState
  = -- | Represents the current state of 2-step verification 
  PasswordState
    { -- | True, if a 2-step verification password is set 
      PasswordState -> Bool
hasPassword :: Bool,
      -- | Hint for the password; may be empty
      PasswordState -> T
passwordHint :: T,
      -- | True, if a recovery email is set 
      PasswordState -> Bool
hasRecoveryEmailAddress :: Bool,
      -- | True, if some Telegram Passport elements were saved
      PasswordState -> Bool
hasPassportData :: Bool,
      -- | Information about the recovery email address to which the confirmation email was sent; may be null
      PasswordState -> Maybe EmailAddressAuthenticationCodeInfo
recoveryEmailAddressCodeInfo :: (Maybe) (EmailAddressAuthenticationCodeInfo)
    }
  deriving (I32 -> PasswordState -> ShowS
[PasswordState] -> ShowS
PasswordState -> String
(I32 -> PasswordState -> ShowS)
-> (PasswordState -> String)
-> ([PasswordState] -> ShowS)
-> Show PasswordState
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PasswordState] -> ShowS
$cshowList :: [PasswordState] -> ShowS
show :: PasswordState -> String
$cshow :: PasswordState -> String
showsPrec :: I32 -> PasswordState -> ShowS
$cshowsPrec :: I32 -> PasswordState -> ShowS
Show, PasswordState -> PasswordState -> Bool
(PasswordState -> PasswordState -> Bool)
-> (PasswordState -> PasswordState -> Bool) -> Eq PasswordState
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PasswordState -> PasswordState -> Bool
$c/= :: PasswordState -> PasswordState -> Bool
== :: PasswordState -> PasswordState -> Bool
$c== :: PasswordState -> PasswordState -> Bool
Eq, (forall x. PasswordState -> Rep PasswordState x)
-> (forall x. Rep PasswordState x -> PasswordState)
-> Generic PasswordState
forall x. Rep PasswordState x -> PasswordState
forall x. PasswordState -> Rep PasswordState x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PasswordState x -> PasswordState
$cfrom :: forall x. PasswordState -> Rep PasswordState x
Generic)
data RecoveryEmailAddress
  = -- | Contains information about the current recovery email address 
  RecoveryEmailAddress
    { -- | Recovery email address
      RecoveryEmailAddress -> T
recoveryEmailAddress :: T
    }
  deriving (I32 -> RecoveryEmailAddress -> ShowS
[RecoveryEmailAddress] -> ShowS
RecoveryEmailAddress -> String
(I32 -> RecoveryEmailAddress -> ShowS)
-> (RecoveryEmailAddress -> String)
-> ([RecoveryEmailAddress] -> ShowS)
-> Show RecoveryEmailAddress
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RecoveryEmailAddress] -> ShowS
$cshowList :: [RecoveryEmailAddress] -> ShowS
show :: RecoveryEmailAddress -> String
$cshow :: RecoveryEmailAddress -> String
showsPrec :: I32 -> RecoveryEmailAddress -> ShowS
$cshowsPrec :: I32 -> RecoveryEmailAddress -> ShowS
Show, RecoveryEmailAddress -> RecoveryEmailAddress -> Bool
(RecoveryEmailAddress -> RecoveryEmailAddress -> Bool)
-> (RecoveryEmailAddress -> RecoveryEmailAddress -> Bool)
-> Eq RecoveryEmailAddress
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RecoveryEmailAddress -> RecoveryEmailAddress -> Bool
$c/= :: RecoveryEmailAddress -> RecoveryEmailAddress -> Bool
== :: RecoveryEmailAddress -> RecoveryEmailAddress -> Bool
$c== :: RecoveryEmailAddress -> RecoveryEmailAddress -> Bool
Eq, (forall x. RecoveryEmailAddress -> Rep RecoveryEmailAddress x)
-> (forall x. Rep RecoveryEmailAddress x -> RecoveryEmailAddress)
-> Generic RecoveryEmailAddress
forall x. Rep RecoveryEmailAddress x -> RecoveryEmailAddress
forall x. RecoveryEmailAddress -> Rep RecoveryEmailAddress x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep RecoveryEmailAddress x -> RecoveryEmailAddress
$cfrom :: forall x. RecoveryEmailAddress -> Rep RecoveryEmailAddress x
Generic)
data TemporaryPasswordState
  = -- | Returns information about the availability of a temporary password, which can be used for payments 
  TemporaryPasswordState
    { -- | True, if a temporary password is available 
      TemporaryPasswordState -> Bool
hasPassword :: Bool,
      -- | Time left before the temporary password expires, in seconds
      TemporaryPasswordState -> I32
validFor :: I32
    }
  deriving (I32 -> TemporaryPasswordState -> ShowS
[TemporaryPasswordState] -> ShowS
TemporaryPasswordState -> String
(I32 -> TemporaryPasswordState -> ShowS)
-> (TemporaryPasswordState -> String)
-> ([TemporaryPasswordState] -> ShowS)
-> Show TemporaryPasswordState
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [TemporaryPasswordState] -> ShowS
$cshowList :: [TemporaryPasswordState] -> ShowS
show :: TemporaryPasswordState -> String
$cshow :: TemporaryPasswordState -> String
showsPrec :: I32 -> TemporaryPasswordState -> ShowS
$cshowsPrec :: I32 -> TemporaryPasswordState -> ShowS
Show, TemporaryPasswordState -> TemporaryPasswordState -> Bool
(TemporaryPasswordState -> TemporaryPasswordState -> Bool)
-> (TemporaryPasswordState -> TemporaryPasswordState -> Bool)
-> Eq TemporaryPasswordState
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: TemporaryPasswordState -> TemporaryPasswordState -> Bool
$c/= :: TemporaryPasswordState -> TemporaryPasswordState -> Bool
== :: TemporaryPasswordState -> TemporaryPasswordState -> Bool
$c== :: TemporaryPasswordState -> TemporaryPasswordState -> Bool
Eq, (forall x. TemporaryPasswordState -> Rep TemporaryPasswordState x)
-> (forall x.
    Rep TemporaryPasswordState x -> TemporaryPasswordState)
-> Generic TemporaryPasswordState
forall x. Rep TemporaryPasswordState x -> TemporaryPasswordState
forall x. TemporaryPasswordState -> Rep TemporaryPasswordState x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep TemporaryPasswordState x -> TemporaryPasswordState
$cfrom :: forall x. TemporaryPasswordState -> Rep TemporaryPasswordState x
Generic)
data LocalFile
  = -- | Represents a local file
  LocalFile
    { -- | Local path to the locally available file part; may be empty
      LocalFile -> T
path :: T,
      -- | True, if it is possible to try to download or generate the file
      LocalFile -> Bool
canBeDownloaded :: Bool,
      -- | True, if the file can be deleted
      LocalFile -> Bool
canBeDeleted :: Bool,
      -- | True, if the file is currently being downloaded (or a local copy is being generated by some other means)
      LocalFile -> Bool
isDownloadingActive :: Bool,
      -- | True, if the local copy is fully available
      LocalFile -> Bool
isDownloadingCompleted :: Bool,
      -- | Download will be started from this offset. downloaded_prefix_size is calculated from this offset
      LocalFile -> I32
downloadOffset :: I32,
      -- | If is_downloading_completed is false, then only some prefix of the file starting from download_offset is ready to be read. downloaded_prefix_size is the size of that prefix
      LocalFile -> I32
downloadedPrefixSize :: I32,
      -- | Total downloaded file bytes. Should be used only for calculating download progress. The actual file size may be bigger, and some parts of it may contain garbage
      LocalFile -> I32
downloadedSize :: I32
    }
  deriving (I32 -> LocalFile -> ShowS
[LocalFile] -> ShowS
LocalFile -> String
(I32 -> LocalFile -> ShowS)
-> (LocalFile -> String)
-> ([LocalFile] -> ShowS)
-> Show LocalFile
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [LocalFile] -> ShowS
$cshowList :: [LocalFile] -> ShowS
show :: LocalFile -> String
$cshow :: LocalFile -> String
showsPrec :: I32 -> LocalFile -> ShowS
$cshowsPrec :: I32 -> LocalFile -> ShowS
Show, LocalFile -> LocalFile -> Bool
(LocalFile -> LocalFile -> Bool)
-> (LocalFile -> LocalFile -> Bool) -> Eq LocalFile
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: LocalFile -> LocalFile -> Bool
$c/= :: LocalFile -> LocalFile -> Bool
== :: LocalFile -> LocalFile -> Bool
$c== :: LocalFile -> LocalFile -> Bool
Eq, (forall x. LocalFile -> Rep LocalFile x)
-> (forall x. Rep LocalFile x -> LocalFile) -> Generic LocalFile
forall x. Rep LocalFile x -> LocalFile
forall x. LocalFile -> Rep LocalFile x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep LocalFile x -> LocalFile
$cfrom :: forall x. LocalFile -> Rep LocalFile x
Generic)
data RemoteFile
  = -- | Represents a remote file
  RemoteFile
    { -- | Remote file identifier; may be empty. Can be used by the current user across application restarts or even from other devices. Uniquely identifies a file, but a file can have a lot of different valid identifiers.
      RemoteFile -> T
id :: T,
      -- | Unique file identifier; may be empty if unknown. The unique file identifier which is the same for the same file even for different users and is persistent over time
      RemoteFile -> T
uniqueId :: T,
      -- | True, if the file is currently being uploaded (or a remote copy is being generated by some other means)
      RemoteFile -> Bool
isUploadingActive :: Bool,
      -- | True, if a remote copy is fully available
      RemoteFile -> Bool
isUploadingCompleted :: Bool,
      -- | Size of the remote available part of the file; 0 if unknown
      RemoteFile -> I32
uploadedSize :: I32
    }
  deriving (I32 -> RemoteFile -> ShowS
[RemoteFile] -> ShowS
RemoteFile -> String
(I32 -> RemoteFile -> ShowS)
-> (RemoteFile -> String)
-> ([RemoteFile] -> ShowS)
-> Show RemoteFile
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RemoteFile] -> ShowS
$cshowList :: [RemoteFile] -> ShowS
show :: RemoteFile -> String
$cshow :: RemoteFile -> String
showsPrec :: I32 -> RemoteFile -> ShowS
$cshowsPrec :: I32 -> RemoteFile -> ShowS
Show, RemoteFile -> RemoteFile -> Bool
(RemoteFile -> RemoteFile -> Bool)
-> (RemoteFile -> RemoteFile -> Bool) -> Eq RemoteFile
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RemoteFile -> RemoteFile -> Bool
$c/= :: RemoteFile -> RemoteFile -> Bool
== :: RemoteFile -> RemoteFile -> Bool
$c== :: RemoteFile -> RemoteFile -> Bool
Eq, (forall x. RemoteFile -> Rep RemoteFile x)
-> (forall x. Rep RemoteFile x -> RemoteFile) -> Generic RemoteFile
forall x. Rep RemoteFile x -> RemoteFile
forall x. RemoteFile -> Rep RemoteFile x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep RemoteFile x -> RemoteFile
$cfrom :: forall x. RemoteFile -> Rep RemoteFile x
Generic)
data File
  = -- | Represents a file
  File
    { -- | Unique file identifier
      File -> I32
id :: I32,
      -- | File size; 0 if unknown
      File -> I32
size :: I32,
      -- | Expected file size in case the exact file size is unknown, but an approximate size is known. Can be used to show download/upload progress
      File -> I32
expectedSize :: I32,
      -- | Information about the local copy of the file
      File -> LocalFile
local :: LocalFile,
      -- | Information about the remote copy of the file
      File -> RemoteFile
remote :: RemoteFile
    }
  deriving (I32 -> File -> ShowS
[File] -> ShowS
File -> String
(I32 -> File -> ShowS)
-> (File -> String) -> ([File] -> ShowS) -> Show File
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [File] -> ShowS
$cshowList :: [File] -> ShowS
show :: File -> String
$cshow :: File -> String
showsPrec :: I32 -> File -> ShowS
$cshowsPrec :: I32 -> File -> ShowS
Show, File -> File -> Bool
(File -> File -> Bool) -> (File -> File -> Bool) -> Eq File
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: File -> File -> Bool
$c/= :: File -> File -> Bool
== :: File -> File -> Bool
$c== :: File -> File -> Bool
Eq, (forall x. File -> Rep File x)
-> (forall x. Rep File x -> File) -> Generic File
forall x. Rep File x -> File
forall x. File -> Rep File x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep File x -> File
$cfrom :: forall x. File -> Rep File x
Generic)
-- | Points to a file
data InputFile
  = -- | A file defined by its unique ID 
  InputFileId
    { -- | Unique file identifier
      InputFile -> I32
id_2 :: I32
    }
  | -- | A file defined by its remote ID. The remote ID is guaranteed to be usable only if the corresponding file is still accessible to the user and known to TDLib.
  InputFileRemote
    { -- | Remote file identifier
      InputFile -> T
id :: T
    }
  | -- | A file defined by a local path 
  InputFileLocal
    { -- | Local path to the file
      InputFile -> T
path :: T
    }
  | -- | A file generated by the client 
  InputFileGenerated
    { -- | Local path to a file from which the file is generated; may be empty if there is no such file
      InputFile -> T
originalPath :: T,
      -- | String specifying the conversion applied to the original file; should be persistent across application restarts. Conversions beginning with '#' are reserved for internal TDLib usage
      InputFile -> T
conversion :: T,
      -- | Expected size of the generated file; 0 if unknown
      InputFile -> I32
expectedSize :: I32
    }
  deriving (I32 -> InputFile -> ShowS
[InputFile] -> ShowS
InputFile -> String
(I32 -> InputFile -> ShowS)
-> (InputFile -> String)
-> ([InputFile] -> ShowS)
-> Show InputFile
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [InputFile] -> ShowS
$cshowList :: [InputFile] -> ShowS
show :: InputFile -> String
$cshow :: InputFile -> String
showsPrec :: I32 -> InputFile -> ShowS
$cshowsPrec :: I32 -> InputFile -> ShowS
Show, InputFile -> InputFile -> Bool
(InputFile -> InputFile -> Bool)
-> (InputFile -> InputFile -> Bool) -> Eq InputFile
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: InputFile -> InputFile -> Bool
$c/= :: InputFile -> InputFile -> Bool
== :: InputFile -> InputFile -> Bool
$c== :: InputFile -> InputFile -> Bool
Eq, (forall x. InputFile -> Rep InputFile x)
-> (forall x. Rep InputFile x -> InputFile) -> Generic InputFile
forall x. Rep InputFile x -> InputFile
forall x. InputFile -> Rep InputFile x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep InputFile x -> InputFile
$cfrom :: forall x. InputFile -> Rep InputFile x
Generic)
data PhotoSize
  = -- | Photo description 
  PhotoSize
    { -- | Thumbnail type (see https://core.telegram.org/constructor/photoSize) 
      PhotoSize -> T
type_ :: T,
      -- | Information about the photo file 
      PhotoSize -> File
photo :: File,
      -- | Photo width 
      PhotoSize -> I32
width :: I32,
      -- | Photo height
      PhotoSize -> I32
height :: I32
    }
  deriving (I32 -> PhotoSize -> ShowS
[PhotoSize] -> ShowS
PhotoSize -> String
(I32 -> PhotoSize -> ShowS)
-> (PhotoSize -> String)
-> ([PhotoSize] -> ShowS)
-> Show PhotoSize
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PhotoSize] -> ShowS
$cshowList :: [PhotoSize] -> ShowS
show :: PhotoSize -> String
$cshow :: PhotoSize -> String
showsPrec :: I32 -> PhotoSize -> ShowS
$cshowsPrec :: I32 -> PhotoSize -> ShowS
Show, PhotoSize -> PhotoSize -> Bool
(PhotoSize -> PhotoSize -> Bool)
-> (PhotoSize -> PhotoSize -> Bool) -> Eq PhotoSize
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PhotoSize -> PhotoSize -> Bool
$c/= :: PhotoSize -> PhotoSize -> Bool
== :: PhotoSize -> PhotoSize -> Bool
$c== :: PhotoSize -> PhotoSize -> Bool
Eq, (forall x. PhotoSize -> Rep PhotoSize x)
-> (forall x. Rep PhotoSize x -> PhotoSize) -> Generic PhotoSize
forall x. Rep PhotoSize x -> PhotoSize
forall x. PhotoSize -> Rep PhotoSize x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PhotoSize x -> PhotoSize
$cfrom :: forall x. PhotoSize -> Rep PhotoSize x
Generic)
data Minithumbnail
  = -- | Thumbnail image of a very poor quality and low resolution 
  Minithumbnail
    { -- | Thumbnail width, usually doesn't exceed 40 
      Minithumbnail -> I32
width :: I32,
      -- | Thumbnail height, usually doesn't exceed 40 
      Minithumbnail -> I32
height :: I32,
      -- | The thumbnail in JPEG format
      Minithumbnail -> ByteString64
data_ :: ByteString64
    }
  deriving (I32 -> Minithumbnail -> ShowS
[Minithumbnail] -> ShowS
Minithumbnail -> String
(I32 -> Minithumbnail -> ShowS)
-> (Minithumbnail -> String)
-> ([Minithumbnail] -> ShowS)
-> Show Minithumbnail
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Minithumbnail] -> ShowS
$cshowList :: [Minithumbnail] -> ShowS
show :: Minithumbnail -> String
$cshow :: Minithumbnail -> String
showsPrec :: I32 -> Minithumbnail -> ShowS
$cshowsPrec :: I32 -> Minithumbnail -> ShowS
Show, Minithumbnail -> Minithumbnail -> Bool
(Minithumbnail -> Minithumbnail -> Bool)
-> (Minithumbnail -> Minithumbnail -> Bool) -> Eq Minithumbnail
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Minithumbnail -> Minithumbnail -> Bool
$c/= :: Minithumbnail -> Minithumbnail -> Bool
== :: Minithumbnail -> Minithumbnail -> Bool
$c== :: Minithumbnail -> Minithumbnail -> Bool
Eq, (forall x. Minithumbnail -> Rep Minithumbnail x)
-> (forall x. Rep Minithumbnail x -> Minithumbnail)
-> Generic Minithumbnail
forall x. Rep Minithumbnail x -> Minithumbnail
forall x. Minithumbnail -> Rep Minithumbnail x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Minithumbnail x -> Minithumbnail
$cfrom :: forall x. Minithumbnail -> Rep Minithumbnail x
Generic)
-- | Describes format of the thumbnail
data ThumbnailFormat
  = -- | The thumbnail is in JPEG format
  ThumbnailFormatJpeg
    { 
    }
  | -- | The thumbnail is in PNG format. It will be used only for background patterns
  ThumbnailFormatPng
    { 
    }
  | -- | The thumbnail is in WEBP format. It will be used only for some stickers
  ThumbnailFormatWebp
    { 
    }
  | -- | The thumbnail is in static GIF format. It will be used only for some bot inline results
  ThumbnailFormatGif
    { 
    }
  | -- | The thumbnail is in TGS format. It will be used only for animated sticker sets
  ThumbnailFormatTgs
    { 
    }
  | -- | The thumbnail is in MPEG4 format. It will be used only for some animations and videos
  ThumbnailFormatMpeg4
    { 
    }
  deriving (I32 -> ThumbnailFormat -> ShowS
[ThumbnailFormat] -> ShowS
ThumbnailFormat -> String
(I32 -> ThumbnailFormat -> ShowS)
-> (ThumbnailFormat -> String)
-> ([ThumbnailFormat] -> ShowS)
-> Show ThumbnailFormat
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ThumbnailFormat] -> ShowS
$cshowList :: [ThumbnailFormat] -> ShowS
show :: ThumbnailFormat -> String
$cshow :: ThumbnailFormat -> String
showsPrec :: I32 -> ThumbnailFormat -> ShowS
$cshowsPrec :: I32 -> ThumbnailFormat -> ShowS
Show, ThumbnailFormat -> ThumbnailFormat -> Bool
(ThumbnailFormat -> ThumbnailFormat -> Bool)
-> (ThumbnailFormat -> ThumbnailFormat -> Bool)
-> Eq ThumbnailFormat
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ThumbnailFormat -> ThumbnailFormat -> Bool
$c/= :: ThumbnailFormat -> ThumbnailFormat -> Bool
== :: ThumbnailFormat -> ThumbnailFormat -> Bool
$c== :: ThumbnailFormat -> ThumbnailFormat -> Bool
Eq, (forall x. ThumbnailFormat -> Rep ThumbnailFormat x)
-> (forall x. Rep ThumbnailFormat x -> ThumbnailFormat)
-> Generic ThumbnailFormat
forall x. Rep ThumbnailFormat x -> ThumbnailFormat
forall x. ThumbnailFormat -> Rep ThumbnailFormat x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ThumbnailFormat x -> ThumbnailFormat
$cfrom :: forall x. ThumbnailFormat -> Rep ThumbnailFormat x
Generic)
data Thumbnail
  = -- | Represents a thumbnail 
  Thumbnail
    { -- | Thumbnail format 
      Thumbnail -> ThumbnailFormat
format :: ThumbnailFormat,
      -- | Thumbnail width 
      Thumbnail -> I32
width :: I32,
      -- | Thumbnail height 
      Thumbnail -> I32
height :: I32,
      -- | The thumbnail
      Thumbnail -> File
file :: File
    }
  deriving (I32 -> Thumbnail -> ShowS
[Thumbnail] -> ShowS
Thumbnail -> String
(I32 -> Thumbnail -> ShowS)
-> (Thumbnail -> String)
-> ([Thumbnail] -> ShowS)
-> Show Thumbnail
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Thumbnail] -> ShowS
$cshowList :: [Thumbnail] -> ShowS
show :: Thumbnail -> String
$cshow :: Thumbnail -> String
showsPrec :: I32 -> Thumbnail -> ShowS
$cshowsPrec :: I32 -> Thumbnail -> ShowS
Show, Thumbnail -> Thumbnail -> Bool
(Thumbnail -> Thumbnail -> Bool)
-> (Thumbnail -> Thumbnail -> Bool) -> Eq Thumbnail
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Thumbnail -> Thumbnail -> Bool
$c/= :: Thumbnail -> Thumbnail -> Bool
== :: Thumbnail -> Thumbnail -> Bool
$c== :: Thumbnail -> Thumbnail -> Bool
Eq, (forall x. Thumbnail -> Rep Thumbnail x)
-> (forall x. Rep Thumbnail x -> Thumbnail) -> Generic Thumbnail
forall x. Rep Thumbnail x -> Thumbnail
forall x. Thumbnail -> Rep Thumbnail x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Thumbnail x -> Thumbnail
$cfrom :: forall x. Thumbnail -> Rep Thumbnail x
Generic)
-- | Part of the face, relative to which a mask should be placed
data MaskPoint
  = -- | A mask should be placed relatively to the forehead
  MaskPointForehead
    { 
    }
  | -- | A mask should be placed relatively to the eyes
  MaskPointEyes
    { 
    }
  | -- | A mask should be placed relatively to the mouth
  MaskPointMouth
    { 
    }
  | -- | A mask should be placed relatively to the chin
  MaskPointChin
    { 
    }
  deriving (I32 -> MaskPoint -> ShowS
[MaskPoint] -> ShowS
MaskPoint -> String
(I32 -> MaskPoint -> ShowS)
-> (MaskPoint -> String)
-> ([MaskPoint] -> ShowS)
-> Show MaskPoint
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [MaskPoint] -> ShowS
$cshowList :: [MaskPoint] -> ShowS
show :: MaskPoint -> String
$cshow :: MaskPoint -> String
showsPrec :: I32 -> MaskPoint -> ShowS
$cshowsPrec :: I32 -> MaskPoint -> ShowS
Show, MaskPoint -> MaskPoint -> Bool
(MaskPoint -> MaskPoint -> Bool)
-> (MaskPoint -> MaskPoint -> Bool) -> Eq MaskPoint
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: MaskPoint -> MaskPoint -> Bool
$c/= :: MaskPoint -> MaskPoint -> Bool
== :: MaskPoint -> MaskPoint -> Bool
$c== :: MaskPoint -> MaskPoint -> Bool
Eq, (forall x. MaskPoint -> Rep MaskPoint x)
-> (forall x. Rep MaskPoint x -> MaskPoint) -> Generic MaskPoint
forall x. Rep MaskPoint x -> MaskPoint
forall x. MaskPoint -> Rep MaskPoint x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep MaskPoint x -> MaskPoint
$cfrom :: forall x. MaskPoint -> Rep MaskPoint x
Generic)
data MaskPosition
  = -- | Position on a photo where a mask should be placed 
  MaskPosition
    { -- | Part of the face, relative to which the mask should be placed
      MaskPosition -> MaskPoint
point :: MaskPoint,
      -- | Shift by X-axis measured in widths of the mask scaled to the face size, from left to right. (For example, -1.0 will place the mask just to the left of the default mask position)
      MaskPosition -> Double
xShift :: Double,
      -- | Shift by Y-axis measured in heights of the mask scaled to the face size, from top to bottom. (For example, 1.0 will place the mask just below the default mask position)
      MaskPosition -> Double
yShift :: Double,
      -- | Mask scaling coefficient. (For example, 2.0 means a doubled size)
      MaskPosition -> Double
scale :: Double
    }
  deriving (I32 -> MaskPosition -> ShowS
[MaskPosition] -> ShowS
MaskPosition -> String
(I32 -> MaskPosition -> ShowS)
-> (MaskPosition -> String)
-> ([MaskPosition] -> ShowS)
-> Show MaskPosition
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [MaskPosition] -> ShowS
$cshowList :: [MaskPosition] -> ShowS
show :: MaskPosition -> String
$cshow :: MaskPosition -> String
showsPrec :: I32 -> MaskPosition -> ShowS
$cshowsPrec :: I32 -> MaskPosition -> ShowS
Show, MaskPosition -> MaskPosition -> Bool
(MaskPosition -> MaskPosition -> Bool)
-> (MaskPosition -> MaskPosition -> Bool) -> Eq MaskPosition
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: MaskPosition -> MaskPosition -> Bool
$c/= :: MaskPosition -> MaskPosition -> Bool
== :: MaskPosition -> MaskPosition -> Bool
$c== :: MaskPosition -> MaskPosition -> Bool
Eq, (forall x. MaskPosition -> Rep MaskPosition x)
-> (forall x. Rep MaskPosition x -> MaskPosition)
-> Generic MaskPosition
forall x. Rep MaskPosition x -> MaskPosition
forall x. MaskPosition -> Rep MaskPosition x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep MaskPosition x -> MaskPosition
$cfrom :: forall x. MaskPosition -> Rep MaskPosition x
Generic)
data PollOption
  = -- | Describes one answer option of a poll 
  PollOption
    { -- | Option text, 1-100 characters 
      PollOption -> T
text :: T,
      -- | Number of voters for this option, available only for closed or voted polls 
      PollOption -> I32
voterCount :: I32,
      -- | The percentage of votes for this option, 0-100
      PollOption -> I32
votePercentage :: I32,
      -- | True, if the option was chosen by the user 
      PollOption -> Bool
isChosen :: Bool,
      -- | True, if the option is being chosen by a pending setPollAnswer request
      PollOption -> Bool
isBeingChosen :: Bool
    }
  deriving (I32 -> PollOption -> ShowS
[PollOption] -> ShowS
PollOption -> String
(I32 -> PollOption -> ShowS)
-> (PollOption -> String)
-> ([PollOption] -> ShowS)
-> Show PollOption
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PollOption] -> ShowS
$cshowList :: [PollOption] -> ShowS
show :: PollOption -> String
$cshow :: PollOption -> String
showsPrec :: I32 -> PollOption -> ShowS
$cshowsPrec :: I32 -> PollOption -> ShowS
Show, PollOption -> PollOption -> Bool
(PollOption -> PollOption -> Bool)
-> (PollOption -> PollOption -> Bool) -> Eq PollOption
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PollOption -> PollOption -> Bool
$c/= :: PollOption -> PollOption -> Bool
== :: PollOption -> PollOption -> Bool
$c== :: PollOption -> PollOption -> Bool
Eq, (forall x. PollOption -> Rep PollOption x)
-> (forall x. Rep PollOption x -> PollOption) -> Generic PollOption
forall x. Rep PollOption x -> PollOption
forall x. PollOption -> Rep PollOption x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PollOption x -> PollOption
$cfrom :: forall x. PollOption -> Rep PollOption x
Generic)
-- | Describes the type of a poll
data PollType
  = -- | A regular poll 
  PollTypeRegular
    { -- | True, if multiple answer options can be chosen simultaneously
      PollType -> Bool
allowMultipleAnswers :: Bool
    }
  | -- | A poll in quiz mode, which has exactly one correct answer option and can be answered only once
  PollTypeQuiz
    { -- | 0-based identifier of the correct answer option; -1 for a yet unanswered poll
      PollType -> I32
correctOptionId :: I32,
      -- | Text that is shown when the user chooses an incorrect answer or taps on the lamp icon, 0-200 characters with at most 2 line feeds; empty for a yet unanswered poll
      PollType -> FormattedText
explanation :: FormattedText
    }
  deriving (I32 -> PollType -> ShowS
[PollType] -> ShowS
PollType -> String
(I32 -> PollType -> ShowS)
-> (PollType -> String) -> ([PollType] -> ShowS) -> Show PollType
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PollType] -> ShowS
$cshowList :: [PollType] -> ShowS
show :: PollType -> String
$cshow :: PollType -> String
showsPrec :: I32 -> PollType -> ShowS
$cshowsPrec :: I32 -> PollType -> ShowS
Show, PollType -> PollType -> Bool
(PollType -> PollType -> Bool)
-> (PollType -> PollType -> Bool) -> Eq PollType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PollType -> PollType -> Bool
$c/= :: PollType -> PollType -> Bool
== :: PollType -> PollType -> Bool
$c== :: PollType -> PollType -> Bool
Eq, (forall x. PollType -> Rep PollType x)
-> (forall x. Rep PollType x -> PollType) -> Generic PollType
forall x. Rep PollType x -> PollType
forall x. PollType -> Rep PollType x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PollType x -> PollType
$cfrom :: forall x. PollType -> Rep PollType x
Generic)
data Animation
  = -- | Describes an animation file. The animation must be encoded in GIF or MPEG4 format 
  Animation
    { -- | Duration of the animation, in seconds; as defined by the sender 
      Animation -> I32
duration :: I32,
      -- | Width of the animation 
      Animation -> I32
width :: I32,
      -- | Height of the animation
      Animation -> I32
height :: I32,
      -- | Original name of the file; as defined by the sender 
      Animation -> T
fileName :: T,
      -- | MIME type of the file, usually "image/gif" or "video/mp4"
      Animation -> T
mimeType :: T,
      -- | True, if stickers were added to the animation. The list of corresponding sticker set can be received using getAttachedStickerSets
      Animation -> Bool
hasStickers :: Bool,
      -- | Animation minithumbnail; may be null 
      Animation -> Maybe Minithumbnail
minithumbnail :: (Maybe) (Minithumbnail),
      -- | Animation thumbnail in JPEG or MPEG4 format; may be null 
      Animation -> Maybe Thumbnail
thumbnail :: (Maybe) (Thumbnail),
      -- | File containing the animation
      Animation -> File
animation :: File
    }
  deriving (I32 -> Animation -> ShowS
[Animation] -> ShowS
Animation -> String
(I32 -> Animation -> ShowS)
-> (Animation -> String)
-> ([Animation] -> ShowS)
-> Show Animation
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Animation] -> ShowS
$cshowList :: [Animation] -> ShowS
show :: Animation -> String
$cshow :: Animation -> String
showsPrec :: I32 -> Animation -> ShowS
$cshowsPrec :: I32 -> Animation -> ShowS
Show, Animation -> Animation -> Bool
(Animation -> Animation -> Bool)
-> (Animation -> Animation -> Bool) -> Eq Animation
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Animation -> Animation -> Bool
$c/= :: Animation -> Animation -> Bool
== :: Animation -> Animation -> Bool
$c== :: Animation -> Animation -> Bool
Eq, (forall x. Animation -> Rep Animation x)
-> (forall x. Rep Animation x -> Animation) -> Generic Animation
forall x. Rep Animation x -> Animation
forall x. Animation -> Rep Animation x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Animation x -> Animation
$cfrom :: forall x. Animation -> Rep Animation x
Generic)
data Audio
  = -- | Describes an audio file. Audio is usually in MP3 or M4A format 
  Audio
    { -- | Duration of the audio, in seconds; as defined by the sender 
      Audio -> I32
duration :: I32,
      -- | Title of the audio; as defined by the sender 
      Audio -> T
title :: T,
      -- | Performer of the audio; as defined by the sender
      Audio -> T
performer :: T,
      -- | Original name of the file; as defined by the sender 
      Audio -> T
fileName :: T,
      -- | The MIME type of the file; as defined by the sender 
      Audio -> T
mimeType :: T,
      -- | The minithumbnail of the album cover; may be null
      Audio -> Maybe Minithumbnail
albumCoverMinithumbnail :: (Maybe) (Minithumbnail),
      -- | The thumbnail of the album cover in JPEG format; as defined by the sender. The full size thumbnail should be extracted from the downloaded file; may be null 
      Audio -> Maybe Thumbnail
albumCoverThumbnail :: (Maybe) (Thumbnail),
      -- | File containing the audio
      Audio -> File
audio :: File
    }
  deriving (I32 -> Audio -> ShowS
[Audio] -> ShowS
Audio -> String
(I32 -> Audio -> ShowS)
-> (Audio -> String) -> ([Audio] -> ShowS) -> Show Audio
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Audio] -> ShowS
$cshowList :: [Audio] -> ShowS
show :: Audio -> String
$cshow :: Audio -> String
showsPrec :: I32 -> Audio -> ShowS
$cshowsPrec :: I32 -> Audio -> ShowS
Show, Audio -> Audio -> Bool
(Audio -> Audio -> Bool) -> (Audio -> Audio -> Bool) -> Eq Audio
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Audio -> Audio -> Bool
$c/= :: Audio -> Audio -> Bool
== :: Audio -> Audio -> Bool
$c== :: Audio -> Audio -> Bool
Eq, (forall x. Audio -> Rep Audio x)
-> (forall x. Rep Audio x -> Audio) -> Generic Audio
forall x. Rep Audio x -> Audio
forall x. Audio -> Rep Audio x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Audio x -> Audio
$cfrom :: forall x. Audio -> Rep Audio x
Generic)
data Document
  = -- | Describes a document of any type 
  Document
    { -- | Original name of the file; as defined by the sender 
      Document -> T
fileName :: T,
      -- | MIME type of the file; as defined by the sender
      Document -> T
mimeType :: T,
      -- | Document minithumbnail; may be null 
      Document -> Maybe Minithumbnail
minithumbnail :: (Maybe) (Minithumbnail),
      -- | Document thumbnail in JPEG or PNG format (PNG will be used only for background patterns); as defined by the sender; may be null 
      Document -> Maybe Thumbnail
thumbnail :: (Maybe) (Thumbnail),
      -- | File containing the document
      Document -> File
document :: File
    }
  deriving (I32 -> Document -> ShowS
[Document] -> ShowS
Document -> String
(I32 -> Document -> ShowS)
-> (Document -> String) -> ([Document] -> ShowS) -> Show Document
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Document] -> ShowS
$cshowList :: [Document] -> ShowS
show :: Document -> String
$cshow :: Document -> String
showsPrec :: I32 -> Document -> ShowS
$cshowsPrec :: I32 -> Document -> ShowS
Show, Document -> Document -> Bool
(Document -> Document -> Bool)
-> (Document -> Document -> Bool) -> Eq Document
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Document -> Document -> Bool
$c/= :: Document -> Document -> Bool
== :: Document -> Document -> Bool
$c== :: Document -> Document -> Bool
Eq, (forall x. Document -> Rep Document x)
-> (forall x. Rep Document x -> Document) -> Generic Document
forall x. Rep Document x -> Document
forall x. Document -> Rep Document x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Document x -> Document
$cfrom :: forall x. Document -> Rep Document x
Generic)
data Photo
  = -- | Describes a photo 
  Photo
    { -- | True, if stickers were added to the photo. The list of corresponding sticker sets can be received using getAttachedStickerSets
      Photo -> Bool
hasStickers :: Bool,
      -- | Photo minithumbnail; may be null 
      Photo -> Maybe Minithumbnail
minithumbnail :: (Maybe) (Minithumbnail),
      -- | Available variants of the photo, in different sizes
      Photo -> [PhotoSize]
sizes :: [PhotoSize]
    }
  deriving (I32 -> Photo -> ShowS
[Photo] -> ShowS
Photo -> String
(I32 -> Photo -> ShowS)
-> (Photo -> String) -> ([Photo] -> ShowS) -> Show Photo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Photo] -> ShowS
$cshowList :: [Photo] -> ShowS
show :: Photo -> String
$cshow :: Photo -> String
showsPrec :: I32 -> Photo -> ShowS
$cshowsPrec :: I32 -> Photo -> ShowS
Show, Photo -> Photo -> Bool
(Photo -> Photo -> Bool) -> (Photo -> Photo -> Bool) -> Eq Photo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Photo -> Photo -> Bool
$c/= :: Photo -> Photo -> Bool
== :: Photo -> Photo -> Bool
$c== :: Photo -> Photo -> Bool
Eq, (forall x. Photo -> Rep Photo x)
-> (forall x. Rep Photo x -> Photo) -> Generic Photo
forall x. Rep Photo x -> Photo
forall x. Photo -> Rep Photo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Photo x -> Photo
$cfrom :: forall x. Photo -> Rep Photo x
Generic)
data Sticker
  = -- | Describes a sticker 
  Sticker
    { -- | The identifier of the sticker set to which the sticker belongs; 0 if none 
      Sticker -> I64
setId :: I64,
      -- | Sticker width; as defined by the sender 
      Sticker -> I32
width :: I32,
      -- | Sticker height; as defined by the sender
      Sticker -> I32
height :: I32,
      -- | Emoji corresponding to the sticker 
      Sticker -> T
emoji :: T,
      -- | True, if the sticker is an animated sticker in TGS format 
      Sticker -> Bool
isAnimated :: Bool,
      -- | True, if the sticker is a mask 
      Sticker -> Bool
isMask :: Bool,
      -- | Position where the mask should be placed; may be null
      Sticker -> Maybe MaskPosition
maskPosition :: (Maybe) (MaskPosition),
      -- | Sticker thumbnail in WEBP or JPEG format; may be null 
      Sticker -> Maybe Thumbnail
thumbnail :: (Maybe) (Thumbnail),
      -- | File containing the sticker
      Sticker -> File
sticker :: File
    }
  deriving (I32 -> Sticker -> ShowS
[Sticker] -> ShowS
Sticker -> String
(I32 -> Sticker -> ShowS)
-> (Sticker -> String) -> ([Sticker] -> ShowS) -> Show Sticker
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Sticker] -> ShowS
$cshowList :: [Sticker] -> ShowS
show :: Sticker -> String
$cshow :: Sticker -> String
showsPrec :: I32 -> Sticker -> ShowS
$cshowsPrec :: I32 -> Sticker -> ShowS
Show, Sticker -> Sticker -> Bool
(Sticker -> Sticker -> Bool)
-> (Sticker -> Sticker -> Bool) -> Eq Sticker
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Sticker -> Sticker -> Bool
$c/= :: Sticker -> Sticker -> Bool
== :: Sticker -> Sticker -> Bool
$c== :: Sticker -> Sticker -> Bool
Eq, (forall x. Sticker -> Rep Sticker x)
-> (forall x. Rep Sticker x -> Sticker) -> Generic Sticker
forall x. Rep Sticker x -> Sticker
forall x. Sticker -> Rep Sticker x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Sticker x -> Sticker
$cfrom :: forall x. Sticker -> Rep Sticker x
Generic)
data Video
  = -- | Describes a video file 
  Video
    { -- | Duration of the video, in seconds; as defined by the sender 
      Video -> I32
duration :: I32,
      -- | Video width; as defined by the sender 
      Video -> I32
width :: I32,
      -- | Video height; as defined by the sender
      Video -> I32
height :: I32,
      -- | Original name of the file; as defined by the sender 
      Video -> T
fileName :: T,
      -- | MIME type of the file; as defined by the sender
      Video -> T
mimeType :: T,
      -- | True, if stickers were added to the video. The list of corresponding sticker sets can be received using getAttachedStickerSets
      Video -> Bool
hasStickers :: Bool,
      -- | True, if the video should be tried to be streamed 
      Video -> Bool
supportsStreaming :: Bool,
      -- | Video minithumbnail; may be null
      Video -> Maybe Minithumbnail
minithumbnail :: (Maybe) (Minithumbnail),
      -- | Video thumbnail in JPEG or MPEG4 format; as defined by the sender; may be null 
      Video -> Maybe Thumbnail
thumbnail :: (Maybe) (Thumbnail),
      -- | File containing the video
      Video -> File
video :: File
    }
  deriving (I32 -> Video -> ShowS
[Video] -> ShowS
Video -> String
(I32 -> Video -> ShowS)
-> (Video -> String) -> ([Video] -> ShowS) -> Show Video
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Video] -> ShowS
$cshowList :: [Video] -> ShowS
show :: Video -> String
$cshow :: Video -> String
showsPrec :: I32 -> Video -> ShowS
$cshowsPrec :: I32 -> Video -> ShowS
Show, Video -> Video -> Bool
(Video -> Video -> Bool) -> (Video -> Video -> Bool) -> Eq Video
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Video -> Video -> Bool
$c/= :: Video -> Video -> Bool
== :: Video -> Video -> Bool
$c== :: Video -> Video -> Bool
Eq, (forall x. Video -> Rep Video x)
-> (forall x. Rep Video x -> Video) -> Generic Video
forall x. Rep Video x -> Video
forall x. Video -> Rep Video x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Video x -> Video
$cfrom :: forall x. Video -> Rep Video x
Generic)
data VideoNote
  = -- | Describes a video note. The video must be equal in width and height, cropped to a circle, and stored in MPEG4 format 
  VideoNote
    { -- | Duration of the video, in seconds; as defined by the sender
      VideoNote -> I32
duration :: I32,
      -- | Video width and height; as defined by the sender 
      VideoNote -> I32
length :: I32,
      -- | Video minithumbnail; may be null
      VideoNote -> Maybe Minithumbnail
minithumbnail :: (Maybe) (Minithumbnail),
      -- | Video thumbnail in JPEG format; as defined by the sender; may be null 
      VideoNote -> Maybe Thumbnail
thumbnail :: (Maybe) (Thumbnail),
      -- | File containing the video
      VideoNote -> File
video :: File
    }
  deriving (I32 -> VideoNote -> ShowS
[VideoNote] -> ShowS
VideoNote -> String
(I32 -> VideoNote -> ShowS)
-> (VideoNote -> String)
-> ([VideoNote] -> ShowS)
-> Show VideoNote
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [VideoNote] -> ShowS
$cshowList :: [VideoNote] -> ShowS
show :: VideoNote -> String
$cshow :: VideoNote -> String
showsPrec :: I32 -> VideoNote -> ShowS
$cshowsPrec :: I32 -> VideoNote -> ShowS
Show, VideoNote -> VideoNote -> Bool
(VideoNote -> VideoNote -> Bool)
-> (VideoNote -> VideoNote -> Bool) -> Eq VideoNote
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: VideoNote -> VideoNote -> Bool
$c/= :: VideoNote -> VideoNote -> Bool
== :: VideoNote -> VideoNote -> Bool
$c== :: VideoNote -> VideoNote -> Bool
Eq, (forall x. VideoNote -> Rep VideoNote x)
-> (forall x. Rep VideoNote x -> VideoNote) -> Generic VideoNote
forall x. Rep VideoNote x -> VideoNote
forall x. VideoNote -> Rep VideoNote x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep VideoNote x -> VideoNote
$cfrom :: forall x. VideoNote -> Rep VideoNote x
Generic)
data VoiceNote
  = -- | Describes a voice note. The voice note must be encoded with the Opus codec, and stored inside an OGG container. Voice notes can have only a single audio channel 
  VoiceNote
    { -- | Duration of the voice note, in seconds; as defined by the sender
      VoiceNote -> I32
duration :: I32,
      -- | A waveform representation of the voice note in 5-bit format 
      VoiceNote -> ByteString64
waveform :: ByteString64,
      -- | MIME type of the file; as defined by the sender 
      VoiceNote -> T
mimeType :: T,
      -- | File containing the voice note
      VoiceNote -> File
voice :: File
    }
  deriving (I32 -> VoiceNote -> ShowS
[VoiceNote] -> ShowS
VoiceNote -> String
(I32 -> VoiceNote -> ShowS)
-> (VoiceNote -> String)
-> ([VoiceNote] -> ShowS)
-> Show VoiceNote
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [VoiceNote] -> ShowS
$cshowList :: [VoiceNote] -> ShowS
show :: VoiceNote -> String
$cshow :: VoiceNote -> String
showsPrec :: I32 -> VoiceNote -> ShowS
$cshowsPrec :: I32 -> VoiceNote -> ShowS
Show, VoiceNote -> VoiceNote -> Bool
(VoiceNote -> VoiceNote -> Bool)
-> (VoiceNote -> VoiceNote -> Bool) -> Eq VoiceNote
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: VoiceNote -> VoiceNote -> Bool
$c/= :: VoiceNote -> VoiceNote -> Bool
== :: VoiceNote -> VoiceNote -> Bool
$c== :: VoiceNote -> VoiceNote -> Bool
Eq, (forall x. VoiceNote -> Rep VoiceNote x)
-> (forall x. Rep VoiceNote x -> VoiceNote) -> Generic VoiceNote
forall x. Rep VoiceNote x -> VoiceNote
forall x. VoiceNote -> Rep VoiceNote x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep VoiceNote x -> VoiceNote
$cfrom :: forall x. VoiceNote -> Rep VoiceNote x
Generic)
data Contact
  = -- | Describes a user contact 
  Contact
    { -- | Phone number of the user 
      Contact -> T
phoneNumber :: T,
      -- | First name of the user; 1-255 characters in length 
      Contact -> T
firstName :: T,
      -- | Last name of the user 
      Contact -> T
lastName :: T,
      -- | Additional data about the user in a form of vCard; 0-2048 bytes in length 
      Contact -> T
vcard :: T,
      -- | Identifier of the user, if known; otherwise 0
      Contact -> I32
userId :: I32
    }
  deriving (I32 -> Contact -> ShowS
[Contact] -> ShowS
Contact -> String
(I32 -> Contact -> ShowS)
-> (Contact -> String) -> ([Contact] -> ShowS) -> Show Contact
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Contact] -> ShowS
$cshowList :: [Contact] -> ShowS
show :: Contact -> String
$cshow :: Contact -> String
showsPrec :: I32 -> Contact -> ShowS
$cshowsPrec :: I32 -> Contact -> ShowS
Show, Contact -> Contact -> Bool
(Contact -> Contact -> Bool)
-> (Contact -> Contact -> Bool) -> Eq Contact
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Contact -> Contact -> Bool
$c/= :: Contact -> Contact -> Bool
== :: Contact -> Contact -> Bool
$c== :: Contact -> Contact -> Bool
Eq, (forall x. Contact -> Rep Contact x)
-> (forall x. Rep Contact x -> Contact) -> Generic Contact
forall x. Rep Contact x -> Contact
forall x. Contact -> Rep Contact x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Contact x -> Contact
$cfrom :: forall x. Contact -> Rep Contact x
Generic)
data Location
  = -- | Describes a location on planet Earth 
  Location
    { -- | Latitude of the location in degrees; as defined by the sender 
      Location -> Double
latitude :: Double,
      -- | Longitude of the location, in degrees; as defined by the sender
      Location -> Double
longitude :: Double
    }
  deriving (I32 -> Location -> ShowS
[Location] -> ShowS
Location -> String
(I32 -> Location -> ShowS)
-> (Location -> String) -> ([Location] -> ShowS) -> Show Location
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Location] -> ShowS
$cshowList :: [Location] -> ShowS
show :: Location -> String
$cshow :: Location -> String
showsPrec :: I32 -> Location -> ShowS
$cshowsPrec :: I32 -> Location -> ShowS
Show, Location -> Location -> Bool
(Location -> Location -> Bool)
-> (Location -> Location -> Bool) -> Eq Location
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Location -> Location -> Bool
$c/= :: Location -> Location -> Bool
== :: Location -> Location -> Bool
$c== :: Location -> Location -> Bool
Eq, (forall x. Location -> Rep Location x)
-> (forall x. Rep Location x -> Location) -> Generic Location
forall x. Rep Location x -> Location
forall x. Location -> Rep Location x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Location x -> Location
$cfrom :: forall x. Location -> Rep Location x
Generic)
data Venue
  = -- | Describes a venue 
  Venue
    { -- | Venue location; as defined by the sender 
      Venue -> Location
location :: Location,
      -- | Venue name; as defined by the sender 
      Venue -> T
title :: T,
      -- | Venue address; as defined by the sender 
      Venue -> T
address :: T,
      -- | Provider of the venue database; as defined by the sender. Currently only "foursquare" needs to be supported
      Venue -> T
provider :: T,
      -- | Identifier of the venue in the provider database; as defined by the sender 
      Venue -> T
id :: T,
      -- | Type of the venue in the provider database; as defined by the sender
      Venue -> T
type_ :: T
    }
  deriving (I32 -> Venue -> ShowS
[Venue] -> ShowS
Venue -> String
(I32 -> Venue -> ShowS)
-> (Venue -> String) -> ([Venue] -> ShowS) -> Show Venue
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Venue] -> ShowS
$cshowList :: [Venue] -> ShowS
show :: Venue -> String
$cshow :: Venue -> String
showsPrec :: I32 -> Venue -> ShowS
$cshowsPrec :: I32 -> Venue -> ShowS
Show, Venue -> Venue -> Bool
(Venue -> Venue -> Bool) -> (Venue -> Venue -> Bool) -> Eq Venue
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Venue -> Venue -> Bool
$c/= :: Venue -> Venue -> Bool
== :: Venue -> Venue -> Bool
$c== :: Venue -> Venue -> Bool
Eq, (forall x. Venue -> Rep Venue x)
-> (forall x. Rep Venue x -> Venue) -> Generic Venue
forall x. Rep Venue x -> Venue
forall x. Venue -> Rep Venue x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Venue x -> Venue
$cfrom :: forall x. Venue -> Rep Venue x
Generic)
data Game
  = -- | Describes a game 
  Game
    { -- | Game ID 
      Game -> I64
id :: I64,
      -- | Game short name. To share a game use the URL https://t.me/{bot_username}?game={game_short_name} 
      Game -> T
shortName :: T,
      -- | Game title 
      Game -> T
title :: T,
      -- | Game text, usually containing scoreboards for a game
      Game -> FormattedText
text :: FormattedText,
      -- | Describes a game 
      Game -> T
description :: T,
      -- | Game photo 
      Game -> Photo
photo :: Photo,
      -- | Game animation; may be null
      Game -> Maybe Animation
animation :: (Maybe) (Animation)
    }
  deriving (I32 -> Game -> ShowS
[Game] -> ShowS
Game -> String
(I32 -> Game -> ShowS)
-> (Game -> String) -> ([Game] -> ShowS) -> Show Game
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Game] -> ShowS
$cshowList :: [Game] -> ShowS
show :: Game -> String
$cshow :: Game -> String
showsPrec :: I32 -> Game -> ShowS
$cshowsPrec :: I32 -> Game -> ShowS
Show, Game -> Game -> Bool
(Game -> Game -> Bool) -> (Game -> Game -> Bool) -> Eq Game
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Game -> Game -> Bool
$c/= :: Game -> Game -> Bool
== :: Game -> Game -> Bool
$c== :: Game -> Game -> Bool
Eq, (forall x. Game -> Rep Game x)
-> (forall x. Rep Game x -> Game) -> Generic Game
forall x. Rep Game x -> Game
forall x. Game -> Rep Game x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Game x -> Game
$cfrom :: forall x. Game -> Rep Game x
Generic)
data Poll
  = -- | Describes a poll 
  Poll
    { -- | Unique poll identifier 
      Poll -> I64
id :: I64,
      -- | Poll question, 1-255 characters 
      Poll -> T
question :: T,
      -- | List of poll answer options
      Poll -> [PollOption]
options :: [PollOption],
      -- | Total number of voters, participating in the poll 
      Poll -> I32
totalVoterCount :: I32,
      -- | User identifiers of recent voters, if the poll is non-anonymous
      Poll -> [I32]
recentVoterUserIds :: [I32],
      -- | True, if the poll is anonymous 
      Poll -> Bool
isAnonymous :: Bool,
      -- | Type of the poll
      Poll -> PollType
type_ :: PollType,
      -- | Amount of time the poll will be active after creation, in seconds 
      Poll -> I32
openPeriod :: I32,
      -- | Point in time (Unix timestamp) when the poll will be automatically closed 
      Poll -> I32
closeDate :: I32,
      -- | True, if the poll is closed
      Poll -> Bool
isClosed :: Bool
    }
  deriving (I32 -> Poll -> ShowS
[Poll] -> ShowS
Poll -> String
(I32 -> Poll -> ShowS)
-> (Poll -> String) -> ([Poll] -> ShowS) -> Show Poll
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Poll] -> ShowS
$cshowList :: [Poll] -> ShowS
show :: Poll -> String
$cshow :: Poll -> String
showsPrec :: I32 -> Poll -> ShowS
$cshowsPrec :: I32 -> Poll -> ShowS
Show, Poll -> Poll -> Bool
(Poll -> Poll -> Bool) -> (Poll -> Poll -> Bool) -> Eq Poll
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Poll -> Poll -> Bool
$c/= :: Poll -> Poll -> Bool
== :: Poll -> Poll -> Bool
$c== :: Poll -> Poll -> Bool
Eq, (forall x. Poll -> Rep Poll x)
-> (forall x. Rep Poll x -> Poll) -> Generic Poll
forall x. Rep Poll x -> Poll
forall x. Poll -> Rep Poll x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Poll x -> Poll
$cfrom :: forall x. Poll -> Rep Poll x
Generic)
data ProfilePhoto
  = -- | Describes a user profile photo 
  ProfilePhoto
    { -- | Photo identifier; 0 for an empty photo. Can be used to find a photo in a list of userProfilePhotos
      ProfilePhoto -> I64
id :: I64,
      -- | A small (160x160) user profile photo. The file can be downloaded only before the photo is changed 
      ProfilePhoto -> File
small :: File,
      -- | A big (640x640) user profile photo. The file can be downloaded only before the photo is changed
      ProfilePhoto -> File
big :: File
    }
  deriving (I32 -> ProfilePhoto -> ShowS
[ProfilePhoto] -> ShowS
ProfilePhoto -> String
(I32 -> ProfilePhoto -> ShowS)
-> (ProfilePhoto -> String)
-> ([ProfilePhoto] -> ShowS)
-> Show ProfilePhoto
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ProfilePhoto] -> ShowS
$cshowList :: [ProfilePhoto] -> ShowS
show :: ProfilePhoto -> String
$cshow :: ProfilePhoto -> String
showsPrec :: I32 -> ProfilePhoto -> ShowS
$cshowsPrec :: I32 -> ProfilePhoto -> ShowS
Show, ProfilePhoto -> ProfilePhoto -> Bool
(ProfilePhoto -> ProfilePhoto -> Bool)
-> (ProfilePhoto -> ProfilePhoto -> Bool) -> Eq ProfilePhoto
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ProfilePhoto -> ProfilePhoto -> Bool
$c/= :: ProfilePhoto -> ProfilePhoto -> Bool
== :: ProfilePhoto -> ProfilePhoto -> Bool
$c== :: ProfilePhoto -> ProfilePhoto -> Bool
Eq, (forall x. ProfilePhoto -> Rep ProfilePhoto x)
-> (forall x. Rep ProfilePhoto x -> ProfilePhoto)
-> Generic ProfilePhoto
forall x. Rep ProfilePhoto x -> ProfilePhoto
forall x. ProfilePhoto -> Rep ProfilePhoto x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ProfilePhoto x -> ProfilePhoto
$cfrom :: forall x. ProfilePhoto -> Rep ProfilePhoto x
Generic)
data ChatPhoto
  = -- | Describes the photo of a chat 
  ChatPhoto
    { -- | A small (160x160) chat photo. The file can be downloaded only before the photo is changed 
      ChatPhoto -> File
small :: File,
      -- | A big (640x640) chat photo. The file can be downloaded only before the photo is changed
      ChatPhoto -> File
big :: File
    }
  deriving (I32 -> ChatPhoto -> ShowS
[ChatPhoto] -> ShowS
ChatPhoto -> String
(I32 -> ChatPhoto -> ShowS)
-> (ChatPhoto -> String)
-> ([ChatPhoto] -> ShowS)
-> Show ChatPhoto
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatPhoto] -> ShowS
$cshowList :: [ChatPhoto] -> ShowS
show :: ChatPhoto -> String
$cshow :: ChatPhoto -> String
showsPrec :: I32 -> ChatPhoto -> ShowS
$cshowsPrec :: I32 -> ChatPhoto -> ShowS
Show, ChatPhoto -> ChatPhoto -> Bool
(ChatPhoto -> ChatPhoto -> Bool)
-> (ChatPhoto -> ChatPhoto -> Bool) -> Eq ChatPhoto
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatPhoto -> ChatPhoto -> Bool
$c/= :: ChatPhoto -> ChatPhoto -> Bool
== :: ChatPhoto -> ChatPhoto -> Bool
$c== :: ChatPhoto -> ChatPhoto -> Bool
Eq, (forall x. ChatPhoto -> Rep ChatPhoto x)
-> (forall x. Rep ChatPhoto x -> ChatPhoto) -> Generic ChatPhoto
forall x. Rep ChatPhoto x -> ChatPhoto
forall x. ChatPhoto -> Rep ChatPhoto x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatPhoto x -> ChatPhoto
$cfrom :: forall x. ChatPhoto -> Rep ChatPhoto x
Generic)
-- | Represents the type of a user. The following types are possible: regular users, deleted users and bots
data UserType
  = -- | A regular user
  UserTypeRegular
    { 
    }
  | -- | A deleted user or deleted bot. No information on the user besides the user identifier is available. It is not possible to perform any active actions on this type of user
  UserTypeDeleted
    { 
    }
  | -- | A bot (see https://core.telegram.org/bots) 
  UserTypeBot
    { -- | True, if the bot can be invited to basic group and supergroup chats
      UserType -> Bool
canJoinGroups :: Bool,
      -- | True, if the bot can read all messages in basic group or supergroup chats and not just those addressed to the bot. In private and channel chats a bot can always read all messages
      UserType -> Bool
canReadAllGroupMessages :: Bool,
      -- | True, if the bot supports inline queries 
      UserType -> Bool
isInline :: Bool,
      -- | Placeholder for inline queries (displayed on the client input field) 
      UserType -> T
inlineQueryPlaceholder :: T,
      -- | True, if the location of the user should be sent with every inline query to this bot
      UserType -> Bool
needLocation :: Bool
    }
  | -- | No information on the user besides the user identifier is available, yet this user has not been deleted. This object is extremely rare and must be handled like a deleted user. It is not possible to perform any actions on users of this type
  UserTypeUnknown
    { 
    }
  deriving (I32 -> UserType -> ShowS
[UserType] -> ShowS
UserType -> String
(I32 -> UserType -> ShowS)
-> (UserType -> String) -> ([UserType] -> ShowS) -> Show UserType
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UserType] -> ShowS
$cshowList :: [UserType] -> ShowS
show :: UserType -> String
$cshow :: UserType -> String
showsPrec :: I32 -> UserType -> ShowS
$cshowsPrec :: I32 -> UserType -> ShowS
Show, UserType -> UserType -> Bool
(UserType -> UserType -> Bool)
-> (UserType -> UserType -> Bool) -> Eq UserType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UserType -> UserType -> Bool
$c/= :: UserType -> UserType -> Bool
== :: UserType -> UserType -> Bool
$c== :: UserType -> UserType -> Bool
Eq, (forall x. UserType -> Rep UserType x)
-> (forall x. Rep UserType x -> UserType) -> Generic UserType
forall x. Rep UserType x -> UserType
forall x. UserType -> Rep UserType x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UserType x -> UserType
$cfrom :: forall x. UserType -> Rep UserType x
Generic)
data BotCommand
  = -- | Represents a command supported by a bot 
  BotCommand
    { -- | Text of the bot command 
      BotCommand -> T
command :: T,
      -- | Represents a command supported by a bot 
      BotCommand -> T
description :: T
    }
  deriving (I32 -> BotCommand -> ShowS
[BotCommand] -> ShowS
BotCommand -> String
(I32 -> BotCommand -> ShowS)
-> (BotCommand -> String)
-> ([BotCommand] -> ShowS)
-> Show BotCommand
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [BotCommand] -> ShowS
$cshowList :: [BotCommand] -> ShowS
show :: BotCommand -> String
$cshow :: BotCommand -> String
showsPrec :: I32 -> BotCommand -> ShowS
$cshowsPrec :: I32 -> BotCommand -> ShowS
Show, BotCommand -> BotCommand -> Bool
(BotCommand -> BotCommand -> Bool)
-> (BotCommand -> BotCommand -> Bool) -> Eq BotCommand
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: BotCommand -> BotCommand -> Bool
$c/= :: BotCommand -> BotCommand -> Bool
== :: BotCommand -> BotCommand -> Bool
$c== :: BotCommand -> BotCommand -> Bool
Eq, (forall x. BotCommand -> Rep BotCommand x)
-> (forall x. Rep BotCommand x -> BotCommand) -> Generic BotCommand
forall x. Rep BotCommand x -> BotCommand
forall x. BotCommand -> Rep BotCommand x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep BotCommand x -> BotCommand
$cfrom :: forall x. BotCommand -> Rep BotCommand x
Generic)
data BotInfo
  = -- | Provides information about a bot and its supported commands 
  BotInfo
    { -- | Provides information about a bot and its supported commands 
      BotInfo -> T
description :: T,
      -- | A list of commands supported by the bot
      BotInfo -> [BotCommand]
commands :: [BotCommand]
    }
  deriving (I32 -> BotInfo -> ShowS
[BotInfo] -> ShowS
BotInfo -> String
(I32 -> BotInfo -> ShowS)
-> (BotInfo -> String) -> ([BotInfo] -> ShowS) -> Show BotInfo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [BotInfo] -> ShowS
$cshowList :: [BotInfo] -> ShowS
show :: BotInfo -> String
$cshow :: BotInfo -> String
showsPrec :: I32 -> BotInfo -> ShowS
$cshowsPrec :: I32 -> BotInfo -> ShowS
Show, BotInfo -> BotInfo -> Bool
(BotInfo -> BotInfo -> Bool)
-> (BotInfo -> BotInfo -> Bool) -> Eq BotInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: BotInfo -> BotInfo -> Bool
$c/= :: BotInfo -> BotInfo -> Bool
== :: BotInfo -> BotInfo -> Bool
$c== :: BotInfo -> BotInfo -> Bool
Eq, (forall x. BotInfo -> Rep BotInfo x)
-> (forall x. Rep BotInfo x -> BotInfo) -> Generic BotInfo
forall x. Rep BotInfo x -> BotInfo
forall x. BotInfo -> Rep BotInfo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep BotInfo x -> BotInfo
$cfrom :: forall x. BotInfo -> Rep BotInfo x
Generic)
data ChatLocation
  = -- | Represents a location to which a chat is connected 
  ChatLocation
    { -- | The location 
      ChatLocation -> Location
location :: Location,
      -- | Location address; 1-64 characters, as defined by the chat owner
      ChatLocation -> T
address :: T
    }
  deriving (I32 -> ChatLocation -> ShowS
[ChatLocation] -> ShowS
ChatLocation -> String
(I32 -> ChatLocation -> ShowS)
-> (ChatLocation -> String)
-> ([ChatLocation] -> ShowS)
-> Show ChatLocation
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatLocation] -> ShowS
$cshowList :: [ChatLocation] -> ShowS
show :: ChatLocation -> String
$cshow :: ChatLocation -> String
showsPrec :: I32 -> ChatLocation -> ShowS
$cshowsPrec :: I32 -> ChatLocation -> ShowS
Show, ChatLocation -> ChatLocation -> Bool
(ChatLocation -> ChatLocation -> Bool)
-> (ChatLocation -> ChatLocation -> Bool) -> Eq ChatLocation
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatLocation -> ChatLocation -> Bool
$c/= :: ChatLocation -> ChatLocation -> Bool
== :: ChatLocation -> ChatLocation -> Bool
$c== :: ChatLocation -> ChatLocation -> Bool
Eq, (forall x. ChatLocation -> Rep ChatLocation x)
-> (forall x. Rep ChatLocation x -> ChatLocation)
-> Generic ChatLocation
forall x. Rep ChatLocation x -> ChatLocation
forall x. ChatLocation -> Rep ChatLocation x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatLocation x -> ChatLocation
$cfrom :: forall x. ChatLocation -> Rep ChatLocation x
Generic)
data User
  = -- | Represents a user 
  User
    { -- | User identifier 
      User -> I32
id :: I32,
      -- | First name of the user 
      User -> T
firstName :: T,
      -- | Last name of the user 
      User -> T
lastName :: T,
      -- | Username of the user
      User -> T
username :: T,
      -- | Phone number of the user 
      User -> T
phoneNumber :: T,
      -- | Current online status of the user 
      User -> UserStatus
status :: UserStatus,
      -- | Profile photo of the user; may be null
      User -> Maybe ProfilePhoto
profilePhoto :: (Maybe) (ProfilePhoto),
      -- | The user is a contact of the current user
      User -> Bool
isContact :: Bool,
      -- | The user is a contact of the current user and the current user is a contact of the user
      User -> Bool
isMutualContact :: Bool,
      -- | True, if the user is verified 
      User -> Bool
isVerified :: Bool,
      -- | True, if the user is Telegram support account
      User -> Bool
isSupport :: Bool,
      -- | If non-empty, it contains a human-readable description of the reason why access to this user must be restricted
      User -> T
restrictionReason :: T,
      -- | True, if many users reported this user as a scam
      User -> Bool
isScam :: Bool,
      -- | If false, the user is inaccessible, and the only information known about the user is inside this class. It can't be passed to any method except GetUser 
      User -> Bool
haveAccess :: Bool,
      -- | Type of the user 
      User -> UserType
type_ :: UserType,
      -- | IETF language tag of the user's language; only available to bots
      User -> T
languageCode :: T
    }
  deriving (I32 -> User -> ShowS
[User] -> ShowS
User -> String
(I32 -> User -> ShowS)
-> (User -> String) -> ([User] -> ShowS) -> Show User
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [User] -> ShowS
$cshowList :: [User] -> ShowS
show :: User -> String
$cshow :: User -> String
showsPrec :: I32 -> User -> ShowS
$cshowsPrec :: I32 -> User -> ShowS
Show, User -> User -> Bool
(User -> User -> Bool) -> (User -> User -> Bool) -> Eq User
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: User -> User -> Bool
$c/= :: User -> User -> Bool
== :: User -> User -> Bool
$c== :: User -> User -> Bool
Eq, (forall x. User -> Rep User x)
-> (forall x. Rep User x -> User) -> Generic User
forall x. Rep User x -> User
forall x. User -> Rep User x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep User x -> User
$cfrom :: forall x. User -> Rep User x
Generic)
data UserFullInfo
  = -- | Contains full information about a user (except the full list of profile photos) 
  UserFullInfo
    { -- | True, if the user is blacklisted by the current user
      UserFullInfo -> Bool
isBlocked :: Bool,
      -- | True, if the user can be called 
      UserFullInfo -> Bool
canBeCalled :: Bool,
      -- | True, if the user can't be called due to their privacy settings
      UserFullInfo -> Bool
hasPrivateCalls :: Bool,
      -- | True, if the current user needs to explicitly allow to share their phone number with the user when the method addContact is used
      UserFullInfo -> Bool
needPhoneNumberPrivacyException :: Bool,
      -- | A short user bio 
      UserFullInfo -> T
bio :: T,
      -- | For bots, the text that is included with the link when users share the bot 
      UserFullInfo -> T
shareText :: T,
      -- | Number of group chats where both the other user and the current user are a member; 0 for the current user 
      UserFullInfo -> I32
groupInCommonCount :: I32,
      -- | If the user is a bot, information about the bot; may be null
      UserFullInfo -> Maybe BotInfo
botInfo :: (Maybe) (BotInfo)
    }
  deriving (I32 -> UserFullInfo -> ShowS
[UserFullInfo] -> ShowS
UserFullInfo -> String
(I32 -> UserFullInfo -> ShowS)
-> (UserFullInfo -> String)
-> ([UserFullInfo] -> ShowS)
-> Show UserFullInfo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UserFullInfo] -> ShowS
$cshowList :: [UserFullInfo] -> ShowS
show :: UserFullInfo -> String
$cshow :: UserFullInfo -> String
showsPrec :: I32 -> UserFullInfo -> ShowS
$cshowsPrec :: I32 -> UserFullInfo -> ShowS
Show, UserFullInfo -> UserFullInfo -> Bool
(UserFullInfo -> UserFullInfo -> Bool)
-> (UserFullInfo -> UserFullInfo -> Bool) -> Eq UserFullInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UserFullInfo -> UserFullInfo -> Bool
$c/= :: UserFullInfo -> UserFullInfo -> Bool
== :: UserFullInfo -> UserFullInfo -> Bool
$c== :: UserFullInfo -> UserFullInfo -> Bool
Eq, (forall x. UserFullInfo -> Rep UserFullInfo x)
-> (forall x. Rep UserFullInfo x -> UserFullInfo)
-> Generic UserFullInfo
forall x. Rep UserFullInfo x -> UserFullInfo
forall x. UserFullInfo -> Rep UserFullInfo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UserFullInfo x -> UserFullInfo
$cfrom :: forall x. UserFullInfo -> Rep UserFullInfo x
Generic)
data UserProfilePhoto
  = -- | Contains full information about a user profile photo 
  UserProfilePhoto
    { -- | Unique user profile photo identifier 
      UserProfilePhoto -> I64
id :: I64,
      -- | Point in time (Unix timestamp) when the photo has been added 
      UserProfilePhoto -> I32
addedDate :: I32,
      -- | Available variants of the user photo, in different sizes
      UserProfilePhoto -> [PhotoSize]
sizes :: [PhotoSize]
    }
  deriving (I32 -> UserProfilePhoto -> ShowS
[UserProfilePhoto] -> ShowS
UserProfilePhoto -> String
(I32 -> UserProfilePhoto -> ShowS)
-> (UserProfilePhoto -> String)
-> ([UserProfilePhoto] -> ShowS)
-> Show UserProfilePhoto
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UserProfilePhoto] -> ShowS
$cshowList :: [UserProfilePhoto] -> ShowS
show :: UserProfilePhoto -> String
$cshow :: UserProfilePhoto -> String
showsPrec :: I32 -> UserProfilePhoto -> ShowS
$cshowsPrec :: I32 -> UserProfilePhoto -> ShowS
Show, UserProfilePhoto -> UserProfilePhoto -> Bool
(UserProfilePhoto -> UserProfilePhoto -> Bool)
-> (UserProfilePhoto -> UserProfilePhoto -> Bool)
-> Eq UserProfilePhoto
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UserProfilePhoto -> UserProfilePhoto -> Bool
$c/= :: UserProfilePhoto -> UserProfilePhoto -> Bool
== :: UserProfilePhoto -> UserProfilePhoto -> Bool
$c== :: UserProfilePhoto -> UserProfilePhoto -> Bool
Eq, (forall x. UserProfilePhoto -> Rep UserProfilePhoto x)
-> (forall x. Rep UserProfilePhoto x -> UserProfilePhoto)
-> Generic UserProfilePhoto
forall x. Rep UserProfilePhoto x -> UserProfilePhoto
forall x. UserProfilePhoto -> Rep UserProfilePhoto x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UserProfilePhoto x -> UserProfilePhoto
$cfrom :: forall x. UserProfilePhoto -> Rep UserProfilePhoto x
Generic)
data UserProfilePhotos
  = -- | Contains part of the list of user photos 
  UserProfilePhotos
    { -- | Total number of user profile photos 
      UserProfilePhotos -> I32
totalCount :: I32,
      -- | A list of photos
      UserProfilePhotos -> [UserProfilePhoto]
photos :: [UserProfilePhoto]
    }
  deriving (I32 -> UserProfilePhotos -> ShowS
[UserProfilePhotos] -> ShowS
UserProfilePhotos -> String
(I32 -> UserProfilePhotos -> ShowS)
-> (UserProfilePhotos -> String)
-> ([UserProfilePhotos] -> ShowS)
-> Show UserProfilePhotos
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UserProfilePhotos] -> ShowS
$cshowList :: [UserProfilePhotos] -> ShowS
show :: UserProfilePhotos -> String
$cshow :: UserProfilePhotos -> String
showsPrec :: I32 -> UserProfilePhotos -> ShowS
$cshowsPrec :: I32 -> UserProfilePhotos -> ShowS
Show, UserProfilePhotos -> UserProfilePhotos -> Bool
(UserProfilePhotos -> UserProfilePhotos -> Bool)
-> (UserProfilePhotos -> UserProfilePhotos -> Bool)
-> Eq UserProfilePhotos
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UserProfilePhotos -> UserProfilePhotos -> Bool
$c/= :: UserProfilePhotos -> UserProfilePhotos -> Bool
== :: UserProfilePhotos -> UserProfilePhotos -> Bool
$c== :: UserProfilePhotos -> UserProfilePhotos -> Bool
Eq, (forall x. UserProfilePhotos -> Rep UserProfilePhotos x)
-> (forall x. Rep UserProfilePhotos x -> UserProfilePhotos)
-> Generic UserProfilePhotos
forall x. Rep UserProfilePhotos x -> UserProfilePhotos
forall x. UserProfilePhotos -> Rep UserProfilePhotos x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UserProfilePhotos x -> UserProfilePhotos
$cfrom :: forall x. UserProfilePhotos -> Rep UserProfilePhotos x
Generic)
data Users
  = -- | Represents a list of users 
  Users
    { -- | Approximate total count of users found 
      Users -> I32
totalCount :: I32,
      -- | A list of user identifiers
      Users -> [I32]
userIds :: [I32]
    }
  deriving (I32 -> Users -> ShowS
[Users] -> ShowS
Users -> String
(I32 -> Users -> ShowS)
-> (Users -> String) -> ([Users] -> ShowS) -> Show Users
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Users] -> ShowS
$cshowList :: [Users] -> ShowS
show :: Users -> String
$cshow :: Users -> String
showsPrec :: I32 -> Users -> ShowS
$cshowsPrec :: I32 -> Users -> ShowS
Show, Users -> Users -> Bool
(Users -> Users -> Bool) -> (Users -> Users -> Bool) -> Eq Users
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Users -> Users -> Bool
$c/= :: Users -> Users -> Bool
== :: Users -> Users -> Bool
$c== :: Users -> Users -> Bool
Eq, (forall x. Users -> Rep Users x)
-> (forall x. Rep Users x -> Users) -> Generic Users
forall x. Rep Users x -> Users
forall x. Users -> Rep Users x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Users x -> Users
$cfrom :: forall x. Users -> Rep Users x
Generic)
data ChatAdministrator
  = -- | Contains information about a chat administrator 
  ChatAdministrator
    { -- | User identifier of the administrator 
      ChatAdministrator -> I32
userId :: I32,
      -- | Custom title of the administrator 
      ChatAdministrator -> T
customTitle :: T,
      -- | True, if the user is the owner of the chat
      ChatAdministrator -> Bool
isOwner :: Bool
    }
  deriving (I32 -> ChatAdministrator -> ShowS
[ChatAdministrator] -> ShowS
ChatAdministrator -> String
(I32 -> ChatAdministrator -> ShowS)
-> (ChatAdministrator -> String)
-> ([ChatAdministrator] -> ShowS)
-> Show ChatAdministrator
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatAdministrator] -> ShowS
$cshowList :: [ChatAdministrator] -> ShowS
show :: ChatAdministrator -> String
$cshow :: ChatAdministrator -> String
showsPrec :: I32 -> ChatAdministrator -> ShowS
$cshowsPrec :: I32 -> ChatAdministrator -> ShowS
Show, ChatAdministrator -> ChatAdministrator -> Bool
(ChatAdministrator -> ChatAdministrator -> Bool)
-> (ChatAdministrator -> ChatAdministrator -> Bool)
-> Eq ChatAdministrator
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatAdministrator -> ChatAdministrator -> Bool
$c/= :: ChatAdministrator -> ChatAdministrator -> Bool
== :: ChatAdministrator -> ChatAdministrator -> Bool
$c== :: ChatAdministrator -> ChatAdministrator -> Bool
Eq, (forall x. ChatAdministrator -> Rep ChatAdministrator x)
-> (forall x. Rep ChatAdministrator x -> ChatAdministrator)
-> Generic ChatAdministrator
forall x. Rep ChatAdministrator x -> ChatAdministrator
forall x. ChatAdministrator -> Rep ChatAdministrator x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatAdministrator x -> ChatAdministrator
$cfrom :: forall x. ChatAdministrator -> Rep ChatAdministrator x
Generic)
data ChatAdministrators
  = -- | Represents a list of chat administrators 
  ChatAdministrators
    { -- | A list of chat administrators
      ChatAdministrators -> [ChatAdministrator]
administrators :: [ChatAdministrator]
    }
  deriving (I32 -> ChatAdministrators -> ShowS
[ChatAdministrators] -> ShowS
ChatAdministrators -> String
(I32 -> ChatAdministrators -> ShowS)
-> (ChatAdministrators -> String)
-> ([ChatAdministrators] -> ShowS)
-> Show ChatAdministrators
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatAdministrators] -> ShowS
$cshowList :: [ChatAdministrators] -> ShowS
show :: ChatAdministrators -> String
$cshow :: ChatAdministrators -> String
showsPrec :: I32 -> ChatAdministrators -> ShowS
$cshowsPrec :: I32 -> ChatAdministrators -> ShowS
Show, ChatAdministrators -> ChatAdministrators -> Bool
(ChatAdministrators -> ChatAdministrators -> Bool)
-> (ChatAdministrators -> ChatAdministrators -> Bool)
-> Eq ChatAdministrators
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatAdministrators -> ChatAdministrators -> Bool
$c/= :: ChatAdministrators -> ChatAdministrators -> Bool
== :: ChatAdministrators -> ChatAdministrators -> Bool
$c== :: ChatAdministrators -> ChatAdministrators -> Bool
Eq, (forall x. ChatAdministrators -> Rep ChatAdministrators x)
-> (forall x. Rep ChatAdministrators x -> ChatAdministrators)
-> Generic ChatAdministrators
forall x. Rep ChatAdministrators x -> ChatAdministrators
forall x. ChatAdministrators -> Rep ChatAdministrators x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatAdministrators x -> ChatAdministrators
$cfrom :: forall x. ChatAdministrators -> Rep ChatAdministrators x
Generic)
data ChatPermissions
  = -- | Describes actions that a user is allowed to take in a chat
  ChatPermissions
    { -- | True, if the user can send text messages, contacts, locations, and venues
      ChatPermissions -> Bool
canSendMessages :: Bool,
      -- | True, if the user can send audio files, documents, photos, videos, video notes, and voice notes. Implies can_send_messages permissions
      ChatPermissions -> Bool
canSendMediaMessages :: Bool,
      -- | True, if the user can send polls. Implies can_send_messages permissions
      ChatPermissions -> Bool
canSendPolls :: Bool,
      -- | True, if the user can send animations, games, and stickers and use inline bots. Implies can_send_messages permissions
      ChatPermissions -> Bool
canSendOtherMessages :: Bool,
      -- | True, if the user may add a web page preview to their messages. Implies can_send_messages permissions
      ChatPermissions -> Bool
canAddWebPagePreviews :: Bool,
      -- | True, if the user can change the chat title, photo, and other settings
      ChatPermissions -> Bool
canChangeInfo :: Bool,
      -- | True, if the user can invite new users to the chat
      ChatPermissions -> Bool
canInviteUsers :: Bool,
      -- | True, if the user can pin messages
      ChatPermissions -> Bool
canPinMessages :: Bool
    }
  deriving (I32 -> ChatPermissions -> ShowS
[ChatPermissions] -> ShowS
ChatPermissions -> String
(I32 -> ChatPermissions -> ShowS)
-> (ChatPermissions -> String)
-> ([ChatPermissions] -> ShowS)
-> Show ChatPermissions
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatPermissions] -> ShowS
$cshowList :: [ChatPermissions] -> ShowS
show :: ChatPermissions -> String
$cshow :: ChatPermissions -> String
showsPrec :: I32 -> ChatPermissions -> ShowS
$cshowsPrec :: I32 -> ChatPermissions -> ShowS
Show, ChatPermissions -> ChatPermissions -> Bool
(ChatPermissions -> ChatPermissions -> Bool)
-> (ChatPermissions -> ChatPermissions -> Bool)
-> Eq ChatPermissions
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatPermissions -> ChatPermissions -> Bool
$c/= :: ChatPermissions -> ChatPermissions -> Bool
== :: ChatPermissions -> ChatPermissions -> Bool
$c== :: ChatPermissions -> ChatPermissions -> Bool
Eq, (forall x. ChatPermissions -> Rep ChatPermissions x)
-> (forall x. Rep ChatPermissions x -> ChatPermissions)
-> Generic ChatPermissions
forall x. Rep ChatPermissions x -> ChatPermissions
forall x. ChatPermissions -> Rep ChatPermissions x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatPermissions x -> ChatPermissions
$cfrom :: forall x. ChatPermissions -> Rep ChatPermissions x
Generic)
-- | Provides information about the status of a member in a chat
data ChatMemberStatus
  = -- | The user is the owner of a chat and has all the administrator privileges
  ChatMemberStatusCreator
    { -- | A custom title of the owner; 0-16 characters without emojis; applicable to supergroups only
      ChatMemberStatus -> T
customTitle :: T,
      -- | True, if the user is a member of the chat
      ChatMemberStatus -> Bool
isMember :: Bool
    }
  | -- | The user is a member of a chat and has some additional privileges. In basic groups, administrators can edit and delete messages sent by others, add new members, and ban unprivileged members. In supergroups and channels, there are more detailed options for administrator privileges
  ChatMemberStatusAdministrator
    { -- | A custom title of the administrator; 0-16 characters without emojis; applicable to supergroups only
      customTitle :: T,
      -- | True, if the current user can edit the administrator privileges for the called user
      ChatMemberStatus -> Bool
canBeEdited :: Bool,
      -- | True, if the administrator can change the chat title, photo, and other settings
      ChatMemberStatus -> Bool
canChangeInfo :: Bool,
      -- | True, if the administrator can create channel posts; applicable to channels only
      ChatMemberStatus -> Bool
canPostMessages :: Bool,
      -- | True, if the administrator can edit messages of other users and pin messages; applicable to channels only
      ChatMemberStatus -> Bool
canEditMessages :: Bool,
      -- | True, if the administrator can delete messages of other users
      ChatMemberStatus -> Bool
canDeleteMessages :: Bool,
      -- | True, if the administrator can invite new users to the chat
      ChatMemberStatus -> Bool
canInviteUsers :: Bool,
      -- | True, if the administrator can restrict, ban, or unban chat members
      ChatMemberStatus -> Bool
canRestrictMembers :: Bool,
      -- | True, if the administrator can pin messages; applicable to groups only
      ChatMemberStatus -> Bool
canPinMessages :: Bool,
      -- | True, if the administrator can add new administrators with a subset of their own privileges or demote administrators that were directly or indirectly promoted by them
      ChatMemberStatus -> Bool
canPromoteMembers :: Bool
    }
  | -- | The user is a member of a chat, without any additional privileges or restrictions
  ChatMemberStatusMember
    { 
    }
  | -- | The user is under certain restrictions in the chat. Not supported in basic groups and channels
  ChatMemberStatusRestricted
    { -- | True, if the user is a member of the chat
      isMember :: Bool,
      -- | Point in time (Unix timestamp) when restrictions will be lifted from the user; 0 if never. If the user is restricted for more than 366 days or for less than 30 seconds from the current time, the user is considered to be restricted forever
      ChatMemberStatus -> I32
restrictedUntilDate :: I32,
      -- | User permissions in the chat
      ChatMemberStatus -> ChatPermissions
permissions :: ChatPermissions
    }
  | -- | The user is not a chat member
  ChatMemberStatusLeft
    { 
    }
  | -- | The user was banned (and hence is not a member of the chat). Implies the user can't return to the chat or view messages
  ChatMemberStatusBanned
    { -- | Point in time (Unix timestamp) when the user will be unbanned; 0 if never. If the user is banned for more than 366 days or for less than 30 seconds from the current time, the user is considered to be banned forever
      ChatMemberStatus -> I32
bannedUntilDate :: I32
    }
  deriving (I32 -> ChatMemberStatus -> ShowS
[ChatMemberStatus] -> ShowS
ChatMemberStatus -> String
(I32 -> ChatMemberStatus -> ShowS)
-> (ChatMemberStatus -> String)
-> ([ChatMemberStatus] -> ShowS)
-> Show ChatMemberStatus
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatMemberStatus] -> ShowS
$cshowList :: [ChatMemberStatus] -> ShowS
show :: ChatMemberStatus -> String
$cshow :: ChatMemberStatus -> String
showsPrec :: I32 -> ChatMemberStatus -> ShowS
$cshowsPrec :: I32 -> ChatMemberStatus -> ShowS
Show, ChatMemberStatus -> ChatMemberStatus -> Bool
(ChatMemberStatus -> ChatMemberStatus -> Bool)
-> (ChatMemberStatus -> ChatMemberStatus -> Bool)
-> Eq ChatMemberStatus
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatMemberStatus -> ChatMemberStatus -> Bool
$c/= :: ChatMemberStatus -> ChatMemberStatus -> Bool
== :: ChatMemberStatus -> ChatMemberStatus -> Bool
$c== :: ChatMemberStatus -> ChatMemberStatus -> Bool
Eq, (forall x. ChatMemberStatus -> Rep ChatMemberStatus x)
-> (forall x. Rep ChatMemberStatus x -> ChatMemberStatus)
-> Generic ChatMemberStatus
forall x. Rep ChatMemberStatus x -> ChatMemberStatus
forall x. ChatMemberStatus -> Rep ChatMemberStatus x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatMemberStatus x -> ChatMemberStatus
$cfrom :: forall x. ChatMemberStatus -> Rep ChatMemberStatus x
Generic)
data ChatMember
  = -- | A user with information about joining/leaving a chat 
  ChatMember
    { -- | User identifier of the chat member 
      ChatMember -> I32
userId :: I32,
      -- | Identifier of a user that invited/promoted/banned this member in the chat; 0 if unknown
      ChatMember -> I32
inviterUserId :: I32,
      -- | Point in time (Unix timestamp) when the user joined a chat 
      ChatMember -> I32
joinedChatDate :: I32,
      -- | Status of the member in the chat 
      ChatMember -> ChatMemberStatus
status :: ChatMemberStatus,
      -- | If the user is a bot, information about the bot; may be null. Can be null even for a bot if the bot is not a chat member
      ChatMember -> Maybe BotInfo
botInfo :: (Maybe) (BotInfo)
    }
  deriving (I32 -> ChatMember -> ShowS
[ChatMember] -> ShowS
ChatMember -> String
(I32 -> ChatMember -> ShowS)
-> (ChatMember -> String)
-> ([ChatMember] -> ShowS)
-> Show ChatMember
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatMember] -> ShowS
$cshowList :: [ChatMember] -> ShowS
show :: ChatMember -> String
$cshow :: ChatMember -> String
showsPrec :: I32 -> ChatMember -> ShowS
$cshowsPrec :: I32 -> ChatMember -> ShowS
Show, ChatMember -> ChatMember -> Bool
(ChatMember -> ChatMember -> Bool)
-> (ChatMember -> ChatMember -> Bool) -> Eq ChatMember
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatMember -> ChatMember -> Bool
$c/= :: ChatMember -> ChatMember -> Bool
== :: ChatMember -> ChatMember -> Bool
$c== :: ChatMember -> ChatMember -> Bool
Eq, (forall x. ChatMember -> Rep ChatMember x)
-> (forall x. Rep ChatMember x -> ChatMember) -> Generic ChatMember
forall x. Rep ChatMember x -> ChatMember
forall x. ChatMember -> Rep ChatMember x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatMember x -> ChatMember
$cfrom :: forall x. ChatMember -> Rep ChatMember x
Generic)
data ChatMembers
  = -- | Contains a list of chat members 
  ChatMembers
    { -- | Approximate total count of chat members found 
      ChatMembers -> I32
totalCount :: I32,
      -- | A list of chat members
      ChatMembers -> [ChatMember]
members :: [ChatMember]
    }
  deriving (I32 -> ChatMembers -> ShowS
[ChatMembers] -> ShowS
ChatMembers -> String
(I32 -> ChatMembers -> ShowS)
-> (ChatMembers -> String)
-> ([ChatMembers] -> ShowS)
-> Show ChatMembers
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatMembers] -> ShowS
$cshowList :: [ChatMembers] -> ShowS
show :: ChatMembers -> String
$cshow :: ChatMembers -> String
showsPrec :: I32 -> ChatMembers -> ShowS
$cshowsPrec :: I32 -> ChatMembers -> ShowS
Show, ChatMembers -> ChatMembers -> Bool
(ChatMembers -> ChatMembers -> Bool)
-> (ChatMembers -> ChatMembers -> Bool) -> Eq ChatMembers
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatMembers -> ChatMembers -> Bool
$c/= :: ChatMembers -> ChatMembers -> Bool
== :: ChatMembers -> ChatMembers -> Bool
$c== :: ChatMembers -> ChatMembers -> Bool
Eq, (forall x. ChatMembers -> Rep ChatMembers x)
-> (forall x. Rep ChatMembers x -> ChatMembers)
-> Generic ChatMembers
forall x. Rep ChatMembers x -> ChatMembers
forall x. ChatMembers -> Rep ChatMembers x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatMembers x -> ChatMembers
$cfrom :: forall x. ChatMembers -> Rep ChatMembers x
Generic)
-- | Specifies the kind of chat members to return in searchChatMembers
data ChatMembersFilter
  = -- | Returns contacts of the user
  ChatMembersFilterContacts
    { 
    }
  | -- | Returns the owner and administrators
  ChatMembersFilterAdministrators
    { 
    }
  | -- | Returns all chat members, including restricted chat members
  ChatMembersFilterMembers
    { 
    }
  | -- | Returns users under certain restrictions in the chat; can be used only by administrators in a supergroup
  ChatMembersFilterRestricted
    { 
    }
  | -- | Returns users banned from the chat; can be used only by administrators in a supergroup or in a channel
  ChatMembersFilterBanned
    { 
    }
  | -- | Returns bot members of the chat
  ChatMembersFilterBots
    { 
    }
  deriving (I32 -> ChatMembersFilter -> ShowS
[ChatMembersFilter] -> ShowS
ChatMembersFilter -> String
(I32 -> ChatMembersFilter -> ShowS)
-> (ChatMembersFilter -> String)
-> ([ChatMembersFilter] -> ShowS)
-> Show ChatMembersFilter
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatMembersFilter] -> ShowS
$cshowList :: [ChatMembersFilter] -> ShowS
show :: ChatMembersFilter -> String
$cshow :: ChatMembersFilter -> String
showsPrec :: I32 -> ChatMembersFilter -> ShowS
$cshowsPrec :: I32 -> ChatMembersFilter -> ShowS
Show, ChatMembersFilter -> ChatMembersFilter -> Bool
(ChatMembersFilter -> ChatMembersFilter -> Bool)
-> (ChatMembersFilter -> ChatMembersFilter -> Bool)
-> Eq ChatMembersFilter
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatMembersFilter -> ChatMembersFilter -> Bool
$c/= :: ChatMembersFilter -> ChatMembersFilter -> Bool
== :: ChatMembersFilter -> ChatMembersFilter -> Bool
$c== :: ChatMembersFilter -> ChatMembersFilter -> Bool
Eq, (forall x. ChatMembersFilter -> Rep ChatMembersFilter x)
-> (forall x. Rep ChatMembersFilter x -> ChatMembersFilter)
-> Generic ChatMembersFilter
forall x. Rep ChatMembersFilter x -> ChatMembersFilter
forall x. ChatMembersFilter -> Rep ChatMembersFilter x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatMembersFilter x -> ChatMembersFilter
$cfrom :: forall x. ChatMembersFilter -> Rep ChatMembersFilter x
Generic)
-- | Specifies the kind of chat members to return in getSupergroupMembers
data SupergroupMembersFilter
  = -- | Returns recently active users in reverse chronological order
  SupergroupMembersFilterRecent
    { 
    }
  | -- | Returns contacts of the user, which are members of the supergroup or channel 
  SupergroupMembersFilterContacts
    { -- | Query to search for
      SupergroupMembersFilter -> T
query :: T
    }
  | -- | Returns the owner and administrators
  SupergroupMembersFilterAdministrators
    { 
    }
  | -- | Used to search for supergroup or channel members via a (string) query 
  SupergroupMembersFilterSearch
    { -- | Query to search for
      query :: T
    }
  | -- | Returns restricted supergroup members; can be used only by administrators 
  SupergroupMembersFilterRestricted
    { -- | Query to search for
      query :: T
    }
  | -- | Returns users banned from the supergroup or channel; can be used only by administrators 
  SupergroupMembersFilterBanned
    { -- | Query to search for
      query :: T
    }
  | -- | Returns bot members of the supergroup or channel
  SupergroupMembersFilterBots
    { 
    }
  deriving (I32 -> SupergroupMembersFilter -> ShowS
[SupergroupMembersFilter] -> ShowS
SupergroupMembersFilter -> String
(I32 -> SupergroupMembersFilter -> ShowS)
-> (SupergroupMembersFilter -> String)
-> ([SupergroupMembersFilter] -> ShowS)
-> Show SupergroupMembersFilter
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [SupergroupMembersFilter] -> ShowS
$cshowList :: [SupergroupMembersFilter] -> ShowS
show :: SupergroupMembersFilter -> String
$cshow :: SupergroupMembersFilter -> String
showsPrec :: I32 -> SupergroupMembersFilter -> ShowS
$cshowsPrec :: I32 -> SupergroupMembersFilter -> ShowS
Show, SupergroupMembersFilter -> SupergroupMembersFilter -> Bool
(SupergroupMembersFilter -> SupergroupMembersFilter -> Bool)
-> (SupergroupMembersFilter -> SupergroupMembersFilter -> Bool)
-> Eq SupergroupMembersFilter
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SupergroupMembersFilter -> SupergroupMembersFilter -> Bool
$c/= :: SupergroupMembersFilter -> SupergroupMembersFilter -> Bool
== :: SupergroupMembersFilter -> SupergroupMembersFilter -> Bool
$c== :: SupergroupMembersFilter -> SupergroupMembersFilter -> Bool
Eq, (forall x.
 SupergroupMembersFilter -> Rep SupergroupMembersFilter x)
-> (forall x.
    Rep SupergroupMembersFilter x -> SupergroupMembersFilter)
-> Generic SupergroupMembersFilter
forall x. Rep SupergroupMembersFilter x -> SupergroupMembersFilter
forall x. SupergroupMembersFilter -> Rep SupergroupMembersFilter x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep SupergroupMembersFilter x -> SupergroupMembersFilter
$cfrom :: forall x. SupergroupMembersFilter -> Rep SupergroupMembersFilter x
Generic)
data BasicGroup
  = -- | Represents a basic group of 0-200 users (must be upgraded to a supergroup to accommodate more than 200 users)
  BasicGroup
    { -- | Group identifier
      BasicGroup -> I32
id :: I32,
      -- | Number of members in the group
      BasicGroup -> I32
memberCount :: I32,
      -- | Status of the current user in the group
      BasicGroup -> ChatMemberStatus
status :: ChatMemberStatus,
      -- | True, if the group is active
      BasicGroup -> Bool
isActive :: Bool,
      -- | Identifier of the supergroup to which this group was upgraded; 0 if none
      BasicGroup -> I32
upgradedToSupergroupId :: I32
    }
  deriving (I32 -> BasicGroup -> ShowS
[BasicGroup] -> ShowS
BasicGroup -> String
(I32 -> BasicGroup -> ShowS)
-> (BasicGroup -> String)
-> ([BasicGroup] -> ShowS)
-> Show BasicGroup
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [BasicGroup] -> ShowS
$cshowList :: [BasicGroup] -> ShowS
show :: BasicGroup -> String
$cshow :: BasicGroup -> String
showsPrec :: I32 -> BasicGroup -> ShowS
$cshowsPrec :: I32 -> BasicGroup -> ShowS
Show, BasicGroup -> BasicGroup -> Bool
(BasicGroup -> BasicGroup -> Bool)
-> (BasicGroup -> BasicGroup -> Bool) -> Eq BasicGroup
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: BasicGroup -> BasicGroup -> Bool
$c/= :: BasicGroup -> BasicGroup -> Bool
== :: BasicGroup -> BasicGroup -> Bool
$c== :: BasicGroup -> BasicGroup -> Bool
Eq, (forall x. BasicGroup -> Rep BasicGroup x)
-> (forall x. Rep BasicGroup x -> BasicGroup) -> Generic BasicGroup
forall x. Rep BasicGroup x -> BasicGroup
forall x. BasicGroup -> Rep BasicGroup x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep BasicGroup x -> BasicGroup
$cfrom :: forall x. BasicGroup -> Rep BasicGroup x
Generic)
data BasicGroupFullInfo
  = -- | Contains full information about a basic group 
  BasicGroupFullInfo
    { -- | Contains full information about a basic group 
      BasicGroupFullInfo -> T
description :: T,
      -- | User identifier of the creator of the group; 0 if unknown 
      BasicGroupFullInfo -> I32
creatorUserId :: I32,
      -- | Group members 
      BasicGroupFullInfo -> [ChatMember]
members :: [ChatMember],
      -- | Invite link for this group; available only after it has been generated at least once and only for the group creator
      BasicGroupFullInfo -> T
inviteLink :: T
    }
  deriving (I32 -> BasicGroupFullInfo -> ShowS
[BasicGroupFullInfo] -> ShowS
BasicGroupFullInfo -> String
(I32 -> BasicGroupFullInfo -> ShowS)
-> (BasicGroupFullInfo -> String)
-> ([BasicGroupFullInfo] -> ShowS)
-> Show BasicGroupFullInfo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [BasicGroupFullInfo] -> ShowS
$cshowList :: [BasicGroupFullInfo] -> ShowS
show :: BasicGroupFullInfo -> String
$cshow :: BasicGroupFullInfo -> String
showsPrec :: I32 -> BasicGroupFullInfo -> ShowS
$cshowsPrec :: I32 -> BasicGroupFullInfo -> ShowS
Show, BasicGroupFullInfo -> BasicGroupFullInfo -> Bool
(BasicGroupFullInfo -> BasicGroupFullInfo -> Bool)
-> (BasicGroupFullInfo -> BasicGroupFullInfo -> Bool)
-> Eq BasicGroupFullInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: BasicGroupFullInfo -> BasicGroupFullInfo -> Bool
$c/= :: BasicGroupFullInfo -> BasicGroupFullInfo -> Bool
== :: BasicGroupFullInfo -> BasicGroupFullInfo -> Bool
$c== :: BasicGroupFullInfo -> BasicGroupFullInfo -> Bool
Eq, (forall x. BasicGroupFullInfo -> Rep BasicGroupFullInfo x)
-> (forall x. Rep BasicGroupFullInfo x -> BasicGroupFullInfo)
-> Generic BasicGroupFullInfo
forall x. Rep BasicGroupFullInfo x -> BasicGroupFullInfo
forall x. BasicGroupFullInfo -> Rep BasicGroupFullInfo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep BasicGroupFullInfo x -> BasicGroupFullInfo
$cfrom :: forall x. BasicGroupFullInfo -> Rep BasicGroupFullInfo x
Generic)
data Supergroup
  = -- | Represents a supergroup or channel with zero or more members (subscribers in the case of channels). From the point of view of the system, a channel is a special kind of a supergroup: only administrators can post and see the list of members, and posts from all administrators use the name and photo of the channel instead of individual names and profile photos. Unlike supergroups, channels can have an unlimited number of subscribers
  Supergroup
    { -- | Supergroup or channel identifier
      Supergroup -> I32
id :: I32,
      -- | Username of the supergroup or channel; empty for private supergroups or channels
      Supergroup -> T
username :: T,
      -- | Point in time (Unix timestamp) when the current user joined, or the point in time when the supergroup or channel was created, in case the user is not a member
      Supergroup -> I32
date :: I32,
      -- | Status of the current user in the supergroup or channel; custom title will be always empty
      Supergroup -> ChatMemberStatus
status :: ChatMemberStatus,
      -- | Number of members in the supergroup or channel; 0 if unknown. Currently it is guaranteed to be known only if the supergroup or channel was found through SearchPublicChats
      Supergroup -> I32
memberCount :: I32,
      -- | True, if the channel has a discussion group, or the supergroup is the designated discussion group for a channel
      Supergroup -> Bool
hasLinkedChat :: Bool,
      -- | True, if the supergroup is connected to a location, i.e. the supergroup is a location-based supergroup
      Supergroup -> Bool
hasLocation :: Bool,
      -- | True, if messages sent to the channel should contain information about the sender. This field is only applicable to channels
      Supergroup -> Bool
signMessages :: Bool,
      -- | True, if the slow mode is enabled in the supergroup
      Supergroup -> Bool
isSlowModeEnabled :: Bool,
      -- | True, if the supergroup is a channel
      Supergroup -> Bool
isChannel :: Bool,
      -- | True, if the supergroup or channel is verified
      Supergroup -> Bool
isVerified :: Bool,
      -- | If non-empty, contains a human-readable description of the reason why access to this supergroup or channel must be restricted
      Supergroup -> T
restrictionReason :: T,
      -- | True, if many users reported this supergroup as a scam
      Supergroup -> Bool
isScam :: Bool
    }
  deriving (I32 -> Supergroup -> ShowS
[Supergroup] -> ShowS
Supergroup -> String
(I32 -> Supergroup -> ShowS)
-> (Supergroup -> String)
-> ([Supergroup] -> ShowS)
-> Show Supergroup
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Supergroup] -> ShowS
$cshowList :: [Supergroup] -> ShowS
show :: Supergroup -> String
$cshow :: Supergroup -> String
showsPrec :: I32 -> Supergroup -> ShowS
$cshowsPrec :: I32 -> Supergroup -> ShowS
Show, Supergroup -> Supergroup -> Bool
(Supergroup -> Supergroup -> Bool)
-> (Supergroup -> Supergroup -> Bool) -> Eq Supergroup
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Supergroup -> Supergroup -> Bool
$c/= :: Supergroup -> Supergroup -> Bool
== :: Supergroup -> Supergroup -> Bool
$c== :: Supergroup -> Supergroup -> Bool
Eq, (forall x. Supergroup -> Rep Supergroup x)
-> (forall x. Rep Supergroup x -> Supergroup) -> Generic Supergroup
forall x. Rep Supergroup x -> Supergroup
forall x. Supergroup -> Rep Supergroup x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Supergroup x -> Supergroup
$cfrom :: forall x. Supergroup -> Rep Supergroup x
Generic)
data SupergroupFullInfo
  = -- | Contains full information about a supergroup or channel
  SupergroupFullInfo
    { -- | Contains full information about a supergroup or channel
      SupergroupFullInfo -> T
description :: T,
      -- | Number of members in the supergroup or channel; 0 if unknown
      SupergroupFullInfo -> I32
memberCount :: I32,
      -- | Number of privileged users in the supergroup or channel; 0 if unknown
      SupergroupFullInfo -> I32
administratorCount :: I32,
      -- | Number of restricted users in the supergroup; 0 if unknown
      SupergroupFullInfo -> I32
restrictedCount :: I32,
      -- | Number of users banned from chat; 0 if unknown
      SupergroupFullInfo -> I32
bannedCount :: I32,
      -- | Chat identifier of a discussion group for the channel, or a channel, for which the supergroup is the designated discussion group; 0 if none or unknown
      SupergroupFullInfo -> I32
linkedChatId :: I53,
      -- | Delay between consecutive sent messages for non-administrator supergroup members, in seconds
      SupergroupFullInfo -> I32
slowModeDelay :: I32,
      -- | Time left before next message can be sent in the supergroup, in seconds. An updateSupergroupFullInfo update is not triggered when value of this field changes, but both new and old values are non-zero
      SupergroupFullInfo -> Double
slowModeDelayExpiresIn :: Double,
      -- | True, if members of the chat can be retrieved
      SupergroupFullInfo -> Bool
canGetMembers :: Bool,
      -- | True, if the chat username can be changed
      SupergroupFullInfo -> Bool
canSetUsername :: Bool,
      -- | True, if the supergroup sticker set can be changed
      SupergroupFullInfo -> Bool
canSetStickerSet :: Bool,
      -- | True, if the supergroup location can be changed
      SupergroupFullInfo -> Bool
canSetLocation :: Bool,
      -- | True, if the channel statistics is available
      SupergroupFullInfo -> Bool
canViewStatistics :: Bool,
      -- | True, if new chat members will have access to old messages. In public or discussion groups and both public and private channels, old messages are always available, so this option affects only private supergroups without a linked chat. The value of this field is only available for chat administrators
      SupergroupFullInfo -> Bool
isAllHistoryAvailable :: Bool,
      -- | Identifier of the supergroup sticker set; 0 if none
      SupergroupFullInfo -> I64
stickerSetId :: I64,
      -- | Location to which the supergroup is connected; may be null
      SupergroupFullInfo -> Maybe ChatLocation
location :: (Maybe) (ChatLocation),
      -- | Invite link for this chat
      SupergroupFullInfo -> T
inviteLink :: T,
      -- | Identifier of the basic group from which supergroup was upgraded; 0 if none
      SupergroupFullInfo -> I32
upgradedFromBasicGroupId :: I32,
      -- | Identifier of the last message in the basic group from which supergroup was upgraded; 0 if none
      SupergroupFullInfo -> I32
upgradedFromMaxMessageId :: I53
    }
  deriving (I32 -> SupergroupFullInfo -> ShowS
[SupergroupFullInfo] -> ShowS
SupergroupFullInfo -> String
(I32 -> SupergroupFullInfo -> ShowS)
-> (SupergroupFullInfo -> String)
-> ([SupergroupFullInfo] -> ShowS)
-> Show SupergroupFullInfo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [SupergroupFullInfo] -> ShowS
$cshowList :: [SupergroupFullInfo] -> ShowS
show :: SupergroupFullInfo -> String
$cshow :: SupergroupFullInfo -> String
showsPrec :: I32 -> SupergroupFullInfo -> ShowS
$cshowsPrec :: I32 -> SupergroupFullInfo -> ShowS
Show, SupergroupFullInfo -> SupergroupFullInfo -> Bool
(SupergroupFullInfo -> SupergroupFullInfo -> Bool)
-> (SupergroupFullInfo -> SupergroupFullInfo -> Bool)
-> Eq SupergroupFullInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SupergroupFullInfo -> SupergroupFullInfo -> Bool
$c/= :: SupergroupFullInfo -> SupergroupFullInfo -> Bool
== :: SupergroupFullInfo -> SupergroupFullInfo -> Bool
$c== :: SupergroupFullInfo -> SupergroupFullInfo -> Bool
Eq, (forall x. SupergroupFullInfo -> Rep SupergroupFullInfo x)
-> (forall x. Rep SupergroupFullInfo x -> SupergroupFullInfo)
-> Generic SupergroupFullInfo
forall x. Rep SupergroupFullInfo x -> SupergroupFullInfo
forall x. SupergroupFullInfo -> Rep SupergroupFullInfo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep SupergroupFullInfo x -> SupergroupFullInfo
$cfrom :: forall x. SupergroupFullInfo -> Rep SupergroupFullInfo x
Generic)
-- | Describes the current secret chat state
data SecretChatState
  = -- | The secret chat is not yet created; waiting for the other user to get online
  SecretChatStatePending
    { 
    }
  | -- | The secret chat is ready to use
  SecretChatStateReady
    { 
    }
  | -- | The secret chat is closed
  SecretChatStateClosed
    { 
    }
  deriving (I32 -> SecretChatState -> ShowS
[SecretChatState] -> ShowS
SecretChatState -> String
(I32 -> SecretChatState -> ShowS)
-> (SecretChatState -> String)
-> ([SecretChatState] -> ShowS)
-> Show SecretChatState
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [SecretChatState] -> ShowS
$cshowList :: [SecretChatState] -> ShowS
show :: SecretChatState -> String
$cshow :: SecretChatState -> String
showsPrec :: I32 -> SecretChatState -> ShowS
$cshowsPrec :: I32 -> SecretChatState -> ShowS
Show, SecretChatState -> SecretChatState -> Bool
(SecretChatState -> SecretChatState -> Bool)
-> (SecretChatState -> SecretChatState -> Bool)
-> Eq SecretChatState
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SecretChatState -> SecretChatState -> Bool
$c/= :: SecretChatState -> SecretChatState -> Bool
== :: SecretChatState -> SecretChatState -> Bool
$c== :: SecretChatState -> SecretChatState -> Bool
Eq, (forall x. SecretChatState -> Rep SecretChatState x)
-> (forall x. Rep SecretChatState x -> SecretChatState)
-> Generic SecretChatState
forall x. Rep SecretChatState x -> SecretChatState
forall x. SecretChatState -> Rep SecretChatState x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep SecretChatState x -> SecretChatState
$cfrom :: forall x. SecretChatState -> Rep SecretChatState x
Generic)
data SecretChat
  = -- | Represents a secret chat
  SecretChat
    { -- | Secret chat identifier
      SecretChat -> I32
id :: I32,
      -- | Identifier of the chat partner
      SecretChat -> I32
userId :: I32,
      -- | State of the secret chat
      SecretChat -> SecretChatState
state :: SecretChatState,
      -- | True, if the chat was created by the current user; otherwise false
      SecretChat -> Bool
isOutbound :: Bool,
      -- | Current message Time To Live setting (self-destruct timer) for the chat, in seconds
      SecretChat -> I32
ttl :: I32,
      -- | Hash of the currently used key for comparison with the hash of the chat partner's key. This is a string of 36 little-endian bytes, which must be split into groups of 2 bits, each denoting a pixel of one of 4 colors FFFFFF, D5E6F3, 2D5775, and 2F99C9.
      SecretChat -> ByteString64
keyHash :: ByteString64,
      -- | Secret chat layer; determines features supported by the other client. Video notes are supported if the layer >= 66; nested text entities and underline and strikethrough entities are supported if the layer >= 101
      SecretChat -> I32
layer :: I32
    }
  deriving (I32 -> SecretChat -> ShowS
[SecretChat] -> ShowS
SecretChat -> String
(I32 -> SecretChat -> ShowS)
-> (SecretChat -> String)
-> ([SecretChat] -> ShowS)
-> Show SecretChat
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [SecretChat] -> ShowS
$cshowList :: [SecretChat] -> ShowS
show :: SecretChat -> String
$cshow :: SecretChat -> String
showsPrec :: I32 -> SecretChat -> ShowS
$cshowsPrec :: I32 -> SecretChat -> ShowS
Show, SecretChat -> SecretChat -> Bool
(SecretChat -> SecretChat -> Bool)
-> (SecretChat -> SecretChat -> Bool) -> Eq SecretChat
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SecretChat -> SecretChat -> Bool
$c/= :: SecretChat -> SecretChat -> Bool
== :: SecretChat -> SecretChat -> Bool
$c== :: SecretChat -> SecretChat -> Bool
Eq, (forall x. SecretChat -> Rep SecretChat x)
-> (forall x. Rep SecretChat x -> SecretChat) -> Generic SecretChat
forall x. Rep SecretChat x -> SecretChat
forall x. SecretChat -> Rep SecretChat x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep SecretChat x -> SecretChat
$cfrom :: forall x. SecretChat -> Rep SecretChat x
Generic)
-- | Contains information about the origin of a forwarded message
data MessageForwardOrigin
  = -- | The message was originally written by a known user 
  MessageForwardOriginUser
    { -- | Identifier of the user that originally sent the message
      MessageForwardOrigin -> I32
senderUserId :: I32
    }
  | -- | The message was originally written by a user, which is hidden by their privacy settings 
  MessageForwardOriginHiddenUser
    { -- | Name of the sender
      MessageForwardOrigin -> T
senderName :: T
    }
  | -- | The message was originally a post in a channel
  MessageForwardOriginChannel
    { -- | Identifier of the chat from which the message was originally forwarded
      MessageForwardOrigin -> I32
chatId :: I53,
      -- | Message identifier of the original message; 0 if unknown
      MessageForwardOrigin -> I32
messageId :: I53,
      -- | Original post author signature
      MessageForwardOrigin -> T
authorSignature :: T
    }
  deriving (I32 -> MessageForwardOrigin -> ShowS
[MessageForwardOrigin] -> ShowS
MessageForwardOrigin -> String
(I32 -> MessageForwardOrigin -> ShowS)
-> (MessageForwardOrigin -> String)
-> ([MessageForwardOrigin] -> ShowS)
-> Show MessageForwardOrigin
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [MessageForwardOrigin] -> ShowS
$cshowList :: [MessageForwardOrigin] -> ShowS
show :: MessageForwardOrigin -> String
$cshow :: MessageForwardOrigin -> String
showsPrec :: I32 -> MessageForwardOrigin -> ShowS
$cshowsPrec :: I32 -> MessageForwardOrigin -> ShowS
Show, MessageForwardOrigin -> MessageForwardOrigin -> Bool
(MessageForwardOrigin -> MessageForwardOrigin -> Bool)
-> (MessageForwardOrigin -> MessageForwardOrigin -> Bool)
-> Eq MessageForwardOrigin
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: MessageForwardOrigin -> MessageForwardOrigin -> Bool
$c/= :: MessageForwardOrigin -> MessageForwardOrigin -> Bool
== :: MessageForwardOrigin -> MessageForwardOrigin -> Bool
$c== :: MessageForwardOrigin -> MessageForwardOrigin -> Bool
Eq, (forall x. MessageForwardOrigin -> Rep MessageForwardOrigin x)
-> (forall x. Rep MessageForwardOrigin x -> MessageForwardOrigin)
-> Generic MessageForwardOrigin
forall x. Rep MessageForwardOrigin x -> MessageForwardOrigin
forall x. MessageForwardOrigin -> Rep MessageForwardOrigin x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep MessageForwardOrigin x -> MessageForwardOrigin
$cfrom :: forall x. MessageForwardOrigin -> Rep MessageForwardOrigin x
Generic)
data MessageForwardInfo
  = -- | Contains information about a forwarded message
  MessageForwardInfo
    { -- | Origin of a forwarded message
      MessageForwardInfo -> MessageForwardOrigin
origin :: MessageForwardOrigin,
      -- | Point in time (Unix timestamp) when the message was originally sent
      MessageForwardInfo -> I32
date :: I32,
      -- | The type of a public service announcement for the forwarded message
      MessageForwardInfo -> T
publicServiceAnnouncementType :: T,
      -- | For messages forwarded to the chat with the current user (Saved Messages) or to the channel's discussion group, the identifier of the chat from which the message was forwarded last time; 0 if unknown
      MessageForwardInfo -> I32
fromChatId :: I53,
      -- | For messages forwarded to the chat with the current user (Saved Messages) or to the channel's discussion group, the identifier of the original message from which the new message was forwarded last time; 0 if unknown
      MessageForwardInfo -> I32
fromMessageId :: I53
    }
  deriving (I32 -> MessageForwardInfo -> ShowS
[MessageForwardInfo] -> ShowS
MessageForwardInfo -> String
(I32 -> MessageForwardInfo -> ShowS)
-> (MessageForwardInfo -> String)
-> ([MessageForwardInfo] -> ShowS)
-> Show MessageForwardInfo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [MessageForwardInfo] -> ShowS
$cshowList :: [MessageForwardInfo] -> ShowS
show :: MessageForwardInfo -> String
$cshow :: MessageForwardInfo -> String
showsPrec :: I32 -> MessageForwardInfo -> ShowS
$cshowsPrec :: I32 -> MessageForwardInfo -> ShowS
Show, MessageForwardInfo -> MessageForwardInfo -> Bool
(MessageForwardInfo -> MessageForwardInfo -> Bool)
-> (MessageForwardInfo -> MessageForwardInfo -> Bool)
-> Eq MessageForwardInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: MessageForwardInfo -> MessageForwardInfo -> Bool
$c/= :: MessageForwardInfo -> MessageForwardInfo -> Bool
== :: MessageForwardInfo -> MessageForwardInfo -> Bool
$c== :: MessageForwardInfo -> MessageForwardInfo -> Bool
Eq, (forall x. MessageForwardInfo -> Rep MessageForwardInfo x)
-> (forall x. Rep MessageForwardInfo x -> MessageForwardInfo)
-> Generic MessageForwardInfo
forall x. Rep MessageForwardInfo x -> MessageForwardInfo
forall x. MessageForwardInfo -> Rep MessageForwardInfo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep MessageForwardInfo x -> MessageForwardInfo
$cfrom :: forall x. MessageForwardInfo -> Rep MessageForwardInfo x
Generic)
-- | Contains information about the sending state of the message
data MessageSendingState
  = -- | The message is being sent now, but has not yet been delivered to the server
  MessageSendingStatePending
    { 
    }
  | -- | The message failed to be sent 
  MessageSendingStateFailed
    { -- | An error code; 0 if unknown 
      MessageSendingState -> I32
errorCode :: I32,
      -- | Error message
      MessageSendingState -> T
errorMessage :: T,
      -- | True, if the message can be re-sent 
      MessageSendingState -> Bool
canRetry :: Bool,
      -- | Time left before the message can be re-sent, in seconds. No update is sent when this field changes
      MessageSendingState -> Double
retryAfter :: Double
    }
  deriving (I32 -> MessageSendingState -> ShowS
[MessageSendingState] -> ShowS
MessageSendingState -> String
(I32 -> MessageSendingState -> ShowS)
-> (MessageSendingState -> String)
-> ([MessageSendingState] -> ShowS)
-> Show MessageSendingState
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [MessageSendingState] -> ShowS
$cshowList :: [MessageSendingState] -> ShowS
show :: MessageSendingState -> String
$cshow :: MessageSendingState -> String
showsPrec :: I32 -> MessageSendingState -> ShowS
$cshowsPrec :: I32 -> MessageSendingState -> ShowS
Show, MessageSendingState -> MessageSendingState -> Bool
(MessageSendingState -> MessageSendingState -> Bool)
-> (MessageSendingState -> MessageSendingState -> Bool)
-> Eq MessageSendingState
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: MessageSendingState -> MessageSendingState -> Bool
$c/= :: MessageSendingState -> MessageSendingState -> Bool
== :: MessageSendingState -> MessageSendingState -> Bool
$c== :: MessageSendingState -> MessageSendingState -> Bool
Eq, (forall x. MessageSendingState -> Rep MessageSendingState x)
-> (forall x. Rep MessageSendingState x -> MessageSendingState)
-> Generic MessageSendingState
forall x. Rep MessageSendingState x -> MessageSendingState
forall x. MessageSendingState -> Rep MessageSendingState x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep MessageSendingState x -> MessageSendingState
$cfrom :: forall x. MessageSendingState -> Rep MessageSendingState x
Generic)
data Message
  = -- | Describes a message
  Message
    { -- | Message identifier, unique for the chat to which the message belongs
      Message -> I32
id :: I53,
      -- | Identifier of the user who sent the message; 0 if unknown. Currently, it is unknown for channel posts and for channel posts automatically forwarded to discussion group
      Message -> I32
senderUserId :: I32,
      -- | Chat identifier
      Message -> I32
chatId :: I53,
      -- | Information about the sending state of the message; may be null
      Message -> Maybe MessageSendingState
sendingState :: (Maybe) (MessageSendingState),
      -- | Information about the scheduling state of the message; may be null
      Message -> Maybe MessageSchedulingState
schedulingState :: (Maybe) (MessageSchedulingState),
      -- | True, if the message is outgoing
      Message -> Bool
isOutgoing :: Bool,
      -- | True, if the message can be edited. For live location and poll messages this fields shows whether editMessageLiveLocation or stopPoll can be used with this message by the client
      Message -> Bool
canBeEdited :: Bool,
      -- | True, if the message can be forwarded
      Message -> Bool
canBeForwarded :: Bool,
      -- | True, if the message can be deleted only for the current user while other users will continue to see it
      Message -> Bool
canBeDeletedOnlyForSelf :: Bool,
      -- | True, if the message can be deleted for all users
      Message -> Bool
canBeDeletedForAllUsers :: Bool,
      -- | True, if the message is a channel post. All messages to channels are channel posts, all other messages are not channel posts
      Message -> Bool
isChannelPost :: Bool,
      -- | True, if the message contains an unread mention for the current user
      Message -> Bool
containsUnreadMention :: Bool,
      -- | Point in time (Unix timestamp) when the message was sent
      Message -> I32
date :: I32,
      -- | Point in time (Unix timestamp) when the message was last edited
      Message -> I32
editDate :: I32,
      -- | Information about the initial message sender; may be null
      Message -> Maybe MessageForwardInfo
forwardInfo :: (Maybe) (MessageForwardInfo),
      -- | If non-zero, the identifier of the message this message is replying to; can be the identifier of a deleted message
      Message -> I32
replyToMessageId :: I53,
      -- | For self-destructing messages, the message's TTL (Time To Live), in seconds; 0 if none. TDLib will send updateDeleteMessages or updateMessageContent once the TTL expires
      Message -> I32
ttl :: I32,
      -- | Time left before the message expires, in seconds
      Message -> Double
ttlExpiresIn :: Double,
      -- | If non-zero, the user identifier of the bot through which this message was sent
      Message -> I32
viaBotUserId :: I32,
      -- | For channel posts, optional author signature
      Message -> T
authorSignature :: T,
      -- | Number of times this message was viewed
      Message -> I32
views :: I32,
      -- | Unique identifier of an album this message belongs to. Only photos and videos can be grouped together in albums
      Message -> I64
mediaAlbumId :: I64,
      -- | If non-empty, contains a human-readable description of the reason why access to this message must be restricted
      Message -> T
restrictionReason :: T,
      -- | Content of the message
      Message -> MessageContent
content :: MessageContent,
      -- | Reply markup for the message; may be null
      Message -> Maybe ReplyMarkup
replyMarkup :: (Maybe) (ReplyMarkup)
    }
  deriving (I32 -> Message -> ShowS
[Message] -> ShowS
Message -> String
(I32 -> Message -> ShowS)
-> (Message -> String) -> ([Message] -> ShowS) -> Show Message
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Message] -> ShowS
$cshowList :: [Message] -> ShowS
show :: Message -> String
$cshow :: Message -> String
showsPrec :: I32 -> Message -> ShowS
$cshowsPrec :: I32 -> Message -> ShowS
Show, Message -> Message -> Bool
(Message -> Message -> Bool)
-> (Message -> Message -> Bool) -> Eq Message
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Message -> Message -> Bool
$c/= :: Message -> Message -> Bool
== :: Message -> Message -> Bool
$c== :: Message -> Message -> Bool
Eq, (forall x. Message -> Rep Message x)
-> (forall x. Rep Message x -> Message) -> Generic Message
forall x. Rep Message x -> Message
forall x. Message -> Rep Message x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Message x -> Message
$cfrom :: forall x. Message -> Rep Message x
Generic)
data Messages
  = -- | Contains a list of messages 
  Messages
    { -- | Approximate total count of messages found 
      Messages -> I32
totalCount :: I32,
      -- | List of messages; messages may be null
      Messages -> [Maybe Message]
messages :: [(Maybe) (Message)]
    }
  deriving (I32 -> Messages -> ShowS
[Messages] -> ShowS
Messages -> String
(I32 -> Messages -> ShowS)
-> (Messages -> String) -> ([Messages] -> ShowS) -> Show Messages
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Messages] -> ShowS
$cshowList :: [Messages] -> ShowS
show :: Messages -> String
$cshow :: Messages -> String
showsPrec :: I32 -> Messages -> ShowS
$cshowsPrec :: I32 -> Messages -> ShowS
Show, Messages -> Messages -> Bool
(Messages -> Messages -> Bool)
-> (Messages -> Messages -> Bool) -> Eq Messages
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Messages -> Messages -> Bool
$c/= :: Messages -> Messages -> Bool
== :: Messages -> Messages -> Bool
$c== :: Messages -> Messages -> Bool
Eq, (forall x. Messages -> Rep Messages x)
-> (forall x. Rep Messages x -> Messages) -> Generic Messages
forall x. Rep Messages x -> Messages
forall x. Messages -> Rep Messages x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Messages x -> Messages
$cfrom :: forall x. Messages -> Rep Messages x
Generic)
data FoundMessages
  = -- | Contains a list of messages found by a search 
  FoundMessages
    { -- | List of messages 
      FoundMessages -> [Message]
messages :: [Message],
      -- | Value to pass as from_search_id to get more results
      FoundMessages -> I64
nextFromSearchId :: I64
    }
  deriving (I32 -> FoundMessages -> ShowS
[FoundMessages] -> ShowS
FoundMessages -> String
(I32 -> FoundMessages -> ShowS)
-> (FoundMessages -> String)
-> ([FoundMessages] -> ShowS)
-> Show FoundMessages
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [FoundMessages] -> ShowS
$cshowList :: [FoundMessages] -> ShowS
show :: FoundMessages -> String
$cshow :: FoundMessages -> String
showsPrec :: I32 -> FoundMessages -> ShowS
$cshowsPrec :: I32 -> FoundMessages -> ShowS
Show, FoundMessages -> FoundMessages -> Bool
(FoundMessages -> FoundMessages -> Bool)
-> (FoundMessages -> FoundMessages -> Bool) -> Eq FoundMessages
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: FoundMessages -> FoundMessages -> Bool
$c/= :: FoundMessages -> FoundMessages -> Bool
== :: FoundMessages -> FoundMessages -> Bool
$c== :: FoundMessages -> FoundMessages -> Bool
Eq, (forall x. FoundMessages -> Rep FoundMessages x)
-> (forall x. Rep FoundMessages x -> FoundMessages)
-> Generic FoundMessages
forall x. Rep FoundMessages x -> FoundMessages
forall x. FoundMessages -> Rep FoundMessages x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep FoundMessages x -> FoundMessages
$cfrom :: forall x. FoundMessages -> Rep FoundMessages x
Generic)
-- | Describes the types of chats to which notification settings are applied
data NotificationSettingsScope
  = -- | Notification settings applied to all private and secret chats when the corresponding chat setting has a default value
  NotificationSettingsScopePrivateChats
    { 
    }
  | -- | Notification settings applied to all basic groups and supergroups when the corresponding chat setting has a default value
  NotificationSettingsScopeGroupChats
    { 
    }
  | -- | Notification settings applied to all channels when the corresponding chat setting has a default value
  NotificationSettingsScopeChannelChats
    { 
    }
  deriving (I32 -> NotificationSettingsScope -> ShowS
[NotificationSettingsScope] -> ShowS
NotificationSettingsScope -> String
(I32 -> NotificationSettingsScope -> ShowS)
-> (NotificationSettingsScope -> String)
-> ([NotificationSettingsScope] -> ShowS)
-> Show NotificationSettingsScope
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [NotificationSettingsScope] -> ShowS
$cshowList :: [NotificationSettingsScope] -> ShowS
show :: NotificationSettingsScope -> String
$cshow :: NotificationSettingsScope -> String
showsPrec :: I32 -> NotificationSettingsScope -> ShowS
$cshowsPrec :: I32 -> NotificationSettingsScope -> ShowS
Show, NotificationSettingsScope -> NotificationSettingsScope -> Bool
(NotificationSettingsScope -> NotificationSettingsScope -> Bool)
-> (NotificationSettingsScope -> NotificationSettingsScope -> Bool)
-> Eq NotificationSettingsScope
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: NotificationSettingsScope -> NotificationSettingsScope -> Bool
$c/= :: NotificationSettingsScope -> NotificationSettingsScope -> Bool
== :: NotificationSettingsScope -> NotificationSettingsScope -> Bool
$c== :: NotificationSettingsScope -> NotificationSettingsScope -> Bool
Eq, (forall x.
 NotificationSettingsScope -> Rep NotificationSettingsScope x)
-> (forall x.
    Rep NotificationSettingsScope x -> NotificationSettingsScope)
-> Generic NotificationSettingsScope
forall x.
Rep NotificationSettingsScope x -> NotificationSettingsScope
forall x.
NotificationSettingsScope -> Rep NotificationSettingsScope x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep NotificationSettingsScope x -> NotificationSettingsScope
$cfrom :: forall x.
NotificationSettingsScope -> Rep NotificationSettingsScope x
Generic)
data ChatNotificationSettings
  = -- | Contains information about notification settings for a chat
  ChatNotificationSettings
    { -- | If true, mute_for is ignored and the value for the relevant type of chat is used instead 
      ChatNotificationSettings -> Bool
useDefaultMuteFor :: Bool,
      -- | Time left before notifications will be unmuted, in seconds
      ChatNotificationSettings -> I32
muteFor :: I32,
      -- | If true, sound is ignored and the value for the relevant type of chat is used instead 
      ChatNotificationSettings -> Bool
useDefaultSound :: Bool,
      -- | The name of an audio file to be used for notification sounds; only applies to iOS applications
      ChatNotificationSettings -> T
sound :: T,
      -- | If true, show_preview is ignored and the value for the relevant type of chat is used instead 
      ChatNotificationSettings -> Bool
useDefaultShowPreview :: Bool,
      -- | True, if message content should be displayed in notifications
      ChatNotificationSettings -> Bool
showPreview :: Bool,
      -- | If true, disable_pinned_message_notifications is ignored and the value for the relevant type of chat is used instead 
      ChatNotificationSettings -> Bool
useDefaultDisablePinnedMessageNotifications :: Bool,
      -- | If true, notifications for incoming pinned messages will be created as for an ordinary unread message
      ChatNotificationSettings -> Bool
disablePinnedMessageNotifications :: Bool,
      -- | If true, disable_mention_notifications is ignored and the value for the relevant type of chat is used instead 
      ChatNotificationSettings -> Bool
useDefaultDisableMentionNotifications :: Bool,
      -- | If true, notifications for messages with mentions will be created as for an ordinary unread message
      ChatNotificationSettings -> Bool
disableMentionNotifications :: Bool
    }
  deriving (I32 -> ChatNotificationSettings -> ShowS
[ChatNotificationSettings] -> ShowS
ChatNotificationSettings -> String
(I32 -> ChatNotificationSettings -> ShowS)
-> (ChatNotificationSettings -> String)
-> ([ChatNotificationSettings] -> ShowS)
-> Show ChatNotificationSettings
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatNotificationSettings] -> ShowS
$cshowList :: [ChatNotificationSettings] -> ShowS
show :: ChatNotificationSettings -> String
$cshow :: ChatNotificationSettings -> String
showsPrec :: I32 -> ChatNotificationSettings -> ShowS
$cshowsPrec :: I32 -> ChatNotificationSettings -> ShowS
Show, ChatNotificationSettings -> ChatNotificationSettings -> Bool
(ChatNotificationSettings -> ChatNotificationSettings -> Bool)
-> (ChatNotificationSettings -> ChatNotificationSettings -> Bool)
-> Eq ChatNotificationSettings
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatNotificationSettings -> ChatNotificationSettings -> Bool
$c/= :: ChatNotificationSettings -> ChatNotificationSettings -> Bool
== :: ChatNotificationSettings -> ChatNotificationSettings -> Bool
$c== :: ChatNotificationSettings -> ChatNotificationSettings -> Bool
Eq, (forall x.
 ChatNotificationSettings -> Rep ChatNotificationSettings x)
-> (forall x.
    Rep ChatNotificationSettings x -> ChatNotificationSettings)
-> Generic ChatNotificationSettings
forall x.
Rep ChatNotificationSettings x -> ChatNotificationSettings
forall x.
ChatNotificationSettings -> Rep ChatNotificationSettings x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ChatNotificationSettings x -> ChatNotificationSettings
$cfrom :: forall x.
ChatNotificationSettings -> Rep ChatNotificationSettings x
Generic)
data ScopeNotificationSettings
  = -- | Contains information about notification settings for several chats
  ScopeNotificationSettings
    { -- | Time left before notifications will be unmuted, in seconds
      ScopeNotificationSettings -> I32
muteFor :: I32,
      -- | The name of an audio file to be used for notification sounds; only applies to iOS applications
      ScopeNotificationSettings -> T
sound :: T,
      -- | True, if message content should be displayed in notifications
      ScopeNotificationSettings -> Bool
showPreview :: Bool,
      -- | True, if notifications for incoming pinned messages will be created as for an ordinary unread message
      ScopeNotificationSettings -> Bool
disablePinnedMessageNotifications :: Bool,
      -- | True, if notifications for messages with mentions will be created as for an ordinary unread message
      ScopeNotificationSettings -> Bool
disableMentionNotifications :: Bool
    }
  deriving (I32 -> ScopeNotificationSettings -> ShowS
[ScopeNotificationSettings] -> ShowS
ScopeNotificationSettings -> String
(I32 -> ScopeNotificationSettings -> ShowS)
-> (ScopeNotificationSettings -> String)
-> ([ScopeNotificationSettings] -> ShowS)
-> Show ScopeNotificationSettings
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ScopeNotificationSettings] -> ShowS
$cshowList :: [ScopeNotificationSettings] -> ShowS
show :: ScopeNotificationSettings -> String
$cshow :: ScopeNotificationSettings -> String
showsPrec :: I32 -> ScopeNotificationSettings -> ShowS
$cshowsPrec :: I32 -> ScopeNotificationSettings -> ShowS
Show, ScopeNotificationSettings -> ScopeNotificationSettings -> Bool
(ScopeNotificationSettings -> ScopeNotificationSettings -> Bool)
-> (ScopeNotificationSettings -> ScopeNotificationSettings -> Bool)
-> Eq ScopeNotificationSettings
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ScopeNotificationSettings -> ScopeNotificationSettings -> Bool
$c/= :: ScopeNotificationSettings -> ScopeNotificationSettings -> Bool
== :: ScopeNotificationSettings -> ScopeNotificationSettings -> Bool
$c== :: ScopeNotificationSettings -> ScopeNotificationSettings -> Bool
Eq, (forall x.
 ScopeNotificationSettings -> Rep ScopeNotificationSettings x)
-> (forall x.
    Rep ScopeNotificationSettings x -> ScopeNotificationSettings)
-> Generic ScopeNotificationSettings
forall x.
Rep ScopeNotificationSettings x -> ScopeNotificationSettings
forall x.
ScopeNotificationSettings -> Rep ScopeNotificationSettings x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ScopeNotificationSettings x -> ScopeNotificationSettings
$cfrom :: forall x.
ScopeNotificationSettings -> Rep ScopeNotificationSettings x
Generic)
data DraftMessage
  = -- | Contains information about a message draft
  DraftMessage
    { -- | Identifier of the message to reply to; 0 if none
      DraftMessage -> I32
replyToMessageId :: I53,
      -- | Point in time (Unix timestamp) when the draft was created
      DraftMessage -> I32
date :: I32,
      -- | Content of the message draft; this should always be of type inputMessageText
      DraftMessage -> InputMessageContent
inputMessageText :: InputMessageContent
    }
  deriving (I32 -> DraftMessage -> ShowS
[DraftMessage] -> ShowS
DraftMessage -> String
(I32 -> DraftMessage -> ShowS)
-> (DraftMessage -> String)
-> ([DraftMessage] -> ShowS)
-> Show DraftMessage
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DraftMessage] -> ShowS
$cshowList :: [DraftMessage] -> ShowS
show :: DraftMessage -> String
$cshow :: DraftMessage -> String
showsPrec :: I32 -> DraftMessage -> ShowS
$cshowsPrec :: I32 -> DraftMessage -> ShowS
Show, DraftMessage -> DraftMessage -> Bool
(DraftMessage -> DraftMessage -> Bool)
-> (DraftMessage -> DraftMessage -> Bool) -> Eq DraftMessage
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DraftMessage -> DraftMessage -> Bool
$c/= :: DraftMessage -> DraftMessage -> Bool
== :: DraftMessage -> DraftMessage -> Bool
$c== :: DraftMessage -> DraftMessage -> Bool
Eq, (forall x. DraftMessage -> Rep DraftMessage x)
-> (forall x. Rep DraftMessage x -> DraftMessage)
-> Generic DraftMessage
forall x. Rep DraftMessage x -> DraftMessage
forall x. DraftMessage -> Rep DraftMessage x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DraftMessage x -> DraftMessage
$cfrom :: forall x. DraftMessage -> Rep DraftMessage x
Generic)
-- | Describes the type of a chat
data ChatType
  = -- | An ordinary chat with a user 
  ChatTypePrivate
    { -- | User identifier
      ChatType -> I32
userId :: I32
    }
  | -- | A basic group (i.e., a chat with 0-200 other users) 
  ChatTypeBasicGroup
    { -- | Basic group identifier
      ChatType -> I32
basicGroupId :: I32
    }
  | -- | A supergroup (i.e. a chat with up to GetOption("supergroup_max_size") other users), or channel (with unlimited members) 
  ChatTypeSupergroup
    { -- | Supergroup or channel identifier 
      ChatType -> I32
supergroupId :: I32,
      -- | True, if the supergroup is a channel
      ChatType -> Bool
isChannel :: Bool
    }
  | -- | A secret chat with a user 
  ChatTypeSecret
    { -- | Secret chat identifier 
      ChatType -> I32
secretChatId :: I32,
      -- | User identifier of the secret chat peer
      userId :: I32
    }
  deriving (I32 -> ChatType -> ShowS
[ChatType] -> ShowS
ChatType -> String
(I32 -> ChatType -> ShowS)
-> (ChatType -> String) -> ([ChatType] -> ShowS) -> Show ChatType
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatType] -> ShowS
$cshowList :: [ChatType] -> ShowS
show :: ChatType -> String
$cshow :: ChatType -> String
showsPrec :: I32 -> ChatType -> ShowS
$cshowsPrec :: I32 -> ChatType -> ShowS
Show, ChatType -> ChatType -> Bool
(ChatType -> ChatType -> Bool)
-> (ChatType -> ChatType -> Bool) -> Eq ChatType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatType -> ChatType -> Bool
$c/= :: ChatType -> ChatType -> Bool
== :: ChatType -> ChatType -> Bool
$c== :: ChatType -> ChatType -> Bool
Eq, (forall x. ChatType -> Rep ChatType x)
-> (forall x. Rep ChatType x -> ChatType) -> Generic ChatType
forall x. Rep ChatType x -> ChatType
forall x. ChatType -> Rep ChatType x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatType x -> ChatType
$cfrom :: forall x. ChatType -> Rep ChatType x
Generic)
data ChatFilter
  = -- | Represents a filter of user chats
  ChatFilter
    { -- | The title of the filter; 1-12 characters without line feeds
      ChatFilter -> T
title :: T,
      -- | The icon name for short filter representation. If non-empty, must be one of "All", "Unread", "Unmuted", "Bots", "Channels", "Groups", "Private", "Custom", "Setup", "Cat", "Crown", "Favorite", "Flower", "Game", "Home", "Love", "Mask", "Party", "Sport", "Study", "Trade", "Travel", "Work".
      ChatFilter -> T
iconName :: T,
      -- | The chat identifiers of pinned chats in the filtered chat list
      ChatFilter -> [I32]
pinnedChatIds :: [I53],
      -- | The chat identifiers of always included chats in the filtered chat list
      ChatFilter -> [I32]
includedChatIds :: [I53],
      -- | The chat identifiers of always excluded chats in the filtered chat list
      ChatFilter -> [I32]
excludedChatIds :: [I53],
      -- | True, if the muted chats need to be excluded
      ChatFilter -> Bool
excludeMuted :: Bool,
      -- | True, if read chats need to be excluded
      ChatFilter -> Bool
excludeRead :: Bool,
      -- | True, if archived chats need to be excluded
      ChatFilter -> Bool
excludeArchived :: Bool,
      -- | True, if contacts need to be included
      ChatFilter -> Bool
includeContacts :: Bool,
      -- | True, if non-contact users need to be included
      ChatFilter -> Bool
includeNonContacts :: Bool,
      -- | True, if bots need to be included
      ChatFilter -> Bool
includeBots :: Bool,
      -- | True, if basic groups and supergroups need to be included
      ChatFilter -> Bool
includeGroups :: Bool,
      -- | True, if channels need to be included
      ChatFilter -> Bool
includeChannels :: Bool
    }
  deriving (I32 -> ChatFilter -> ShowS
[ChatFilter] -> ShowS
ChatFilter -> String
(I32 -> ChatFilter -> ShowS)
-> (ChatFilter -> String)
-> ([ChatFilter] -> ShowS)
-> Show ChatFilter
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatFilter] -> ShowS
$cshowList :: [ChatFilter] -> ShowS
show :: ChatFilter -> String
$cshow :: ChatFilter -> String
showsPrec :: I32 -> ChatFilter -> ShowS
$cshowsPrec :: I32 -> ChatFilter -> ShowS
Show, ChatFilter -> ChatFilter -> Bool
(ChatFilter -> ChatFilter -> Bool)
-> (ChatFilter -> ChatFilter -> Bool) -> Eq ChatFilter
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatFilter -> ChatFilter -> Bool
$c/= :: ChatFilter -> ChatFilter -> Bool
== :: ChatFilter -> ChatFilter -> Bool
$c== :: ChatFilter -> ChatFilter -> Bool
Eq, (forall x. ChatFilter -> Rep ChatFilter x)
-> (forall x. Rep ChatFilter x -> ChatFilter) -> Generic ChatFilter
forall x. Rep ChatFilter x -> ChatFilter
forall x. ChatFilter -> Rep ChatFilter x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatFilter x -> ChatFilter
$cfrom :: forall x. ChatFilter -> Rep ChatFilter x
Generic)
data ChatFilterInfo
  = -- | Contains basic information about a chat filter
  ChatFilterInfo
    { -- | Unique chat filter identifier
      ChatFilterInfo -> I32
id :: I32,
      -- | The title of the filter; 1-12 characters without line feeds
      ChatFilterInfo -> T
title :: T,
      -- | The icon name for short filter representation. One of "All", "Unread", "Unmuted", "Bots", "Channels", "Groups", "Private", "Custom", "Setup", "Cat", "Crown", "Favorite", "Flower", "Game", "Home", "Love", "Mask", "Party", "Sport", "Study", "Trade", "Travel", "Work"
      ChatFilterInfo -> T
iconName :: T
    }
  deriving (I32 -> ChatFilterInfo -> ShowS
[ChatFilterInfo] -> ShowS
ChatFilterInfo -> String
(I32 -> ChatFilterInfo -> ShowS)
-> (ChatFilterInfo -> String)
-> ([ChatFilterInfo] -> ShowS)
-> Show ChatFilterInfo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatFilterInfo] -> ShowS
$cshowList :: [ChatFilterInfo] -> ShowS
show :: ChatFilterInfo -> String
$cshow :: ChatFilterInfo -> String
showsPrec :: I32 -> ChatFilterInfo -> ShowS
$cshowsPrec :: I32 -> ChatFilterInfo -> ShowS
Show, ChatFilterInfo -> ChatFilterInfo -> Bool
(ChatFilterInfo -> ChatFilterInfo -> Bool)
-> (ChatFilterInfo -> ChatFilterInfo -> Bool) -> Eq ChatFilterInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatFilterInfo -> ChatFilterInfo -> Bool
$c/= :: ChatFilterInfo -> ChatFilterInfo -> Bool
== :: ChatFilterInfo -> ChatFilterInfo -> Bool
$c== :: ChatFilterInfo -> ChatFilterInfo -> Bool
Eq, (forall x. ChatFilterInfo -> Rep ChatFilterInfo x)
-> (forall x. Rep ChatFilterInfo x -> ChatFilterInfo)
-> Generic ChatFilterInfo
forall x. Rep ChatFilterInfo x -> ChatFilterInfo
forall x. ChatFilterInfo -> Rep ChatFilterInfo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatFilterInfo x -> ChatFilterInfo
$cfrom :: forall x. ChatFilterInfo -> Rep ChatFilterInfo x
Generic)
data RecommendedChatFilter
  = -- | Describes a recommended chat filter 
  RecommendedChatFilter
    { -- | The chat filter 
      RecommendedChatFilter -> ChatFilter
filter :: ChatFilter,
      -- | Describes a recommended chat filter 
      RecommendedChatFilter -> T
description :: T
    }
  deriving (I32 -> RecommendedChatFilter -> ShowS
[RecommendedChatFilter] -> ShowS
RecommendedChatFilter -> String
(I32 -> RecommendedChatFilter -> ShowS)
-> (RecommendedChatFilter -> String)
-> ([RecommendedChatFilter] -> ShowS)
-> Show RecommendedChatFilter
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RecommendedChatFilter] -> ShowS
$cshowList :: [RecommendedChatFilter] -> ShowS
show :: RecommendedChatFilter -> String
$cshow :: RecommendedChatFilter -> String
showsPrec :: I32 -> RecommendedChatFilter -> ShowS
$cshowsPrec :: I32 -> RecommendedChatFilter -> ShowS
Show, RecommendedChatFilter -> RecommendedChatFilter -> Bool
(RecommendedChatFilter -> RecommendedChatFilter -> Bool)
-> (RecommendedChatFilter -> RecommendedChatFilter -> Bool)
-> Eq RecommendedChatFilter
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RecommendedChatFilter -> RecommendedChatFilter -> Bool
$c/= :: RecommendedChatFilter -> RecommendedChatFilter -> Bool
== :: RecommendedChatFilter -> RecommendedChatFilter -> Bool
$c== :: RecommendedChatFilter -> RecommendedChatFilter -> Bool
Eq, (forall x. RecommendedChatFilter -> Rep RecommendedChatFilter x)
-> (forall x. Rep RecommendedChatFilter x -> RecommendedChatFilter)
-> Generic RecommendedChatFilter
forall x. Rep RecommendedChatFilter x -> RecommendedChatFilter
forall x. RecommendedChatFilter -> Rep RecommendedChatFilter x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep RecommendedChatFilter x -> RecommendedChatFilter
$cfrom :: forall x. RecommendedChatFilter -> Rep RecommendedChatFilter x
Generic)
data RecommendedChatFilters
  = -- | Contains a list of recommended chat filters 
  RecommendedChatFilters
    { -- | List of recommended chat filters
      RecommendedChatFilters -> [RecommendedChatFilter]
chatFilters :: [RecommendedChatFilter]
    }
  deriving (I32 -> RecommendedChatFilters -> ShowS
[RecommendedChatFilters] -> ShowS
RecommendedChatFilters -> String
(I32 -> RecommendedChatFilters -> ShowS)
-> (RecommendedChatFilters -> String)
-> ([RecommendedChatFilters] -> ShowS)
-> Show RecommendedChatFilters
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RecommendedChatFilters] -> ShowS
$cshowList :: [RecommendedChatFilters] -> ShowS
show :: RecommendedChatFilters -> String
$cshow :: RecommendedChatFilters -> String
showsPrec :: I32 -> RecommendedChatFilters -> ShowS
$cshowsPrec :: I32 -> RecommendedChatFilters -> ShowS
Show, RecommendedChatFilters -> RecommendedChatFilters -> Bool
(RecommendedChatFilters -> RecommendedChatFilters -> Bool)
-> (RecommendedChatFilters -> RecommendedChatFilters -> Bool)
-> Eq RecommendedChatFilters
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RecommendedChatFilters -> RecommendedChatFilters -> Bool
$c/= :: RecommendedChatFilters -> RecommendedChatFilters -> Bool
== :: RecommendedChatFilters -> RecommendedChatFilters -> Bool
$c== :: RecommendedChatFilters -> RecommendedChatFilters -> Bool
Eq, (forall x. RecommendedChatFilters -> Rep RecommendedChatFilters x)
-> (forall x.
    Rep RecommendedChatFilters x -> RecommendedChatFilters)
-> Generic RecommendedChatFilters
forall x. Rep RecommendedChatFilters x -> RecommendedChatFilters
forall x. RecommendedChatFilters -> Rep RecommendedChatFilters x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep RecommendedChatFilters x -> RecommendedChatFilters
$cfrom :: forall x. RecommendedChatFilters -> Rep RecommendedChatFilters x
Generic)
-- | Describes a list of chats
data ChatList
  = -- | A main list of chats
  ChatListMain
    { 
    }
  | -- | A list of chats usually located at the top of the main chat list. Unmuted chats are automatically moved from the Archive to the Main chat list when a new message arrives
  ChatListArchive
    { 
    }
  | -- | A list of chats belonging to a chat filter 
  ChatListFilter
    { -- | Chat filter identifier
      ChatList -> I32
chatFilterId :: I32
    }
  deriving (I32 -> ChatList -> ShowS
[ChatList] -> ShowS
ChatList -> String
(I32 -> ChatList -> ShowS)
-> (ChatList -> String) -> ([ChatList] -> ShowS) -> Show ChatList
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatList] -> ShowS
$cshowList :: [ChatList] -> ShowS
show :: ChatList -> String
$cshow :: ChatList -> String
showsPrec :: I32 -> ChatList -> ShowS
$cshowsPrec :: I32 -> ChatList -> ShowS
Show, ChatList -> ChatList -> Bool
(ChatList -> ChatList -> Bool)
-> (ChatList -> ChatList -> Bool) -> Eq ChatList
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatList -> ChatList -> Bool
$c/= :: ChatList -> ChatList -> Bool
== :: ChatList -> ChatList -> Bool
$c== :: ChatList -> ChatList -> Bool
Eq, (forall x. ChatList -> Rep ChatList x)
-> (forall x. Rep ChatList x -> ChatList) -> Generic ChatList
forall x. Rep ChatList x -> ChatList
forall x. ChatList -> Rep ChatList x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatList x -> ChatList
$cfrom :: forall x. ChatList -> Rep ChatList x
Generic)
data ChatLists
  = -- | Contains a list of chat lists 
  ChatLists
    { -- | List of chat lists
      ChatLists -> [ChatList]
chatLists :: [ChatList]
    }
  deriving (I32 -> ChatLists -> ShowS
[ChatLists] -> ShowS
ChatLists -> String
(I32 -> ChatLists -> ShowS)
-> (ChatLists -> String)
-> ([ChatLists] -> ShowS)
-> Show ChatLists
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatLists] -> ShowS
$cshowList :: [ChatLists] -> ShowS
show :: ChatLists -> String
$cshow :: ChatLists -> String
showsPrec :: I32 -> ChatLists -> ShowS
$cshowsPrec :: I32 -> ChatLists -> ShowS
Show, ChatLists -> ChatLists -> Bool
(ChatLists -> ChatLists -> Bool)
-> (ChatLists -> ChatLists -> Bool) -> Eq ChatLists
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatLists -> ChatLists -> Bool
$c/= :: ChatLists -> ChatLists -> Bool
== :: ChatLists -> ChatLists -> Bool
$c== :: ChatLists -> ChatLists -> Bool
Eq, (forall x. ChatLists -> Rep ChatLists x)
-> (forall x. Rep ChatLists x -> ChatLists) -> Generic ChatLists
forall x. Rep ChatLists x -> ChatLists
forall x. ChatLists -> Rep ChatLists x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatLists x -> ChatLists
$cfrom :: forall x. ChatLists -> Rep ChatLists x
Generic)
-- | Describes a reason why an external chat is shown in a chat list
data ChatSource
  = -- | The chat is sponsored by the user's MTProxy server
  ChatSourceMtprotoProxy
    { 
    }
  | -- | The chat contains a public service announcement 
  ChatSourcePublicServiceAnnouncement
    { -- | The type of the announcement 
      ChatSource -> T
type_ :: T,
      -- | The text of the announcement
      ChatSource -> T
text :: T
    }
  deriving (I32 -> ChatSource -> ShowS
[ChatSource] -> ShowS
ChatSource -> String
(I32 -> ChatSource -> ShowS)
-> (ChatSource -> String)
-> ([ChatSource] -> ShowS)
-> Show ChatSource
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatSource] -> ShowS
$cshowList :: [ChatSource] -> ShowS
show :: ChatSource -> String
$cshow :: ChatSource -> String
showsPrec :: I32 -> ChatSource -> ShowS
$cshowsPrec :: I32 -> ChatSource -> ShowS
Show, ChatSource -> ChatSource -> Bool
(ChatSource -> ChatSource -> Bool)
-> (ChatSource -> ChatSource -> Bool) -> Eq ChatSource
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatSource -> ChatSource -> Bool
$c/= :: ChatSource -> ChatSource -> Bool
== :: ChatSource -> ChatSource -> Bool
$c== :: ChatSource -> ChatSource -> Bool
Eq, (forall x. ChatSource -> Rep ChatSource x)
-> (forall x. Rep ChatSource x -> ChatSource) -> Generic ChatSource
forall x. Rep ChatSource x -> ChatSource
forall x. ChatSource -> Rep ChatSource x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatSource x -> ChatSource
$cfrom :: forall x. ChatSource -> Rep ChatSource x
Generic)
data ChatPosition
  = -- | Describes a position of a chat in a chat list
  ChatPosition
    { -- | The chat list
      ChatPosition -> ChatList
list :: ChatList,
      -- | A parameter used to determine order of the chat in the chat list. Chats must be sorted by the pair (order, chat.id) in descending order
      ChatPosition -> I64
order :: I64,
      -- | True, if the chat is pinned in the chat list
      ChatPosition -> Bool
isPinned :: Bool,
      -- | Source of the chat in the chat list; may be null
      ChatPosition -> Maybe ChatSource
source :: (Maybe) (ChatSource)
    }
  deriving (I32 -> ChatPosition -> ShowS
[ChatPosition] -> ShowS
ChatPosition -> String
(I32 -> ChatPosition -> ShowS)
-> (ChatPosition -> String)
-> ([ChatPosition] -> ShowS)
-> Show ChatPosition
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatPosition] -> ShowS
$cshowList :: [ChatPosition] -> ShowS
show :: ChatPosition -> String
$cshow :: ChatPosition -> String
showsPrec :: I32 -> ChatPosition -> ShowS
$cshowsPrec :: I32 -> ChatPosition -> ShowS
Show, ChatPosition -> ChatPosition -> Bool
(ChatPosition -> ChatPosition -> Bool)
-> (ChatPosition -> ChatPosition -> Bool) -> Eq ChatPosition
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatPosition -> ChatPosition -> Bool
$c/= :: ChatPosition -> ChatPosition -> Bool
== :: ChatPosition -> ChatPosition -> Bool
$c== :: ChatPosition -> ChatPosition -> Bool
Eq, (forall x. ChatPosition -> Rep ChatPosition x)
-> (forall x. Rep ChatPosition x -> ChatPosition)
-> Generic ChatPosition
forall x. Rep ChatPosition x -> ChatPosition
forall x. ChatPosition -> Rep ChatPosition x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatPosition x -> ChatPosition
$cfrom :: forall x. ChatPosition -> Rep ChatPosition x
Generic)
data Chat
  = -- | A chat. (Can be a private chat, basic group, supergroup, or secret chat)
  Chat
    { -- | Chat unique identifier
      Chat -> I32
id :: I53,
      -- | Type of the chat
      Chat -> ChatType
type_ :: ChatType,
      -- | Chat title
      Chat -> T
title :: T,
      -- | Chat photo; may be null
      Chat -> Maybe ChatPhoto
photo :: (Maybe) (ChatPhoto),
      -- | Actions that non-administrator chat members are allowed to take in the chat
      Chat -> ChatPermissions
permissions :: ChatPermissions,
      -- | Last message in the chat; may be null
      Chat -> Maybe Message
lastMessage :: (Maybe) (Message),
      -- | Positions of the chat in chat lists
      Chat -> [ChatPosition]
positions :: [ChatPosition],
      -- | True, if the chat is marked as unread
      Chat -> Bool
isMarkedAsUnread :: Bool,
      -- | True, if the chat has scheduled messages
      Chat -> Bool
hasScheduledMessages :: Bool,
      -- | True, if the chat messages can be deleted only for the current user while other users will continue to see the messages
      Chat -> Bool
canBeDeletedOnlyForSelf :: Bool,
      -- | True, if the chat messages can be deleted for all users
      Chat -> Bool
canBeDeletedForAllUsers :: Bool,
      -- | True, if the chat can be reported to Telegram moderators through reportChat
      Chat -> Bool
canBeReported :: Bool,
      -- | Default value of the disable_notification parameter, used when a message is sent to the chat
      Chat -> Bool
defaultDisableNotification :: Bool,
      -- | Number of unread messages in the chat
      Chat -> I32
unreadCount :: I32,
      -- | Identifier of the last read incoming message
      Chat -> I32
lastReadInboxMessageId :: I53,
      -- | Identifier of the last read outgoing message
      Chat -> I32
lastReadOutboxMessageId :: I53,
      -- | Number of unread messages with a mention/reply in the chat
      Chat -> I32
unreadMentionCount :: I32,
      -- | Notification settings for this chat
      Chat -> ChatNotificationSettings
notificationSettings :: ChatNotificationSettings,
      -- | Describes actions which should be possible to do through a chat action bar; may be null
      Chat -> Maybe ChatActionBar
actionBar :: (Maybe) (ChatActionBar),
      -- | Identifier of the pinned message in the chat; 0 if none
      Chat -> I32
pinnedMessageId :: I53,
      -- | Identifier of the message from which reply markup needs to be used; 0 if there is no default custom reply markup in the chat
      Chat -> I32
replyMarkupMessageId :: I53,
      -- | A draft of a message in the chat; may be null
      Chat -> Maybe DraftMessage
draftMessage :: (Maybe) (DraftMessage),
      -- | Contains client-specific data associated with the chat. (For example, the chat scroll position or local chat notification settings can be stored here.) Persistent if the message database is used
      Chat -> T
clientData :: T
    }
  deriving (I32 -> Chat -> ShowS
[Chat] -> ShowS
Chat -> String
(I32 -> Chat -> ShowS)
-> (Chat -> String) -> ([Chat] -> ShowS) -> Show Chat
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Chat] -> ShowS
$cshowList :: [Chat] -> ShowS
show :: Chat -> String
$cshow :: Chat -> String
showsPrec :: I32 -> Chat -> ShowS
$cshowsPrec :: I32 -> Chat -> ShowS
Show, Chat -> Chat -> Bool
(Chat -> Chat -> Bool) -> (Chat -> Chat -> Bool) -> Eq Chat
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Chat -> Chat -> Bool
$c/= :: Chat -> Chat -> Bool
== :: Chat -> Chat -> Bool
$c== :: Chat -> Chat -> Bool
Eq, (forall x. Chat -> Rep Chat x)
-> (forall x. Rep Chat x -> Chat) -> Generic Chat
forall x. Rep Chat x -> Chat
forall x. Chat -> Rep Chat x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Chat x -> Chat
$cfrom :: forall x. Chat -> Rep Chat x
Generic)
data Chats
  = -- | Represents a list of chats 
  Chats
    { -- | List of chat identifiers
      Chats -> [I32]
chatIds :: [I53]
    }
  deriving (I32 -> Chats -> ShowS
[Chats] -> ShowS
Chats -> String
(I32 -> Chats -> ShowS)
-> (Chats -> String) -> ([Chats] -> ShowS) -> Show Chats
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Chats] -> ShowS
$cshowList :: [Chats] -> ShowS
show :: Chats -> String
$cshow :: Chats -> String
showsPrec :: I32 -> Chats -> ShowS
$cshowsPrec :: I32 -> Chats -> ShowS
Show, Chats -> Chats -> Bool
(Chats -> Chats -> Bool) -> (Chats -> Chats -> Bool) -> Eq Chats
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Chats -> Chats -> Bool
$c/= :: Chats -> Chats -> Bool
== :: Chats -> Chats -> Bool
$c== :: Chats -> Chats -> Bool
Eq, (forall x. Chats -> Rep Chats x)
-> (forall x. Rep Chats x -> Chats) -> Generic Chats
forall x. Rep Chats x -> Chats
forall x. Chats -> Rep Chats x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Chats x -> Chats
$cfrom :: forall x. Chats -> Rep Chats x
Generic)
data ChatNearby
  = -- | Describes a chat located nearby 
  ChatNearby
    { -- | Chat identifier 
      ChatNearby -> I32
chatId :: I53,
      -- | Distance to the chat location in meters
      ChatNearby -> I32
distance :: I32
    }
  deriving (I32 -> ChatNearby -> ShowS
[ChatNearby] -> ShowS
ChatNearby -> String
(I32 -> ChatNearby -> ShowS)
-> (ChatNearby -> String)
-> ([ChatNearby] -> ShowS)
-> Show ChatNearby
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatNearby] -> ShowS
$cshowList :: [ChatNearby] -> ShowS
show :: ChatNearby -> String
$cshow :: ChatNearby -> String
showsPrec :: I32 -> ChatNearby -> ShowS
$cshowsPrec :: I32 -> ChatNearby -> ShowS
Show, ChatNearby -> ChatNearby -> Bool
(ChatNearby -> ChatNearby -> Bool)
-> (ChatNearby -> ChatNearby -> Bool) -> Eq ChatNearby
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatNearby -> ChatNearby -> Bool
$c/= :: ChatNearby -> ChatNearby -> Bool
== :: ChatNearby -> ChatNearby -> Bool
$c== :: ChatNearby -> ChatNearby -> Bool
Eq, (forall x. ChatNearby -> Rep ChatNearby x)
-> (forall x. Rep ChatNearby x -> ChatNearby) -> Generic ChatNearby
forall x. Rep ChatNearby x -> ChatNearby
forall x. ChatNearby -> Rep ChatNearby x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatNearby x -> ChatNearby
$cfrom :: forall x. ChatNearby -> Rep ChatNearby x
Generic)
data ChatsNearby
  = -- | Represents a list of chats located nearby 
  ChatsNearby
    { -- | List of users nearby 
      ChatsNearby -> [ChatNearby]
usersNearby :: [ChatNearby],
      -- | List of location-based supergroups nearby
      ChatsNearby -> [ChatNearby]
supergroupsNearby :: [ChatNearby]
    }
  deriving (I32 -> ChatsNearby -> ShowS
[ChatsNearby] -> ShowS
ChatsNearby -> String
(I32 -> ChatsNearby -> ShowS)
-> (ChatsNearby -> String)
-> ([ChatsNearby] -> ShowS)
-> Show ChatsNearby
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatsNearby] -> ShowS
$cshowList :: [ChatsNearby] -> ShowS
show :: ChatsNearby -> String
$cshow :: ChatsNearby -> String
showsPrec :: I32 -> ChatsNearby -> ShowS
$cshowsPrec :: I32 -> ChatsNearby -> ShowS
Show, ChatsNearby -> ChatsNearby -> Bool
(ChatsNearby -> ChatsNearby -> Bool)
-> (ChatsNearby -> ChatsNearby -> Bool) -> Eq ChatsNearby
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatsNearby -> ChatsNearby -> Bool
$c/= :: ChatsNearby -> ChatsNearby -> Bool
== :: ChatsNearby -> ChatsNearby -> Bool
$c== :: ChatsNearby -> ChatsNearby -> Bool
Eq, (forall x. ChatsNearby -> Rep ChatsNearby x)
-> (forall x. Rep ChatsNearby x -> ChatsNearby)
-> Generic ChatsNearby
forall x. Rep ChatsNearby x -> ChatsNearby
forall x. ChatsNearby -> Rep ChatsNearby x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatsNearby x -> ChatsNearby
$cfrom :: forall x. ChatsNearby -> Rep ChatsNearby x
Generic)
data ChatInviteLink
  = -- | Contains a chat invite link 
  ChatInviteLink
    { -- | Chat invite link
      ChatInviteLink -> T
inviteLink :: T
    }
  deriving (I32 -> ChatInviteLink -> ShowS
[ChatInviteLink] -> ShowS
ChatInviteLink -> String
(I32 -> ChatInviteLink -> ShowS)
-> (ChatInviteLink -> String)
-> ([ChatInviteLink] -> ShowS)
-> Show ChatInviteLink
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatInviteLink] -> ShowS
$cshowList :: [ChatInviteLink] -> ShowS
show :: ChatInviteLink -> String
$cshow :: ChatInviteLink -> String
showsPrec :: I32 -> ChatInviteLink -> ShowS
$cshowsPrec :: I32 -> ChatInviteLink -> ShowS
Show, ChatInviteLink -> ChatInviteLink -> Bool
(ChatInviteLink -> ChatInviteLink -> Bool)
-> (ChatInviteLink -> ChatInviteLink -> Bool) -> Eq ChatInviteLink
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatInviteLink -> ChatInviteLink -> Bool
$c/= :: ChatInviteLink -> ChatInviteLink -> Bool
== :: ChatInviteLink -> ChatInviteLink -> Bool
$c== :: ChatInviteLink -> ChatInviteLink -> Bool
Eq, (forall x. ChatInviteLink -> Rep ChatInviteLink x)
-> (forall x. Rep ChatInviteLink x -> ChatInviteLink)
-> Generic ChatInviteLink
forall x. Rep ChatInviteLink x -> ChatInviteLink
forall x. ChatInviteLink -> Rep ChatInviteLink x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatInviteLink x -> ChatInviteLink
$cfrom :: forall x. ChatInviteLink -> Rep ChatInviteLink x
Generic)
data ChatInviteLinkInfo
  = -- | Contains information about a chat invite link
  ChatInviteLinkInfo
    { -- | Chat identifier of the invite link; 0 if the user is not a member of this chat
      ChatInviteLinkInfo -> I32
chatId :: I53,
      -- | Contains information about the type of the chat
      ChatInviteLinkInfo -> ChatType
type_ :: ChatType,
      -- | Title of the chat
      ChatInviteLinkInfo -> T
title :: T,
      -- | Chat photo; may be null
      ChatInviteLinkInfo -> Maybe ChatPhoto
photo :: (Maybe) (ChatPhoto),
      -- | Number of members in the chat
      ChatInviteLinkInfo -> I32
memberCount :: I32,
      -- | User identifiers of some chat members that may be known to the current user
      ChatInviteLinkInfo -> [I32]
memberUserIds :: [I32],
      -- | True, if the chat is a public supergroup or channel, i.e. it has a username or it is a location-based supergroup
      ChatInviteLinkInfo -> Bool
isPublic :: Bool
    }
  deriving (I32 -> ChatInviteLinkInfo -> ShowS
[ChatInviteLinkInfo] -> ShowS
ChatInviteLinkInfo -> String
(I32 -> ChatInviteLinkInfo -> ShowS)
-> (ChatInviteLinkInfo -> String)
-> ([ChatInviteLinkInfo] -> ShowS)
-> Show ChatInviteLinkInfo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatInviteLinkInfo] -> ShowS
$cshowList :: [ChatInviteLinkInfo] -> ShowS
show :: ChatInviteLinkInfo -> String
$cshow :: ChatInviteLinkInfo -> String
showsPrec :: I32 -> ChatInviteLinkInfo -> ShowS
$cshowsPrec :: I32 -> ChatInviteLinkInfo -> ShowS
Show, ChatInviteLinkInfo -> ChatInviteLinkInfo -> Bool
(ChatInviteLinkInfo -> ChatInviteLinkInfo -> Bool)
-> (ChatInviteLinkInfo -> ChatInviteLinkInfo -> Bool)
-> Eq ChatInviteLinkInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatInviteLinkInfo -> ChatInviteLinkInfo -> Bool
$c/= :: ChatInviteLinkInfo -> ChatInviteLinkInfo -> Bool
== :: ChatInviteLinkInfo -> ChatInviteLinkInfo -> Bool
$c== :: ChatInviteLinkInfo -> ChatInviteLinkInfo -> Bool
Eq, (forall x. ChatInviteLinkInfo -> Rep ChatInviteLinkInfo x)
-> (forall x. Rep ChatInviteLinkInfo x -> ChatInviteLinkInfo)
-> Generic ChatInviteLinkInfo
forall x. Rep ChatInviteLinkInfo x -> ChatInviteLinkInfo
forall x. ChatInviteLinkInfo -> Rep ChatInviteLinkInfo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatInviteLinkInfo x -> ChatInviteLinkInfo
$cfrom :: forall x. ChatInviteLinkInfo -> Rep ChatInviteLinkInfo x
Generic)
-- | Describes a type of public chats
data PublicChatType
  = -- | The chat is public, because it has username
  PublicChatTypeHasUsername
    { 
    }
  | -- | The chat is public, because it is a location-based supergroup
  PublicChatTypeIsLocationBased
    { 
    }
  deriving (I32 -> PublicChatType -> ShowS
[PublicChatType] -> ShowS
PublicChatType -> String
(I32 -> PublicChatType -> ShowS)
-> (PublicChatType -> String)
-> ([PublicChatType] -> ShowS)
-> Show PublicChatType
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PublicChatType] -> ShowS
$cshowList :: [PublicChatType] -> ShowS
show :: PublicChatType -> String
$cshow :: PublicChatType -> String
showsPrec :: I32 -> PublicChatType -> ShowS
$cshowsPrec :: I32 -> PublicChatType -> ShowS
Show, PublicChatType -> PublicChatType -> Bool
(PublicChatType -> PublicChatType -> Bool)
-> (PublicChatType -> PublicChatType -> Bool) -> Eq PublicChatType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PublicChatType -> PublicChatType -> Bool
$c/= :: PublicChatType -> PublicChatType -> Bool
== :: PublicChatType -> PublicChatType -> Bool
$c== :: PublicChatType -> PublicChatType -> Bool
Eq, (forall x. PublicChatType -> Rep PublicChatType x)
-> (forall x. Rep PublicChatType x -> PublicChatType)
-> Generic PublicChatType
forall x. Rep PublicChatType x -> PublicChatType
forall x. PublicChatType -> Rep PublicChatType x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PublicChatType x -> PublicChatType
$cfrom :: forall x. PublicChatType -> Rep PublicChatType x
Generic)
-- | Describes actions which should be possible to do through a chat action bar
data ChatActionBar
  = -- | The chat can be reported as spam using the method reportChat with the reason chatReportReasonSpam
  ChatActionBarReportSpam
    { 
    }
  | -- | The chat is a location-based supergroup, which can be reported as having unrelated location using the method reportChat with the reason chatReportReasonUnrelatedLocation
  ChatActionBarReportUnrelatedLocation
    { 
    }
  | -- | The chat is a private or secret chat, which can be reported using the method reportChat, or the other user can be added to the contact list using the method addContact, or the other user can be blocked using the method blockUser
  ChatActionBarReportAddBlock
    { 
    }
  | -- | The chat is a private or secret chat and the other user can be added to the contact list using the method addContact
  ChatActionBarAddContact
    { 
    }
  | -- | The chat is a private or secret chat with a mutual contact and the user's phone number can be shared with the other user using the method sharePhoneNumber
  ChatActionBarSharePhoneNumber
    { 
    }
  deriving (I32 -> ChatActionBar -> ShowS
[ChatActionBar] -> ShowS
ChatActionBar -> String
(I32 -> ChatActionBar -> ShowS)
-> (ChatActionBar -> String)
-> ([ChatActionBar] -> ShowS)
-> Show ChatActionBar
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ChatActionBar] -> ShowS
$cshowList :: [ChatActionBar] -> ShowS
show :: ChatActionBar -> String
$cshow :: ChatActionBar -> String
showsPrec :: I32 -> ChatActionBar -> ShowS
$cshowsPrec :: I32 -> ChatActionBar -> ShowS
Show, ChatActionBar -> ChatActionBar -> Bool
(ChatActionBar -> ChatActionBar -> Bool)
-> (ChatActionBar -> ChatActionBar -> Bool) -> Eq ChatActionBar
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ChatActionBar -> ChatActionBar -> Bool
$c/= :: ChatActionBar -> ChatActionBar -> Bool
== :: ChatActionBar -> ChatActionBar -> Bool
$c== :: ChatActionBar -> ChatActionBar -> Bool
Eq, (forall x. ChatActionBar -> Rep ChatActionBar x)
-> (forall x. Rep ChatActionBar x -> ChatActionBar)
-> Generic ChatActionBar
forall x. Rep ChatActionBar x -> ChatActionBar
forall x. ChatActionBar -> Rep ChatActionBar x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ChatActionBar x -> ChatActionBar
$cfrom :: forall x. ChatActionBar -> Rep ChatActionBar x
Generic)
-- | Describes a keyboard button type
data KeyboardButtonType
  = -- | A simple button, with text that should be sent when the button is pressed
  KeyboardButtonTypeText
    { 
    }
  | -- | A button that sends the user's phone number when pressed; available only in private chats
  KeyboardButtonTypeRequestPhoneNumber
    { 
    }
  | -- | A button that sends the user's location when pressed; available only in private chats
  KeyboardButtonTypeRequestLocation
    { 
    }
  | -- | A button that allows the user to create and send a poll when pressed; available only in private chats 
  KeyboardButtonTypeRequestPoll
    { -- | If true, only regular polls must be allowed to create 
      KeyboardButtonType -> Bool
forceRegular :: Bool,
      -- | If true, only polls in quiz mode must be allowed to create
      KeyboardButtonType -> Bool
forceQuiz :: Bool
    }
  deriving (I32 -> KeyboardButtonType -> ShowS
[KeyboardButtonType] -> ShowS
KeyboardButtonType -> String
(I32 -> KeyboardButtonType -> ShowS)
-> (KeyboardButtonType -> String)
-> ([KeyboardButtonType] -> ShowS)
-> Show KeyboardButtonType
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [KeyboardButtonType] -> ShowS
$cshowList :: [KeyboardButtonType] -> ShowS
show :: KeyboardButtonType -> String
$cshow :: KeyboardButtonType -> String
showsPrec :: I32 -> KeyboardButtonType -> ShowS
$cshowsPrec :: I32 -> KeyboardButtonType -> ShowS
Show, KeyboardButtonType -> KeyboardButtonType -> Bool
(KeyboardButtonType -> KeyboardButtonType -> Bool)
-> (KeyboardButtonType -> KeyboardButtonType -> Bool)
-> Eq KeyboardButtonType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: KeyboardButtonType -> KeyboardButtonType -> Bool
$c/= :: KeyboardButtonType -> KeyboardButtonType -> Bool
== :: KeyboardButtonType -> KeyboardButtonType -> Bool
$c== :: KeyboardButtonType -> KeyboardButtonType -> Bool
Eq, (forall x. KeyboardButtonType -> Rep KeyboardButtonType x)
-> (forall x. Rep KeyboardButtonType x -> KeyboardButtonType)
-> Generic KeyboardButtonType
forall x. Rep KeyboardButtonType x -> KeyboardButtonType
forall x. KeyboardButtonType -> Rep KeyboardButtonType x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep KeyboardButtonType x -> KeyboardButtonType
$cfrom :: forall x. KeyboardButtonType -> Rep KeyboardButtonType x
Generic)
data KeyboardButton
  = -- | Represents a single button in a bot keyboard 
  KeyboardButton
    { -- | Text of the button 
      KeyboardButton -> T
text :: T,
      -- | Type of the button
      KeyboardButton -> KeyboardButtonType
type_ :: KeyboardButtonType
    }
  deriving (I32 -> KeyboardButton -> ShowS
[KeyboardButton] -> ShowS
KeyboardButton -> String
(I32 -> KeyboardButton -> ShowS)
-> (KeyboardButton -> String)
-> ([KeyboardButton] -> ShowS)
-> Show KeyboardButton
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [KeyboardButton] -> ShowS
$cshowList :: [KeyboardButton] -> ShowS
show :: KeyboardButton -> String
$cshow :: KeyboardButton -> String
showsPrec :: I32 -> KeyboardButton -> ShowS
$cshowsPrec :: I32 -> KeyboardButton -> ShowS
Show, KeyboardButton -> KeyboardButton -> Bool
(KeyboardButton -> KeyboardButton -> Bool)
-> (KeyboardButton -> KeyboardButton -> Bool) -> Eq KeyboardButton
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: KeyboardButton -> KeyboardButton -> Bool
$c/= :: KeyboardButton -> KeyboardButton -> Bool
== :: KeyboardButton -> KeyboardButton -> Bool
$c== :: KeyboardButton -> KeyboardButton -> Bool
Eq, (forall x. KeyboardButton -> Rep KeyboardButton x)
-> (forall x. Rep KeyboardButton x -> KeyboardButton)
-> Generic KeyboardButton
forall x. Rep KeyboardButton x -> KeyboardButton
forall x. KeyboardButton -> Rep KeyboardButton x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep KeyboardButton x -> KeyboardButton
$cfrom :: forall x. KeyboardButton -> Rep KeyboardButton x
Generic)
-- | Describes the type of an inline keyboard button
data InlineKeyboardButtonType
  = -- | A button that opens a specified URL 
  InlineKeyboardButtonTypeUrl
    { -- | HTTP or tg:// URL to open
      InlineKeyboardButtonType -> T
url :: T
    }
  | -- | A button that opens a specified URL and automatically logs in in current user if they allowed to do that 
  InlineKeyboardButtonTypeLoginUrl
    { -- | An HTTP URL to open 
      url :: T,
      -- | Unique button identifier 
      InlineKeyboardButtonType -> I32
id :: I32,
      -- | If non-empty, new text of the button in forwarded messages
      InlineKeyboardButtonType -> T
forwardText :: T
    }
  | -- | A button that sends a special callback query to a bot 
  InlineKeyboardButtonTypeCallback
    { -- | Data to be sent to the bot via a callback query
      InlineKeyboardButtonType -> ByteString64
data_ :: ByteString64
    }
  | -- | A button with a game that sends a special callback query to a bot. This button must be in the first column and row of the keyboard and can be attached only to a message with content of the type messageGame
  InlineKeyboardButtonTypeCallbackGame
    { 
    }
  | -- | A button that forces an inline query to the bot to be inserted in the input field 
  InlineKeyboardButtonTypeSwitchInline
    { -- | Inline query to be sent to the bot 
      InlineKeyboardButtonType -> T
query :: T,
      -- | True, if the inline query should be sent from the current chat
      InlineKeyboardButtonType -> Bool
inCurrentChat :: Bool
    }
  | -- | A button to buy something. This button must be in the first column and row of the keyboard and can be attached only to a message with content of the type messageInvoice
  InlineKeyboardButtonTypeBuy
    { 
    }
  deriving (I32 -> InlineKeyboardButtonType -> ShowS
[InlineKeyboardButtonType] -> ShowS
InlineKeyboardButtonType -> String
(I32 -> InlineKeyboardButtonType -> ShowS)
-> (InlineKeyboardButtonType -> String)
-> ([InlineKeyboardButtonType] -> ShowS)
-> Show InlineKeyboardButtonType
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [InlineKeyboardButtonType] -> ShowS
$cshowList :: [InlineKeyboardButtonType] -> ShowS
show :: InlineKeyboardButtonType -> String
$cshow :: InlineKeyboardButtonType -> String
showsPrec :: I32 -> InlineKeyboardButtonType -> ShowS
$cshowsPrec :: I32 -> InlineKeyboardButtonType -> ShowS
Show, InlineKeyboardButtonType -> InlineKeyboardButtonType -> Bool
(InlineKeyboardButtonType -> InlineKeyboardButtonType -> Bool)
-> (InlineKeyboardButtonType -> InlineKeyboardButtonType -> Bool)
-> Eq InlineKeyboardButtonType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: InlineKeyboardButtonType -> InlineKeyboardButtonType -> Bool
$c/= :: InlineKeyboardButtonType -> InlineKeyboardButtonType -> Bool
== :: InlineKeyboardButtonType -> InlineKeyboardButtonType -> Bool
$c== :: InlineKeyboardButtonType -> InlineKeyboardButtonType -> Bool
Eq, (forall x.
 InlineKeyboardButtonType -> Rep InlineKeyboardButtonType x)
-> (forall x.
    Rep InlineKeyboardButtonType x -> InlineKeyboardButtonType)
-> Generic InlineKeyboardButtonType
forall x.
Rep InlineKeyboardButtonType x -> InlineKeyboardButtonType
forall x.
InlineKeyboardButtonType -> Rep InlineKeyboardButtonType x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep InlineKeyboardButtonType x -> InlineKeyboardButtonType
$cfrom :: forall x.
InlineKeyboardButtonType -> Rep InlineKeyboardButtonType x
Generic)
data InlineKeyboardButton
  = -- | Represents a single button in an inline keyboard 
  InlineKeyboardButton
    { -- | Text of the button 
      InlineKeyboardButton -> T
text :: T,
      -- | Type of the button
      InlineKeyboardButton -> InlineKeyboardButtonType
type_ :: InlineKeyboardButtonType
    }
  deriving (I32 -> InlineKeyboardButton -> ShowS
[InlineKeyboardButton] -> ShowS
InlineKeyboardButton -> String
(I32 -> InlineKeyboardButton -> ShowS)
-> (InlineKeyboardButton -> String)
-> ([InlineKeyboardButton] -> ShowS)
-> Show InlineKeyboardButton
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [InlineKeyboardButton] -> ShowS
$cshowList :: [InlineKeyboardButton] -> ShowS
show :: InlineKeyboardButton -> String
$cshow :: InlineKeyboardButton -> String
showsPrec :: I32 -> InlineKeyboardButton -> ShowS
$cshowsPrec :: I32 -> InlineKeyboardButton -> ShowS
Show, InlineKeyboardButton -> InlineKeyboardButton -> Bool
(InlineKeyboardButton -> InlineKeyboardButton -> Bool)
-> (InlineKeyboardButton -> InlineKeyboardButton -> Bool)
-> Eq InlineKeyboardButton
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: InlineKeyboardButton -> InlineKeyboardButton -> Bool
$c/= :: InlineKeyboardButton -> InlineKeyboardButton -> Bool
== :: InlineKeyboardButton -> InlineKeyboardButton -> Bool
$c== :: InlineKeyboardButton -> InlineKeyboardButton -> Bool
Eq, (forall x. InlineKeyboardButton -> Rep InlineKeyboardButton x)
-> (forall x. Rep InlineKeyboardButton x -> InlineKeyboardButton)
-> Generic InlineKeyboardButton
forall x. Rep InlineKeyboardButton x -> InlineKeyboardButton
forall x. InlineKeyboardButton -> Rep InlineKeyboardButton x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep InlineKeyboardButton x -> InlineKeyboardButton
$cfrom :: forall x. InlineKeyboardButton -> Rep InlineKeyboardButton x
Generic)
-- | Contains a description of a custom keyboard and actions that can be done with it to quickly reply to bots
data ReplyMarkup
  = -- | Instructs clients to remove the keyboard once this message has been received. This kind of keyboard can't be received in an incoming message; instead, UpdateChatReplyMarkup with message_id == 0 will be sent
  ReplyMarkupRemoveKeyboard
    { -- | True, if the keyboard is removed only for the mentioned users or the target user of a reply
      ReplyMarkup -> Bool
isPersonal :: Bool
    }
  | -- | Instructs clients to force a reply to this message
  ReplyMarkupForceReply
    { -- | True, if a forced reply must automatically be shown to the current user. For outgoing messages, specify true to show the forced reply only for the mentioned users and for the target user of a reply
      isPersonal :: Bool
    }
  | -- | Contains a custom keyboard layout to quickly reply to bots
  ReplyMarkupShowKeyboard
    { -- | A list of rows of bot keyboard buttons
      ReplyMarkup -> [[KeyboardButton]]
rows_2 :: [[KeyboardButton]],
      -- | True, if the client needs to resize the keyboard vertically
      ReplyMarkup -> Bool
resizeKeyboard :: Bool,
      -- | True, if the client needs to hide the keyboard after use
      ReplyMarkup -> Bool
oneTime :: Bool,
      -- | True, if the keyboard must automatically be shown to the current user. For outgoing messages, specify true to show the keyboard only for the mentioned users and for the target user of a reply
      isPersonal :: Bool
    }
  | -- | Contains an inline keyboard layout
  ReplyMarkupInlineKeyboard
    { -- | A list of rows of inline keyboard buttons
      ReplyMarkup -> [[InlineKeyboardButton]]
rows :: [[InlineKeyboardButton]]
    }
  deriving (I32 -> ReplyMarkup -> ShowS
[ReplyMarkup] -> ShowS
ReplyMarkup -> String
(I32 -> ReplyMarkup -> ShowS)
-> (ReplyMarkup -> String)
-> ([ReplyMarkup] -> ShowS)
-> Show ReplyMarkup
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ReplyMarkup] -> ShowS
$cshowList :: [ReplyMarkup] -> ShowS
show :: ReplyMarkup -> String
$cshow :: ReplyMarkup -> String
showsPrec :: I32 -> ReplyMarkup -> ShowS
$cshowsPrec :: I32 -> ReplyMarkup -> ShowS
Show, ReplyMarkup -> ReplyMarkup -> Bool
(ReplyMarkup -> ReplyMarkup -> Bool)
-> (ReplyMarkup -> ReplyMarkup -> Bool) -> Eq ReplyMarkup
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ReplyMarkup -> ReplyMarkup -> Bool
$c/= :: ReplyMarkup -> ReplyMarkup -> Bool
== :: ReplyMarkup -> ReplyMarkup -> Bool
$c== :: ReplyMarkup -> ReplyMarkup -> Bool
Eq, (forall x. ReplyMarkup -> Rep ReplyMarkup x)
-> (forall x. Rep ReplyMarkup x -> ReplyMarkup)
-> Generic ReplyMarkup
forall x. Rep ReplyMarkup x -> ReplyMarkup
forall x. ReplyMarkup -> Rep ReplyMarkup x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ReplyMarkup x -> ReplyMarkup
$cfrom :: forall x. ReplyMarkup -> Rep ReplyMarkup x
Generic)
-- | Contains information about an inline button of type inlineKeyboardButtonTypeLoginUrl
data LoginUrlInfo
  = -- | An HTTP url needs to be open 
  LoginUrlInfoOpen
    { -- | The URL to open 
      LoginUrlInfo -> T
url :: T,
      -- | True, if there is no need to show an ordinary open URL confirm
      LoginUrlInfo -> Bool
skipConfirm :: Bool
    }
  | -- | An authorization confirmation dialog needs to be shown to the user 
  LoginUrlInfoRequestConfirmation
    { -- | An HTTP URL to be opened 
      url :: T,
      -- | A domain of the URL
      LoginUrlInfo -> T
domain :: T,
      -- | User identifier of a bot linked with the website 
      LoginUrlInfo -> I32
botUserId :: I32,
      -- | True, if the user needs to be requested to give the permission to the bot to send them messages
      LoginUrlInfo -> Bool
requestWriteAccess :: Bool
    }
  deriving (I32 -> LoginUrlInfo -> ShowS
[LoginUrlInfo] -> ShowS
LoginUrlInfo -> String
(I32 -> LoginUrlInfo -> ShowS)
-> (LoginUrlInfo -> String)
-> ([LoginUrlInfo] -> ShowS)
-> Show LoginUrlInfo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [LoginUrlInfo] -> ShowS
$cshowList :: [LoginUrlInfo] -> ShowS
show :: LoginUrlInfo -> String
$cshow :: LoginUrlInfo -> String
showsPrec :: I32 -> LoginUrlInfo -> ShowS
$cshowsPrec :: I32 -> LoginUrlInfo -> ShowS
Show, LoginUrlInfo -> LoginUrlInfo -> Bool
(LoginUrlInfo -> LoginUrlInfo -> Bool)
-> (LoginUrlInfo -> LoginUrlInfo -> Bool) -> Eq LoginUrlInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: LoginUrlInfo -> LoginUrlInfo -> Bool
$c/= :: LoginUrlInfo -> LoginUrlInfo -> Bool
== :: LoginUrlInfo -> LoginUrlInfo -> Bool
$c== :: LoginUrlInfo -> LoginUrlInfo -> Bool
Eq, (forall x. LoginUrlInfo -> Rep LoginUrlInfo x)
-> (forall x. Rep LoginUrlInfo x -> LoginUrlInfo)
-> Generic LoginUrlInfo
forall x. Rep LoginUrlInfo x -> LoginUrlInfo
forall x. LoginUrlInfo -> Rep LoginUrlInfo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep LoginUrlInfo x -> LoginUrlInfo
$cfrom :: forall x. LoginUrlInfo -> Rep LoginUrlInfo x
Generic)
-- | Describes a text object inside an instant-view web page
data RichText
  = -- | A plain text 
  RichTextPlain
    { -- | Text
      RichText -> T
text_2 :: T
    }
  | -- | A bold rich text 
  RichTextBold
    { -- | Text
      RichText -> RichText
text :: RichText
    }
  | -- | An italicized rich text 
  RichTextItalic
    { -- | Text
      text :: RichText
    }
  | -- | An underlined rich text 
  RichTextUnderline
    { -- | Text
      text :: RichText
    }
  | -- | A strikethrough rich text 
  RichTextStrikethrough
    { -- | Text
      text :: RichText
    }
  | -- | A fixed-width rich text 
  RichTextFixed
    { -- | Text
      text :: RichText
    }
  | -- | A rich text URL link 
  RichTextUrl
    { -- | Text 
      text :: RichText,
      -- | URL 
      RichText -> T
url :: T,
      -- | True, if the URL has cached instant view server-side
      RichText -> Bool
isCached :: Bool
    }
  | -- | A rich text email link 
  RichTextEmailAddress
    { -- | Text 
      text :: RichText,
      -- | Email address
      RichText -> T
emailAddress :: T
    }
  | -- | A subscript rich text 
  RichTextSubscript
    { -- | Text
      text :: RichText
    }
  | -- | A superscript rich text 
  RichTextSuperscript
    { -- | Text
      text :: RichText
    }
  | -- | A marked rich text 
  RichTextMarked
    { -- | Text
      text :: RichText
    }
  | -- | A rich text phone number 
  RichTextPhoneNumber
    { -- | Text 
      text :: RichText,
      -- | Phone number
      RichText -> T
phoneNumber :: T
    }
  | -- | A small image inside the text 
  RichTextIcon
    { -- | The image represented as a document. The image can be in GIF, JPEG or PNG format
      RichText -> Document
document :: Document,
      -- | Width of a bounding box in which the image should be shown; 0 if unknown
      RichText -> I32
width :: I32,
      -- | Height of a bounding box in which the image should be shown; 0 if unknown
      RichText -> I32
height :: I32
    }
  | -- | A rich text reference of a text on the same web page 
  RichTextReference
    { -- | The text 
      text :: RichText,
      -- | The text to show on click 
      RichText -> RichText
referenceText :: RichText,
      -- | An HTTP URL, opening the reference
      url :: T
    }
  | -- | An anchor 
  RichTextAnchor
    { -- | Anchor name
      RichText -> T
name :: T
    }
  | -- | A link to an anchor on the same web page 
  RichTextAnchorLink
    { -- | The link text 
      text :: RichText,
      -- | The anchor name. If the name is empty, the link should bring back to top 
      name :: T,
      -- | An HTTP URL, opening the anchor
      url :: T
    }
  | -- | A concatenation of rich texts 
  RichTexts
    { -- | Texts
      RichText -> [RichText]
texts :: [RichText]
    }
  deriving (I32 -> RichText -> ShowS
[RichText] -> ShowS
RichText -> String
(I32 -> RichText -> ShowS)
-> (RichText -> String) -> ([RichText] -> ShowS) -> Show RichText
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RichText] -> ShowS
$cshowList :: [RichText] -> ShowS
show :: RichText -> String
$cshow :: RichText -> String
showsPrec :: I32 -> RichText -> ShowS
$cshowsPrec :: I32 -> RichText -> ShowS
Show, RichText -> RichText -> Bool
(RichText -> RichText -> Bool)
-> (RichText -> RichText -> Bool) -> Eq RichText
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RichText -> RichText -> Bool
$c/= :: RichText -> RichText -> Bool
== :: RichText -> RichText -> Bool
$c== :: RichText -> RichText -> Bool
Eq, (forall x. RichText -> Rep RichText x)
-> (forall x. Rep RichText x -> RichText) -> Generic RichText
forall x. Rep RichText x -> RichText
forall x. RichText -> Rep RichText x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep RichText x -> RichText
$cfrom :: forall x. RichText -> Rep RichText x
Generic)
data PageBlockCaption
  = -- | Contains a caption of an instant view web page block, consisting of a text and a trailing credit 
  PageBlockCaption
    { -- | Content of the caption 
      PageBlockCaption -> RichText
text :: RichText,
      -- | Block credit (like HTML tag <cite>)
      PageBlockCaption -> RichText
credit :: RichText
    }
  deriving (I32 -> PageBlockCaption -> ShowS
[PageBlockCaption] -> ShowS
PageBlockCaption -> String
(I32 -> PageBlockCaption -> ShowS)
-> (PageBlockCaption -> String)
-> ([PageBlockCaption] -> ShowS)
-> Show PageBlockCaption
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PageBlockCaption] -> ShowS
$cshowList :: [PageBlockCaption] -> ShowS
show :: PageBlockCaption -> String
$cshow :: PageBlockCaption -> String
showsPrec :: I32 -> PageBlockCaption -> ShowS
$cshowsPrec :: I32 -> PageBlockCaption -> ShowS
Show, PageBlockCaption -> PageBlockCaption -> Bool
(PageBlockCaption -> PageBlockCaption -> Bool)
-> (PageBlockCaption -> PageBlockCaption -> Bool)
-> Eq PageBlockCaption
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PageBlockCaption -> PageBlockCaption -> Bool
$c/= :: PageBlockCaption -> PageBlockCaption -> Bool
== :: PageBlockCaption -> PageBlockCaption -> Bool
$c== :: PageBlockCaption -> PageBlockCaption -> Bool
Eq, (forall x. PageBlockCaption -> Rep PageBlockCaption x)
-> (forall x. Rep PageBlockCaption x -> PageBlockCaption)
-> Generic PageBlockCaption
forall x. Rep PageBlockCaption x -> PageBlockCaption
forall x. PageBlockCaption -> Rep PageBlockCaption x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PageBlockCaption x -> PageBlockCaption
$cfrom :: forall x. PageBlockCaption -> Rep PageBlockCaption x
Generic)
data PageBlockListItem
  = -- | Describes an item of a list page block 
  PageBlockListItem
    { -- | Item label 
      PageBlockListItem -> T
label :: T,
      -- | Item blocks
      PageBlockListItem -> [PageBlock]
pageBlocks :: [PageBlock]
    }
  deriving (I32 -> PageBlockListItem -> ShowS
[PageBlockListItem] -> ShowS
PageBlockListItem -> String
(I32 -> PageBlockListItem -> ShowS)
-> (PageBlockListItem -> String)
-> ([PageBlockListItem] -> ShowS)
-> Show PageBlockListItem
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PageBlockListItem] -> ShowS
$cshowList :: [PageBlockListItem] -> ShowS
show :: PageBlockListItem -> String
$cshow :: PageBlockListItem -> String
showsPrec :: I32 -> PageBlockListItem -> ShowS
$cshowsPrec :: I32 -> PageBlockListItem -> ShowS
Show, PageBlockListItem -> PageBlockListItem -> Bool
(PageBlockListItem -> PageBlockListItem -> Bool)
-> (PageBlockListItem -> PageBlockListItem -> Bool)
-> Eq PageBlockListItem
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PageBlockListItem -> PageBlockListItem -> Bool
$c/= :: PageBlockListItem -> PageBlockListItem -> Bool
== :: PageBlockListItem -> PageBlockListItem -> Bool
$c== :: PageBlockListItem -> PageBlockListItem -> Bool
Eq, (forall x. PageBlockListItem -> Rep PageBlockListItem x)
-> (forall x. Rep PageBlockListItem x -> PageBlockListItem)
-> Generic PageBlockListItem
forall x. Rep PageBlockListItem x -> PageBlockListItem
forall x. PageBlockListItem -> Rep PageBlockListItem x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PageBlockListItem x -> PageBlockListItem
$cfrom :: forall x. PageBlockListItem -> Rep PageBlockListItem x
Generic)
-- | Describes a horizontal alignment of a table cell content
data PageBlockHorizontalAlignment
  = -- | The content should be left-aligned
  PageBlockHorizontalAlignmentLeft
    { 
    }
  | -- | The content should be center-aligned
  PageBlockHorizontalAlignmentCenter
    { 
    }
  | -- | The content should be right-aligned
  PageBlockHorizontalAlignmentRight
    { 
    }
  deriving (I32 -> PageBlockHorizontalAlignment -> ShowS
[PageBlockHorizontalAlignment] -> ShowS
PageBlockHorizontalAlignment -> String
(I32 -> PageBlockHorizontalAlignment -> ShowS)
-> (PageBlockHorizontalAlignment -> String)
-> ([PageBlockHorizontalAlignment] -> ShowS)
-> Show PageBlockHorizontalAlignment
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PageBlockHorizontalAlignment] -> ShowS
$cshowList :: [PageBlockHorizontalAlignment] -> ShowS
show :: PageBlockHorizontalAlignment -> String
$cshow :: PageBlockHorizontalAlignment -> String
showsPrec :: I32 -> PageBlockHorizontalAlignment -> ShowS
$cshowsPrec :: I32 -> PageBlockHorizontalAlignment -> ShowS
Show, PageBlockHorizontalAlignment
-> PageBlockHorizontalAlignment -> Bool
(PageBlockHorizontalAlignment
 -> PageBlockHorizontalAlignment -> Bool)
-> (PageBlockHorizontalAlignment
    -> PageBlockHorizontalAlignment -> Bool)
-> Eq PageBlockHorizontalAlignment
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PageBlockHorizontalAlignment
-> PageBlockHorizontalAlignment -> Bool
$c/= :: PageBlockHorizontalAlignment
-> PageBlockHorizontalAlignment -> Bool
== :: PageBlockHorizontalAlignment
-> PageBlockHorizontalAlignment -> Bool
$c== :: PageBlockHorizontalAlignment
-> PageBlockHorizontalAlignment -> Bool
Eq, (forall x.
 PageBlockHorizontalAlignment -> Rep PageBlockHorizontalAlignment x)
-> (forall x.
    Rep PageBlockHorizontalAlignment x -> PageBlockHorizontalAlignment)
-> Generic PageBlockHorizontalAlignment
forall x.
Rep PageBlockHorizontalAlignment x -> PageBlockHorizontalAlignment
forall x.
PageBlockHorizontalAlignment -> Rep PageBlockHorizontalAlignment x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep PageBlockHorizontalAlignment x -> PageBlockHorizontalAlignment
$cfrom :: forall x.
PageBlockHorizontalAlignment -> Rep PageBlockHorizontalAlignment x
Generic)
-- | Describes a Vertical alignment of a table cell content
data PageBlockVerticalAlignment
  = -- | The content should be top-aligned
  PageBlockVerticalAlignmentTop
    { 
    }
  | -- | The content should be middle-aligned
  PageBlockVerticalAlignmentMiddle
    { 
    }
  | -- | The content should be bottom-aligned
  PageBlockVerticalAlignmentBottom
    { 
    }
  deriving (I32 -> PageBlockVerticalAlignment -> ShowS
[PageBlockVerticalAlignment] -> ShowS
PageBlockVerticalAlignment -> String
(I32 -> PageBlockVerticalAlignment -> ShowS)
-> (PageBlockVerticalAlignment -> String)
-> ([PageBlockVerticalAlignment] -> ShowS)
-> Show PageBlockVerticalAlignment
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PageBlockVerticalAlignment] -> ShowS
$cshowList :: [PageBlockVerticalAlignment] -> ShowS
show :: PageBlockVerticalAlignment -> String
$cshow :: PageBlockVerticalAlignment -> String
showsPrec :: I32 -> PageBlockVerticalAlignment -> ShowS
$cshowsPrec :: I32 -> PageBlockVerticalAlignment -> ShowS
Show, PageBlockVerticalAlignment -> PageBlockVerticalAlignment -> Bool
(PageBlockVerticalAlignment -> PageBlockVerticalAlignment -> Bool)
-> (PageBlockVerticalAlignment
    -> PageBlockVerticalAlignment -> Bool)
-> Eq PageBlockVerticalAlignment
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PageBlockVerticalAlignment -> PageBlockVerticalAlignment -> Bool
$c/= :: PageBlockVerticalAlignment -> PageBlockVerticalAlignment -> Bool
== :: PageBlockVerticalAlignment -> PageBlockVerticalAlignment -> Bool
$c== :: PageBlockVerticalAlignment -> PageBlockVerticalAlignment -> Bool
Eq, (forall x.
 PageBlockVerticalAlignment -> Rep PageBlockVerticalAlignment x)
-> (forall x.
    Rep PageBlockVerticalAlignment x -> PageBlockVerticalAlignment)
-> Generic PageBlockVerticalAlignment
forall x.
Rep PageBlockVerticalAlignment x -> PageBlockVerticalAlignment
forall x.
PageBlockVerticalAlignment -> Rep PageBlockVerticalAlignment x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep PageBlockVerticalAlignment x -> PageBlockVerticalAlignment
$cfrom :: forall x.
PageBlockVerticalAlignment -> Rep PageBlockVerticalAlignment x
Generic)
data PageBlockTableCell
  = -- | Represents a cell of a table 
  PageBlockTableCell
    { -- | Cell text; may be null. If the text is null, then the cell should be invisible 
      PageBlockTableCell -> Maybe RichText
text :: (Maybe) (RichText),
      -- | True, if it is a header cell
      PageBlockTableCell -> Bool
isHeader :: Bool,
      -- | The number of columns the cell should span 
      PageBlockTableCell -> I32
colspan :: I32,
      -- | The number of rows the cell should span
      PageBlockTableCell -> I32
rowspan :: I32,
      -- | Horizontal cell content alignment 
      PageBlockTableCell -> PageBlockHorizontalAlignment
align :: PageBlockHorizontalAlignment,
      -- | Vertical cell content alignment
      PageBlockTableCell -> PageBlockVerticalAlignment
valign :: PageBlockVerticalAlignment
    }
  deriving (I32 -> PageBlockTableCell -> ShowS
[PageBlockTableCell] -> ShowS
PageBlockTableCell -> String
(I32 -> PageBlockTableCell -> ShowS)
-> (PageBlockTableCell -> String)
-> ([PageBlockTableCell] -> ShowS)
-> Show PageBlockTableCell
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PageBlockTableCell] -> ShowS
$cshowList :: [PageBlockTableCell] -> ShowS
show :: PageBlockTableCell -> String
$cshow :: PageBlockTableCell -> String
showsPrec :: I32 -> PageBlockTableCell -> ShowS
$cshowsPrec :: I32 -> PageBlockTableCell -> ShowS
Show, PageBlockTableCell -> PageBlockTableCell -> Bool
(PageBlockTableCell -> PageBlockTableCell -> Bool)
-> (PageBlockTableCell -> PageBlockTableCell -> Bool)
-> Eq PageBlockTableCell
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PageBlockTableCell -> PageBlockTableCell -> Bool
$c/= :: PageBlockTableCell -> PageBlockTableCell -> Bool
== :: PageBlockTableCell -> PageBlockTableCell -> Bool
$c== :: PageBlockTableCell -> PageBlockTableCell -> Bool
Eq, (forall x. PageBlockTableCell -> Rep PageBlockTableCell x)
-> (forall x. Rep PageBlockTableCell x -> PageBlockTableCell)
-> Generic PageBlockTableCell
forall x. Rep PageBlockTableCell x -> PageBlockTableCell
forall x. PageBlockTableCell -> Rep PageBlockTableCell x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PageBlockTableCell x -> PageBlockTableCell
$cfrom :: forall x. PageBlockTableCell -> Rep PageBlockTableCell x
Generic)
data PageBlockRelatedArticle
  = -- | Contains information about a related article 
  PageBlockRelatedArticle
    { -- | Related article URL 
      PageBlockRelatedArticle -> T
url :: T,
      -- | Article title; may be empty 
      PageBlockRelatedArticle -> T
title :: T,
      -- | Contains information about a related article 
      PageBlockRelatedArticle -> T
description :: T,
      -- | Article photo; may be null 
      PageBlockRelatedArticle -> Maybe Photo
photo :: (Maybe) (Photo),
      -- | Article author; may be empty 
      PageBlockRelatedArticle -> T
author :: T,
      -- | Point in time (Unix timestamp) when the article was published; 0 if unknown
      PageBlockRelatedArticle -> I32
publishDate :: I32
    }
  deriving (I32 -> PageBlockRelatedArticle -> ShowS
[PageBlockRelatedArticle] -> ShowS
PageBlockRelatedArticle -> String
(I32 -> PageBlockRelatedArticle -> ShowS)
-> (PageBlockRelatedArticle -> String)
-> ([PageBlockRelatedArticle] -> ShowS)
-> Show PageBlockRelatedArticle
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PageBlockRelatedArticle] -> ShowS
$cshowList :: [PageBlockRelatedArticle] -> ShowS
show :: PageBlockRelatedArticle -> String
$cshow :: PageBlockRelatedArticle -> String
showsPrec :: I32 -> PageBlockRelatedArticle -> ShowS
$cshowsPrec :: I32 -> PageBlockRelatedArticle -> ShowS
Show, PageBlockRelatedArticle -> PageBlockRelatedArticle -> Bool
(PageBlockRelatedArticle -> PageBlockRelatedArticle -> Bool)
-> (PageBlockRelatedArticle -> PageBlockRelatedArticle -> Bool)
-> Eq PageBlockRelatedArticle
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PageBlockRelatedArticle -> PageBlockRelatedArticle -> Bool
$c/= :: PageBlockRelatedArticle -> PageBlockRelatedArticle -> Bool
== :: PageBlockRelatedArticle -> PageBlockRelatedArticle -> Bool
$c== :: PageBlockRelatedArticle -> PageBlockRelatedArticle -> Bool
Eq, (forall x.
 PageBlockRelatedArticle -> Rep PageBlockRelatedArticle x)
-> (forall x.
    Rep PageBlockRelatedArticle x -> PageBlockRelatedArticle)
-> Generic PageBlockRelatedArticle
forall x. Rep PageBlockRelatedArticle x -> PageBlockRelatedArticle
forall x. PageBlockRelatedArticle -> Rep PageBlockRelatedArticle x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PageBlockRelatedArticle x -> PageBlockRelatedArticle
$cfrom :: forall x. PageBlockRelatedArticle -> Rep PageBlockRelatedArticle x
Generic)
-- | Describes a block of an instant view web page
data PageBlock
  = -- | The title of a page 
  PageBlockTitle
    { -- | Title
      PageBlock -> RichText
title_2 :: RichText
    }
  | -- | The subtitle of a page 
  PageBlockSubtitle
    { -- | Subtitle
      PageBlock -> RichText
subtitle :: RichText
    }
  | -- | The author and publishing date of a page 
  PageBlockAuthorDate
    { -- | Author 
      PageBlock -> RichText
author_2 :: RichText,
      -- | Point in time (Unix timestamp) when the article was published; 0 if unknown
      PageBlock -> I32
publishDate :: I32
    }
  | -- | A header 
  PageBlockHeader
    { -- | Header
      PageBlock -> RichText
header :: RichText
    }
  | -- | A subheader 
  PageBlockSubheader
    { -- | Subheader
      PageBlock -> RichText
subheader :: RichText
    }
  | -- | A kicker 
  PageBlockKicker
    { -- | Kicker
      PageBlock -> RichText
kicker :: RichText
    }
  | -- | A text paragraph 
  PageBlockParagraph
    { -- | Paragraph text
      PageBlock -> RichText
text :: RichText
    }
  | -- | A preformatted text paragraph 
  PageBlockPreformatted
    { -- | Paragraph text 
      text :: RichText,
      -- | Programming language for which the text should be formatted
      PageBlock -> T
language :: T
    }
  | -- | The footer of a page 
  PageBlockFooter
    { -- | Footer
      PageBlock -> RichText
footer :: RichText
    }
  | -- | An empty block separating a page
  PageBlockDivider
    { 
    }
  | -- | An invisible anchor on a page, which can be used in a URL to open the page from the specified anchor 
  PageBlockAnchor
    { -- | Name of the anchor
      PageBlock -> T
name :: T
    }
  | -- | A list of data blocks 
  PageBlockList
    { -- | The items of the list
      PageBlock -> [PageBlockListItem]
items :: [PageBlockListItem]
    }
  | -- | A block quote 
  PageBlockBlockQuote
    { -- | Quote text 
      text :: RichText,
      -- | Quote credit
      PageBlock -> RichText
credit :: RichText
    }
  | -- | A pull quote 
  PageBlockPullQuote
    { -- | Quote text 
      text :: RichText,
      -- | Quote credit
      credit :: RichText
    }
  | -- | An animation 
  PageBlockAnimation
    { -- | Animation file; may be null 
      PageBlock -> Maybe Animation
animation :: (Maybe) (Animation),
      -- | Animation caption 
      PageBlock -> PageBlockCaption
caption :: PageBlockCaption,
      -- | True, if the animation should be played automatically
      PageBlock -> Bool
needAutoplay :: Bool
    }
  | -- | An audio file 
  PageBlockAudio
    { -- | Audio file; may be null 
      PageBlock -> Maybe Audio
audio :: (Maybe) (Audio),
      -- | Audio file caption
      caption :: PageBlockCaption
    }
  | -- | A photo 
  PageBlockPhoto
    { -- | Photo file; may be null 
      PageBlock -> Maybe Photo
photo_2 :: (Maybe) (Photo),
      -- | Photo caption 
      caption :: PageBlockCaption,
      -- | URL that needs to be opened when the photo is clicked
      PageBlock -> T
url :: T
    }
  | -- | A video 
  PageBlockVideo
    { -- | Video file; may be null 
      PageBlock -> Maybe Video
video :: (Maybe) (Video),
      -- | Video caption 
      caption :: PageBlockCaption,
      -- | True, if the video should be played automatically 
      needAutoplay :: Bool,
      -- | True, if the video should be looped
      PageBlock -> Bool
isLooped :: Bool
    }
  | -- | A voice note 
  PageBlockVoiceNote
    { -- | Voice note; may be null 
      PageBlock -> Maybe VoiceNote
voiceNote :: (Maybe) (VoiceNote),
      -- | Voice note caption
      caption :: PageBlockCaption
    }
  | -- | A page cover 
  PageBlockCover
    { -- | Cover
      PageBlock -> PageBlock
cover :: PageBlock
    }
  | -- | An embedded web page 
  PageBlockEmbedded
    { -- | Web page URL, if available 
      url :: T,
      -- | HTML-markup of the embedded page 
      PageBlock -> T
html :: T,
      -- | Poster photo, if available; may be null 
      PageBlock -> Maybe Photo
posterPhoto :: (Maybe) (Photo),
      -- | Block width; 0 if unknown 
      PageBlock -> I32
width :: I32,
      -- | Block height; 0 if unknown 
      PageBlock -> I32
height :: I32,
      -- | Block caption 
      caption :: PageBlockCaption,
      -- | True, if the block should be full width 
      PageBlock -> Bool
isFullWidth :: Bool,
      -- | True, if scrolling should be allowed
      PageBlock -> Bool
allowScrolling :: Bool
    }
  | -- | An embedded post 
  PageBlockEmbeddedPost
    { -- | Web page URL 
      url :: T,
      -- | Post author 
      PageBlock -> T
author :: T,
      -- | Post author photo; may be null 
      PageBlock -> Maybe Photo
authorPhoto :: (Maybe) (Photo),
      -- | Point in time (Unix timestamp) when the post was created; 0 if unknown 
      PageBlock -> I32
date :: I32,
      -- | Post content 
      PageBlock -> [PageBlock]
pageBlocks :: [PageBlock],
      -- | Post caption
      caption :: PageBlockCaption
    }
  | -- | A collage 
  PageBlockCollage
    { -- | Collage item contents 
      pageBlocks :: [PageBlock],
      -- | Block caption
      caption :: PageBlockCaption
    }
  | -- | A slideshow 
  PageBlockSlideshow
    { -- | Slideshow item contents 
      pageBlocks :: [PageBlock],
      -- | Block caption
      caption :: PageBlockCaption
    }
  | -- | A link to a chat 
  PageBlockChatLink
    { -- | Chat title 
      PageBlock -> T
title :: T,
      -- | Chat photo; may be null 
      PageBlock -> Maybe ChatPhoto
photo :: (Maybe) (ChatPhoto),
      -- | Chat username, by which all other information about the chat should be resolved
      PageBlock -> T
username :: T
    }
  | -- | A table 
  PageBlockTable
    { -- | Table caption 
      PageBlock -> RichText
caption_2 :: RichText,
      -- | Table cells 
      PageBlock -> [[PageBlockTableCell]]
cells :: [[PageBlockTableCell]],
      -- | True, if the table is bordered 
      PageBlock -> Bool
isBordered :: Bool,
      -- | True, if the table is striped
      PageBlock -> Bool
isStriped :: Bool
    }
  | -- | A collapsible block 
  PageBlockDetails
    { -- | Always visible heading for the block 
      header :: RichText,
      -- | Block contents 
      pageBlocks :: [PageBlock],
      -- | True, if the block is open by default
      PageBlock -> Bool
isOpen :: Bool
    }
  | -- | Related articles 
  PageBlockRelatedArticles
    { -- | Block header 
      header :: RichText,
      -- | List of related articles
      PageBlock -> [PageBlockRelatedArticle]
articles :: [PageBlockRelatedArticle]
    }
  | -- | A map 
  PageBlockMap
    { -- | Location of the map center 
      PageBlock -> Location
location :: Location,
      -- | Map zoom level 
      PageBlock -> I32
zoom :: I32,
      -- | Map width 
      width :: I32,
      -- | Map height 
      height :: I32,
      -- | Block caption
      caption :: PageBlockCaption
    }
  deriving (I32 -> PageBlock -> ShowS
[PageBlock] -> ShowS
PageBlock -> String
(I32 -> PageBlock -> ShowS)
-> (PageBlock -> String)
-> ([PageBlock] -> ShowS)
-> Show PageBlock
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PageBlock] -> ShowS
$cshowList :: [PageBlock] -> ShowS
show :: PageBlock -> String
$cshow :: PageBlock -> String
showsPrec :: I32 -> PageBlock -> ShowS
$cshowsPrec :: I32 -> PageBlock -> ShowS
Show, PageBlock -> PageBlock -> Bool
(PageBlock -> PageBlock -> Bool)
-> (PageBlock -> PageBlock -> Bool) -> Eq PageBlock
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PageBlock -> PageBlock -> Bool
$c/= :: PageBlock -> PageBlock -> Bool
== :: PageBlock -> PageBlock -> Bool
$c== :: PageBlock -> PageBlock -> Bool
Eq, (forall x. PageBlock -> Rep PageBlock x)
-> (forall x. Rep PageBlock x -> PageBlock) -> Generic PageBlock
forall x. Rep PageBlock x -> PageBlock
forall x. PageBlock -> Rep PageBlock x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PageBlock x -> PageBlock
$cfrom :: forall x. PageBlock -> Rep PageBlock x
Generic)
data WebPageInstantView
  = -- | Describes an instant view page for a web page
  WebPageInstantView
    { -- | Content of the web page
      WebPageInstantView -> [PageBlock]
pageBlocks :: [PageBlock],
      -- | Number of the instant view views; 0 if unknown
      WebPageInstantView -> I32
viewCount :: I32,
      -- | Version of the instant view, currently can be 1 or 2
      WebPageInstantView -> I32
version :: I32,
      -- | True, if the instant view must be shown from right to left
      WebPageInstantView -> Bool
isRtl :: Bool,
      -- | True, if the instant view contains the full page. A network request might be needed to get the full web page instant view
      WebPageInstantView -> Bool
isFull :: Bool
    }
  deriving (I32 -> WebPageInstantView -> ShowS
[WebPageInstantView] -> ShowS
WebPageInstantView -> String
(I32 -> WebPageInstantView -> ShowS)
-> (WebPageInstantView -> String)
-> ([WebPageInstantView] -> ShowS)
-> Show WebPageInstantView
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [WebPageInstantView] -> ShowS
$cshowList :: [WebPageInstantView] -> ShowS
show :: WebPageInstantView -> String
$cshow :: WebPageInstantView -> String
showsPrec :: I32 -> WebPageInstantView -> ShowS
$cshowsPrec :: I32 -> WebPageInstantView -> ShowS
Show, WebPageInstantView -> WebPageInstantView -> Bool
(WebPageInstantView -> WebPageInstantView -> Bool)
-> (WebPageInstantView -> WebPageInstantView -> Bool)
-> Eq WebPageInstantView
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: WebPageInstantView -> WebPageInstantView -> Bool
$c/= :: WebPageInstantView -> WebPageInstantView -> Bool
== :: WebPageInstantView -> WebPageInstantView -> Bool
$c== :: WebPageInstantView -> WebPageInstantView -> Bool
Eq, (forall x. WebPageInstantView -> Rep WebPageInstantView x)
-> (forall x. Rep WebPageInstantView x -> WebPageInstantView)
-> Generic WebPageInstantView
forall x. Rep WebPageInstantView x -> WebPageInstantView
forall x. WebPageInstantView -> Rep WebPageInstantView x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep WebPageInstantView x -> WebPageInstantView
$cfrom :: forall x. WebPageInstantView -> Rep WebPageInstantView x
Generic)
data WebPage
  = -- | Describes a web page preview
  WebPage
    { -- | Original URL of the link
      WebPage -> T
url :: T,
      -- | URL to display
      WebPage -> T
displayUrl :: T,
      -- | Type of the web page. Can be: article, photo, audio, video, document, profile, app, or something else
      WebPage -> T
type_ :: T,
      -- | Short name of the site (e.g., Google Docs, App Store)
      WebPage -> T
siteName :: T,
      -- | Title of the content
      WebPage -> T
title :: T,
      -- | Describes a web page preview
      WebPage -> FormattedText
description :: FormattedText,
      -- | Image representing the content; may be null
      WebPage -> Maybe Photo
photo :: (Maybe) (Photo),
      -- | URL to show in the embedded preview
      WebPage -> T
embedUrl :: T,
      -- | MIME type of the embedded preview, (e.g., text/html or video/mp4)
      WebPage -> T
embedType :: T,
      -- | Width of the embedded preview
      WebPage -> I32
embedWidth :: I32,
      -- | Height of the embedded preview
      WebPage -> I32
embedHeight :: I32,
      -- | Duration of the content, in seconds
      WebPage -> I32
duration :: I32,
      -- | Author of the content
      WebPage -> T
author :: T,
      -- | Preview of the content as an animation, if available; may be null
      WebPage -> Maybe Animation
animation :: (Maybe) (Animation),
      -- | Preview of the content as an audio file, if available; may be null
      WebPage -> Maybe Audio
audio :: (Maybe) (Audio),
      -- | Preview of the content as a document, if available (currently only available for small PDF files and ZIP archives); may be null
      WebPage -> Maybe Document
document :: (Maybe) (Document),
      -- | Preview of the content as a sticker for small WEBP files, if available; may be null
      WebPage -> Maybe Sticker
sticker :: (Maybe) (Sticker),
      -- | Preview of the content as a video, if available; may be null
      WebPage -> Maybe Video
video :: (Maybe) (Video),
      -- | Preview of the content as a video note, if available; may be null
      WebPage -> Maybe VideoNote
videoNote :: (Maybe) (VideoNote),
      -- | Preview of the content as a voice note, if available; may be null
      WebPage -> Maybe VoiceNote
voiceNote :: (Maybe) (VoiceNote),
      -- | Version of instant view, available for the web page (currently can be 1 or 2), 0 if none
      WebPage -> I32
instantViewVersion :: I32
    }
  deriving (I32 -> WebPage -> ShowS
[WebPage] -> ShowS
WebPage -> String
(I32 -> WebPage -> ShowS)
-> (WebPage -> String) -> ([WebPage] -> ShowS) -> Show WebPage
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [WebPage] -> ShowS
$cshowList :: [WebPage] -> ShowS
show :: WebPage -> String
$cshow :: WebPage -> String
showsPrec :: I32 -> WebPage -> ShowS
$cshowsPrec :: I32 -> WebPage -> ShowS
Show, WebPage -> WebPage -> Bool
(WebPage -> WebPage -> Bool)
-> (WebPage -> WebPage -> Bool) -> Eq WebPage
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: WebPage -> WebPage -> Bool
$c/= :: WebPage -> WebPage -> Bool
== :: WebPage -> WebPage -> Bool
$c== :: WebPage -> WebPage -> Bool
Eq, (forall x. WebPage -> Rep WebPage x)
-> (forall x. Rep WebPage x -> WebPage) -> Generic WebPage
forall x. Rep WebPage x -> WebPage
forall x. WebPage -> Rep WebPage x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep WebPage x -> WebPage
$cfrom :: forall x. WebPage -> Rep WebPage x
Generic)
data BankCardActionOpenUrl
  = -- | Describes an action associated with a bank card number 
  BankCardActionOpenUrl
    { -- | Action text 
      BankCardActionOpenUrl -> T
text :: T,
      -- | The URL to be opened
      BankCardActionOpenUrl -> T
url :: T
    }
  deriving (I32 -> BankCardActionOpenUrl -> ShowS
[BankCardActionOpenUrl] -> ShowS
BankCardActionOpenUrl -> String
(I32 -> BankCardActionOpenUrl -> ShowS)
-> (BankCardActionOpenUrl -> String)
-> ([BankCardActionOpenUrl] -> ShowS)
-> Show BankCardActionOpenUrl
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [BankCardActionOpenUrl] -> ShowS
$cshowList :: [BankCardActionOpenUrl] -> ShowS
show :: BankCardActionOpenUrl -> String
$cshow :: BankCardActionOpenUrl -> String
showsPrec :: I32 -> BankCardActionOpenUrl -> ShowS
$cshowsPrec :: I32 -> BankCardActionOpenUrl -> ShowS
Show, BankCardActionOpenUrl -> BankCardActionOpenUrl -> Bool
(BankCardActionOpenUrl -> BankCardActionOpenUrl -> Bool)
-> (BankCardActionOpenUrl -> BankCardActionOpenUrl -> Bool)
-> Eq BankCardActionOpenUrl
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: BankCardActionOpenUrl -> BankCardActionOpenUrl -> Bool
$c/= :: BankCardActionOpenUrl -> BankCardActionOpenUrl -> Bool
== :: BankCardActionOpenUrl -> BankCardActionOpenUrl -> Bool
$c== :: BankCardActionOpenUrl -> BankCardActionOpenUrl -> Bool
Eq, (forall x. BankCardActionOpenUrl -> Rep BankCardActionOpenUrl x)
-> (forall x. Rep BankCardActionOpenUrl x -> BankCardActionOpenUrl)
-> Generic BankCardActionOpenUrl
forall x. Rep BankCardActionOpenUrl x -> BankCardActionOpenUrl
forall x. BankCardActionOpenUrl -> Rep BankCardActionOpenUrl x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep BankCardActionOpenUrl x -> BankCardActionOpenUrl
$cfrom :: forall x. BankCardActionOpenUrl -> Rep BankCardActionOpenUrl x
Generic)
data BankCardInfo
  = -- | Information about a bank card 
  BankCardInfo
    { -- | Title of the bank card description 
      BankCardInfo -> T
title :: T,
      -- | Actions that can be done with the bank card number
      BankCardInfo -> [BankCardActionOpenUrl]
actions :: [BankCardActionOpenUrl]
    }
  deriving (I32 -> BankCardInfo -> ShowS
[BankCardInfo] -> ShowS
BankCardInfo -> String
(I32 -> BankCardInfo -> ShowS)
-> (BankCardInfo -> String)
-> ([BankCardInfo] -> ShowS)
-> Show BankCardInfo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [BankCardInfo] -> ShowS
$cshowList :: [BankCardInfo] -> ShowS
show :: BankCardInfo -> String
$cshow :: BankCardInfo -> String
showsPrec :: I32 -> BankCardInfo -> ShowS
$cshowsPrec :: I32 -> BankCardInfo -> ShowS
Show, BankCardInfo -> BankCardInfo -> Bool
(BankCardInfo -> BankCardInfo -> Bool)
-> (BankCardInfo -> BankCardInfo -> Bool) -> Eq BankCardInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: BankCardInfo -> BankCardInfo -> Bool
$c/= :: BankCardInfo -> BankCardInfo -> Bool
== :: BankCardInfo -> BankCardInfo -> Bool
$c== :: BankCardInfo -> BankCardInfo -> Bool
Eq, (forall x. BankCardInfo -> Rep BankCardInfo x)
-> (forall x. Rep BankCardInfo x -> BankCardInfo)
-> Generic BankCardInfo
forall x. Rep BankCardInfo x -> BankCardInfo
forall x. BankCardInfo -> Rep BankCardInfo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep BankCardInfo x -> BankCardInfo
$cfrom :: forall x. BankCardInfo -> Rep BankCardInfo x
Generic)
data Address
  = -- | Describes an address 
  Address
    { -- | A two-letter ISO 3166-1 alpha-2 country code 
      Address -> T
countryCode :: T,
      -- | State, if applicable 
      Address -> T
state :: T,
      -- | City 
      Address -> T
city :: T,
      -- | First line of the address 
      Address -> T
streetLine1 :: T,
      -- | Second line of the address 
      Address -> T
streetLine2 :: T,
      -- | Address postal code
      Address -> T
postalCode :: T
    }
  deriving (I32 -> Address -> ShowS
[Address] -> ShowS
Address -> String
(I32 -> Address -> ShowS)
-> (Address -> String) -> ([Address] -> ShowS) -> Show Address
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Address] -> ShowS
$cshowList :: [Address] -> ShowS
show :: Address -> String
$cshow :: Address -> String
showsPrec :: I32 -> Address -> ShowS
$cshowsPrec :: I32 -> Address -> ShowS
Show, Address -> Address -> Bool
(Address -> Address -> Bool)
-> (Address -> Address -> Bool) -> Eq Address
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Address -> Address -> Bool
$c/= :: Address -> Address -> Bool
== :: Address -> Address -> Bool
$c== :: Address -> Address -> Bool
Eq, (forall x. Address -> Rep Address x)
-> (forall x. Rep Address x -> Address) -> Generic Address
forall x. Rep Address x -> Address
forall x. Address -> Rep Address x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Address x -> Address
$cfrom :: forall x. Address -> Rep Address x
Generic)
data LabeledPricePart
  = -- | Portion of the price of a product (e.g., "delivery cost", "tax amount") 
  LabeledPricePart
    { -- | Label for this portion of the product price 
      LabeledPricePart -> T
label :: T,
      -- | Currency amount in minimal quantity of the currency
      LabeledPricePart -> I32
amount :: I53
    }
  deriving (I32 -> LabeledPricePart -> ShowS
[LabeledPricePart] -> ShowS
LabeledPricePart -> String
(I32 -> LabeledPricePart -> ShowS)
-> (LabeledPricePart -> String)
-> ([LabeledPricePart] -> ShowS)
-> Show LabeledPricePart
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [LabeledPricePart] -> ShowS
$cshowList :: [LabeledPricePart] -> ShowS
show :: LabeledPricePart -> String
$cshow :: LabeledPricePart -> String
showsPrec :: I32 -> LabeledPricePart -> ShowS
$cshowsPrec :: I32 -> LabeledPricePart -> ShowS
Show, LabeledPricePart -> LabeledPricePart -> Bool
(LabeledPricePart -> LabeledPricePart -> Bool)
-> (LabeledPricePart -> LabeledPricePart -> Bool)
-> Eq LabeledPricePart
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: LabeledPricePart -> LabeledPricePart -> Bool
$c/= :: LabeledPricePart -> LabeledPricePart -> Bool
== :: LabeledPricePart -> LabeledPricePart -> Bool
$c== :: LabeledPricePart -> LabeledPricePart -> Bool
Eq, (forall x. LabeledPricePart -> Rep LabeledPricePart x)
-> (forall x. Rep LabeledPricePart x -> LabeledPricePart)
-> Generic LabeledPricePart
forall x. Rep LabeledPricePart x -> LabeledPricePart
forall x. LabeledPricePart -> Rep LabeledPricePart x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep LabeledPricePart x -> LabeledPricePart
$cfrom :: forall x. LabeledPricePart -> Rep LabeledPricePart x
Generic)
data Invoice
  = -- | Product invoice 
  Invoice
    { -- | ISO 4217 currency code 
      Invoice -> T
currency :: T,
      -- | A list of objects used to calculate the total price of the product 
      Invoice -> [LabeledPricePart]
priceParts :: [LabeledPricePart],
      -- | True, if the payment is a test payment
      Invoice -> Bool
isTest :: Bool,
      -- | True, if the user's name is needed for payment 
      Invoice -> Bool
needName :: Bool,
      -- | True, if the user's phone number is needed for payment 
      Invoice -> Bool
needPhoneNumber :: Bool,
      -- | True, if the user's email address is needed for payment
      Invoice -> Bool
needEmailAddress :: Bool,
      -- | True, if the user's shipping address is needed for payment 
      Invoice -> Bool
needShippingAddress :: Bool,
      -- | True, if the user's phone number will be sent to the provider
      Invoice -> Bool
sendPhoneNumberToProvider :: Bool,
      -- | True, if the user's email address will be sent to the provider 
      Invoice -> Bool
sendEmailAddressToProvider :: Bool,
      -- | True, if the total price depends on the shipping method
      Invoice -> Bool
isFlexible :: Bool
    }
  deriving (I32 -> Invoice -> ShowS
[Invoice] -> ShowS
Invoice -> String
(I32 -> Invoice -> ShowS)
-> (Invoice -> String) -> ([Invoice] -> ShowS) -> Show Invoice
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Invoice] -> ShowS
$cshowList :: [Invoice] -> ShowS
show :: Invoice -> String
$cshow :: Invoice -> String
showsPrec :: I32 -> Invoice -> ShowS
$cshowsPrec :: I32 -> Invoice -> ShowS
Show, Invoice -> Invoice -> Bool
(Invoice -> Invoice -> Bool)
-> (Invoice -> Invoice -> Bool) -> Eq Invoice
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Invoice -> Invoice -> Bool
$c/= :: Invoice -> Invoice -> Bool
== :: Invoice -> Invoice -> Bool
$c== :: Invoice -> Invoice -> Bool
Eq, (forall x. Invoice -> Rep Invoice x)
-> (forall x. Rep Invoice x -> Invoice) -> Generic Invoice
forall x. Rep Invoice x -> Invoice
forall x. Invoice -> Rep Invoice x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Invoice x -> Invoice
$cfrom :: forall x. Invoice -> Rep Invoice x
Generic)
data OrderInfo
  = -- | Order information 
  OrderInfo
    { -- | Name of the user 
      OrderInfo -> T
name :: T,
      -- | Phone number of the user 
      OrderInfo -> T
phoneNumber :: T,
      -- | Email address of the user 
      OrderInfo -> T
emailAddress :: T,
      -- | Shipping address for this order; may be null
      OrderInfo -> Maybe Address
shippingAddress :: (Maybe) (Address)
    }
  deriving (I32 -> OrderInfo -> ShowS
[OrderInfo] -> ShowS
OrderInfo -> String
(I32 -> OrderInfo -> ShowS)
-> (OrderInfo -> String)
-> ([OrderInfo] -> ShowS)
-> Show OrderInfo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [OrderInfo] -> ShowS
$cshowList :: [OrderInfo] -> ShowS
show :: OrderInfo -> String
$cshow :: OrderInfo -> String
showsPrec :: I32 -> OrderInfo -> ShowS
$cshowsPrec :: I32 -> OrderInfo -> ShowS
Show, OrderInfo -> OrderInfo -> Bool
(OrderInfo -> OrderInfo -> Bool)
-> (OrderInfo -> OrderInfo -> Bool) -> Eq OrderInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: OrderInfo -> OrderInfo -> Bool
$c/= :: OrderInfo -> OrderInfo -> Bool
== :: OrderInfo -> OrderInfo -> Bool
$c== :: OrderInfo -> OrderInfo -> Bool
Eq, (forall x. OrderInfo -> Rep OrderInfo x)
-> (forall x. Rep OrderInfo x -> OrderInfo) -> Generic OrderInfo
forall x. Rep OrderInfo x -> OrderInfo
forall x. OrderInfo -> Rep OrderInfo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep OrderInfo x -> OrderInfo
$cfrom :: forall x. OrderInfo -> Rep OrderInfo x
Generic)
data ShippingOption
  = -- | One shipping option 
  ShippingOption
    { -- | Shipping option identifier 
      ShippingOption -> T
id :: T,
      -- | Option title 
      ShippingOption -> T
title :: T,
      -- | A list of objects used to calculate the total shipping costs
      ShippingOption -> [LabeledPricePart]
priceParts :: [LabeledPricePart]
    }
  deriving (I32 -> ShippingOption -> ShowS
[ShippingOption] -> ShowS
ShippingOption -> String
(I32 -> ShippingOption -> ShowS)
-> (ShippingOption -> String)
-> ([ShippingOption] -> ShowS)
-> Show ShippingOption
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ShippingOption] -> ShowS
$cshowList :: [ShippingOption] -> ShowS
show :: ShippingOption -> String
$cshow :: ShippingOption -> String
showsPrec :: I32 -> ShippingOption -> ShowS
$cshowsPrec :: I32 -> ShippingOption -> ShowS
Show, ShippingOption -> ShippingOption -> Bool
(ShippingOption -> ShippingOption -> Bool)
-> (ShippingOption -> ShippingOption -> Bool) -> Eq ShippingOption
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ShippingOption -> ShippingOption -> Bool
$c/= :: ShippingOption -> ShippingOption -> Bool
== :: ShippingOption -> ShippingOption -> Bool
$c== :: ShippingOption -> ShippingOption -> Bool
Eq, (forall x. ShippingOption -> Rep ShippingOption x)
-> (forall x. Rep ShippingOption x -> ShippingOption)
-> Generic ShippingOption
forall x. Rep ShippingOption x -> ShippingOption
forall x. ShippingOption -> Rep ShippingOption x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ShippingOption x -> ShippingOption
$cfrom :: forall x. ShippingOption -> Rep ShippingOption x
Generic)
data SavedCredentials
  = -- | Contains information about saved card credentials 
  SavedCredentials
    { -- | Unique identifier of the saved credentials 
      SavedCredentials -> T
id :: T,
      -- | Title of the saved credentials
      SavedCredentials -> T
title :: T
    }
  deriving (I32 -> SavedCredentials -> ShowS
[SavedCredentials] -> ShowS
SavedCredentials -> String
(I32 -> SavedCredentials -> ShowS)
-> (SavedCredentials -> String)
-> ([SavedCredentials] -> ShowS)
-> Show SavedCredentials
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [SavedCredentials] -> ShowS
$cshowList :: [SavedCredentials] -> ShowS
show :: SavedCredentials -> String
$cshow :: SavedCredentials -> String
showsPrec :: I32 -> SavedCredentials -> ShowS
$cshowsPrec :: I32 -> SavedCredentials -> ShowS
Show, SavedCredentials -> SavedCredentials -> Bool
(SavedCredentials -> SavedCredentials -> Bool)
-> (SavedCredentials -> SavedCredentials -> Bool)
-> Eq SavedCredentials
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SavedCredentials -> SavedCredentials -> Bool
$c/= :: SavedCredentials -> SavedCredentials -> Bool
== :: SavedCredentials -> SavedCredentials -> Bool
$c== :: SavedCredentials -> SavedCredentials -> Bool
Eq, (forall x. SavedCredentials -> Rep SavedCredentials x)
-> (forall x. Rep SavedCredentials x -> SavedCredentials)
-> Generic SavedCredentials
forall x. Rep SavedCredentials x -> SavedCredentials
forall x. SavedCredentials -> Rep SavedCredentials x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep SavedCredentials x -> SavedCredentials
$cfrom :: forall x. SavedCredentials -> Rep SavedCredentials x
Generic)
-- | Contains information about the payment method chosen by the user
data InputCredentials
  = -- | Applies if a user chooses some previously saved payment credentials. To use their previously saved credentials, the user must have a valid temporary password 
  InputCredentialsSaved
    { -- | Identifier of the saved credentials
      InputCredentials -> T
savedCredentialsId :: T
    }
  | -- | Applies if a user enters new credentials on a payment provider website 
  InputCredentialsNew
    { -- | Contains JSON-encoded data with a credential identifier from the payment provider 
      InputCredentials -> T
data_ :: T,
      -- | True, if the credential identifier can be saved on the server side
      InputCredentials -> Bool
allowSave :: Bool
    }
  | -- | Applies if a user enters new credentials using Android Pay 
  InputCredentialsAndroidPay
    { -- | JSON-encoded data with the credential identifier
      data_ :: T
    }
  | -- | Applies if a user enters new credentials using Apple Pay 
  InputCredentialsApplePay
    { -- | JSON-encoded data with the credential identifier
      data_ :: T
    }
  deriving (I32 -> InputCredentials -> ShowS
[InputCredentials] -> ShowS
InputCredentials -> String
(I32 -> InputCredentials -> ShowS)
-> (InputCredentials -> String)
-> ([InputCredentials] -> ShowS)
-> Show InputCredentials
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [InputCredentials] -> ShowS
$cshowList :: [InputCredentials] -> ShowS
show :: InputCredentials -> String
$cshow :: InputCredentials -> String
showsPrec :: I32 -> InputCredentials -> ShowS
$cshowsPrec :: I32 -> InputCredentials -> ShowS
Show, InputCredentials -> InputCredentials -> Bool
(InputCredentials -> InputCredentials -> Bool)
-> (InputCredentials -> InputCredentials -> Bool)
-> Eq InputCredentials
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: InputCredentials -> InputCredentials -> Bool
$c/= :: InputCredentials -> InputCredentials -> Bool
== :: InputCredentials -> InputCredentials -> Bool
$c== :: InputCredentials -> InputCredentials -> Bool
Eq, (forall x. InputCredentials -> Rep InputCredentials x)
-> (forall x. Rep InputCredentials x -> InputCredentials)
-> Generic InputCredentials
forall x. Rep InputCredentials x -> InputCredentials
forall x. InputCredentials -> Rep InputCredentials x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep InputCredentials x -> InputCredentials
$cfrom :: forall x. InputCredentials -> Rep InputCredentials x
Generic)
data PaymentsProviderStripe
  = -- | Stripe payment provider 
  PaymentsProviderStripe
    { -- | Stripe API publishable key 
      PaymentsProviderStripe -> T
publishableKey :: T,
      -- | True, if the user country must be provided 
      PaymentsProviderStripe -> Bool
needCountry :: Bool,
      -- | True, if the user ZIP/postal code must be provided 
      PaymentsProviderStripe -> Bool
needPostalCode :: Bool,
      -- | True, if the cardholder name must be provided
      PaymentsProviderStripe -> Bool
needCardholderName :: Bool
    }
  deriving (I32 -> PaymentsProviderStripe -> ShowS
[PaymentsProviderStripe] -> ShowS
PaymentsProviderStripe -> String
(I32 -> PaymentsProviderStripe -> ShowS)
-> (PaymentsProviderStripe -> String)
-> ([PaymentsProviderStripe] -> ShowS)
-> Show PaymentsProviderStripe
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PaymentsProviderStripe] -> ShowS
$cshowList :: [PaymentsProviderStripe] -> ShowS
show :: PaymentsProviderStripe -> String
$cshow :: PaymentsProviderStripe -> String
showsPrec :: I32 -> PaymentsProviderStripe -> ShowS
$cshowsPrec :: I32 -> PaymentsProviderStripe -> ShowS
Show, PaymentsProviderStripe -> PaymentsProviderStripe -> Bool
(PaymentsProviderStripe -> PaymentsProviderStripe -> Bool)
-> (PaymentsProviderStripe -> PaymentsProviderStripe -> Bool)
-> Eq PaymentsProviderStripe
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PaymentsProviderStripe -> PaymentsProviderStripe -> Bool
$c/= :: PaymentsProviderStripe -> PaymentsProviderStripe -> Bool
== :: PaymentsProviderStripe -> PaymentsProviderStripe -> Bool
$c== :: PaymentsProviderStripe -> PaymentsProviderStripe -> Bool
Eq, (forall x. PaymentsProviderStripe -> Rep PaymentsProviderStripe x)
-> (forall x.
    Rep PaymentsProviderStripe x -> PaymentsProviderStripe)
-> Generic PaymentsProviderStripe
forall x. Rep PaymentsProviderStripe x -> PaymentsProviderStripe
forall x. PaymentsProviderStripe -> Rep PaymentsProviderStripe x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PaymentsProviderStripe x -> PaymentsProviderStripe
$cfrom :: forall x. PaymentsProviderStripe -> Rep PaymentsProviderStripe x
Generic)
data PaymentForm
  = -- | Contains information about an invoice payment form 
  PaymentForm
    { -- | Full information of the invoice 
      PaymentForm -> Invoice
invoice :: Invoice,
      -- | Payment form URL 
      PaymentForm -> T
url :: T,
      -- | Contains information about the payment provider, if available, to support it natively without the need for opening the URL; may be null
      PaymentForm -> Maybe PaymentsProviderStripe
paymentsProvider :: (Maybe) (PaymentsProviderStripe),
      -- | Saved server-side order information; may be null 
      PaymentForm -> Maybe OrderInfo
savedOrderInfo :: (Maybe) (OrderInfo),
      -- | Contains information about saved card credentials; may be null 
      PaymentForm -> Maybe SavedCredentials
savedCredentials :: (Maybe) (SavedCredentials),
      -- | True, if the user can choose to save credentials 
      PaymentForm -> Bool
canSaveCredentials :: Bool,
      -- | True, if the user will be able to save credentials protected by a password they set up
      PaymentForm -> Bool
needPassword :: Bool
    }
  deriving (I32 -> PaymentForm -> ShowS
[PaymentForm] -> ShowS
PaymentForm -> String
(I32 -> PaymentForm -> ShowS)
-> (PaymentForm -> String)
-> ([PaymentForm] -> ShowS)
-> Show PaymentForm
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PaymentForm] -> ShowS
$cshowList :: [PaymentForm] -> ShowS
show :: PaymentForm -> String
$cshow :: PaymentForm -> String
showsPrec :: I32 -> PaymentForm -> ShowS
$cshowsPrec :: I32 -> PaymentForm -> ShowS
Show, PaymentForm -> PaymentForm -> Bool
(PaymentForm -> PaymentForm -> Bool)
-> (PaymentForm -> PaymentForm -> Bool) -> Eq PaymentForm
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PaymentForm -> PaymentForm -> Bool
$c/= :: PaymentForm -> PaymentForm -> Bool
== :: PaymentForm -> PaymentForm -> Bool
$c== :: PaymentForm -> PaymentForm -> Bool
Eq, (forall x. PaymentForm -> Rep PaymentForm x)
-> (forall x. Rep PaymentForm x -> PaymentForm)
-> Generic PaymentForm
forall x. Rep PaymentForm x -> PaymentForm
forall x. PaymentForm -> Rep PaymentForm x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PaymentForm x -> PaymentForm
$cfrom :: forall x. PaymentForm -> Rep PaymentForm x
Generic)
data ValidatedOrderInfo
  = -- | Contains a temporary identifier of validated order information, which is stored for one hour. Also contains the available shipping options 
  ValidatedOrderInfo
    { -- | Temporary identifier of the order information 
      ValidatedOrderInfo -> T
orderInfoId :: T,
      -- | Available shipping options
      ValidatedOrderInfo -> [ShippingOption]
shippingOptions :: [ShippingOption]
    }
  deriving (I32 -> ValidatedOrderInfo -> ShowS
[ValidatedOrderInfo] -> ShowS
ValidatedOrderInfo -> String
(I32 -> ValidatedOrderInfo -> ShowS)
-> (ValidatedOrderInfo -> String)
-> ([ValidatedOrderInfo] -> ShowS)
-> Show ValidatedOrderInfo
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ValidatedOrderInfo] -> ShowS
$cshowList :: [ValidatedOrderInfo] -> ShowS
show :: ValidatedOrderInfo -> String
$cshow :: ValidatedOrderInfo -> String
showsPrec :: I32 -> ValidatedOrderInfo -> ShowS
$cshowsPrec :: I32 -> ValidatedOrderInfo -> ShowS
Show, ValidatedOrderInfo -> ValidatedOrderInfo -> Bool
(ValidatedOrderInfo -> ValidatedOrderInfo -> Bool)
-> (ValidatedOrderInfo -> ValidatedOrderInfo -> Bool)
-> Eq ValidatedOrderInfo
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ValidatedOrderInfo -> ValidatedOrderInfo -> Bool
$c/= :: ValidatedOrderInfo -> ValidatedOrderInfo -> Bool
== :: ValidatedOrderInfo -> ValidatedOrderInfo -> Bool
$c== :: ValidatedOrderInfo -> ValidatedOrderInfo -> Bool
Eq, (forall x. ValidatedOrderInfo -> Rep ValidatedOrderInfo x)
-> (forall x. Rep ValidatedOrderInfo x -> ValidatedOrderInfo)
-> Generic ValidatedOrderInfo
forall x. Rep ValidatedOrderInfo x -> ValidatedOrderInfo
forall x. ValidatedOrderInfo -> Rep ValidatedOrderInfo x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ValidatedOrderInfo x -> ValidatedOrderInfo
$cfrom :: forall x. ValidatedOrderInfo -> Rep ValidatedOrderInfo x
Generic)
data PaymentResult
  = -- | Contains the result of a payment request 
  PaymentResult
    { -- | True, if the payment request was successful; otherwise the verification_url will be not empty 
      PaymentResult -> Bool
success :: Bool,
      -- | URL for additional payment credentials verification
      PaymentResult -> T
verificationUrl :: T
    }
  deriving (I32 -> PaymentResult -> ShowS
[PaymentResult] -> ShowS
PaymentResult -> String
(I32 -> PaymentResult -> ShowS)
-> (PaymentResult -> String)
-> ([PaymentResult] -> ShowS)
-> Show PaymentResult
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PaymentResult] -> ShowS
$cshowList :: [PaymentResult] -> ShowS
show :: PaymentResult -> String
$cshow :: PaymentResult -> String
showsPrec :: I32 -> PaymentResult -> ShowS
$cshowsPrec :: I32 -> PaymentResult -> ShowS
Show, PaymentResult -> PaymentResult -> Bool
(PaymentResult -> PaymentResult -> Bool)
-> (PaymentResult -> PaymentResult -> Bool) -> Eq PaymentResult
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PaymentResult -> PaymentResult -> Bool
$c/= :: PaymentResult -> PaymentResult -> Bool
== :: PaymentResult -> PaymentResult -> Bool
$c== :: PaymentResult -> PaymentResult -> Bool
Eq, (forall x. PaymentResult -> Rep PaymentResult x)
-> (forall x. Rep PaymentResult x -> PaymentResult)
-> Generic PaymentResult
forall x. Rep PaymentResult x -> PaymentResult
forall x. PaymentResult -> Rep PaymentResult x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PaymentResult x -> PaymentResult
$cfrom :: forall x. PaymentResult -> Rep PaymentResult x
Generic)
data PaymentReceipt
  = -- | Contains information about a successful payment 
  PaymentReceipt
    { -- | Point in time (Unix timestamp) when the payment was made 
      PaymentReceipt -> I32
date :: I32,
      -- | User identifier of the payment provider bot 
      PaymentReceipt -> I32
paymentsProviderUserId :: I32,
      -- | Contains information about the invoice
      PaymentReceipt -> Invoice
invoice :: Invoice,
      -- | Contains order information; may be null 
      PaymentReceipt -> Maybe OrderInfo
orderInfo :: (Maybe) (OrderInfo),
      -- | Chosen shipping option; may be null 
      PaymentReceipt -> Maybe ShippingOption
shippingOption :: (Maybe) (ShippingOption),
      -- | Title of the saved credentials
      PaymentReceipt -> T
credentialsTitle :: T
    }
  deriving (I32 -> PaymentReceipt -> ShowS
[PaymentReceipt] -> ShowS
PaymentReceipt -> String
(I32 -> PaymentReceipt -> ShowS)
-> (PaymentReceipt -> String)
-> ([PaymentReceipt] -> ShowS)
-> Show PaymentReceipt
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PaymentReceipt] -> ShowS
$cshowList :: [PaymentReceipt] -> ShowS
show :: PaymentReceipt -> String
$cshow :: PaymentReceipt -> String
showsPrec :: I32 -> PaymentReceipt -> ShowS
$cshowsPrec :: I32 -> PaymentReceipt -> ShowS
Show, PaymentReceipt -> PaymentReceipt -> Bool
(PaymentReceipt -> PaymentReceipt -> Bool)
-> (PaymentReceipt -> PaymentReceipt -> Bool) -> Eq PaymentReceipt
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PaymentReceipt -> PaymentReceipt -> Bool
$c/= :: PaymentReceipt -> PaymentReceipt -> Bool
== :: PaymentReceipt -> PaymentReceipt -> Bool
$c== :: PaymentReceipt -> PaymentReceipt -> Bool
Eq, (forall x. PaymentReceipt -> Rep PaymentReceipt x)
-> (forall x. Rep PaymentReceipt x -> PaymentReceipt)
-> Generic PaymentReceipt
forall x. Rep PaymentReceipt x -> PaymentReceipt
forall x. PaymentReceipt -> Rep PaymentReceipt x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PaymentReceipt x -> PaymentReceipt
$cfrom :: forall x. PaymentReceipt -> Rep PaymentReceipt x
Generic)
data DatedFile
  = -- | File with the date it was uploaded 
  DatedFile
    { -- | The file 
      DatedFile -> File
file :: File,
      -- | Point in time (Unix timestamp) when the file was uploaded
      DatedFile -> I32
date :: I32
    }
  deriving (I32 -> DatedFile -> ShowS
[DatedFile] -> ShowS
DatedFile -> String
(I32 -> DatedFile -> ShowS)
-> (DatedFile -> String)
-> ([DatedFile] -> ShowS)
-> Show DatedFile
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DatedFile] -> ShowS
$cshowList :: [DatedFile] -> ShowS
show :: DatedFile -> String
$cshow :: DatedFile -> String
showsPrec :: I32 -> DatedFile -> ShowS
$cshowsPrec :: I32 -> DatedFile -> ShowS
Show, DatedFile -> DatedFile -> Bool
(DatedFile -> DatedFile -> Bool)
-> (DatedFile -> DatedFile -> Bool) -> Eq DatedFile
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DatedFile -> DatedFile -> Bool
$c/= :: DatedFile -> DatedFile -> Bool
== :: DatedFile -> DatedFile -> Bool
$c== :: DatedFile -> DatedFile -> Bool
Eq, (forall x. DatedFile -> Rep DatedFile x)
-> (forall x. Rep DatedFile x -> DatedFile) -> Generic DatedFile
forall x. Rep DatedFile x -> DatedFile
forall x. DatedFile -> Rep DatedFile x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep DatedFile x -> DatedFile
$cfrom :: forall x. DatedFile -> Rep DatedFile x
Generic)
-- | Contains the type of a Telegram Passport element
data PassportElementType
  = -- | A Telegram Passport element containing the user's personal details
  PassportElementTypePersonalDetails
    { 
    }
  | -- | A Telegram Passport element containing the user's passport
  PassportElementTypePassport
    { 
    }
  | -- | A Telegram Passport element containing the user's driver license
  PassportElementTypeDriverLicense
    { 
    }
  | -- | A Telegram Passport element containing the user's identity card
  PassportElementTypeIdentityCard
    { 
    }
  | -- | A Telegram Passport element containing the user's internal passport
  PassportElementTypeInternalPassport
    { 
    }
  | -- | A Telegram Passport element containing the user's address
  PassportElementTypeAddress
    { 
    }
  | -- | A Telegram Passport element containing the user's utility bill
  PassportElementTypeUtilityBill
    { 
    }
  | -- | A Telegram Passport element containing the user's bank statement
  PassportElementTypeBankStatement
    { 
    }
  | -- | A Telegram Passport element containing the user's rental agreement
  PassportElementTypeRentalAgreement
    { 
    }
  | -- | A Telegram Passport element containing the registration page of the user's passport
  PassportElementTypePassportRegistration
    { 
    }
  | -- | A Telegram Passport element containing the user's temporary registration
  PassportElementTypeTemporaryRegistration
    { 
    }
  | -- | A Telegram Passport element containing the user's phone number
  PassportElementTypePhoneNumber
    { 
    }
  | -- | A Telegram Passport element containing the user's email address
  PassportElementTypeEmailAddress
    { 
    }
  deriving (I32 -> PassportElementType -> ShowS
[PassportElementType] -> ShowS
PassportElementType -> String
(I32 -> PassportElementType -> ShowS)
-> (PassportElementType -> String)
-> ([PassportElementType] -> ShowS)
-> Show PassportElementType
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PassportElementType] -> ShowS
$cshowList :: [PassportElementType] -> ShowS
show :: PassportElementType -> String
$cshow :: PassportElementType -> String
showsPrec :: I32 -> PassportElementType -> ShowS
$cshowsPrec :: I32 -> PassportElementType -> ShowS
Show, PassportElementType -> PassportElementType -> Bool
(PassportElementType -> PassportElementType -> Bool)
-> (PassportElementType -> PassportElementType -> Bool)
-> Eq PassportElementType
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PassportElementType -> PassportElementType -> Bool
$c/= :: PassportElementType -> PassportElementType -> Bool
== :: PassportElementType -> PassportElementType -> Bool
$c== :: PassportElementType -> PassportElementType -> Bool
Eq, (forall x. PassportElementType -> Rep PassportElementType x)
-> (forall x. Rep PassportElementType x -> PassportElementType)
-> Generic PassportElementType
forall x. Rep PassportElementType x -> PassportElementType
forall x. PassportElementType -> Rep PassportElementType x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PassportElementType x -> PassportElementType
$cfrom :: forall x. PassportElementType -> Rep PassportElementType x
Generic)
data Date
  = -- | Represents a date according to the Gregorian calendar 
  Date
    { -- | Day of the month, 1-31 
      Date -> I32
day :: I32,
      -- | Month, 1-12 
      Date -> I32
month :: I32,
      -- | Year, 1-9999
      Date -> I32
year :: I32
    }
  deriving (I32 -> Date -> ShowS
[Date] -> ShowS
Date -> String
(I32 -> Date -> ShowS)
-> (Date -> String) -> ([Date] -> ShowS) -> Show Date
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Date] -> ShowS
$cshowList :: [Date] -> ShowS
show :: Date -> String
$cshow :: Date -> String
showsPrec :: I32 -> Date -> ShowS
$cshowsPrec :: I32 -> Date -> ShowS
Show, Date -> Date -> Bool
(Date -> Date -> Bool) -> (Date -> Date -> Bool) -> Eq Date
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Date -> Date -> Bool
$c/= :: Date -> Date -> Bool
== :: Date -> Date -> Bool
$c== :: Date -> Date -> Bool
Eq, (forall x. Date -> Rep Date x)
-> (forall x. Rep Date x -> Date) -> Generic Date
forall x. Rep Date x -> Date
forall x. Date -> Rep Date x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Date x -> Date
$cfrom :: forall x. Date -> Rep Date x
Generic)
data PersonalDetails
  = -- | Contains the user's personal details
  PersonalDetails
    { -- | First name of the user written in English; 1-255 characters 
      PersonalDetails -> T
firstName :: T,
      -- | Middle name of the user written in English; 0-255 characters 
      PersonalDetails -> T
middleName :: T,
      -- | Last name of the user written in English; 1-255 characters
      PersonalDetails -> T
lastName :: T,
      -- | Native first name of the user; 1-255 characters 
      PersonalDetails -> T
nativeFirstName :: T,
      -- | Native middle name of the user; 0-255 characters 
      PersonalDetails -> T
nativeMiddleName :: T,
      -- | Native last name of the user; 1-255 characters
      PersonalDetails -> T
nativeLastName :: T,
      -- | Birthdate of the user 
      PersonalDetails -> Date
birthdate :: Date,
      -- | Gender of the user, "male" or "female" 
      PersonalDetails -> T
gender :: T,
      -- | A two-letter ISO 3166-1 alpha-2 country code of the user's country 
      PersonalDetails -> T
countryCode :: T,
      -- | A two-letter ISO 3166-1 alpha-2 country code of the user's residence country
      PersonalDetails -> T
residenceCountryCode :: T
    }
  deriving (I32 -> PersonalDetails -> ShowS
[PersonalDetails] -> ShowS
PersonalDetails -> String
(I32 -> PersonalDetails -> ShowS)
-> (PersonalDetails -> String)
-> ([PersonalDetails] -> ShowS)
-> Show PersonalDetails
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PersonalDetails] -> ShowS
$cshowList :: [PersonalDetails] -> ShowS
show :: PersonalDetails -> String
$cshow :: PersonalDetails -> String
showsPrec :: I32 -> PersonalDetails -> ShowS
$cshowsPrec :: I32 -> PersonalDetails -> ShowS
Show, PersonalDetails -> PersonalDetails -> Bool
(PersonalDetails -> PersonalDetails -> Bool)
-> (PersonalDetails -> PersonalDetails -> Bool)
-> Eq PersonalDetails
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PersonalDetails -> PersonalDetails -> Bool
$c/= :: PersonalDetails -> PersonalDetails -> Bool
== :: PersonalDetails -> PersonalDetails -> Bool
$c== :: PersonalDetails -> PersonalDetails -> Bool
Eq, (forall x. PersonalDetails -> Rep PersonalDetails x)
-> (forall x. Rep PersonalDetails x -> PersonalDetails)
-> Generic PersonalDetails
forall x. Rep PersonalDetails x -> PersonalDetails
forall x. PersonalDetails -> Rep PersonalDetails x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PersonalDetails x -> PersonalDetails
$cfrom :: forall x. PersonalDetails -> Rep PersonalDetails x
Generic)
data IdentityDocument
  = -- | An identity document 
  IdentityDocument
    { -- | Document number; 1-24 characters 
      IdentityDocument -> T
number :: T,
      -- | Document expiry date; may be null 
      IdentityDocument -> Maybe Date
expiryDate :: (Maybe) (Date),
      -- | Front side of the document
      IdentityDocument -> DatedFile
frontSide :: DatedFile,
      -- | Reverse side of the document; only for driver license and identity card 
      IdentityDocument -> DatedFile
reverseSide :: DatedFile,
      -- | Selfie with the document; may be null 
      IdentityDocument -> Maybe DatedFile
selfie :: (Maybe) (DatedFile),
      -- | List of files containing a certified English translation of the document
      IdentityDocument -> [DatedFile]
translation :: [DatedFile]
    }
  deriving (I32 -> IdentityDocument -> ShowS
[IdentityDocument] -> ShowS
IdentityDocument -> String
(I32 -> IdentityDocument -> ShowS)
-> (IdentityDocument -> String)
-> ([IdentityDocument] -> ShowS)
-> Show IdentityDocument
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [IdentityDocument] -> ShowS
$cshowList :: [IdentityDocument] -> ShowS
show :: IdentityDocument -> String
$cshow :: IdentityDocument -> String
showsPrec :: I32 -> IdentityDocument -> ShowS
$cshowsPrec :: I32 -> IdentityDocument -> ShowS
Show, IdentityDocument -> IdentityDocument -> Bool
(IdentityDocument -> IdentityDocument -> Bool)
-> (IdentityDocument -> IdentityDocument -> Bool)
-> Eq IdentityDocument
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: IdentityDocument -> IdentityDocument -> Bool
$c/= :: IdentityDocument -> IdentityDocument -> Bool
== :: IdentityDocument -> IdentityDocument -> Bool
$c== :: IdentityDocument -> IdentityDocument -> Bool
Eq, (forall x. IdentityDocument -> Rep IdentityDocument x)
-> (forall x. Rep IdentityDocument x -> IdentityDocument)
-> Generic IdentityDocument
forall x. Rep IdentityDocument x -> IdentityDocument
forall x. IdentityDocument -> Rep IdentityDocument x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep IdentityDocument x -> IdentityDocument
$cfrom :: forall x. IdentityDocument -> Rep IdentityDocument x
Generic)
data InputIdentityDocument
  = -- | An identity document to be saved to Telegram Passport 
  InputIdentityDocument
    { -- | Document number; 1-24 characters 
      InputIdentityDocument -> T
number :: T,
      -- | Document expiry date, if available 
      InputIdentityDocument -> Date
expiryDate :: Date,
      -- | Front side of the document
      InputIdentityDocument -> InputFile
frontSide :: InputFile,
      -- | Reverse side of the document; only for driver license and identity card 
      InputIdentityDocument -> InputFile
reverseSide :: InputFile,
      -- | Selfie with the document, if available 
      InputIdentityDocument -> InputFile
selfie :: InputFile,
      -- | List of files containing a certified English translation of the document
      InputIdentityDocument -> [InputFile]
translation :: [InputFile]
    }
  deriving (I32 -> InputIdentityDocument -> ShowS
[InputIdentityDocument] -> ShowS
InputIdentityDocument -> String
(I32 -> InputIdentityDocument -> ShowS)
-> (InputIdentityDocument -> String)
-> ([InputIdentityDocument] -> ShowS)
-> Show InputIdentityDocument
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [InputIdentityDocument] -> ShowS
$cshowList :: [InputIdentityDocument] -> ShowS
show :: InputIdentityDocument -> String
$cshow :: InputIdentityDocument -> String
showsPrec :: I32 -> InputIdentityDocument -> ShowS
$cshowsPrec :: I32 -> InputIdentityDocument -> ShowS
Show, InputIdentityDocument -> InputIdentityDocument -> Bool
(InputIdentityDocument -> InputIdentityDocument -> Bool)
-> (InputIdentityDocument -> InputIdentityDocument -> Bool)
-> Eq InputIdentityDocument
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: InputIdentityDocument -> InputIdentityDocument -> Bool
$c/= :: InputIdentityDocument -> InputIdentityDocument -> Bool
== :: InputIdentityDocument -> InputIdentityDocument -> Bool
$c== :: InputIdentityDocument -> InputIdentityDocument -> Bool
Eq, (forall x. InputIdentityDocument -> Rep InputIdentityDocument x)
-> (forall x. Rep InputIdentityDocument x -> InputIdentityDocument)
-> Generic InputIdentityDocument
forall x. Rep InputIdentityDocument x -> InputIdentityDocument
forall x. InputIdentityDocument -> Rep InputIdentityDocument x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep InputIdentityDocument x -> InputIdentityDocument
$cfrom :: forall x. InputIdentityDocument -> Rep InputIdentityDocument x
Generic)
data PersonalDocument
  = -- | A personal document, containing some information about a user 
  PersonalDocument
    { -- | List of files containing the pages of the document 
      PersonalDocument -> [DatedFile]
files :: [DatedFile],
      -- | List of files containing a certified English translation of the document
      PersonalDocument -> [DatedFile]
translation :: [DatedFile]
    }
  deriving (I32 -> PersonalDocument -> ShowS
[PersonalDocument] -> ShowS
PersonalDocument -> String
(I32 -> PersonalDocument -> ShowS)
-> (PersonalDocument -> String)
-> ([PersonalDocument] -> ShowS)
-> Show PersonalDocument
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PersonalDocument] -> ShowS
$cshowList :: [PersonalDocument] -> ShowS
show :: PersonalDocument -> String
$cshow :: PersonalDocument -> String
showsPrec :: I32 -> PersonalDocument -> ShowS
$cshowsPrec :: I32 -> PersonalDocument -> ShowS
Show, PersonalDocument -> PersonalDocument -> Bool
(PersonalDocument -> PersonalDocument -> Bool)
-> (PersonalDocument -> PersonalDocument -> Bool)
-> Eq PersonalDocument
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PersonalDocument -> PersonalDocument -> Bool
$c/= :: PersonalDocument -> PersonalDocument -> Bool
== :: PersonalDocument -> PersonalDocument -> Bool
$c== :: PersonalDocument -> PersonalDocument -> Bool
Eq, (forall x. PersonalDocument -> Rep PersonalDocument x)
-> (forall x. Rep PersonalDocument x -> PersonalDocument)
-> Generic PersonalDocument
forall x. Rep PersonalDocument x -> PersonalDocument
forall x. PersonalDocument -> Rep PersonalDocument x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PersonalDocument x -> PersonalDocument
$cfrom :: forall x. PersonalDocument -> Rep PersonalDocument x
Generic)
data InputPersonalDocument
  = -- | A personal document to be saved to Telegram Passport 
  InputPersonalDocument
    { -- | List of files containing the pages of the document 
      InputPersonalDocument -> [InputFile]
files :: [InputFile],
      -- | List of files containing a certified English translation of the document
      InputPersonalDocument -> [InputFile]
translation :: [InputFile]
    }
  deriving (I32 -> InputPersonalDocument -> ShowS
[InputPersonalDocument] -> ShowS
InputPersonalDocument -> String
(I32 -> InputPersonalDocument -> ShowS)
-> (InputPersonalDocument -> String)
-> ([InputPersonalDocument] -> ShowS)
-> Show InputPersonalDocument
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [InputPersonalDocument] -> ShowS
$cshowList :: [InputPersonalDocument] -> ShowS
show :: InputPersonalDocument -> String
$cshow :: InputPersonalDocument -> String
showsPrec :: I32 -> InputPersonalDocument -> ShowS
$cshowsPrec :: I32 -> InputPersonalDocument -> ShowS
Show, InputPersonalDocument -> InputPersonalDocument -> Bool
(InputPersonalDocument -> InputPersonalDocument -> Bool)
-> (InputPersonalDocument -> InputPersonalDocument -> Bool)
-> Eq InputPersonalDocument
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: InputPersonalDocument -> InputPersonalDocument -> Bool
$c/= :: InputPersonalDocument -> InputPersonalDocument -> Bool
== :: InputPersonalDocument -> InputPersonalDocument -> Bool
$c== :: InputPersonalDocument -> InputPersonalDocument -> Bool
Eq, (forall x. InputPersonalDocument -> Rep InputPersonalDocument x)
-> (forall x. Rep InputPersonalDocument x -> InputPersonalDocument)
-> Generic InputPersonalDocument
forall x. Rep InputPersonalDocument x -> InputPersonalDocument
forall x. InputPersonalDocument -> Rep InputPersonalDocument x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep InputPersonalDocument x -> InputPersonalDocument
$cfrom :: forall x. InputPersonalDocument -> Rep InputPersonalDocument x
Generic)
-- | Contains information about a Telegram Passport element
data PassportElement
  = -- | A Telegram Passport element containing the user's personal details 
  PassportElementPersonalDetails
    { -- | Personal details of the user
      PassportElement -> PersonalDetails
personalDetails :: PersonalDetails
    }
  | -- | A Telegram Passport element containing the user's passport 
  PassportElementPassport
    { -- | Passport
      PassportElement -> IdentityDocument
passport :: IdentityDocument
    }
  | -- | A Telegram Passport element containing the user's driver license 
  PassportElementDriverLicense
    { -- | Driver license
      PassportElement -> IdentityDocument
driverLicense :: IdentityDocument
    }
  | -- | A Telegram Passport element containing the user's identity card 
  PassportElementIdentityCard
    { -- | Identity card
      PassportElement -> IdentityDocument
identityCard :: IdentityDocument
    }
  | -- | A Telegram Passport element containing the user's internal passport 
  PassportElementInternalPassport
    { -- | Internal passport
      PassportElement -> IdentityDocument
internalPassport :: IdentityDocument
    }
  | -- | A Telegram Passport element containing the user's address 
  PassportElementAddress
    { -- | Address
      PassportElement -> Address
address :: Address
    }
  | -- | A Telegram Passport element containing the user's utility bill 
  PassportElementUtilityBill
    { -- | Utility bill
      PassportElement -> PersonalDocument
utilityBill :: PersonalDocument
    }
  | -- | A Telegram Passport element containing the user's bank statement 
  PassportElementBankStatement
    { -- | Bank statement
      PassportElement -> PersonalDocument
bankStatement :: PersonalDocument
    }
  | -- | A Telegram Passport element containing the user's rental agreement 
  PassportElementRentalAgreement
    { -- | Rental agreement
      PassportElement -> PersonalDocument
rentalAgreement :: PersonalDocument
    }
  | -- | A Telegram Passport element containing the user's passport registration pages 
  PassportElementPassportRegistration
    { -- | Passport registration pages
      PassportElement -> PersonalDocument
passportRegistration :: PersonalDocument
    }
  | -- | A Telegram Passport element containing the user's temporary registration 
  PassportElementTemporaryRegistration
    { -- | Temporary registration
      PassportElement -> PersonalDocument
temporaryRegistration :: PersonalDocument
    }
  | -- | A Telegram Passport element containing the user's phone number 
  PassportElementPhoneNumber
    { -- | Phone number
      PassportElement -> T
phoneNumber :: T
    }
  | -- | A Telegram Passport element containing the user's email address 
  PassportElementEmailAddress
    { -- | Email address
      PassportElement -> T
emailAddress :: T
    }
  deriving (I32 -> PassportElement -> ShowS
[PassportElement] -> ShowS
PassportElement -> String
(I32 -> PassportElement -> ShowS)
-> (PassportElement -> String)
-> ([PassportElement] -> ShowS)
-> Show PassportElement
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PassportElement] -> ShowS
$cshowList :: [PassportElement] -> ShowS
show :: PassportElement -> String
$cshow :: PassportElement -> String
showsPrec :: I32 -> PassportElement -> ShowS
$cshowsPrec :: I32 -> PassportElement -> ShowS
Show, PassportElement -> PassportElement -> Bool
(PassportElement -> PassportElement -> Bool)
-> (PassportElement -> PassportElement -> Bool)
-> Eq PassportElement
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PassportElement -> PassportElement -> Bool
$c/= :: PassportElement -> PassportElement -> Bool
== :: PassportElement -> PassportElement -> Bool
$c== :: PassportElement -> PassportElement -> Bool
Eq, (forall x. PassportElement -> Rep PassportElement x)
-> (forall x. Rep PassportElement x -> PassportElement)
-> Generic PassportElement
forall x. Rep PassportElement x -> PassportElement
forall x. PassportElement -> Rep PassportElement x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep PassportElement x -> PassportElement
$cfrom :: forall x. PassportElement -> Rep PassportElement x
Generic)
-- | Contains information about a Telegram Passport element to be saved
data InputPassportElement
  = -- | A Telegram Passport element to be saved containing the user's personal details 
  InputPassportElementPersonalDetails
    { -- | Personal details of the user
      InputPassportElement -> PersonalDetails
personalDetails :: PersonalDetails
    }
  | -- | A Telegram Passport element to be saved containing the user's passport 
  InputPassportElementPassport
    { -- | The passport to be saved
      InputPassportElement -> InputIdentityDocument
passport :: InputIdentityDocument
    }
  | -- | A Telegram Passport element to be saved containing the user's driver license 
  InputPassportElementDriverLicense
    { -- | The driver license to be saved
      InputPassportElement -> InputIdentityDocument
driverLicense :: InputIdentityDocument
    }
  | -- | A Telegram Passport element to be saved containing the user's identity card 
  InputPassportElementIdentityCard
    { -- | The identity card to be saved
      InputPassportElement -> InputIdentityDocument
identityCard :: InputIdentityDocument
    }
  | -- | A Telegram Passport element to be saved containing the user's internal passport 
  InputPassportElementInternalPassport
    { -- | The internal passport to be saved
      InputPassportElement -> InputIdentityDocument
internalPassport :: InputIdentityDocument
    }
  | -- | A Telegram Passport element to be saved containing the user's address 
  InputPassportElementAddress
    { -- | The address to be saved
      InputPassportElement -> Address
address :: Address
    }
  | -- | A Telegram Passport element to be saved containing the user's utility bill 
  InputPassportElementUtilityBill
    { -- | The utility bill to be saved
      InputPassportElement -> InputPersonalDocument
utilityBill :: InputPersonalDocument
    }
  | -- | A Telegram Passport element to be saved containing the user's bank statement 
  InputPassportElementBankStatement
    { -- | The bank statement to be saved
      InputPassportElement -> InputPersonalDocument
bankStatement :: InputPersonalDocument
    }
  | -- | A Telegram Passport element to be saved containing the user's rental agreement 
  InputPassportElementRentalAgreement
    { -- | The rental agreement to be saved
      InputPassportElement -> InputPersonalDocument
rentalAgreement :: InputPersonalDocument
    }
  | -- | A Telegram Passport element to be saved containing the user's passport registration 
  InputPassportElementPassportRegistration
    { -- | The passport registration page to be saved
      InputPassportElement -> InputPersonalDocument
passportRegistration :: InputPersonalDocument
    }
  | -- | A Telegram Passport element to be saved containing the user's temporary registration 
  InputPassportElementTemporaryRegistration
    { -- | The temporary registration document to be saved
      InputPassportElement -> InputPersonalDocument
temporaryRegistration :: InputPersonalDocument
    }
  | -- | A Telegram Passport element to be saved containing the user's phone number 
  InputPassportElementPhoneNumber
    { -- | The phone number to be saved
      InputPassportElement -> T
phoneNumber :: T
    }
  | -- | A Telegram Passport element to be saved containing the user's email address 
  InputPassportElementEmailAddress
    { -- | The email address to be saved
      InputPassportElement -> T
emailAddress :: T
    }
  deriving (I32 -> InputPassportElement -> ShowS
[InputPassportElement] -> ShowS
InputPassportElement -> String
(I32 -> InputPassportElement -> ShowS)
-> (InputPassportElement -> String)
-> ([InputPassportElement] -> ShowS)
-> Show InputPassportElement
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [InputPassportElement] -> ShowS
$cshowList :: [InputPassportElement] -> ShowS
show :: InputPassportElement -> String
$cshow :: InputPassportElement -> String
showsPrec :: I32 -> InputPassportElement -> ShowS
$cshowsPrec :: I32 -> InputPassportElement -> ShowS
Show, InputPassportElement -> InputPassportElement -> Bool
(InputPassportElement -> InputPassportElement -> Bool)
-> (InputPassportElement -> InputPassportElement -> Bool)
-> Eq InputPassportElement
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: InputPassportElement -> InputPassportElement -> Bool
$c/= :: InputPassportElement -> InputPassportElement -> Bool
== :: InputPassportElement -> InputPassportElement -> Bool
$c== :: InputPassportElement -> InputPassportElement -> Bool
Eq, (forall x. InputPassportElement -> Rep InputPassportElement x)
-> (forall x. Rep InputPassportElement x -> InputPassportElement)
-> Generic InputPassportElement
forall x. Rep InputPassportElement x -> InputPassportElement
forall x. InputPassportElement -> Rep InputPassportElement x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep InputPassportElement x -> InputPassportElement
$cfrom :: forall x. InputPassportElement -> Rep InputPassportElement x
Generic)
data PassportElements
  = -- | Contains information about saved Telegram Passport elements 
  PassportElements
    { -- | Telegram Passport elements
      PassportElements -> [PassportElement]
elements :: [PassportElement]
    }
  deriving (I32 -> PassportElements -> ShowS
[PassportElements] -> ShowS
PassportElements -> String
(I32 -> PassportElements -> ShowS)
-> (PassportElements -> String)
-> ([PassportElements] -> ShowS)
-> Show PassportElements
forall a.
(I32 -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [PassportElements] -> ShowS
$cshowList :: [PassportElements] -> ShowS
show :: PassportElements -> String
$cshow :: PassportElements -> String
showsPrec :: I32 -> PassportElements -> ShowS
$cshowsPrec :: I32 -> PassportElements -> ShowS
Show, PassportElements -> PassportElements -> Bool
(PassportElements -> PassportElements -> Bool)
-> (PassportElements -> PassportElements -> Bool)
-> Eq PassportElements
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: PassportElements -> PassportElements -> Bool
$c/= :: PassportElements -> PassportElements -> Bool
== :: PassportElements -> PassportElements -> Bool
$c== :: PassportElements -> PassportElements -> Bool
Eq, (forall x. PassportElements -> Rep PassportElements x)
-> (forall x. Rep PassportElements x -> PassportElements)
-> Generic PassportElements
forall x. Rep PassportElements x -> PassportElements
forall x. PassportElements -> Rep PassportElements x
forall a.
(forall x. a -&