module TD.GeneralResult (GeneralResult(..)) where

import Control.Applicative (Alternative ((<|>)))
import Data.Aeson (FromJSON (parseJSON))
import qualified Data.Aeson.Types as T
import qualified TD.Lib.Internal as I
import qualified TD.Data.AccountTtl as AccountTtl
import qualified TD.Data.AddedReactions as AddedReactions
import qualified TD.Data.AnimatedEmoji as AnimatedEmoji
import qualified TD.Data.Animations as Animations
import qualified TD.Data.ArchiveChatListSettings as ArchiveChatListSettings
import qualified TD.Data.AttachmentMenuBot as AttachmentMenuBot
import qualified TD.Data.AuthenticationCodeInfo as AuthenticationCodeInfo
import qualified TD.Data.AuthorizationState as AuthorizationState
import qualified TD.Data.AutoDownloadSettingsPresets as AutoDownloadSettingsPresets
import qualified TD.Data.AutosaveSettings as AutosaveSettings
import qualified TD.Data.AvailableReactions as AvailableReactions
import qualified TD.Data.Background as Background
import qualified TD.Data.Backgrounds as Backgrounds
import qualified TD.Data.BankCardInfo as BankCardInfo
import qualified TD.Data.BasicGroup as BasicGroup
import qualified TD.Data.BasicGroupFullInfo as BasicGroupFullInfo
import qualified TD.Data.BotCommands as BotCommands
import qualified TD.Data.BotMediaPreview as BotMediaPreview
import qualified TD.Data.BotMediaPreviewInfo as BotMediaPreviewInfo
import qualified TD.Data.BotMediaPreviews as BotMediaPreviews
import qualified TD.Data.BotMenuButton as BotMenuButton
import qualified TD.Data.BusinessChatLink as BusinessChatLink
import qualified TD.Data.BusinessChatLinkInfo as BusinessChatLinkInfo
import qualified TD.Data.BusinessChatLinks as BusinessChatLinks
import qualified TD.Data.BusinessConnectedBot as BusinessConnectedBot
import qualified TD.Data.BusinessConnection as BusinessConnection
import qualified TD.Data.BusinessFeatures as BusinessFeatures
import qualified TD.Data.BusinessMessage as BusinessMessage
import qualified TD.Data.BusinessMessages as BusinessMessages
import qualified TD.Data.CallId as CallId
import qualified TD.Data.CallbackQueryAnswer as CallbackQueryAnswer
import qualified TD.Data.CanSendMessageToUserResult as CanSendMessageToUserResult
import qualified TD.Data.CanSendStoryResult as CanSendStoryResult
import qualified TD.Data.CanTransferOwnershipResult as CanTransferOwnershipResult
import qualified TD.Data.Chat as Chat
import qualified TD.Data.ChatActiveStories as ChatActiveStories
import qualified TD.Data.ChatAdministrators as ChatAdministrators
import qualified TD.Data.ChatBoostFeatures as ChatBoostFeatures
import qualified TD.Data.ChatBoostLevelFeatures as ChatBoostLevelFeatures
import qualified TD.Data.ChatBoostLink as ChatBoostLink
import qualified TD.Data.ChatBoostLinkInfo as ChatBoostLinkInfo
import qualified TD.Data.ChatBoostSlots as ChatBoostSlots
import qualified TD.Data.ChatBoostStatus as ChatBoostStatus
import qualified TD.Data.ChatEvents as ChatEvents
import qualified TD.Data.ChatFolder as ChatFolder
import qualified TD.Data.ChatFolderIcon as ChatFolderIcon
import qualified TD.Data.ChatFolderInfo as ChatFolderInfo
import qualified TD.Data.ChatFolderInviteLink as ChatFolderInviteLink
import qualified TD.Data.ChatFolderInviteLinkInfo as ChatFolderInviteLinkInfo
import qualified TD.Data.ChatFolderInviteLinks as ChatFolderInviteLinks
import qualified TD.Data.ChatInviteLink as ChatInviteLink
import qualified TD.Data.ChatInviteLinkCounts as ChatInviteLinkCounts
import qualified TD.Data.ChatInviteLinkInfo as ChatInviteLinkInfo
import qualified TD.Data.ChatInviteLinkMembers as ChatInviteLinkMembers
import qualified TD.Data.ChatInviteLinks as ChatInviteLinks
import qualified TD.Data.ChatJoinRequests as ChatJoinRequests
import qualified TD.Data.ChatLists as ChatLists
import qualified TD.Data.ChatMember as ChatMember
import qualified TD.Data.ChatMembers as ChatMembers
import qualified TD.Data.ChatMessageSenders as ChatMessageSenders
import qualified TD.Data.ChatPhotos as ChatPhotos
import qualified TD.Data.ChatRevenueStatistics as ChatRevenueStatistics
import qualified TD.Data.ChatRevenueTransactions as ChatRevenueTransactions
import qualified TD.Data.ChatStatistics as ChatStatistics
import qualified TD.Data.Chats as Chats
import qualified TD.Data.CheckChatUsernameResult as CheckChatUsernameResult
import qualified TD.Data.CheckStickerSetNameResult as CheckStickerSetNameResult
import qualified TD.Data.CollectibleItemInfo as CollectibleItemInfo
import qualified TD.Data.ConnectedWebsites as ConnectedWebsites
import qualified TD.Data.Count as Count
import qualified TD.Data.Countries as Countries
import qualified TD.Data.CreatedBasicGroupChat as CreatedBasicGroupChat
import qualified TD.Data.CurrentWeather as CurrentWeather
import qualified TD.Data.CustomRequestResult as CustomRequestResult
import qualified TD.Data.DatabaseStatistics as DatabaseStatistics
import qualified TD.Data.DeepLinkInfo as DeepLinkInfo
import qualified TD.Data.EmailAddressAuthenticationCodeInfo as EmailAddressAuthenticationCodeInfo
import qualified TD.Data.EmojiCategories as EmojiCategories
import qualified TD.Data.EmojiKeywords as EmojiKeywords
import qualified TD.Data.EmojiReaction as EmojiReaction
import qualified TD.Data.EmojiStatuses as EmojiStatuses
import qualified TD.Data.Emojis as Emojis
import qualified TD.Data.Error as Error
import qualified TD.Data.FailedToAddMembers as FailedToAddMembers
import qualified TD.Data.File as File
import qualified TD.Data.FileDownloadedPrefixSize as FileDownloadedPrefixSize
import qualified TD.Data.FilePart as FilePart
import qualified TD.Data.FormattedText as FormattedText
import qualified TD.Data.ForumTopic as ForumTopic
import qualified TD.Data.ForumTopicInfo as ForumTopicInfo
import qualified TD.Data.ForumTopics as ForumTopics
import qualified TD.Data.FoundChatBoosts as FoundChatBoosts
import qualified TD.Data.FoundChatMessages as FoundChatMessages
import qualified TD.Data.FoundFileDownloads as FoundFileDownloads
import qualified TD.Data.FoundMessages as FoundMessages
import qualified TD.Data.FoundPosition as FoundPosition
import qualified TD.Data.FoundPositions as FoundPositions
import qualified TD.Data.FoundStories as FoundStories
import qualified TD.Data.FoundUsers as FoundUsers
import qualified TD.Data.FoundWebApp as FoundWebApp
import qualified TD.Data.GameHighScores as GameHighScores
import qualified TD.Data.Gifts as Gifts
import qualified TD.Data.GiveawayInfo as GiveawayInfo
import qualified TD.Data.GroupCall as GroupCall
import qualified TD.Data.GroupCallId as GroupCallId
import qualified TD.Data.GroupCallStreams as GroupCallStreams
import qualified TD.Data.Hashtags as Hashtags
import qualified TD.Data.HttpUrl as HttpUrl
import qualified TD.Data.ImportedContacts as ImportedContacts
import qualified TD.Data.InlineQueryResults as InlineQueryResults
import qualified TD.Data.InternalLinkType as InternalLinkType
import qualified TD.Data.JsonValue as JsonValue
import qualified TD.Data.LanguagePackInfo as LanguagePackInfo
import qualified TD.Data.LanguagePackStringValue as LanguagePackStringValue
import qualified TD.Data.LanguagePackStrings as LanguagePackStrings
import qualified TD.Data.LinkPreview as LinkPreview
import qualified TD.Data.LocalizationTargetInfo as LocalizationTargetInfo
import qualified TD.Data.LogStream as LogStream
import qualified TD.Data.LogTags as LogTags
import qualified TD.Data.LogVerbosityLevel as LogVerbosityLevel
import qualified TD.Data.LoginUrlInfo as LoginUrlInfo
import qualified TD.Data.MainWebApp as MainWebApp
import qualified TD.Data.Message as Message
import qualified TD.Data.MessageAutoDeleteTime as MessageAutoDeleteTime
import qualified TD.Data.MessageCalendar as MessageCalendar
import qualified TD.Data.MessageEffect as MessageEffect
import qualified TD.Data.MessageFileType as MessageFileType
import qualified TD.Data.MessageLink as MessageLink
import qualified TD.Data.MessageLinkInfo as MessageLinkInfo
import qualified TD.Data.MessagePositions as MessagePositions
import qualified TD.Data.MessageProperties as MessageProperties
import qualified TD.Data.MessageReadDate as MessageReadDate
import qualified TD.Data.MessageSenders as MessageSenders
import qualified TD.Data.MessageStatistics as MessageStatistics
import qualified TD.Data.MessageThreadInfo as MessageThreadInfo
import qualified TD.Data.MessageViewers as MessageViewers
import qualified TD.Data.Messages as Messages
import qualified TD.Data.NetworkStatistics as NetworkStatistics
import qualified TD.Data.NewChatPrivacySettings as NewChatPrivacySettings
import qualified TD.Data.NotificationSound as NotificationSound
import qualified TD.Data.NotificationSounds as NotificationSounds
import qualified TD.Data.Ok as Ok
import qualified TD.Data.OptionValue as OptionValue
import qualified TD.Data.OrderInfo as OrderInfo
import qualified TD.Data.PassportAuthorizationForm as PassportAuthorizationForm
import qualified TD.Data.PassportElement as PassportElement
import qualified TD.Data.PassportElements as PassportElements
import qualified TD.Data.PassportElementsWithErrors as PassportElementsWithErrors
import qualified TD.Data.PasswordState as PasswordState
import qualified TD.Data.PaymentForm as PaymentForm
import qualified TD.Data.PaymentReceipt as PaymentReceipt
import qualified TD.Data.PaymentResult as PaymentResult
import qualified TD.Data.PhoneNumberInfo as PhoneNumberInfo
import qualified TD.Data.PremiumFeatures as PremiumFeatures
import qualified TD.Data.PremiumGiftCodeInfo as PremiumGiftCodeInfo
import qualified TD.Data.PremiumGiftCodePaymentOptions as PremiumGiftCodePaymentOptions
import qualified TD.Data.PremiumLimit as PremiumLimit
import qualified TD.Data.PremiumState as PremiumState
import qualified TD.Data.Proxies as Proxies
import qualified TD.Data.Proxy as Proxy
import qualified TD.Data.PublicForwards as PublicForwards
import qualified TD.Data.PushReceiverId as PushReceiverId
import qualified TD.Data.QuickReplyMessage as QuickReplyMessage
import qualified TD.Data.QuickReplyMessages as QuickReplyMessages
import qualified TD.Data.ReadDatePrivacySettings as ReadDatePrivacySettings
import qualified TD.Data.RecommendedChatFolders as RecommendedChatFolders
import qualified TD.Data.RecoveryEmailAddress as RecoveryEmailAddress
import qualified TD.Data.ReportChatResult as ReportChatResult
import qualified TD.Data.ReportChatSponsoredMessageResult as ReportChatSponsoredMessageResult
import qualified TD.Data.ReportStoryResult as ReportStoryResult
import qualified TD.Data.ResetPasswordResult as ResetPasswordResult
import qualified TD.Data.RtmpUrl as RtmpUrl
import qualified TD.Data.SavedMessagesTags as SavedMessagesTags
import qualified TD.Data.ScopeNotificationSettings as ScopeNotificationSettings
import qualified TD.Data.Seconds as Seconds
import qualified TD.Data.SecretChat as SecretChat
import qualified TD.Data.SentWebAppMessage as SentWebAppMessage
import qualified TD.Data.Session as Session
import qualified TD.Data.Sessions as Sessions
import qualified TD.Data.SponsoredMessages as SponsoredMessages
import qualified TD.Data.StarGiveawayPaymentOptions as StarGiveawayPaymentOptions
import qualified TD.Data.StarPaymentOptions as StarPaymentOptions
import qualified TD.Data.StarRevenueStatistics as StarRevenueStatistics
import qualified TD.Data.StarSubscriptions as StarSubscriptions
import qualified TD.Data.StarTransactions as StarTransactions
import qualified TD.Data.StatisticalGraph as StatisticalGraph
import qualified TD.Data.Sticker as Sticker
import qualified TD.Data.StickerSet as StickerSet
import qualified TD.Data.StickerSets as StickerSets
import qualified TD.Data.Stickers as Stickers
import qualified TD.Data.StorageStatistics as StorageStatistics
import qualified TD.Data.StorageStatisticsFast as StorageStatisticsFast
import qualified TD.Data.Stories as Stories
import qualified TD.Data.Story as Story
import qualified TD.Data.StoryInteractions as StoryInteractions
import qualified TD.Data.StoryStatistics as StoryStatistics
import qualified TD.Data.Supergroup as Supergroup
import qualified TD.Data.SupergroupFullInfo as SupergroupFullInfo
import qualified TD.Data.TMeUrls as TMeUrls
import qualified TD.Data.TemporaryPasswordState as TemporaryPasswordState
import qualified TD.Data.TestBytes as TestBytes
import qualified TD.Data.TestInt as TestInt
import qualified TD.Data.TestString as TestString
import qualified TD.Data.TestVectorInt as TestVectorInt
import qualified TD.Data.TestVectorIntObject as TestVectorIntObject
import qualified TD.Data.TestVectorString as TestVectorString
import qualified TD.Data.TestVectorStringObject as TestVectorStringObject
import qualified TD.Data.Text as Text
import qualified TD.Data.TextEntities as TextEntities
import qualified TD.Data.TimeZones as TimeZones
import qualified TD.Data.TrendingStickerSets as TrendingStickerSets
import qualified TD.Data.Update as Update
import qualified TD.Data.Updates as Updates
import qualified TD.Data.User as User
import qualified TD.Data.UserFullInfo as UserFullInfo
import qualified TD.Data.UserGifts as UserGifts
import qualified TD.Data.UserLink as UserLink
import qualified TD.Data.UserPrivacySettingRules as UserPrivacySettingRules
import qualified TD.Data.UserSupportInfo as UserSupportInfo
import qualified TD.Data.Users as Users
import qualified TD.Data.ValidatedOrderInfo as ValidatedOrderInfo
import qualified TD.Data.WebAppInfo as WebAppInfo
import qualified TD.Data.WebPageInstantView as WebPageInstantView

data GeneralResult
    = AccountTtl                         AccountTtl.AccountTtl
    | AddedReactions                     AddedReactions.AddedReactions
    | AnimatedEmoji                      AnimatedEmoji.AnimatedEmoji
    | Animations                         Animations.Animations
    | ArchiveChatListSettings            ArchiveChatListSettings.ArchiveChatListSettings
    | AttachmentMenuBot                  AttachmentMenuBot.AttachmentMenuBot
    | AuthenticationCodeInfo             AuthenticationCodeInfo.AuthenticationCodeInfo
    | AuthorizationState                 AuthorizationState.AuthorizationState
    | AutoDownloadSettingsPresets        AutoDownloadSettingsPresets.AutoDownloadSettingsPresets
    | AutosaveSettings                   AutosaveSettings.AutosaveSettings
    | AvailableReactions                 AvailableReactions.AvailableReactions
    | Background                         Background.Background
    | Backgrounds                        Backgrounds.Backgrounds
    | BankCardInfo                       BankCardInfo.BankCardInfo
    | BasicGroup                         BasicGroup.BasicGroup
    | BasicGroupFullInfo                 BasicGroupFullInfo.BasicGroupFullInfo
    | BotCommands                        BotCommands.BotCommands
    | BotMediaPreview                    BotMediaPreview.BotMediaPreview
    | BotMediaPreviewInfo                BotMediaPreviewInfo.BotMediaPreviewInfo
    | BotMediaPreviews                   BotMediaPreviews.BotMediaPreviews
    | BotMenuButton                      BotMenuButton.BotMenuButton
    | BusinessChatLink                   BusinessChatLink.BusinessChatLink
    | BusinessChatLinkInfo               BusinessChatLinkInfo.BusinessChatLinkInfo
    | BusinessChatLinks                  BusinessChatLinks.BusinessChatLinks
    | BusinessConnectedBot               BusinessConnectedBot.BusinessConnectedBot
    | BusinessConnection                 BusinessConnection.BusinessConnection
    | BusinessFeatures                   BusinessFeatures.BusinessFeatures
    | BusinessMessage                    BusinessMessage.BusinessMessage
    | BusinessMessages                   BusinessMessages.BusinessMessages
    | CallId                             CallId.CallId
    | CallbackQueryAnswer                CallbackQueryAnswer.CallbackQueryAnswer
    | CanSendMessageToUserResult         CanSendMessageToUserResult.CanSendMessageToUserResult
    | CanSendStoryResult                 CanSendStoryResult.CanSendStoryResult
    | CanTransferOwnershipResult         CanTransferOwnershipResult.CanTransferOwnershipResult
    | Chat                               Chat.Chat
    | ChatActiveStories                  ChatActiveStories.ChatActiveStories
    | ChatAdministrators                 ChatAdministrators.ChatAdministrators
    | ChatBoostFeatures                  ChatBoostFeatures.ChatBoostFeatures
    | ChatBoostLevelFeatures             ChatBoostLevelFeatures.ChatBoostLevelFeatures
    | ChatBoostLink                      ChatBoostLink.ChatBoostLink
    | ChatBoostLinkInfo                  ChatBoostLinkInfo.ChatBoostLinkInfo
    | ChatBoostSlots                     ChatBoostSlots.ChatBoostSlots
    | ChatBoostStatus                    ChatBoostStatus.ChatBoostStatus
    | ChatEvents                         ChatEvents.ChatEvents
    | ChatFolder                         ChatFolder.ChatFolder
    | ChatFolderIcon                     ChatFolderIcon.ChatFolderIcon
    | ChatFolderInfo                     ChatFolderInfo.ChatFolderInfo
    | ChatFolderInviteLink               ChatFolderInviteLink.ChatFolderInviteLink
    | ChatFolderInviteLinkInfo           ChatFolderInviteLinkInfo.ChatFolderInviteLinkInfo
    | ChatFolderInviteLinks              ChatFolderInviteLinks.ChatFolderInviteLinks
    | ChatInviteLink                     ChatInviteLink.ChatInviteLink
    | ChatInviteLinkCounts               ChatInviteLinkCounts.ChatInviteLinkCounts
    | ChatInviteLinkInfo                 ChatInviteLinkInfo.ChatInviteLinkInfo
    | ChatInviteLinkMembers              ChatInviteLinkMembers.ChatInviteLinkMembers
    | ChatInviteLinks                    ChatInviteLinks.ChatInviteLinks
    | ChatJoinRequests                   ChatJoinRequests.ChatJoinRequests
    | ChatLists                          ChatLists.ChatLists
    | ChatMember                         ChatMember.ChatMember
    | ChatMembers                        ChatMembers.ChatMembers
    | ChatMessageSenders                 ChatMessageSenders.ChatMessageSenders
    | ChatPhotos                         ChatPhotos.ChatPhotos
    | ChatRevenueStatistics              ChatRevenueStatistics.ChatRevenueStatistics
    | ChatRevenueTransactions            ChatRevenueTransactions.ChatRevenueTransactions
    | ChatStatistics                     ChatStatistics.ChatStatistics
    | Chats                              Chats.Chats
    | CheckChatUsernameResult            CheckChatUsernameResult.CheckChatUsernameResult
    | CheckStickerSetNameResult          CheckStickerSetNameResult.CheckStickerSetNameResult
    | CollectibleItemInfo                CollectibleItemInfo.CollectibleItemInfo
    | ConnectedWebsites                  ConnectedWebsites.ConnectedWebsites
    | Count                              Count.Count
    | Countries                          Countries.Countries
    | CreatedBasicGroupChat              CreatedBasicGroupChat.CreatedBasicGroupChat
    | CurrentWeather                     CurrentWeather.CurrentWeather
    | CustomRequestResult                CustomRequestResult.CustomRequestResult
    | DatabaseStatistics                 DatabaseStatistics.DatabaseStatistics
    | DeepLinkInfo                       DeepLinkInfo.DeepLinkInfo
    | EmailAddressAuthenticationCodeInfo EmailAddressAuthenticationCodeInfo.EmailAddressAuthenticationCodeInfo
    | EmojiCategories                    EmojiCategories.EmojiCategories
    | EmojiKeywords                      EmojiKeywords.EmojiKeywords
    | EmojiReaction                      EmojiReaction.EmojiReaction
    | EmojiStatuses                      EmojiStatuses.EmojiStatuses
    | Emojis                             Emojis.Emojis
    | Error                              Error.Error
    | FailedToAddMembers                 FailedToAddMembers.FailedToAddMembers
    | File                               File.File
    | FileDownloadedPrefixSize           FileDownloadedPrefixSize.FileDownloadedPrefixSize
    | FilePart                           FilePart.FilePart
    | FormattedText                      FormattedText.FormattedText
    | ForumTopic                         ForumTopic.ForumTopic
    | ForumTopicInfo                     ForumTopicInfo.ForumTopicInfo
    | ForumTopics                        ForumTopics.ForumTopics
    | FoundChatBoosts                    FoundChatBoosts.FoundChatBoosts
    | FoundChatMessages                  FoundChatMessages.FoundChatMessages
    | FoundFileDownloads                 FoundFileDownloads.FoundFileDownloads
    | FoundMessages                      FoundMessages.FoundMessages
    | FoundPosition                      FoundPosition.FoundPosition
    | FoundPositions                     FoundPositions.FoundPositions
    | FoundStories                       FoundStories.FoundStories
    | FoundUsers                         FoundUsers.FoundUsers
    | FoundWebApp                        FoundWebApp.FoundWebApp
    | GameHighScores                     GameHighScores.GameHighScores
    | Gifts                              Gifts.Gifts
    | GiveawayInfo                       GiveawayInfo.GiveawayInfo
    | GroupCall                          GroupCall.GroupCall
    | GroupCallId                        GroupCallId.GroupCallId
    | GroupCallStreams                   GroupCallStreams.GroupCallStreams
    | Hashtags                           Hashtags.Hashtags
    | HttpUrl                            HttpUrl.HttpUrl
    | ImportedContacts                   ImportedContacts.ImportedContacts
    | InlineQueryResults                 InlineQueryResults.InlineQueryResults
    | InternalLinkType                   InternalLinkType.InternalLinkType
    | JsonValue                          JsonValue.JsonValue
    | LanguagePackInfo                   LanguagePackInfo.LanguagePackInfo
    | LanguagePackStringValue            LanguagePackStringValue.LanguagePackStringValue
    | LanguagePackStrings                LanguagePackStrings.LanguagePackStrings
    | LinkPreview                        LinkPreview.LinkPreview
    | LocalizationTargetInfo             LocalizationTargetInfo.LocalizationTargetInfo
    | LogStream                          LogStream.LogStream
    | LogTags                            LogTags.LogTags
    | LogVerbosityLevel                  LogVerbosityLevel.LogVerbosityLevel
    | LoginUrlInfo                       LoginUrlInfo.LoginUrlInfo
    | MainWebApp                         MainWebApp.MainWebApp
    | Message                            Message.Message
    | MessageAutoDeleteTime              MessageAutoDeleteTime.MessageAutoDeleteTime
    | MessageCalendar                    MessageCalendar.MessageCalendar
    | MessageEffect                      MessageEffect.MessageEffect
    | MessageFileType                    MessageFileType.MessageFileType
    | MessageLink                        MessageLink.MessageLink
    | MessageLinkInfo                    MessageLinkInfo.MessageLinkInfo
    | MessagePositions                   MessagePositions.MessagePositions
    | MessageProperties                  MessageProperties.MessageProperties
    | MessageReadDate                    MessageReadDate.MessageReadDate
    | MessageSenders                     MessageSenders.MessageSenders
    | MessageStatistics                  MessageStatistics.MessageStatistics
    | MessageThreadInfo                  MessageThreadInfo.MessageThreadInfo
    | MessageViewers                     MessageViewers.MessageViewers
    | Messages                           Messages.Messages
    | NetworkStatistics                  NetworkStatistics.NetworkStatistics
    | NewChatPrivacySettings             NewChatPrivacySettings.NewChatPrivacySettings
    | NotificationSound                  NotificationSound.NotificationSound
    | NotificationSounds                 NotificationSounds.NotificationSounds
    | Ok                                 Ok.Ok
    | OptionValue                        OptionValue.OptionValue
    | OrderInfo                          OrderInfo.OrderInfo
    | PassportAuthorizationForm          PassportAuthorizationForm.PassportAuthorizationForm
    | PassportElement                    PassportElement.PassportElement
    | PassportElements                   PassportElements.PassportElements
    | PassportElementsWithErrors         PassportElementsWithErrors.PassportElementsWithErrors
    | PasswordState                      PasswordState.PasswordState
    | PaymentForm                        PaymentForm.PaymentForm
    | PaymentReceipt                     PaymentReceipt.PaymentReceipt
    | PaymentResult                      PaymentResult.PaymentResult
    | PhoneNumberInfo                    PhoneNumberInfo.PhoneNumberInfo
    | PremiumFeatures                    PremiumFeatures.PremiumFeatures
    | PremiumGiftCodeInfo                PremiumGiftCodeInfo.PremiumGiftCodeInfo
    | PremiumGiftCodePaymentOptions      PremiumGiftCodePaymentOptions.PremiumGiftCodePaymentOptions
    | PremiumLimit                       PremiumLimit.PremiumLimit
    | PremiumState                       PremiumState.PremiumState
    | Proxies                            Proxies.Proxies
    | Proxy                              Proxy.Proxy
    | PublicForwards                     PublicForwards.PublicForwards
    | PushReceiverId                     PushReceiverId.PushReceiverId
    | QuickReplyMessage                  QuickReplyMessage.QuickReplyMessage
    | QuickReplyMessages                 QuickReplyMessages.QuickReplyMessages
    | ReadDatePrivacySettings            ReadDatePrivacySettings.ReadDatePrivacySettings
    | RecommendedChatFolders             RecommendedChatFolders.RecommendedChatFolders
    | RecoveryEmailAddress               RecoveryEmailAddress.RecoveryEmailAddress
    | ReportChatResult                   ReportChatResult.ReportChatResult
    | ReportChatSponsoredMessageResult   ReportChatSponsoredMessageResult.ReportChatSponsoredMessageResult
    | ReportStoryResult                  ReportStoryResult.ReportStoryResult
    | ResetPasswordResult                ResetPasswordResult.ResetPasswordResult
    | RtmpUrl                            RtmpUrl.RtmpUrl
    | SavedMessagesTags                  SavedMessagesTags.SavedMessagesTags
    | ScopeNotificationSettings          ScopeNotificationSettings.ScopeNotificationSettings
    | Seconds                            Seconds.Seconds
    | SecretChat                         SecretChat.SecretChat
    | SentWebAppMessage                  SentWebAppMessage.SentWebAppMessage
    | Session                            Session.Session
    | Sessions                           Sessions.Sessions
    | SponsoredMessages                  SponsoredMessages.SponsoredMessages
    | StarGiveawayPaymentOptions         StarGiveawayPaymentOptions.StarGiveawayPaymentOptions
    | StarPaymentOptions                 StarPaymentOptions.StarPaymentOptions
    | StarRevenueStatistics              StarRevenueStatistics.StarRevenueStatistics
    | StarSubscriptions                  StarSubscriptions.StarSubscriptions
    | StarTransactions                   StarTransactions.StarTransactions
    | StatisticalGraph                   StatisticalGraph.StatisticalGraph
    | Sticker                            Sticker.Sticker
    | StickerSet                         StickerSet.StickerSet
    | StickerSets                        StickerSets.StickerSets
    | Stickers                           Stickers.Stickers
    | StorageStatistics                  StorageStatistics.StorageStatistics
    | StorageStatisticsFast              StorageStatisticsFast.StorageStatisticsFast
    | Stories                            Stories.Stories
    | Story                              Story.Story
    | StoryInteractions                  StoryInteractions.StoryInteractions
    | StoryStatistics                    StoryStatistics.StoryStatistics
    | Supergroup                         Supergroup.Supergroup
    | SupergroupFullInfo                 SupergroupFullInfo.SupergroupFullInfo
    | TMeUrls                            TMeUrls.TMeUrls
    | TemporaryPasswordState             TemporaryPasswordState.TemporaryPasswordState
    | TestBytes                          TestBytes.TestBytes
    | TestInt                            TestInt.TestInt
    | TestString                         TestString.TestString
    | TestVectorInt                      TestVectorInt.TestVectorInt
    | TestVectorIntObject                TestVectorIntObject.TestVectorIntObject
    | TestVectorString                   TestVectorString.TestVectorString
    | TestVectorStringObject             TestVectorStringObject.TestVectorStringObject
    | Text                               Text.Text
    | TextEntities                       TextEntities.TextEntities
    | TimeZones                          TimeZones.TimeZones
    | TrendingStickerSets                TrendingStickerSets.TrendingStickerSets
    | Update                             Update.Update
    | Updates                            Updates.Updates
    | User                               User.User
    | UserFullInfo                       UserFullInfo.UserFullInfo
    | UserGifts                          UserGifts.UserGifts
    | UserLink                           UserLink.UserLink
    | UserPrivacySettingRules            UserPrivacySettingRules.UserPrivacySettingRules
    | UserSupportInfo                    UserSupportInfo.UserSupportInfo
    | Users                              Users.Users
    | ValidatedOrderInfo                 ValidatedOrderInfo.ValidatedOrderInfo
    | WebAppInfo                         WebAppInfo.WebAppInfo
    | WebPageInstantView                 WebPageInstantView.WebPageInstantView
 deriving (GeneralResult -> GeneralResult -> Bool
(GeneralResult -> GeneralResult -> Bool)
-> (GeneralResult -> GeneralResult -> Bool) -> Eq GeneralResult
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GeneralResult -> GeneralResult -> Bool
== :: GeneralResult -> GeneralResult -> Bool
$c/= :: GeneralResult -> GeneralResult -> Bool
/= :: GeneralResult -> GeneralResult -> Bool
Eq, Int -> GeneralResult -> ShowS
[GeneralResult] -> ShowS
GeneralResult -> String
(Int -> GeneralResult -> ShowS)
-> (GeneralResult -> String)
-> ([GeneralResult] -> ShowS)
-> Show GeneralResult
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> GeneralResult -> ShowS
showsPrec :: Int -> GeneralResult -> ShowS
$cshow :: GeneralResult -> String
show :: GeneralResult -> String
$cshowList :: [GeneralResult] -> ShowS
showList :: [GeneralResult] -> ShowS
Show)

instance I.ShortShow GeneralResult where
  shortShow :: GeneralResult -> String
shortShow (AccountTtl AccountTtl
v)
    = String
"AccountTtl" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> AccountTtl -> String
forall a. ShortShow a => a -> String
I.shortShow AccountTtl
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (AddedReactions AddedReactions
v)
    = String
"AddedReactions" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> AddedReactions -> String
forall a. ShortShow a => a -> String
I.shortShow AddedReactions
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (AnimatedEmoji AnimatedEmoji
v)
    = String
"AnimatedEmoji" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> AnimatedEmoji -> String
forall a. ShortShow a => a -> String
I.shortShow AnimatedEmoji
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Animations Animations
v)
    = String
"Animations" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Animations -> String
forall a. ShortShow a => a -> String
I.shortShow Animations
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ArchiveChatListSettings ArchiveChatListSettings
v)
    = String
"ArchiveChatListSettings" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ArchiveChatListSettings -> String
forall a. ShortShow a => a -> String
I.shortShow ArchiveChatListSettings
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (AttachmentMenuBot AttachmentMenuBot
v)
    = String
"AttachmentMenuBot" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> AttachmentMenuBot -> String
forall a. ShortShow a => a -> String
I.shortShow AttachmentMenuBot
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (AuthenticationCodeInfo AuthenticationCodeInfo
v)
    = String
"AuthenticationCodeInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> AuthenticationCodeInfo -> String
forall a. ShortShow a => a -> String
I.shortShow AuthenticationCodeInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (AuthorizationState AuthorizationState
v)
    = String
"AuthorizationState" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> AuthorizationState -> String
forall a. ShortShow a => a -> String
I.shortShow AuthorizationState
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (AutoDownloadSettingsPresets AutoDownloadSettingsPresets
v)
    = String
"AutoDownloadSettingsPresets" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> AutoDownloadSettingsPresets -> String
forall a. ShortShow a => a -> String
I.shortShow AutoDownloadSettingsPresets
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (AutosaveSettings AutosaveSettings
v)
    = String
"AutosaveSettings" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> AutosaveSettings -> String
forall a. ShortShow a => a -> String
I.shortShow AutosaveSettings
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (AvailableReactions AvailableReactions
v)
    = String
"AvailableReactions" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> AvailableReactions -> String
forall a. ShortShow a => a -> String
I.shortShow AvailableReactions
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Background Background
v)
    = String
"Background" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Background -> String
forall a. ShortShow a => a -> String
I.shortShow Background
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Backgrounds Backgrounds
v)
    = String
"Backgrounds" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Backgrounds -> String
forall a. ShortShow a => a -> String
I.shortShow Backgrounds
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BankCardInfo BankCardInfo
v)
    = String
"BankCardInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BankCardInfo -> String
forall a. ShortShow a => a -> String
I.shortShow BankCardInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BasicGroup BasicGroup
v)
    = String
"BasicGroup" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BasicGroup -> String
forall a. ShortShow a => a -> String
I.shortShow BasicGroup
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BasicGroupFullInfo BasicGroupFullInfo
v)
    = String
"BasicGroupFullInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BasicGroupFullInfo -> String
forall a. ShortShow a => a -> String
I.shortShow BasicGroupFullInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BotCommands BotCommands
v)
    = String
"BotCommands" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BotCommands -> String
forall a. ShortShow a => a -> String
I.shortShow BotCommands
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BotMediaPreview BotMediaPreview
v)
    = String
"BotMediaPreview" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BotMediaPreview -> String
forall a. ShortShow a => a -> String
I.shortShow BotMediaPreview
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BotMediaPreviewInfo BotMediaPreviewInfo
v)
    = String
"BotMediaPreviewInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BotMediaPreviewInfo -> String
forall a. ShortShow a => a -> String
I.shortShow BotMediaPreviewInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BotMediaPreviews BotMediaPreviews
v)
    = String
"BotMediaPreviews" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BotMediaPreviews -> String
forall a. ShortShow a => a -> String
I.shortShow BotMediaPreviews
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BotMenuButton BotMenuButton
v)
    = String
"BotMenuButton" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BotMenuButton -> String
forall a. ShortShow a => a -> String
I.shortShow BotMenuButton
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BusinessChatLink BusinessChatLink
v)
    = String
"BusinessChatLink" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BusinessChatLink -> String
forall a. ShortShow a => a -> String
I.shortShow BusinessChatLink
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BusinessChatLinkInfo BusinessChatLinkInfo
v)
    = String
"BusinessChatLinkInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BusinessChatLinkInfo -> String
forall a. ShortShow a => a -> String
I.shortShow BusinessChatLinkInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BusinessChatLinks BusinessChatLinks
v)
    = String
"BusinessChatLinks" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BusinessChatLinks -> String
forall a. ShortShow a => a -> String
I.shortShow BusinessChatLinks
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BusinessConnectedBot BusinessConnectedBot
v)
    = String
"BusinessConnectedBot" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BusinessConnectedBot -> String
forall a. ShortShow a => a -> String
I.shortShow BusinessConnectedBot
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BusinessConnection BusinessConnection
v)
    = String
"BusinessConnection" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BusinessConnection -> String
forall a. ShortShow a => a -> String
I.shortShow BusinessConnection
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BusinessFeatures BusinessFeatures
v)
    = String
"BusinessFeatures" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BusinessFeatures -> String
forall a. ShortShow a => a -> String
I.shortShow BusinessFeatures
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BusinessMessage BusinessMessage
v)
    = String
"BusinessMessage" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BusinessMessage -> String
forall a. ShortShow a => a -> String
I.shortShow BusinessMessage
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (BusinessMessages BusinessMessages
v)
    = String
"BusinessMessages" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> BusinessMessages -> String
forall a. ShortShow a => a -> String
I.shortShow BusinessMessages
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (CallId CallId
v)
    = String
"CallId" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> CallId -> String
forall a. ShortShow a => a -> String
I.shortShow CallId
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (CallbackQueryAnswer CallbackQueryAnswer
v)
    = String
"CallbackQueryAnswer" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> CallbackQueryAnswer -> String
forall a. ShortShow a => a -> String
I.shortShow CallbackQueryAnswer
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (CanSendMessageToUserResult CanSendMessageToUserResult
v)
    = String
"CanSendMessageToUserResult" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> CanSendMessageToUserResult -> String
forall a. ShortShow a => a -> String
I.shortShow CanSendMessageToUserResult
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (CanSendStoryResult CanSendStoryResult
v)
    = String
"CanSendStoryResult" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> CanSendStoryResult -> String
forall a. ShortShow a => a -> String
I.shortShow CanSendStoryResult
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (CanTransferOwnershipResult CanTransferOwnershipResult
v)
    = String
"CanTransferOwnershipResult" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> CanTransferOwnershipResult -> String
forall a. ShortShow a => a -> String
I.shortShow CanTransferOwnershipResult
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Chat Chat
v)
    = String
"Chat" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Chat -> String
forall a. ShortShow a => a -> String
I.shortShow Chat
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatActiveStories ChatActiveStories
v)
    = String
"ChatActiveStories" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatActiveStories -> String
forall a. ShortShow a => a -> String
I.shortShow ChatActiveStories
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatAdministrators ChatAdministrators
v)
    = String
"ChatAdministrators" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatAdministrators -> String
forall a. ShortShow a => a -> String
I.shortShow ChatAdministrators
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatBoostFeatures ChatBoostFeatures
v)
    = String
"ChatBoostFeatures" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatBoostFeatures -> String
forall a. ShortShow a => a -> String
I.shortShow ChatBoostFeatures
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatBoostLevelFeatures ChatBoostLevelFeatures
v)
    = String
"ChatBoostLevelFeatures" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatBoostLevelFeatures -> String
forall a. ShortShow a => a -> String
I.shortShow ChatBoostLevelFeatures
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatBoostLink ChatBoostLink
v)
    = String
"ChatBoostLink" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatBoostLink -> String
forall a. ShortShow a => a -> String
I.shortShow ChatBoostLink
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatBoostLinkInfo ChatBoostLinkInfo
v)
    = String
"ChatBoostLinkInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatBoostLinkInfo -> String
forall a. ShortShow a => a -> String
I.shortShow ChatBoostLinkInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatBoostSlots ChatBoostSlots
v)
    = String
"ChatBoostSlots" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatBoostSlots -> String
forall a. ShortShow a => a -> String
I.shortShow ChatBoostSlots
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatBoostStatus ChatBoostStatus
v)
    = String
"ChatBoostStatus" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatBoostStatus -> String
forall a. ShortShow a => a -> String
I.shortShow ChatBoostStatus
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatEvents ChatEvents
v)
    = String
"ChatEvents" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatEvents -> String
forall a. ShortShow a => a -> String
I.shortShow ChatEvents
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatFolder ChatFolder
v)
    = String
"ChatFolder" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatFolder -> String
forall a. ShortShow a => a -> String
I.shortShow ChatFolder
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatFolderIcon ChatFolderIcon
v)
    = String
"ChatFolderIcon" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatFolderIcon -> String
forall a. ShortShow a => a -> String
I.shortShow ChatFolderIcon
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatFolderInfo ChatFolderInfo
v)
    = String
"ChatFolderInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatFolderInfo -> String
forall a. ShortShow a => a -> String
I.shortShow ChatFolderInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatFolderInviteLink ChatFolderInviteLink
v)
    = String
"ChatFolderInviteLink" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatFolderInviteLink -> String
forall a. ShortShow a => a -> String
I.shortShow ChatFolderInviteLink
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatFolderInviteLinkInfo ChatFolderInviteLinkInfo
v)
    = String
"ChatFolderInviteLinkInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatFolderInviteLinkInfo -> String
forall a. ShortShow a => a -> String
I.shortShow ChatFolderInviteLinkInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatFolderInviteLinks ChatFolderInviteLinks
v)
    = String
"ChatFolderInviteLinks" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatFolderInviteLinks -> String
forall a. ShortShow a => a -> String
I.shortShow ChatFolderInviteLinks
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatInviteLink ChatInviteLink
v)
    = String
"ChatInviteLink" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatInviteLink -> String
forall a. ShortShow a => a -> String
I.shortShow ChatInviteLink
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatInviteLinkCounts ChatInviteLinkCounts
v)
    = String
"ChatInviteLinkCounts" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatInviteLinkCounts -> String
forall a. ShortShow a => a -> String
I.shortShow ChatInviteLinkCounts
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatInviteLinkInfo ChatInviteLinkInfo
v)
    = String
"ChatInviteLinkInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatInviteLinkInfo -> String
forall a. ShortShow a => a -> String
I.shortShow ChatInviteLinkInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatInviteLinkMembers ChatInviteLinkMembers
v)
    = String
"ChatInviteLinkMembers" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatInviteLinkMembers -> String
forall a. ShortShow a => a -> String
I.shortShow ChatInviteLinkMembers
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatInviteLinks ChatInviteLinks
v)
    = String
"ChatInviteLinks" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatInviteLinks -> String
forall a. ShortShow a => a -> String
I.shortShow ChatInviteLinks
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatJoinRequests ChatJoinRequests
v)
    = String
"ChatJoinRequests" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatJoinRequests -> String
forall a. ShortShow a => a -> String
I.shortShow ChatJoinRequests
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatLists ChatLists
v)
    = String
"ChatLists" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatLists -> String
forall a. ShortShow a => a -> String
I.shortShow ChatLists
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatMember ChatMember
v)
    = String
"ChatMember" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatMember -> String
forall a. ShortShow a => a -> String
I.shortShow ChatMember
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatMembers ChatMembers
v)
    = String
"ChatMembers" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatMembers -> String
forall a. ShortShow a => a -> String
I.shortShow ChatMembers
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatMessageSenders ChatMessageSenders
v)
    = String
"ChatMessageSenders" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatMessageSenders -> String
forall a. ShortShow a => a -> String
I.shortShow ChatMessageSenders
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatPhotos ChatPhotos
v)
    = String
"ChatPhotos" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatPhotos -> String
forall a. ShortShow a => a -> String
I.shortShow ChatPhotos
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatRevenueStatistics ChatRevenueStatistics
v)
    = String
"ChatRevenueStatistics" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatRevenueStatistics -> String
forall a. ShortShow a => a -> String
I.shortShow ChatRevenueStatistics
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatRevenueTransactions ChatRevenueTransactions
v)
    = String
"ChatRevenueTransactions" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatRevenueTransactions -> String
forall a. ShortShow a => a -> String
I.shortShow ChatRevenueTransactions
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ChatStatistics ChatStatistics
v)
    = String
"ChatStatistics" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ChatStatistics -> String
forall a. ShortShow a => a -> String
I.shortShow ChatStatistics
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Chats Chats
v)
    = String
"Chats" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Chats -> String
forall a. ShortShow a => a -> String
I.shortShow Chats
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (CheckChatUsernameResult CheckChatUsernameResult
v)
    = String
"CheckChatUsernameResult" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> CheckChatUsernameResult -> String
forall a. ShortShow a => a -> String
I.shortShow CheckChatUsernameResult
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (CheckStickerSetNameResult CheckStickerSetNameResult
v)
    = String
"CheckStickerSetNameResult" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> CheckStickerSetNameResult -> String
forall a. ShortShow a => a -> String
I.shortShow CheckStickerSetNameResult
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (CollectibleItemInfo CollectibleItemInfo
v)
    = String
"CollectibleItemInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> CollectibleItemInfo -> String
forall a. ShortShow a => a -> String
I.shortShow CollectibleItemInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ConnectedWebsites ConnectedWebsites
v)
    = String
"ConnectedWebsites" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ConnectedWebsites -> String
forall a. ShortShow a => a -> String
I.shortShow ConnectedWebsites
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Count Count
v)
    = String
"Count" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Count -> String
forall a. ShortShow a => a -> String
I.shortShow Count
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Countries Countries
v)
    = String
"Countries" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Countries -> String
forall a. ShortShow a => a -> String
I.shortShow Countries
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (CreatedBasicGroupChat CreatedBasicGroupChat
v)
    = String
"CreatedBasicGroupChat" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> CreatedBasicGroupChat -> String
forall a. ShortShow a => a -> String
I.shortShow CreatedBasicGroupChat
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (CurrentWeather CurrentWeather
v)
    = String
"CurrentWeather" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> CurrentWeather -> String
forall a. ShortShow a => a -> String
I.shortShow CurrentWeather
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (CustomRequestResult CustomRequestResult
v)
    = String
"CustomRequestResult" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> CustomRequestResult -> String
forall a. ShortShow a => a -> String
I.shortShow CustomRequestResult
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (DatabaseStatistics DatabaseStatistics
v)
    = String
"DatabaseStatistics" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> DatabaseStatistics -> String
forall a. ShortShow a => a -> String
I.shortShow DatabaseStatistics
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (DeepLinkInfo DeepLinkInfo
v)
    = String
"DeepLinkInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> DeepLinkInfo -> String
forall a. ShortShow a => a -> String
I.shortShow DeepLinkInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (EmailAddressAuthenticationCodeInfo EmailAddressAuthenticationCodeInfo
v)
    = String
"EmailAddressAuthenticationCodeInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> EmailAddressAuthenticationCodeInfo -> String
forall a. ShortShow a => a -> String
I.shortShow EmailAddressAuthenticationCodeInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (EmojiCategories EmojiCategories
v)
    = String
"EmojiCategories" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> EmojiCategories -> String
forall a. ShortShow a => a -> String
I.shortShow EmojiCategories
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (EmojiKeywords EmojiKeywords
v)
    = String
"EmojiKeywords" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> EmojiKeywords -> String
forall a. ShortShow a => a -> String
I.shortShow EmojiKeywords
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (EmojiReaction EmojiReaction
v)
    = String
"EmojiReaction" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> EmojiReaction -> String
forall a. ShortShow a => a -> String
I.shortShow EmojiReaction
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (EmojiStatuses EmojiStatuses
v)
    = String
"EmojiStatuses" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> EmojiStatuses -> String
forall a. ShortShow a => a -> String
I.shortShow EmojiStatuses
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Emojis Emojis
v)
    = String
"Emojis" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Emojis -> String
forall a. ShortShow a => a -> String
I.shortShow Emojis
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Error Error
v)
    = String
"Error" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Error -> String
forall a. ShortShow a => a -> String
I.shortShow Error
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (FailedToAddMembers FailedToAddMembers
v)
    = String
"FailedToAddMembers" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> FailedToAddMembers -> String
forall a. ShortShow a => a -> String
I.shortShow FailedToAddMembers
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (File File
v)
    = String
"File" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> File -> String
forall a. ShortShow a => a -> String
I.shortShow File
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (FileDownloadedPrefixSize FileDownloadedPrefixSize
v)
    = String
"FileDownloadedPrefixSize" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> FileDownloadedPrefixSize -> String
forall a. ShortShow a => a -> String
I.shortShow FileDownloadedPrefixSize
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (FilePart FilePart
v)
    = String
"FilePart" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> FilePart -> String
forall a. ShortShow a => a -> String
I.shortShow FilePart
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (FormattedText FormattedText
v)
    = String
"FormattedText" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> FormattedText -> String
forall a. ShortShow a => a -> String
I.shortShow FormattedText
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ForumTopic ForumTopic
v)
    = String
"ForumTopic" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ForumTopic -> String
forall a. ShortShow a => a -> String
I.shortShow ForumTopic
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ForumTopicInfo ForumTopicInfo
v)
    = String
"ForumTopicInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ForumTopicInfo -> String
forall a. ShortShow a => a -> String
I.shortShow ForumTopicInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ForumTopics ForumTopics
v)
    = String
"ForumTopics" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ForumTopics -> String
forall a. ShortShow a => a -> String
I.shortShow ForumTopics
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (FoundChatBoosts FoundChatBoosts
v)
    = String
"FoundChatBoosts" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> FoundChatBoosts -> String
forall a. ShortShow a => a -> String
I.shortShow FoundChatBoosts
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (FoundChatMessages FoundChatMessages
v)
    = String
"FoundChatMessages" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> FoundChatMessages -> String
forall a. ShortShow a => a -> String
I.shortShow FoundChatMessages
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (FoundFileDownloads FoundFileDownloads
v)
    = String
"FoundFileDownloads" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> FoundFileDownloads -> String
forall a. ShortShow a => a -> String
I.shortShow FoundFileDownloads
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (FoundMessages FoundMessages
v)
    = String
"FoundMessages" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> FoundMessages -> String
forall a. ShortShow a => a -> String
I.shortShow FoundMessages
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (FoundPosition FoundPosition
v)
    = String
"FoundPosition" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> FoundPosition -> String
forall a. ShortShow a => a -> String
I.shortShow FoundPosition
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (FoundPositions FoundPositions
v)
    = String
"FoundPositions" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> FoundPositions -> String
forall a. ShortShow a => a -> String
I.shortShow FoundPositions
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (FoundStories FoundStories
v)
    = String
"FoundStories" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> FoundStories -> String
forall a. ShortShow a => a -> String
I.shortShow FoundStories
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (FoundUsers FoundUsers
v)
    = String
"FoundUsers" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> FoundUsers -> String
forall a. ShortShow a => a -> String
I.shortShow FoundUsers
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (FoundWebApp FoundWebApp
v)
    = String
"FoundWebApp" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> FoundWebApp -> String
forall a. ShortShow a => a -> String
I.shortShow FoundWebApp
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (GameHighScores GameHighScores
v)
    = String
"GameHighScores" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> GameHighScores -> String
forall a. ShortShow a => a -> String
I.shortShow GameHighScores
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Gifts Gifts
v)
    = String
"Gifts" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Gifts -> String
forall a. ShortShow a => a -> String
I.shortShow Gifts
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (GiveawayInfo GiveawayInfo
v)
    = String
"GiveawayInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> GiveawayInfo -> String
forall a. ShortShow a => a -> String
I.shortShow GiveawayInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (GroupCall GroupCall
v)
    = String
"GroupCall" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> GroupCall -> String
forall a. ShortShow a => a -> String
I.shortShow GroupCall
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (GroupCallId GroupCallId
v)
    = String
"GroupCallId" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> GroupCallId -> String
forall a. ShortShow a => a -> String
I.shortShow GroupCallId
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (GroupCallStreams GroupCallStreams
v)
    = String
"GroupCallStreams" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> GroupCallStreams -> String
forall a. ShortShow a => a -> String
I.shortShow GroupCallStreams
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Hashtags Hashtags
v)
    = String
"Hashtags" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Hashtags -> String
forall a. ShortShow a => a -> String
I.shortShow Hashtags
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (HttpUrl HttpUrl
v)
    = String
"HttpUrl" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> HttpUrl -> String
forall a. ShortShow a => a -> String
I.shortShow HttpUrl
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ImportedContacts ImportedContacts
v)
    = String
"ImportedContacts" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ImportedContacts -> String
forall a. ShortShow a => a -> String
I.shortShow ImportedContacts
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (InlineQueryResults InlineQueryResults
v)
    = String
"InlineQueryResults" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> InlineQueryResults -> String
forall a. ShortShow a => a -> String
I.shortShow InlineQueryResults
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (InternalLinkType InternalLinkType
v)
    = String
"InternalLinkType" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> InternalLinkType -> String
forall a. ShortShow a => a -> String
I.shortShow InternalLinkType
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (JsonValue JsonValue
v)
    = String
"JsonValue" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> JsonValue -> String
forall a. ShortShow a => a -> String
I.shortShow JsonValue
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (LanguagePackInfo LanguagePackInfo
v)
    = String
"LanguagePackInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> LanguagePackInfo -> String
forall a. ShortShow a => a -> String
I.shortShow LanguagePackInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (LanguagePackStringValue LanguagePackStringValue
v)
    = String
"LanguagePackStringValue" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> LanguagePackStringValue -> String
forall a. ShortShow a => a -> String
I.shortShow LanguagePackStringValue
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (LanguagePackStrings LanguagePackStrings
v)
    = String
"LanguagePackStrings" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> LanguagePackStrings -> String
forall a. ShortShow a => a -> String
I.shortShow LanguagePackStrings
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (LinkPreview LinkPreview
v)
    = String
"LinkPreview" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> LinkPreview -> String
forall a. ShortShow a => a -> String
I.shortShow LinkPreview
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (LocalizationTargetInfo LocalizationTargetInfo
v)
    = String
"LocalizationTargetInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> LocalizationTargetInfo -> String
forall a. ShortShow a => a -> String
I.shortShow LocalizationTargetInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (LogStream LogStream
v)
    = String
"LogStream" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> LogStream -> String
forall a. ShortShow a => a -> String
I.shortShow LogStream
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (LogTags LogTags
v)
    = String
"LogTags" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> LogTags -> String
forall a. ShortShow a => a -> String
I.shortShow LogTags
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (LogVerbosityLevel LogVerbosityLevel
v)
    = String
"LogVerbosityLevel" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> LogVerbosityLevel -> String
forall a. ShortShow a => a -> String
I.shortShow LogVerbosityLevel
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (LoginUrlInfo LoginUrlInfo
v)
    = String
"LoginUrlInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> LoginUrlInfo -> String
forall a. ShortShow a => a -> String
I.shortShow LoginUrlInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MainWebApp MainWebApp
v)
    = String
"MainWebApp" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MainWebApp -> String
forall a. ShortShow a => a -> String
I.shortShow MainWebApp
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Message Message
v)
    = String
"Message" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Message -> String
forall a. ShortShow a => a -> String
I.shortShow Message
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MessageAutoDeleteTime MessageAutoDeleteTime
v)
    = String
"MessageAutoDeleteTime" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MessageAutoDeleteTime -> String
forall a. ShortShow a => a -> String
I.shortShow MessageAutoDeleteTime
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MessageCalendar MessageCalendar
v)
    = String
"MessageCalendar" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MessageCalendar -> String
forall a. ShortShow a => a -> String
I.shortShow MessageCalendar
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MessageEffect MessageEffect
v)
    = String
"MessageEffect" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MessageEffect -> String
forall a. ShortShow a => a -> String
I.shortShow MessageEffect
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MessageFileType MessageFileType
v)
    = String
"MessageFileType" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MessageFileType -> String
forall a. ShortShow a => a -> String
I.shortShow MessageFileType
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MessageLink MessageLink
v)
    = String
"MessageLink" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MessageLink -> String
forall a. ShortShow a => a -> String
I.shortShow MessageLink
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MessageLinkInfo MessageLinkInfo
v)
    = String
"MessageLinkInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MessageLinkInfo -> String
forall a. ShortShow a => a -> String
I.shortShow MessageLinkInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MessagePositions MessagePositions
v)
    = String
"MessagePositions" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MessagePositions -> String
forall a. ShortShow a => a -> String
I.shortShow MessagePositions
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MessageProperties MessageProperties
v)
    = String
"MessageProperties" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MessageProperties -> String
forall a. ShortShow a => a -> String
I.shortShow MessageProperties
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MessageReadDate MessageReadDate
v)
    = String
"MessageReadDate" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MessageReadDate -> String
forall a. ShortShow a => a -> String
I.shortShow MessageReadDate
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MessageSenders MessageSenders
v)
    = String
"MessageSenders" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MessageSenders -> String
forall a. ShortShow a => a -> String
I.shortShow MessageSenders
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MessageStatistics MessageStatistics
v)
    = String
"MessageStatistics" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MessageStatistics -> String
forall a. ShortShow a => a -> String
I.shortShow MessageStatistics
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MessageThreadInfo MessageThreadInfo
v)
    = String
"MessageThreadInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MessageThreadInfo -> String
forall a. ShortShow a => a -> String
I.shortShow MessageThreadInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (MessageViewers MessageViewers
v)
    = String
"MessageViewers" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> MessageViewers -> String
forall a. ShortShow a => a -> String
I.shortShow MessageViewers
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Messages Messages
v)
    = String
"Messages" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Messages -> String
forall a. ShortShow a => a -> String
I.shortShow Messages
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (NetworkStatistics NetworkStatistics
v)
    = String
"NetworkStatistics" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> NetworkStatistics -> String
forall a. ShortShow a => a -> String
I.shortShow NetworkStatistics
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (NewChatPrivacySettings NewChatPrivacySettings
v)
    = String
"NewChatPrivacySettings" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> NewChatPrivacySettings -> String
forall a. ShortShow a => a -> String
I.shortShow NewChatPrivacySettings
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (NotificationSound NotificationSound
v)
    = String
"NotificationSound" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> NotificationSound -> String
forall a. ShortShow a => a -> String
I.shortShow NotificationSound
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (NotificationSounds NotificationSounds
v)
    = String
"NotificationSounds" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> NotificationSounds -> String
forall a. ShortShow a => a -> String
I.shortShow NotificationSounds
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Ok Ok
v)
    = String
"Ok" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Ok -> String
forall a. ShortShow a => a -> String
I.shortShow Ok
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (OptionValue OptionValue
v)
    = String
"OptionValue" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> OptionValue -> String
forall a. ShortShow a => a -> String
I.shortShow OptionValue
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (OrderInfo OrderInfo
v)
    = String
"OrderInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> OrderInfo -> String
forall a. ShortShow a => a -> String
I.shortShow OrderInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PassportAuthorizationForm PassportAuthorizationForm
v)
    = String
"PassportAuthorizationForm" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PassportAuthorizationForm -> String
forall a. ShortShow a => a -> String
I.shortShow PassportAuthorizationForm
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PassportElement PassportElement
v)
    = String
"PassportElement" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PassportElement -> String
forall a. ShortShow a => a -> String
I.shortShow PassportElement
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PassportElements PassportElements
v)
    = String
"PassportElements" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PassportElements -> String
forall a. ShortShow a => a -> String
I.shortShow PassportElements
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PassportElementsWithErrors PassportElementsWithErrors
v)
    = String
"PassportElementsWithErrors" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PassportElementsWithErrors -> String
forall a. ShortShow a => a -> String
I.shortShow PassportElementsWithErrors
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PasswordState PasswordState
v)
    = String
"PasswordState" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PasswordState -> String
forall a. ShortShow a => a -> String
I.shortShow PasswordState
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PaymentForm PaymentForm
v)
    = String
"PaymentForm" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PaymentForm -> String
forall a. ShortShow a => a -> String
I.shortShow PaymentForm
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PaymentReceipt PaymentReceipt
v)
    = String
"PaymentReceipt" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PaymentReceipt -> String
forall a. ShortShow a => a -> String
I.shortShow PaymentReceipt
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PaymentResult PaymentResult
v)
    = String
"PaymentResult" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PaymentResult -> String
forall a. ShortShow a => a -> String
I.shortShow PaymentResult
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PhoneNumberInfo PhoneNumberInfo
v)
    = String
"PhoneNumberInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PhoneNumberInfo -> String
forall a. ShortShow a => a -> String
I.shortShow PhoneNumberInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PremiumFeatures PremiumFeatures
v)
    = String
"PremiumFeatures" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PremiumFeatures -> String
forall a. ShortShow a => a -> String
I.shortShow PremiumFeatures
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PremiumGiftCodeInfo PremiumGiftCodeInfo
v)
    = String
"PremiumGiftCodeInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PremiumGiftCodeInfo -> String
forall a. ShortShow a => a -> String
I.shortShow PremiumGiftCodeInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PremiumGiftCodePaymentOptions PremiumGiftCodePaymentOptions
v)
    = String
"PremiumGiftCodePaymentOptions" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PremiumGiftCodePaymentOptions -> String
forall a. ShortShow a => a -> String
I.shortShow PremiumGiftCodePaymentOptions
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PremiumLimit PremiumLimit
v)
    = String
"PremiumLimit" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PremiumLimit -> String
forall a. ShortShow a => a -> String
I.shortShow PremiumLimit
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PremiumState PremiumState
v)
    = String
"PremiumState" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PremiumState -> String
forall a. ShortShow a => a -> String
I.shortShow PremiumState
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Proxies Proxies
v)
    = String
"Proxies" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Proxies -> String
forall a. ShortShow a => a -> String
I.shortShow Proxies
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Proxy Proxy
v)
    = String
"Proxy" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Proxy -> String
forall a. ShortShow a => a -> String
I.shortShow Proxy
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PublicForwards PublicForwards
v)
    = String
"PublicForwards" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PublicForwards -> String
forall a. ShortShow a => a -> String
I.shortShow PublicForwards
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (PushReceiverId PushReceiverId
v)
    = String
"PushReceiverId" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> PushReceiverId -> String
forall a. ShortShow a => a -> String
I.shortShow PushReceiverId
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (QuickReplyMessage QuickReplyMessage
v)
    = String
"QuickReplyMessage" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> QuickReplyMessage -> String
forall a. ShortShow a => a -> String
I.shortShow QuickReplyMessage
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (QuickReplyMessages QuickReplyMessages
v)
    = String
"QuickReplyMessages" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> QuickReplyMessages -> String
forall a. ShortShow a => a -> String
I.shortShow QuickReplyMessages
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ReadDatePrivacySettings ReadDatePrivacySettings
v)
    = String
"ReadDatePrivacySettings" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ReadDatePrivacySettings -> String
forall a. ShortShow a => a -> String
I.shortShow ReadDatePrivacySettings
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (RecommendedChatFolders RecommendedChatFolders
v)
    = String
"RecommendedChatFolders" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> RecommendedChatFolders -> String
forall a. ShortShow a => a -> String
I.shortShow RecommendedChatFolders
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (RecoveryEmailAddress RecoveryEmailAddress
v)
    = String
"RecoveryEmailAddress" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> RecoveryEmailAddress -> String
forall a. ShortShow a => a -> String
I.shortShow RecoveryEmailAddress
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ReportChatResult ReportChatResult
v)
    = String
"ReportChatResult" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ReportChatResult -> String
forall a. ShortShow a => a -> String
I.shortShow ReportChatResult
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ReportChatSponsoredMessageResult ReportChatSponsoredMessageResult
v)
    = String
"ReportChatSponsoredMessageResult" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ReportChatSponsoredMessageResult -> String
forall a. ShortShow a => a -> String
I.shortShow ReportChatSponsoredMessageResult
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ReportStoryResult ReportStoryResult
v)
    = String
"ReportStoryResult" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ReportStoryResult -> String
forall a. ShortShow a => a -> String
I.shortShow ReportStoryResult
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ResetPasswordResult ResetPasswordResult
v)
    = String
"ResetPasswordResult" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ResetPasswordResult -> String
forall a. ShortShow a => a -> String
I.shortShow ResetPasswordResult
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (RtmpUrl RtmpUrl
v)
    = String
"RtmpUrl" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> RtmpUrl -> String
forall a. ShortShow a => a -> String
I.shortShow RtmpUrl
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (SavedMessagesTags SavedMessagesTags
v)
    = String
"SavedMessagesTags" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> SavedMessagesTags -> String
forall a. ShortShow a => a -> String
I.shortShow SavedMessagesTags
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ScopeNotificationSettings ScopeNotificationSettings
v)
    = String
"ScopeNotificationSettings" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ScopeNotificationSettings -> String
forall a. ShortShow a => a -> String
I.shortShow ScopeNotificationSettings
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Seconds Seconds
v)
    = String
"Seconds" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Seconds -> String
forall a. ShortShow a => a -> String
I.shortShow Seconds
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (SecretChat SecretChat
v)
    = String
"SecretChat" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> SecretChat -> String
forall a. ShortShow a => a -> String
I.shortShow SecretChat
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (SentWebAppMessage SentWebAppMessage
v)
    = String
"SentWebAppMessage" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> SentWebAppMessage -> String
forall a. ShortShow a => a -> String
I.shortShow SentWebAppMessage
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Session Session
v)
    = String
"Session" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Session -> String
forall a. ShortShow a => a -> String
I.shortShow Session
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Sessions Sessions
v)
    = String
"Sessions" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Sessions -> String
forall a. ShortShow a => a -> String
I.shortShow Sessions
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (SponsoredMessages SponsoredMessages
v)
    = String
"SponsoredMessages" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> SponsoredMessages -> String
forall a. ShortShow a => a -> String
I.shortShow SponsoredMessages
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (StarGiveawayPaymentOptions StarGiveawayPaymentOptions
v)
    = String
"StarGiveawayPaymentOptions" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> StarGiveawayPaymentOptions -> String
forall a. ShortShow a => a -> String
I.shortShow StarGiveawayPaymentOptions
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (StarPaymentOptions StarPaymentOptions
v)
    = String
"StarPaymentOptions" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> StarPaymentOptions -> String
forall a. ShortShow a => a -> String
I.shortShow StarPaymentOptions
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (StarRevenueStatistics StarRevenueStatistics
v)
    = String
"StarRevenueStatistics" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> StarRevenueStatistics -> String
forall a. ShortShow a => a -> String
I.shortShow StarRevenueStatistics
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (StarSubscriptions StarSubscriptions
v)
    = String
"StarSubscriptions" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> StarSubscriptions -> String
forall a. ShortShow a => a -> String
I.shortShow StarSubscriptions
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (StarTransactions StarTransactions
v)
    = String
"StarTransactions" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> StarTransactions -> String
forall a. ShortShow a => a -> String
I.shortShow StarTransactions
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (StatisticalGraph StatisticalGraph
v)
    = String
"StatisticalGraph" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> StatisticalGraph -> String
forall a. ShortShow a => a -> String
I.shortShow StatisticalGraph
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Sticker Sticker
v)
    = String
"Sticker" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Sticker -> String
forall a. ShortShow a => a -> String
I.shortShow Sticker
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (StickerSet StickerSet
v)
    = String
"StickerSet" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> StickerSet -> String
forall a. ShortShow a => a -> String
I.shortShow StickerSet
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (StickerSets StickerSets
v)
    = String
"StickerSets" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> StickerSets -> String
forall a. ShortShow a => a -> String
I.shortShow StickerSets
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Stickers Stickers
v)
    = String
"Stickers" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Stickers -> String
forall a. ShortShow a => a -> String
I.shortShow Stickers
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (StorageStatistics StorageStatistics
v)
    = String
"StorageStatistics" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> StorageStatistics -> String
forall a. ShortShow a => a -> String
I.shortShow StorageStatistics
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (StorageStatisticsFast StorageStatisticsFast
v)
    = String
"StorageStatisticsFast" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> StorageStatisticsFast -> String
forall a. ShortShow a => a -> String
I.shortShow StorageStatisticsFast
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Stories Stories
v)
    = String
"Stories" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Stories -> String
forall a. ShortShow a => a -> String
I.shortShow Stories
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Story Story
v)
    = String
"Story" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Story -> String
forall a. ShortShow a => a -> String
I.shortShow Story
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (StoryInteractions StoryInteractions
v)
    = String
"StoryInteractions" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> StoryInteractions -> String
forall a. ShortShow a => a -> String
I.shortShow StoryInteractions
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (StoryStatistics StoryStatistics
v)
    = String
"StoryStatistics" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> StoryStatistics -> String
forall a. ShortShow a => a -> String
I.shortShow StoryStatistics
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Supergroup Supergroup
v)
    = String
"Supergroup" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Supergroup -> String
forall a. ShortShow a => a -> String
I.shortShow Supergroup
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (SupergroupFullInfo SupergroupFullInfo
v)
    = String
"SupergroupFullInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> SupergroupFullInfo -> String
forall a. ShortShow a => a -> String
I.shortShow SupergroupFullInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (TMeUrls TMeUrls
v)
    = String
"TMeUrls" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> TMeUrls -> String
forall a. ShortShow a => a -> String
I.shortShow TMeUrls
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (TemporaryPasswordState TemporaryPasswordState
v)
    = String
"TemporaryPasswordState" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> TemporaryPasswordState -> String
forall a. ShortShow a => a -> String
I.shortShow TemporaryPasswordState
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (TestBytes TestBytes
v)
    = String
"TestBytes" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> TestBytes -> String
forall a. ShortShow a => a -> String
I.shortShow TestBytes
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (TestInt TestInt
v)
    = String
"TestInt" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> TestInt -> String
forall a. ShortShow a => a -> String
I.shortShow TestInt
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (TestString TestString
v)
    = String
"TestString" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> TestString -> String
forall a. ShortShow a => a -> String
I.shortShow TestString
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (TestVectorInt TestVectorInt
v)
    = String
"TestVectorInt" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> TestVectorInt -> String
forall a. ShortShow a => a -> String
I.shortShow TestVectorInt
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (TestVectorIntObject TestVectorIntObject
v)
    = String
"TestVectorIntObject" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> TestVectorIntObject -> String
forall a. ShortShow a => a -> String
I.shortShow TestVectorIntObject
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (TestVectorString TestVectorString
v)
    = String
"TestVectorString" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> TestVectorString -> String
forall a. ShortShow a => a -> String
I.shortShow TestVectorString
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (TestVectorStringObject TestVectorStringObject
v)
    = String
"TestVectorStringObject" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> TestVectorStringObject -> String
forall a. ShortShow a => a -> String
I.shortShow TestVectorStringObject
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Text Text
v)
    = String
"Text" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Text -> String
forall a. ShortShow a => a -> String
I.shortShow Text
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (TextEntities TextEntities
v)
    = String
"TextEntities" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> TextEntities -> String
forall a. ShortShow a => a -> String
I.shortShow TextEntities
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (TimeZones TimeZones
v)
    = String
"TimeZones" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> TimeZones -> String
forall a. ShortShow a => a -> String
I.shortShow TimeZones
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (TrendingStickerSets TrendingStickerSets
v)
    = String
"TrendingStickerSets" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> TrendingStickerSets -> String
forall a. ShortShow a => a -> String
I.shortShow TrendingStickerSets
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Update Update
v)
    = String
"Update" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Update -> String
forall a. ShortShow a => a -> String
I.shortShow Update
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Updates Updates
v)
    = String
"Updates" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Updates -> String
forall a. ShortShow a => a -> String
I.shortShow Updates
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (User User
v)
    = String
"User" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> User -> String
forall a. ShortShow a => a -> String
I.shortShow User
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (UserFullInfo UserFullInfo
v)
    = String
"UserFullInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> UserFullInfo -> String
forall a. ShortShow a => a -> String
I.shortShow UserFullInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (UserGifts UserGifts
v)
    = String
"UserGifts" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> UserGifts -> String
forall a. ShortShow a => a -> String
I.shortShow UserGifts
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (UserLink UserLink
v)
    = String
"UserLink" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> UserLink -> String
forall a. ShortShow a => a -> String
I.shortShow UserLink
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (UserPrivacySettingRules UserPrivacySettingRules
v)
    = String
"UserPrivacySettingRules" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> UserPrivacySettingRules -> String
forall a. ShortShow a => a -> String
I.shortShow UserPrivacySettingRules
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (UserSupportInfo UserSupportInfo
v)
    = String
"UserSupportInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> UserSupportInfo -> String
forall a. ShortShow a => a -> String
I.shortShow UserSupportInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (Users Users
v)
    = String
"Users" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> Users -> String
forall a. ShortShow a => a -> String
I.shortShow Users
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (ValidatedOrderInfo ValidatedOrderInfo
v)
    = String
"ValidatedOrderInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> ValidatedOrderInfo -> String
forall a. ShortShow a => a -> String
I.shortShow ValidatedOrderInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (WebAppInfo WebAppInfo
v)
    = String
"WebAppInfo" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> WebAppInfo -> String
forall a. ShortShow a => a -> String
I.shortShow WebAppInfo
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"
  shortShow (WebPageInstantView WebPageInstantView
v)
    = String
"WebPageInstantView" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
" (" String -> ShowS
forall a. Semigroup a => a -> a -> a
<> WebPageInstantView -> String
forall a. ShortShow a => a -> String
I.shortShow WebPageInstantView
v String -> ShowS
forall a. Semigroup a => a -> a -> a
<> String
")"

instance T.FromJSON GeneralResult where
 parseJSON :: Value -> Parser GeneralResult
parseJSON Value
v =
        ( AccountTtl -> GeneralResult
AccountTtl                          (AccountTtl -> GeneralResult)
-> Parser AccountTtl -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser AccountTtl
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( AddedReactions -> GeneralResult
AddedReactions                      (AddedReactions -> GeneralResult)
-> Parser AddedReactions -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser AddedReactions
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( AnimatedEmoji -> GeneralResult
AnimatedEmoji                       (AnimatedEmoji -> GeneralResult)
-> Parser AnimatedEmoji -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser AnimatedEmoji
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Animations -> GeneralResult
Animations                          (Animations -> GeneralResult)
-> Parser Animations -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Animations
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ArchiveChatListSettings -> GeneralResult
ArchiveChatListSettings             (ArchiveChatListSettings -> GeneralResult)
-> Parser ArchiveChatListSettings -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ArchiveChatListSettings
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( AttachmentMenuBot -> GeneralResult
AttachmentMenuBot                   (AttachmentMenuBot -> GeneralResult)
-> Parser AttachmentMenuBot -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser AttachmentMenuBot
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( AuthenticationCodeInfo -> GeneralResult
AuthenticationCodeInfo              (AuthenticationCodeInfo -> GeneralResult)
-> Parser AuthenticationCodeInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser AuthenticationCodeInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( AuthorizationState -> GeneralResult
AuthorizationState                  (AuthorizationState -> GeneralResult)
-> Parser AuthorizationState -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser AuthorizationState
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( AutoDownloadSettingsPresets -> GeneralResult
AutoDownloadSettingsPresets         (AutoDownloadSettingsPresets -> GeneralResult)
-> Parser AutoDownloadSettingsPresets -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser AutoDownloadSettingsPresets
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( AutosaveSettings -> GeneralResult
AutosaveSettings                    (AutosaveSettings -> GeneralResult)
-> Parser AutosaveSettings -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser AutosaveSettings
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( AvailableReactions -> GeneralResult
AvailableReactions                  (AvailableReactions -> GeneralResult)
-> Parser AvailableReactions -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser AvailableReactions
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Background -> GeneralResult
Background                          (Background -> GeneralResult)
-> Parser Background -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Background
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Backgrounds -> GeneralResult
Backgrounds                         (Backgrounds -> GeneralResult)
-> Parser Backgrounds -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Backgrounds
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BankCardInfo -> GeneralResult
BankCardInfo                        (BankCardInfo -> GeneralResult)
-> Parser BankCardInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BankCardInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BasicGroup -> GeneralResult
BasicGroup                          (BasicGroup -> GeneralResult)
-> Parser BasicGroup -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BasicGroup
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BasicGroupFullInfo -> GeneralResult
BasicGroupFullInfo                  (BasicGroupFullInfo -> GeneralResult)
-> Parser BasicGroupFullInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BasicGroupFullInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BotCommands -> GeneralResult
BotCommands                         (BotCommands -> GeneralResult)
-> Parser BotCommands -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BotCommands
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BotMediaPreview -> GeneralResult
BotMediaPreview                     (BotMediaPreview -> GeneralResult)
-> Parser BotMediaPreview -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BotMediaPreview
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BotMediaPreviewInfo -> GeneralResult
BotMediaPreviewInfo                 (BotMediaPreviewInfo -> GeneralResult)
-> Parser BotMediaPreviewInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BotMediaPreviewInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BotMediaPreviews -> GeneralResult
BotMediaPreviews                    (BotMediaPreviews -> GeneralResult)
-> Parser BotMediaPreviews -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BotMediaPreviews
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BotMenuButton -> GeneralResult
BotMenuButton                       (BotMenuButton -> GeneralResult)
-> Parser BotMenuButton -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BotMenuButton
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BusinessChatLink -> GeneralResult
BusinessChatLink                    (BusinessChatLink -> GeneralResult)
-> Parser BusinessChatLink -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BusinessChatLink
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BusinessChatLinkInfo -> GeneralResult
BusinessChatLinkInfo                (BusinessChatLinkInfo -> GeneralResult)
-> Parser BusinessChatLinkInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BusinessChatLinkInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BusinessChatLinks -> GeneralResult
BusinessChatLinks                   (BusinessChatLinks -> GeneralResult)
-> Parser BusinessChatLinks -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BusinessChatLinks
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BusinessConnectedBot -> GeneralResult
BusinessConnectedBot                (BusinessConnectedBot -> GeneralResult)
-> Parser BusinessConnectedBot -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BusinessConnectedBot
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BusinessConnection -> GeneralResult
BusinessConnection                  (BusinessConnection -> GeneralResult)
-> Parser BusinessConnection -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BusinessConnection
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BusinessFeatures -> GeneralResult
BusinessFeatures                    (BusinessFeatures -> GeneralResult)
-> Parser BusinessFeatures -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BusinessFeatures
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BusinessMessage -> GeneralResult
BusinessMessage                     (BusinessMessage -> GeneralResult)
-> Parser BusinessMessage -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BusinessMessage
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( BusinessMessages -> GeneralResult
BusinessMessages                    (BusinessMessages -> GeneralResult)
-> Parser BusinessMessages -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser BusinessMessages
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( CallId -> GeneralResult
CallId                              (CallId -> GeneralResult) -> Parser CallId -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser CallId
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( CallbackQueryAnswer -> GeneralResult
CallbackQueryAnswer                 (CallbackQueryAnswer -> GeneralResult)
-> Parser CallbackQueryAnswer -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser CallbackQueryAnswer
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( CanSendMessageToUserResult -> GeneralResult
CanSendMessageToUserResult          (CanSendMessageToUserResult -> GeneralResult)
-> Parser CanSendMessageToUserResult -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser CanSendMessageToUserResult
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( CanSendStoryResult -> GeneralResult
CanSendStoryResult                  (CanSendStoryResult -> GeneralResult)
-> Parser CanSendStoryResult -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser CanSendStoryResult
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( CanTransferOwnershipResult -> GeneralResult
CanTransferOwnershipResult          (CanTransferOwnershipResult -> GeneralResult)
-> Parser CanTransferOwnershipResult -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser CanTransferOwnershipResult
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Chat -> GeneralResult
Chat                                (Chat -> GeneralResult) -> Parser Chat -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Chat
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatActiveStories -> GeneralResult
ChatActiveStories                   (ChatActiveStories -> GeneralResult)
-> Parser ChatActiveStories -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatActiveStories
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatAdministrators -> GeneralResult
ChatAdministrators                  (ChatAdministrators -> GeneralResult)
-> Parser ChatAdministrators -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatAdministrators
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatBoostFeatures -> GeneralResult
ChatBoostFeatures                   (ChatBoostFeatures -> GeneralResult)
-> Parser ChatBoostFeatures -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatBoostFeatures
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatBoostLevelFeatures -> GeneralResult
ChatBoostLevelFeatures              (ChatBoostLevelFeatures -> GeneralResult)
-> Parser ChatBoostLevelFeatures -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatBoostLevelFeatures
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatBoostLink -> GeneralResult
ChatBoostLink                       (ChatBoostLink -> GeneralResult)
-> Parser ChatBoostLink -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatBoostLink
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatBoostLinkInfo -> GeneralResult
ChatBoostLinkInfo                   (ChatBoostLinkInfo -> GeneralResult)
-> Parser ChatBoostLinkInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatBoostLinkInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatBoostSlots -> GeneralResult
ChatBoostSlots                      (ChatBoostSlots -> GeneralResult)
-> Parser ChatBoostSlots -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatBoostSlots
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatBoostStatus -> GeneralResult
ChatBoostStatus                     (ChatBoostStatus -> GeneralResult)
-> Parser ChatBoostStatus -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatBoostStatus
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatEvents -> GeneralResult
ChatEvents                          (ChatEvents -> GeneralResult)
-> Parser ChatEvents -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatEvents
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatFolder -> GeneralResult
ChatFolder                          (ChatFolder -> GeneralResult)
-> Parser ChatFolder -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatFolder
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatFolderIcon -> GeneralResult
ChatFolderIcon                      (ChatFolderIcon -> GeneralResult)
-> Parser ChatFolderIcon -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatFolderIcon
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatFolderInfo -> GeneralResult
ChatFolderInfo                      (ChatFolderInfo -> GeneralResult)
-> Parser ChatFolderInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatFolderInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatFolderInviteLink -> GeneralResult
ChatFolderInviteLink                (ChatFolderInviteLink -> GeneralResult)
-> Parser ChatFolderInviteLink -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatFolderInviteLink
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatFolderInviteLinkInfo -> GeneralResult
ChatFolderInviteLinkInfo            (ChatFolderInviteLinkInfo -> GeneralResult)
-> Parser ChatFolderInviteLinkInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatFolderInviteLinkInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatFolderInviteLinks -> GeneralResult
ChatFolderInviteLinks               (ChatFolderInviteLinks -> GeneralResult)
-> Parser ChatFolderInviteLinks -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatFolderInviteLinks
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatInviteLink -> GeneralResult
ChatInviteLink                      (ChatInviteLink -> GeneralResult)
-> Parser ChatInviteLink -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatInviteLink
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatInviteLinkCounts -> GeneralResult
ChatInviteLinkCounts                (ChatInviteLinkCounts -> GeneralResult)
-> Parser ChatInviteLinkCounts -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatInviteLinkCounts
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatInviteLinkInfo -> GeneralResult
ChatInviteLinkInfo                  (ChatInviteLinkInfo -> GeneralResult)
-> Parser ChatInviteLinkInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatInviteLinkInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatInviteLinkMembers -> GeneralResult
ChatInviteLinkMembers               (ChatInviteLinkMembers -> GeneralResult)
-> Parser ChatInviteLinkMembers -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatInviteLinkMembers
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatInviteLinks -> GeneralResult
ChatInviteLinks                     (ChatInviteLinks -> GeneralResult)
-> Parser ChatInviteLinks -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatInviteLinks
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatJoinRequests -> GeneralResult
ChatJoinRequests                    (ChatJoinRequests -> GeneralResult)
-> Parser ChatJoinRequests -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatJoinRequests
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatLists -> GeneralResult
ChatLists                           (ChatLists -> GeneralResult)
-> Parser ChatLists -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatLists
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatMember -> GeneralResult
ChatMember                          (ChatMember -> GeneralResult)
-> Parser ChatMember -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatMember
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatMembers -> GeneralResult
ChatMembers                         (ChatMembers -> GeneralResult)
-> Parser ChatMembers -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatMembers
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatMessageSenders -> GeneralResult
ChatMessageSenders                  (ChatMessageSenders -> GeneralResult)
-> Parser ChatMessageSenders -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatMessageSenders
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatPhotos -> GeneralResult
ChatPhotos                          (ChatPhotos -> GeneralResult)
-> Parser ChatPhotos -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatPhotos
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatRevenueStatistics -> GeneralResult
ChatRevenueStatistics               (ChatRevenueStatistics -> GeneralResult)
-> Parser ChatRevenueStatistics -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatRevenueStatistics
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatRevenueTransactions -> GeneralResult
ChatRevenueTransactions             (ChatRevenueTransactions -> GeneralResult)
-> Parser ChatRevenueTransactions -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatRevenueTransactions
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ChatStatistics -> GeneralResult
ChatStatistics                      (ChatStatistics -> GeneralResult)
-> Parser ChatStatistics -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ChatStatistics
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Chats -> GeneralResult
Chats                               (Chats -> GeneralResult) -> Parser Chats -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Chats
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( CheckChatUsernameResult -> GeneralResult
CheckChatUsernameResult             (CheckChatUsernameResult -> GeneralResult)
-> Parser CheckChatUsernameResult -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser CheckChatUsernameResult
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( CheckStickerSetNameResult -> GeneralResult
CheckStickerSetNameResult           (CheckStickerSetNameResult -> GeneralResult)
-> Parser CheckStickerSetNameResult -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser CheckStickerSetNameResult
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( CollectibleItemInfo -> GeneralResult
CollectibleItemInfo                 (CollectibleItemInfo -> GeneralResult)
-> Parser CollectibleItemInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser CollectibleItemInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ConnectedWebsites -> GeneralResult
ConnectedWebsites                   (ConnectedWebsites -> GeneralResult)
-> Parser ConnectedWebsites -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ConnectedWebsites
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Count -> GeneralResult
Count                               (Count -> GeneralResult) -> Parser Count -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Count
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Countries -> GeneralResult
Countries                           (Countries -> GeneralResult)
-> Parser Countries -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Countries
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( CreatedBasicGroupChat -> GeneralResult
CreatedBasicGroupChat               (CreatedBasicGroupChat -> GeneralResult)
-> Parser CreatedBasicGroupChat -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser CreatedBasicGroupChat
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( CurrentWeather -> GeneralResult
CurrentWeather                      (CurrentWeather -> GeneralResult)
-> Parser CurrentWeather -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser CurrentWeather
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( CustomRequestResult -> GeneralResult
CustomRequestResult                 (CustomRequestResult -> GeneralResult)
-> Parser CustomRequestResult -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser CustomRequestResult
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( DatabaseStatistics -> GeneralResult
DatabaseStatistics                  (DatabaseStatistics -> GeneralResult)
-> Parser DatabaseStatistics -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser DatabaseStatistics
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( DeepLinkInfo -> GeneralResult
DeepLinkInfo                        (DeepLinkInfo -> GeneralResult)
-> Parser DeepLinkInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser DeepLinkInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( EmailAddressAuthenticationCodeInfo -> GeneralResult
EmailAddressAuthenticationCodeInfo  (EmailAddressAuthenticationCodeInfo -> GeneralResult)
-> Parser EmailAddressAuthenticationCodeInfo
-> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser EmailAddressAuthenticationCodeInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( EmojiCategories -> GeneralResult
EmojiCategories                     (EmojiCategories -> GeneralResult)
-> Parser EmojiCategories -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser EmojiCategories
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( EmojiKeywords -> GeneralResult
EmojiKeywords                       (EmojiKeywords -> GeneralResult)
-> Parser EmojiKeywords -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser EmojiKeywords
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( EmojiReaction -> GeneralResult
EmojiReaction                       (EmojiReaction -> GeneralResult)
-> Parser EmojiReaction -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser EmojiReaction
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( EmojiStatuses -> GeneralResult
EmojiStatuses                       (EmojiStatuses -> GeneralResult)
-> Parser EmojiStatuses -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser EmojiStatuses
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Emojis -> GeneralResult
Emojis                              (Emojis -> GeneralResult) -> Parser Emojis -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Emojis
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Error -> GeneralResult
Error                               (Error -> GeneralResult) -> Parser Error -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Error
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( FailedToAddMembers -> GeneralResult
FailedToAddMembers                  (FailedToAddMembers -> GeneralResult)
-> Parser FailedToAddMembers -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser FailedToAddMembers
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( File -> GeneralResult
File                                (File -> GeneralResult) -> Parser File -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser File
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( FileDownloadedPrefixSize -> GeneralResult
FileDownloadedPrefixSize            (FileDownloadedPrefixSize -> GeneralResult)
-> Parser FileDownloadedPrefixSize -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser FileDownloadedPrefixSize
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( FilePart -> GeneralResult
FilePart                            (FilePart -> GeneralResult)
-> Parser FilePart -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser FilePart
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( FormattedText -> GeneralResult
FormattedText                       (FormattedText -> GeneralResult)
-> Parser FormattedText -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser FormattedText
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ForumTopic -> GeneralResult
ForumTopic                          (ForumTopic -> GeneralResult)
-> Parser ForumTopic -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ForumTopic
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ForumTopicInfo -> GeneralResult
ForumTopicInfo                      (ForumTopicInfo -> GeneralResult)
-> Parser ForumTopicInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ForumTopicInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ForumTopics -> GeneralResult
ForumTopics                         (ForumTopics -> GeneralResult)
-> Parser ForumTopics -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ForumTopics
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( FoundChatBoosts -> GeneralResult
FoundChatBoosts                     (FoundChatBoosts -> GeneralResult)
-> Parser FoundChatBoosts -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser FoundChatBoosts
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( FoundChatMessages -> GeneralResult
FoundChatMessages                   (FoundChatMessages -> GeneralResult)
-> Parser FoundChatMessages -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser FoundChatMessages
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( FoundFileDownloads -> GeneralResult
FoundFileDownloads                  (FoundFileDownloads -> GeneralResult)
-> Parser FoundFileDownloads -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser FoundFileDownloads
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( FoundMessages -> GeneralResult
FoundMessages                       (FoundMessages -> GeneralResult)
-> Parser FoundMessages -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser FoundMessages
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( FoundPosition -> GeneralResult
FoundPosition                       (FoundPosition -> GeneralResult)
-> Parser FoundPosition -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser FoundPosition
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( FoundPositions -> GeneralResult
FoundPositions                      (FoundPositions -> GeneralResult)
-> Parser FoundPositions -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser FoundPositions
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( FoundStories -> GeneralResult
FoundStories                        (FoundStories -> GeneralResult)
-> Parser FoundStories -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser FoundStories
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( FoundUsers -> GeneralResult
FoundUsers                          (FoundUsers -> GeneralResult)
-> Parser FoundUsers -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser FoundUsers
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( FoundWebApp -> GeneralResult
FoundWebApp                         (FoundWebApp -> GeneralResult)
-> Parser FoundWebApp -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser FoundWebApp
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( GameHighScores -> GeneralResult
GameHighScores                      (GameHighScores -> GeneralResult)
-> Parser GameHighScores -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser GameHighScores
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Gifts -> GeneralResult
Gifts                               (Gifts -> GeneralResult) -> Parser Gifts -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Gifts
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( GiveawayInfo -> GeneralResult
GiveawayInfo                        (GiveawayInfo -> GeneralResult)
-> Parser GiveawayInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser GiveawayInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( GroupCall -> GeneralResult
GroupCall                           (GroupCall -> GeneralResult)
-> Parser GroupCall -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser GroupCall
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( GroupCallId -> GeneralResult
GroupCallId                         (GroupCallId -> GeneralResult)
-> Parser GroupCallId -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser GroupCallId
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( GroupCallStreams -> GeneralResult
GroupCallStreams                    (GroupCallStreams -> GeneralResult)
-> Parser GroupCallStreams -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser GroupCallStreams
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Hashtags -> GeneralResult
Hashtags                            (Hashtags -> GeneralResult)
-> Parser Hashtags -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Hashtags
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( HttpUrl -> GeneralResult
HttpUrl                             (HttpUrl -> GeneralResult)
-> Parser HttpUrl -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser HttpUrl
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ImportedContacts -> GeneralResult
ImportedContacts                    (ImportedContacts -> GeneralResult)
-> Parser ImportedContacts -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ImportedContacts
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( InlineQueryResults -> GeneralResult
InlineQueryResults                  (InlineQueryResults -> GeneralResult)
-> Parser InlineQueryResults -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser InlineQueryResults
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( InternalLinkType -> GeneralResult
InternalLinkType                    (InternalLinkType -> GeneralResult)
-> Parser InternalLinkType -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser InternalLinkType
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( JsonValue -> GeneralResult
JsonValue                           (JsonValue -> GeneralResult)
-> Parser JsonValue -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser JsonValue
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( LanguagePackInfo -> GeneralResult
LanguagePackInfo                    (LanguagePackInfo -> GeneralResult)
-> Parser LanguagePackInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser LanguagePackInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( LanguagePackStringValue -> GeneralResult
LanguagePackStringValue             (LanguagePackStringValue -> GeneralResult)
-> Parser LanguagePackStringValue -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser LanguagePackStringValue
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( LanguagePackStrings -> GeneralResult
LanguagePackStrings                 (LanguagePackStrings -> GeneralResult)
-> Parser LanguagePackStrings -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser LanguagePackStrings
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( LinkPreview -> GeneralResult
LinkPreview                         (LinkPreview -> GeneralResult)
-> Parser LinkPreview -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser LinkPreview
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( LocalizationTargetInfo -> GeneralResult
LocalizationTargetInfo              (LocalizationTargetInfo -> GeneralResult)
-> Parser LocalizationTargetInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser LocalizationTargetInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( LogStream -> GeneralResult
LogStream                           (LogStream -> GeneralResult)
-> Parser LogStream -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser LogStream
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( LogTags -> GeneralResult
LogTags                             (LogTags -> GeneralResult)
-> Parser LogTags -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser LogTags
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( LogVerbosityLevel -> GeneralResult
LogVerbosityLevel                   (LogVerbosityLevel -> GeneralResult)
-> Parser LogVerbosityLevel -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser LogVerbosityLevel
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( LoginUrlInfo -> GeneralResult
LoginUrlInfo                        (LoginUrlInfo -> GeneralResult)
-> Parser LoginUrlInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser LoginUrlInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MainWebApp -> GeneralResult
MainWebApp                          (MainWebApp -> GeneralResult)
-> Parser MainWebApp -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MainWebApp
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Message -> GeneralResult
Message                             (Message -> GeneralResult)
-> Parser Message -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Message
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MessageAutoDeleteTime -> GeneralResult
MessageAutoDeleteTime               (MessageAutoDeleteTime -> GeneralResult)
-> Parser MessageAutoDeleteTime -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MessageAutoDeleteTime
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MessageCalendar -> GeneralResult
MessageCalendar                     (MessageCalendar -> GeneralResult)
-> Parser MessageCalendar -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MessageCalendar
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MessageEffect -> GeneralResult
MessageEffect                       (MessageEffect -> GeneralResult)
-> Parser MessageEffect -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MessageEffect
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MessageFileType -> GeneralResult
MessageFileType                     (MessageFileType -> GeneralResult)
-> Parser MessageFileType -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MessageFileType
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MessageLink -> GeneralResult
MessageLink                         (MessageLink -> GeneralResult)
-> Parser MessageLink -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MessageLink
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MessageLinkInfo -> GeneralResult
MessageLinkInfo                     (MessageLinkInfo -> GeneralResult)
-> Parser MessageLinkInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MessageLinkInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MessagePositions -> GeneralResult
MessagePositions                    (MessagePositions -> GeneralResult)
-> Parser MessagePositions -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MessagePositions
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MessageProperties -> GeneralResult
MessageProperties                   (MessageProperties -> GeneralResult)
-> Parser MessageProperties -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MessageProperties
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MessageReadDate -> GeneralResult
MessageReadDate                     (MessageReadDate -> GeneralResult)
-> Parser MessageReadDate -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MessageReadDate
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MessageSenders -> GeneralResult
MessageSenders                      (MessageSenders -> GeneralResult)
-> Parser MessageSenders -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MessageSenders
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MessageStatistics -> GeneralResult
MessageStatistics                   (MessageStatistics -> GeneralResult)
-> Parser MessageStatistics -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MessageStatistics
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MessageThreadInfo -> GeneralResult
MessageThreadInfo                   (MessageThreadInfo -> GeneralResult)
-> Parser MessageThreadInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MessageThreadInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( MessageViewers -> GeneralResult
MessageViewers                      (MessageViewers -> GeneralResult)
-> Parser MessageViewers -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser MessageViewers
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Messages -> GeneralResult
Messages                            (Messages -> GeneralResult)
-> Parser Messages -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Messages
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( NetworkStatistics -> GeneralResult
NetworkStatistics                   (NetworkStatistics -> GeneralResult)
-> Parser NetworkStatistics -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser NetworkStatistics
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( NewChatPrivacySettings -> GeneralResult
NewChatPrivacySettings              (NewChatPrivacySettings -> GeneralResult)
-> Parser NewChatPrivacySettings -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser NewChatPrivacySettings
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( NotificationSound -> GeneralResult
NotificationSound                   (NotificationSound -> GeneralResult)
-> Parser NotificationSound -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser NotificationSound
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( NotificationSounds -> GeneralResult
NotificationSounds                  (NotificationSounds -> GeneralResult)
-> Parser NotificationSounds -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser NotificationSounds
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Ok -> GeneralResult
Ok                                  (Ok -> GeneralResult) -> Parser Ok -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Ok
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( OptionValue -> GeneralResult
OptionValue                         (OptionValue -> GeneralResult)
-> Parser OptionValue -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser OptionValue
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( OrderInfo -> GeneralResult
OrderInfo                           (OrderInfo -> GeneralResult)
-> Parser OrderInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser OrderInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PassportAuthorizationForm -> GeneralResult
PassportAuthorizationForm           (PassportAuthorizationForm -> GeneralResult)
-> Parser PassportAuthorizationForm -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PassportAuthorizationForm
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PassportElement -> GeneralResult
PassportElement                     (PassportElement -> GeneralResult)
-> Parser PassportElement -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PassportElement
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PassportElements -> GeneralResult
PassportElements                    (PassportElements -> GeneralResult)
-> Parser PassportElements -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PassportElements
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PassportElementsWithErrors -> GeneralResult
PassportElementsWithErrors          (PassportElementsWithErrors -> GeneralResult)
-> Parser PassportElementsWithErrors -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PassportElementsWithErrors
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PasswordState -> GeneralResult
PasswordState                       (PasswordState -> GeneralResult)
-> Parser PasswordState -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PasswordState
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PaymentForm -> GeneralResult
PaymentForm                         (PaymentForm -> GeneralResult)
-> Parser PaymentForm -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PaymentForm
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PaymentReceipt -> GeneralResult
PaymentReceipt                      (PaymentReceipt -> GeneralResult)
-> Parser PaymentReceipt -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PaymentReceipt
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PaymentResult -> GeneralResult
PaymentResult                       (PaymentResult -> GeneralResult)
-> Parser PaymentResult -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PaymentResult
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PhoneNumberInfo -> GeneralResult
PhoneNumberInfo                     (PhoneNumberInfo -> GeneralResult)
-> Parser PhoneNumberInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PhoneNumberInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PremiumFeatures -> GeneralResult
PremiumFeatures                     (PremiumFeatures -> GeneralResult)
-> Parser PremiumFeatures -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PremiumFeatures
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PremiumGiftCodeInfo -> GeneralResult
PremiumGiftCodeInfo                 (PremiumGiftCodeInfo -> GeneralResult)
-> Parser PremiumGiftCodeInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PremiumGiftCodeInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PremiumGiftCodePaymentOptions -> GeneralResult
PremiumGiftCodePaymentOptions       (PremiumGiftCodePaymentOptions -> GeneralResult)
-> Parser PremiumGiftCodePaymentOptions -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PremiumGiftCodePaymentOptions
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PremiumLimit -> GeneralResult
PremiumLimit                        (PremiumLimit -> GeneralResult)
-> Parser PremiumLimit -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PremiumLimit
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PremiumState -> GeneralResult
PremiumState                        (PremiumState -> GeneralResult)
-> Parser PremiumState -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PremiumState
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Proxies -> GeneralResult
Proxies                             (Proxies -> GeneralResult)
-> Parser Proxies -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Proxies
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Proxy -> GeneralResult
Proxy                               (Proxy -> GeneralResult) -> Parser Proxy -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Proxy
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PublicForwards -> GeneralResult
PublicForwards                      (PublicForwards -> GeneralResult)
-> Parser PublicForwards -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PublicForwards
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( PushReceiverId -> GeneralResult
PushReceiverId                      (PushReceiverId -> GeneralResult)
-> Parser PushReceiverId -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser PushReceiverId
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( QuickReplyMessage -> GeneralResult
QuickReplyMessage                   (QuickReplyMessage -> GeneralResult)
-> Parser QuickReplyMessage -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser QuickReplyMessage
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( QuickReplyMessages -> GeneralResult
QuickReplyMessages                  (QuickReplyMessages -> GeneralResult)
-> Parser QuickReplyMessages -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser QuickReplyMessages
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ReadDatePrivacySettings -> GeneralResult
ReadDatePrivacySettings             (ReadDatePrivacySettings -> GeneralResult)
-> Parser ReadDatePrivacySettings -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ReadDatePrivacySettings
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( RecommendedChatFolders -> GeneralResult
RecommendedChatFolders              (RecommendedChatFolders -> GeneralResult)
-> Parser RecommendedChatFolders -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser RecommendedChatFolders
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( RecoveryEmailAddress -> GeneralResult
RecoveryEmailAddress                (RecoveryEmailAddress -> GeneralResult)
-> Parser RecoveryEmailAddress -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser RecoveryEmailAddress
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ReportChatResult -> GeneralResult
ReportChatResult                    (ReportChatResult -> GeneralResult)
-> Parser ReportChatResult -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ReportChatResult
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ReportChatSponsoredMessageResult -> GeneralResult
ReportChatSponsoredMessageResult    (ReportChatSponsoredMessageResult -> GeneralResult)
-> Parser ReportChatSponsoredMessageResult -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ReportChatSponsoredMessageResult
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ReportStoryResult -> GeneralResult
ReportStoryResult                   (ReportStoryResult -> GeneralResult)
-> Parser ReportStoryResult -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ReportStoryResult
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ResetPasswordResult -> GeneralResult
ResetPasswordResult                 (ResetPasswordResult -> GeneralResult)
-> Parser ResetPasswordResult -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ResetPasswordResult
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( RtmpUrl -> GeneralResult
RtmpUrl                             (RtmpUrl -> GeneralResult)
-> Parser RtmpUrl -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser RtmpUrl
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( SavedMessagesTags -> GeneralResult
SavedMessagesTags                   (SavedMessagesTags -> GeneralResult)
-> Parser SavedMessagesTags -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser SavedMessagesTags
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ScopeNotificationSettings -> GeneralResult
ScopeNotificationSettings           (ScopeNotificationSettings -> GeneralResult)
-> Parser ScopeNotificationSettings -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ScopeNotificationSettings
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Seconds -> GeneralResult
Seconds                             (Seconds -> GeneralResult)
-> Parser Seconds -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Seconds
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( SecretChat -> GeneralResult
SecretChat                          (SecretChat -> GeneralResult)
-> Parser SecretChat -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser SecretChat
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( SentWebAppMessage -> GeneralResult
SentWebAppMessage                   (SentWebAppMessage -> GeneralResult)
-> Parser SentWebAppMessage -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser SentWebAppMessage
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Session -> GeneralResult
Session                             (Session -> GeneralResult)
-> Parser Session -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Session
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Sessions -> GeneralResult
Sessions                            (Sessions -> GeneralResult)
-> Parser Sessions -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Sessions
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( SponsoredMessages -> GeneralResult
SponsoredMessages                   (SponsoredMessages -> GeneralResult)
-> Parser SponsoredMessages -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser SponsoredMessages
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( StarGiveawayPaymentOptions -> GeneralResult
StarGiveawayPaymentOptions          (StarGiveawayPaymentOptions -> GeneralResult)
-> Parser StarGiveawayPaymentOptions -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser StarGiveawayPaymentOptions
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( StarPaymentOptions -> GeneralResult
StarPaymentOptions                  (StarPaymentOptions -> GeneralResult)
-> Parser StarPaymentOptions -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser StarPaymentOptions
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( StarRevenueStatistics -> GeneralResult
StarRevenueStatistics               (StarRevenueStatistics -> GeneralResult)
-> Parser StarRevenueStatistics -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser StarRevenueStatistics
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( StarSubscriptions -> GeneralResult
StarSubscriptions                   (StarSubscriptions -> GeneralResult)
-> Parser StarSubscriptions -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser StarSubscriptions
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( StarTransactions -> GeneralResult
StarTransactions                    (StarTransactions -> GeneralResult)
-> Parser StarTransactions -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser StarTransactions
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( StatisticalGraph -> GeneralResult
StatisticalGraph                    (StatisticalGraph -> GeneralResult)
-> Parser StatisticalGraph -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser StatisticalGraph
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Sticker -> GeneralResult
Sticker                             (Sticker -> GeneralResult)
-> Parser Sticker -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Sticker
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( StickerSet -> GeneralResult
StickerSet                          (StickerSet -> GeneralResult)
-> Parser StickerSet -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser StickerSet
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( StickerSets -> GeneralResult
StickerSets                         (StickerSets -> GeneralResult)
-> Parser StickerSets -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser StickerSets
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Stickers -> GeneralResult
Stickers                            (Stickers -> GeneralResult)
-> Parser Stickers -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Stickers
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( StorageStatistics -> GeneralResult
StorageStatistics                   (StorageStatistics -> GeneralResult)
-> Parser StorageStatistics -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser StorageStatistics
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( StorageStatisticsFast -> GeneralResult
StorageStatisticsFast               (StorageStatisticsFast -> GeneralResult)
-> Parser StorageStatisticsFast -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser StorageStatisticsFast
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Stories -> GeneralResult
Stories                             (Stories -> GeneralResult)
-> Parser Stories -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Stories
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Story -> GeneralResult
Story                               (Story -> GeneralResult) -> Parser Story -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Story
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( StoryInteractions -> GeneralResult
StoryInteractions                   (StoryInteractions -> GeneralResult)
-> Parser StoryInteractions -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser StoryInteractions
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( StoryStatistics -> GeneralResult
StoryStatistics                     (StoryStatistics -> GeneralResult)
-> Parser StoryStatistics -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser StoryStatistics
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Supergroup -> GeneralResult
Supergroup                          (Supergroup -> GeneralResult)
-> Parser Supergroup -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Supergroup
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( SupergroupFullInfo -> GeneralResult
SupergroupFullInfo                  (SupergroupFullInfo -> GeneralResult)
-> Parser SupergroupFullInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser SupergroupFullInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( TMeUrls -> GeneralResult
TMeUrls                             (TMeUrls -> GeneralResult)
-> Parser TMeUrls -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser TMeUrls
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( TemporaryPasswordState -> GeneralResult
TemporaryPasswordState              (TemporaryPasswordState -> GeneralResult)
-> Parser TemporaryPasswordState -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser TemporaryPasswordState
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( TestBytes -> GeneralResult
TestBytes                           (TestBytes -> GeneralResult)
-> Parser TestBytes -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser TestBytes
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( TestInt -> GeneralResult
TestInt                             (TestInt -> GeneralResult)
-> Parser TestInt -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser TestInt
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( TestString -> GeneralResult
TestString                          (TestString -> GeneralResult)
-> Parser TestString -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser TestString
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( TestVectorInt -> GeneralResult
TestVectorInt                       (TestVectorInt -> GeneralResult)
-> Parser TestVectorInt -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser TestVectorInt
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( TestVectorIntObject -> GeneralResult
TestVectorIntObject                 (TestVectorIntObject -> GeneralResult)
-> Parser TestVectorIntObject -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser TestVectorIntObject
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( TestVectorString -> GeneralResult
TestVectorString                    (TestVectorString -> GeneralResult)
-> Parser TestVectorString -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser TestVectorString
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( TestVectorStringObject -> GeneralResult
TestVectorStringObject              (TestVectorStringObject -> GeneralResult)
-> Parser TestVectorStringObject -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser TestVectorStringObject
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Text -> GeneralResult
Text                                (Text -> GeneralResult) -> Parser Text -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Text
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( TextEntities -> GeneralResult
TextEntities                        (TextEntities -> GeneralResult)
-> Parser TextEntities -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser TextEntities
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( TimeZones -> GeneralResult
TimeZones                           (TimeZones -> GeneralResult)
-> Parser TimeZones -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser TimeZones
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( TrendingStickerSets -> GeneralResult
TrendingStickerSets                 (TrendingStickerSets -> GeneralResult)
-> Parser TrendingStickerSets -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser TrendingStickerSets
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Update -> GeneralResult
Update                              (Update -> GeneralResult) -> Parser Update -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Update
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Updates -> GeneralResult
Updates                             (Updates -> GeneralResult)
-> Parser Updates -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Updates
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( User -> GeneralResult
User                                (User -> GeneralResult) -> Parser User -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser User
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( UserFullInfo -> GeneralResult
UserFullInfo                        (UserFullInfo -> GeneralResult)
-> Parser UserFullInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser UserFullInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( UserGifts -> GeneralResult
UserGifts                           (UserGifts -> GeneralResult)
-> Parser UserGifts -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser UserGifts
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( UserLink -> GeneralResult
UserLink                            (UserLink -> GeneralResult)
-> Parser UserLink -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser UserLink
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( UserPrivacySettingRules -> GeneralResult
UserPrivacySettingRules             (UserPrivacySettingRules -> GeneralResult)
-> Parser UserPrivacySettingRules -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser UserPrivacySettingRules
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( UserSupportInfo -> GeneralResult
UserSupportInfo                     (UserSupportInfo -> GeneralResult)
-> Parser UserSupportInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser UserSupportInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( Users -> GeneralResult
Users                               (Users -> GeneralResult) -> Parser Users -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser Users
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( ValidatedOrderInfo -> GeneralResult
ValidatedOrderInfo                  (ValidatedOrderInfo -> GeneralResult)
-> Parser ValidatedOrderInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser ValidatedOrderInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( WebAppInfo -> GeneralResult
WebAppInfo                          (WebAppInfo -> GeneralResult)
-> Parser WebAppInfo -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser WebAppInfo
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )
    Parser GeneralResult
-> Parser GeneralResult -> Parser GeneralResult
forall a. Parser a -> Parser a -> Parser a
forall (f :: * -> *) a. Alternative f => f a -> f a -> f a
<|> ( WebPageInstantView -> GeneralResult
WebPageInstantView                  (WebPageInstantView -> GeneralResult)
-> Parser WebPageInstantView -> Parser GeneralResult
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> Value -> Parser WebPageInstantView
forall a. FromJSON a => Value -> Parser a
parseJSON Value
v )