packages feed

gogol-cloudsearch 0.5.0 → 1.0.0

raw patch · 96 files changed

+23668/−19348 lines, 96 filesdep −basedep ~gogol-coresetup-changed

Dependencies removed: base

Dependency ranges changed: gogol-core

Files

README.md view
@@ -8,7 +8,7 @@  ## Version -`0.5.0`+`1.0.0`   ## Description
Setup.hs view
@@ -1,2 +1,3 @@-import           Distribution.Simple+import Distribution.Simple+ main = defaultMain
+ gen/Gogol/CloudSearch.hs view
@@ -0,0 +1,1458 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Cloud Search provides cloud-based search capabilities over Google Workspace data. The Cloud Search API allows indexing of non-Google Workspace data into Cloud Search.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference>+module Gogol.CloudSearch+  ( -- * Configuration+    cloudSearchService,++    -- * OAuth Scopes+    CloudSearch'FullControl,+    CloudSearch'Debug,+    CloudSearch'Indexing,+    CloudSearch'Query,+    CloudSearch'Settings,+    CloudSearch'Settings'Indexing,+    CloudSearch'Settings'Query,+    CloudSearch'Stats,+    CloudSearch'Stats'Indexing,++    -- * Resources++    -- ** cloudsearch.debug.datasources.items.checkAccess+    CloudSearchDebugDatasourcesItemsCheckAccessResource,+    CloudSearchDebugDatasourcesItemsCheckAccess (..),+    newCloudSearchDebugDatasourcesItemsCheckAccess,++    -- ** cloudsearch.debug.datasources.items.searchByViewUrl+    CloudSearchDebugDatasourcesItemsSearchByViewUrlResource,+    CloudSearchDebugDatasourcesItemsSearchByViewUrl (..),+    newCloudSearchDebugDatasourcesItemsSearchByViewUrl,++    -- ** cloudsearch.debug.datasources.items.unmappedids.list+    CloudSearchDebugDatasourcesItemsUnmappedidsListResource,+    CloudSearchDebugDatasourcesItemsUnmappedidsList (..),+    newCloudSearchDebugDatasourcesItemsUnmappedidsList,++    -- ** cloudsearch.debug.identitysources.items.listForunmappedidentity+    CloudSearchDebugIdentitysourcesItemsListForunmappedidentityResource,+    CloudSearchDebugIdentitysourcesItemsListForunmappedidentity (..),+    newCloudSearchDebugIdentitysourcesItemsListForunmappedidentity,++    -- ** cloudsearch.debug.identitysources.unmappedids.list+    CloudSearchDebugIdentitysourcesUnmappedidsListResource,+    CloudSearchDebugIdentitysourcesUnmappedidsList (..),+    newCloudSearchDebugIdentitysourcesUnmappedidsList,++    -- ** cloudsearch.indexing.datasources.deleteSchema+    CloudSearchIndexingDatasourcesDeleteSchemaResource,+    CloudSearchIndexingDatasourcesDeleteSchema (..),+    newCloudSearchIndexingDatasourcesDeleteSchema,++    -- ** cloudsearch.indexing.datasources.getSchema+    CloudSearchIndexingDatasourcesGetSchemaResource,+    CloudSearchIndexingDatasourcesGetSchema (..),+    newCloudSearchIndexingDatasourcesGetSchema,++    -- ** cloudsearch.indexing.datasources.items.delete+    CloudSearchIndexingDatasourcesItemsDeleteResource,+    CloudSearchIndexingDatasourcesItemsDelete (..),+    newCloudSearchIndexingDatasourcesItemsDelete,++    -- ** cloudsearch.indexing.datasources.items.deleteQueueItems+    CloudSearchIndexingDatasourcesItemsDeleteQueueItemsResource,+    CloudSearchIndexingDatasourcesItemsDeleteQueueItems (..),+    newCloudSearchIndexingDatasourcesItemsDeleteQueueItems,++    -- ** cloudsearch.indexing.datasources.items.get+    CloudSearchIndexingDatasourcesItemsGetResource,+    CloudSearchIndexingDatasourcesItemsGet (..),+    newCloudSearchIndexingDatasourcesItemsGet,++    -- ** cloudsearch.indexing.datasources.items.index+    CloudSearchIndexingDatasourcesItemsIndexResource,+    CloudSearchIndexingDatasourcesItemsIndex (..),+    newCloudSearchIndexingDatasourcesItemsIndex,++    -- ** cloudsearch.indexing.datasources.items.list+    CloudSearchIndexingDatasourcesItemsListResource,+    CloudSearchIndexingDatasourcesItemsList (..),+    newCloudSearchIndexingDatasourcesItemsList,++    -- ** cloudsearch.indexing.datasources.items.poll+    CloudSearchIndexingDatasourcesItemsPollResource,+    CloudSearchIndexingDatasourcesItemsPoll (..),+    newCloudSearchIndexingDatasourcesItemsPoll,++    -- ** cloudsearch.indexing.datasources.items.push+    CloudSearchIndexingDatasourcesItemsPushResource,+    CloudSearchIndexingDatasourcesItemsPush (..),+    newCloudSearchIndexingDatasourcesItemsPush,++    -- ** cloudsearch.indexing.datasources.items.unreserve+    CloudSearchIndexingDatasourcesItemsUnreserveResource,+    CloudSearchIndexingDatasourcesItemsUnreserve (..),+    newCloudSearchIndexingDatasourcesItemsUnreserve,++    -- ** cloudsearch.indexing.datasources.items.upload+    CloudSearchIndexingDatasourcesItemsUploadResource,+    CloudSearchIndexingDatasourcesItemsUpload (..),+    newCloudSearchIndexingDatasourcesItemsUpload,++    -- ** cloudsearch.indexing.datasources.updateSchema+    CloudSearchIndexingDatasourcesUpdateSchemaResource,+    CloudSearchIndexingDatasourcesUpdateSchema (..),+    newCloudSearchIndexingDatasourcesUpdateSchema,++    -- ** cloudsearch.initializeCustomer+    CloudSearchInitializeCustomerResource,+    CloudSearchInitializeCustomer (..),+    newCloudSearchInitializeCustomer,++    -- ** cloudsearch.media.upload+    CloudSearchMediaUploadResource,+    CloudSearchMediaUpload (..),+    newCloudSearchMediaUpload,++    -- ** cloudsearch.operations.get+    CloudSearchOperationsGetResource,+    CloudSearchOperationsGet (..),+    newCloudSearchOperationsGet,++    -- ** cloudsearch.operations.lro.list+    CloudSearchOperationsLroListResource,+    CloudSearchOperationsLroList (..),+    newCloudSearchOperationsLroList,++    -- ** cloudsearch.query.debugSearch+    CloudSearchQueryDebugSearchResource,+    CloudSearchQueryDebugSearch (..),+    newCloudSearchQueryDebugSearch,++    -- ** cloudsearch.query.removeActivity+    CloudSearchQueryRemoveActivityResource,+    CloudSearchQueryRemoveActivity (..),+    newCloudSearchQueryRemoveActivity,++    -- ** cloudsearch.query.search+    CloudSearchQuerySearchResource,+    CloudSearchQuerySearch (..),+    newCloudSearchQuerySearch,++    -- ** cloudsearch.query.sources.list+    CloudSearchQuerySourcesListResource,+    CloudSearchQuerySourcesList (..),+    newCloudSearchQuerySourcesList,++    -- ** cloudsearch.query.suggest+    CloudSearchQuerySuggestResource,+    CloudSearchQuerySuggest (..),+    newCloudSearchQuerySuggest,++    -- ** cloudsearch.settings.datasources.create+    CloudSearchSettingsDatasourcesCreateResource,+    CloudSearchSettingsDatasourcesCreate (..),+    newCloudSearchSettingsDatasourcesCreate,++    -- ** cloudsearch.settings.datasources.delete+    CloudSearchSettingsDatasourcesDeleteResource,+    CloudSearchSettingsDatasourcesDelete (..),+    newCloudSearchSettingsDatasourcesDelete,++    -- ** cloudsearch.settings.datasources.get+    CloudSearchSettingsDatasourcesGetResource,+    CloudSearchSettingsDatasourcesGet (..),+    newCloudSearchSettingsDatasourcesGet,++    -- ** cloudsearch.settings.datasources.list+    CloudSearchSettingsDatasourcesListResource,+    CloudSearchSettingsDatasourcesList (..),+    newCloudSearchSettingsDatasourcesList,++    -- ** cloudsearch.settings.datasources.patch+    CloudSearchSettingsDatasourcesPatchResource,+    CloudSearchSettingsDatasourcesPatch (..),+    newCloudSearchSettingsDatasourcesPatch,++    -- ** cloudsearch.settings.datasources.update+    CloudSearchSettingsDatasourcesUpdateResource,+    CloudSearchSettingsDatasourcesUpdate (..),+    newCloudSearchSettingsDatasourcesUpdate,++    -- ** cloudsearch.settings.getCustomer+    CloudSearchSettingsGetCustomerResource,+    CloudSearchSettingsGetCustomer (..),+    newCloudSearchSettingsGetCustomer,++    -- ** cloudsearch.settings.searchapplications.create+    CloudSearchSettingsSearchapplicationsCreateResource,+    CloudSearchSettingsSearchapplicationsCreate (..),+    newCloudSearchSettingsSearchapplicationsCreate,++    -- ** cloudsearch.settings.searchapplications.delete+    CloudSearchSettingsSearchapplicationsDeleteResource,+    CloudSearchSettingsSearchapplicationsDelete (..),+    newCloudSearchSettingsSearchapplicationsDelete,++    -- ** cloudsearch.settings.searchapplications.get+    CloudSearchSettingsSearchapplicationsGetResource,+    CloudSearchSettingsSearchapplicationsGet (..),+    newCloudSearchSettingsSearchapplicationsGet,++    -- ** cloudsearch.settings.searchapplications.list+    CloudSearchSettingsSearchapplicationsListResource,+    CloudSearchSettingsSearchapplicationsList (..),+    newCloudSearchSettingsSearchapplicationsList,++    -- ** cloudsearch.settings.searchapplications.patch+    CloudSearchSettingsSearchapplicationsPatchResource,+    CloudSearchSettingsSearchapplicationsPatch (..),+    newCloudSearchSettingsSearchapplicationsPatch,++    -- ** cloudsearch.settings.searchapplications.reset+    CloudSearchSettingsSearchapplicationsResetResource,+    CloudSearchSettingsSearchapplicationsReset (..),+    newCloudSearchSettingsSearchapplicationsReset,++    -- ** cloudsearch.settings.searchapplications.update+    CloudSearchSettingsSearchapplicationsUpdateResource,+    CloudSearchSettingsSearchapplicationsUpdate (..),+    newCloudSearchSettingsSearchapplicationsUpdate,++    -- ** cloudsearch.settings.updateCustomer+    CloudSearchSettingsUpdateCustomerResource,+    CloudSearchSettingsUpdateCustomer (..),+    newCloudSearchSettingsUpdateCustomer,++    -- ** cloudsearch.stats.getIndex+    CloudSearchStatsGetIndexResource,+    CloudSearchStatsGetIndex (..),+    newCloudSearchStatsGetIndex,++    -- ** cloudsearch.stats.getQuery+    CloudSearchStatsGetQueryResource,+    CloudSearchStatsGetQuery (..),+    newCloudSearchStatsGetQuery,++    -- ** cloudsearch.stats.getSearchapplication+    CloudSearchStatsGetSearchapplicationResource,+    CloudSearchStatsGetSearchapplication (..),+    newCloudSearchStatsGetSearchapplication,++    -- ** cloudsearch.stats.getSession+    CloudSearchStatsGetSessionResource,+    CloudSearchStatsGetSession (..),+    newCloudSearchStatsGetSession,++    -- ** cloudsearch.stats.getUser+    CloudSearchStatsGetUserResource,+    CloudSearchStatsGetUser (..),+    newCloudSearchStatsGetUser,++    -- ** cloudsearch.stats.index.datasources.get+    CloudSearchStatsIndexDatasourcesGetResource,+    CloudSearchStatsIndexDatasourcesGet (..),+    newCloudSearchStatsIndexDatasourcesGet,++    -- ** cloudsearch.stats.query.searchapplications.get+    CloudSearchStatsQuerySearchapplicationsGetResource,+    CloudSearchStatsQuerySearchapplicationsGet (..),+    newCloudSearchStatsQuerySearchapplicationsGet,++    -- ** cloudsearch.stats.session.searchapplications.get+    CloudSearchStatsSessionSearchapplicationsGetResource,+    CloudSearchStatsSessionSearchapplicationsGet (..),+    newCloudSearchStatsSessionSearchapplicationsGet,++    -- ** cloudsearch.stats.user.searchapplications.get+    CloudSearchStatsUserSearchapplicationsGetResource,+    CloudSearchStatsUserSearchapplicationsGet (..),+    newCloudSearchStatsUserSearchapplicationsGet,++    -- * Types++    -- ** Xgafv+    Xgafv (..),++    -- ** Action+    Action (..),+    newAction,++    -- ** AuditLoggingSettings+    AuditLoggingSettings (..),+    newAuditLoggingSettings,++    -- ** BackgroundColoredText+    BackgroundColoredText (..),+    newBackgroundColoredText,++    -- ** BackgroundColoredText_BackgroundColor+    BackgroundColoredText_BackgroundColor (..),++    -- ** BooleanOperatorOptions+    BooleanOperatorOptions (..),+    newBooleanOperatorOptions,++    -- ** BooleanPropertyOptions+    BooleanPropertyOptions (..),+    newBooleanPropertyOptions,++    -- ** CheckAccessResponse+    CheckAccessResponse (..),+    newCheckAccessResponse,++    -- ** CompositeFilter+    CompositeFilter (..),+    newCompositeFilter,++    -- ** CompositeFilter_LogicOperator+    CompositeFilter_LogicOperator (..),++    -- ** Content+    Content (..),+    newContent,++    -- ** Context+    Context (..),+    newContext,++    -- ** Context_AppItem+    Context_AppItem (..),++    -- ** Context_SurfaceItem+    Context_SurfaceItem (..),++    -- ** Context_TypeItem+    Context_TypeItem (..),++    -- ** ContextAttribute+    ContextAttribute (..),+    newContextAttribute,++    -- ** CustomerIndexStats+    CustomerIndexStats (..),+    newCustomerIndexStats,++    -- ** CustomerQueryStats+    CustomerQueryStats (..),+    newCustomerQueryStats,++    -- ** CustomerSearchApplicationStats+    CustomerSearchApplicationStats (..),+    newCustomerSearchApplicationStats,++    -- ** CustomerSessionStats+    CustomerSessionStats (..),+    newCustomerSessionStats,++    -- ** CustomerSettings+    CustomerSettings (..),+    newCustomerSettings,++    -- ** CustomerUserStats+    CustomerUserStats (..),+    newCustomerUserStats,++    -- ** DataSource+    DataSource (..),+    newDataSource,++    -- ** DataSourceIndexStats+    DataSourceIndexStats (..),+    newDataSourceIndexStats,++    -- ** DataSourceRestriction+    DataSourceRestriction (..),+    newDataSourceRestriction,++    -- ** Date+    Date (..),+    newDate,++    -- ** DateOperatorOptions+    DateOperatorOptions (..),+    newDateOperatorOptions,++    -- ** DatePropertyOptions+    DatePropertyOptions (..),+    newDatePropertyOptions,++    -- ** DateValues+    DateValues (..),+    newDateValues,++    -- ** DebugOptions+    DebugOptions (..),+    newDebugOptions,++    -- ** DebugResponse+    DebugResponse (..),+    newDebugResponse,++    -- ** DeleteQueueItemsRequest+    DeleteQueueItemsRequest (..),+    newDeleteQueueItemsRequest,++    -- ** DisplayedProperty+    DisplayedProperty (..),+    newDisplayedProperty,++    -- ** DoubleOperatorOptions+    DoubleOperatorOptions (..),+    newDoubleOperatorOptions,++    -- ** DoublePropertyOptions+    DoublePropertyOptions (..),+    newDoublePropertyOptions,++    -- ** DoubleValues+    DoubleValues (..),+    newDoubleValues,++    -- ** DriveFollowUpRestrict+    DriveFollowUpRestrict (..),+    newDriveFollowUpRestrict,++    -- ** DriveFollowUpRestrict_Type+    DriveFollowUpRestrict_Type (..),++    -- ** DriveLocationRestrict+    DriveLocationRestrict (..),+    newDriveLocationRestrict,++    -- ** DriveLocationRestrict_Type+    DriveLocationRestrict_Type (..),++    -- ** DriveMimeTypeRestrict+    DriveMimeTypeRestrict (..),+    newDriveMimeTypeRestrict,++    -- ** DriveMimeTypeRestrict_Type+    DriveMimeTypeRestrict_Type (..),++    -- ** DriveTimeSpanRestrict+    DriveTimeSpanRestrict (..),+    newDriveTimeSpanRestrict,++    -- ** DriveTimeSpanRestrict_Type+    DriveTimeSpanRestrict_Type (..),++    -- ** EmailAddress+    EmailAddress (..),+    newEmailAddress,++    -- ** EnterpriseTopazFrontendTeamsLink+    EnterpriseTopazFrontendTeamsLink (..),+    newEnterpriseTopazFrontendTeamsLink,++    -- ** EnterpriseTopazFrontendTeamsPersonCorePhoneNumber+    EnterpriseTopazFrontendTeamsPersonCorePhoneNumber (..),+    newEnterpriseTopazFrontendTeamsPersonCorePhoneNumber,++    -- ** EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type+    EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type (..),++    -- ** EnterpriseTopazSidekickAgendaEntry+    EnterpriseTopazSidekickAgendaEntry (..),+    newEnterpriseTopazSidekickAgendaEntry,++    -- ** EnterpriseTopazSidekickAgendaEntry_Chronology+    EnterpriseTopazSidekickAgendaEntry_Chronology (..),++    -- ** EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus+    EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus (..),++    -- ** EnterpriseTopazSidekickAgendaGroupCardProto+    EnterpriseTopazSidekickAgendaGroupCardProto (..),+    newEnterpriseTopazSidekickAgendaGroupCardProto,++    -- ** EnterpriseTopazSidekickAgendaGroupCardProtoContext+    EnterpriseTopazSidekickAgendaGroupCardProtoContext (..),+    newEnterpriseTopazSidekickAgendaGroupCardProtoContext,++    -- ** EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict+    EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict (..),++    -- ** EnterpriseTopazSidekickAgendaItem+    EnterpriseTopazSidekickAgendaItem (..),+    newEnterpriseTopazSidekickAgendaItem,++    -- ** EnterpriseTopazSidekickAnswerAnswerList+    EnterpriseTopazSidekickAnswerAnswerList (..),+    newEnterpriseTopazSidekickAnswerAnswerList,++    -- ** EnterpriseTopazSidekickAnswerAnswerList_Type+    EnterpriseTopazSidekickAnswerAnswerList_Type (..),++    -- ** EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer+    EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer (..),+    newEnterpriseTopazSidekickAnswerAnswerListLabeledAnswer,++    -- ** EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard+    EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard (..),+    newEnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard,++    -- ** EnterpriseTopazSidekickAnswerSuggestedQueryCategory+    EnterpriseTopazSidekickAnswerSuggestedQueryCategory (..),+    newEnterpriseTopazSidekickAnswerSuggestedQueryCategory,++    -- ** EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category+    EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category (..),++    -- ** EnterpriseTopazSidekickAssistCardProto+    EnterpriseTopazSidekickAssistCardProto (..),+    newEnterpriseTopazSidekickAssistCardProto,++    -- ** EnterpriseTopazSidekickAssistCardProto_CardType+    EnterpriseTopazSidekickAssistCardProto_CardType (..),++    -- ** EnterpriseTopazSidekickCardMetadata+    EnterpriseTopazSidekickCardMetadata (..),+    newEnterpriseTopazSidekickCardMetadata,++    -- ** EnterpriseTopazSidekickCardMetadata_CardCategory+    EnterpriseTopazSidekickCardMetadata_CardCategory (..),++    -- ** EnterpriseTopazSidekickCardMetadata_Chronology+    EnterpriseTopazSidekickCardMetadata_Chronology (..),++    -- ** EnterpriseTopazSidekickCardMetadata_RenderMode+    EnterpriseTopazSidekickCardMetadata_RenderMode (..),++    -- ** EnterpriseTopazSidekickCommonDebugInfo+    EnterpriseTopazSidekickCommonDebugInfo (..),+    newEnterpriseTopazSidekickCommonDebugInfo,++    -- ** EnterpriseTopazSidekickCommonDocument+    EnterpriseTopazSidekickCommonDocument (..),+    newEnterpriseTopazSidekickCommonDocument,++    -- ** EnterpriseTopazSidekickCommonDocument_AccessType+    EnterpriseTopazSidekickCommonDocument_AccessType (..),++    -- ** EnterpriseTopazSidekickCommonDocument_Provenance+    EnterpriseTopazSidekickCommonDocument_Provenance (..),++    -- ** EnterpriseTopazSidekickCommonDocument_Reason+    EnterpriseTopazSidekickCommonDocument_Reason (..),++    -- ** EnterpriseTopazSidekickCommonDocument_Type+    EnterpriseTopazSidekickCommonDocument_Type (..),++    -- ** EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata+    EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata (..),+    newEnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata,++    -- ** EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope+    EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope (..),++    -- ** EnterpriseTopazSidekickCommonDocumentJustification+    EnterpriseTopazSidekickCommonDocumentJustification (..),+    newEnterpriseTopazSidekickCommonDocumentJustification,++    -- ** EnterpriseTopazSidekickCommonDocumentJustification_Reason+    EnterpriseTopazSidekickCommonDocumentJustification_Reason (..),++    -- ** EnterpriseTopazSidekickCommonPerson+    EnterpriseTopazSidekickCommonPerson (..),+    newEnterpriseTopazSidekickCommonPerson,++    -- ** EnterpriseTopazSidekickCommonPersonBirthday+    EnterpriseTopazSidekickCommonPersonBirthday (..),+    newEnterpriseTopazSidekickCommonPersonBirthday,++    -- ** EnterpriseTopazSidekickConflictingEventsCardProto+    EnterpriseTopazSidekickConflictingEventsCardProto (..),+    newEnterpriseTopazSidekickConflictingEventsCardProto,++    -- ** EnterpriseTopazSidekickDocumentGroup+    EnterpriseTopazSidekickDocumentGroup (..),+    newEnterpriseTopazSidekickDocumentGroup,++    -- ** EnterpriseTopazSidekickDocumentGroup_GroupType+    EnterpriseTopazSidekickDocumentGroup_GroupType (..),++    -- ** EnterpriseTopazSidekickDocumentPerCategoryList+    EnterpriseTopazSidekickDocumentPerCategoryList (..),+    newEnterpriseTopazSidekickDocumentPerCategoryList,++    -- ** EnterpriseTopazSidekickDocumentPerCategoryList_ListType+    EnterpriseTopazSidekickDocumentPerCategoryList_ListType (..),++    -- ** EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry+    EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry (..),+    newEnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry,++    -- ** EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+    EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category (..),++    -- ** EnterpriseTopazSidekickFindMeetingTimeCardProto+    EnterpriseTopazSidekickFindMeetingTimeCardProto (..),+    newEnterpriseTopazSidekickFindMeetingTimeCardProto,++    -- ** EnterpriseTopazSidekickGap+    EnterpriseTopazSidekickGap (..),+    newEnterpriseTopazSidekickGap,++    -- ** EnterpriseTopazSidekickGenericAnswerCard+    EnterpriseTopazSidekickGenericAnswerCard (..),+    newEnterpriseTopazSidekickGenericAnswerCard,++    -- ** EnterpriseTopazSidekickGetAndKeepAheadCardProto+    EnterpriseTopazSidekickGetAndKeepAheadCardProto (..),+    newEnterpriseTopazSidekickGetAndKeepAheadCardProto,++    -- ** EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents+    EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents (..),+    newEnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents,++    -- ** EnterpriseTopazSidekickMeetingNotesCardError+    EnterpriseTopazSidekickMeetingNotesCardError (..),+    newEnterpriseTopazSidekickMeetingNotesCardError,++    -- ** EnterpriseTopazSidekickMeetingNotesCardError_Reason+    EnterpriseTopazSidekickMeetingNotesCardError_Reason (..),++    -- ** EnterpriseTopazSidekickMeetingNotesCardProto+    EnterpriseTopazSidekickMeetingNotesCardProto (..),+    newEnterpriseTopazSidekickMeetingNotesCardProto,++    -- ** EnterpriseTopazSidekickMeetingNotesCardRequest+    EnterpriseTopazSidekickMeetingNotesCardRequest (..),+    newEnterpriseTopazSidekickMeetingNotesCardRequest,++    -- ** EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem+    EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem (..),++    -- ** EnterpriseTopazSidekickNlpMetadata+    EnterpriseTopazSidekickNlpMetadata (..),+    newEnterpriseTopazSidekickNlpMetadata,++    -- ** EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo+    EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo (..),+    newEnterpriseTopazSidekickPeopleAnswerDisambiguationInfo,++    -- ** EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson+    EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson (..),+    newEnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson,++    -- ** EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader+    EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader (..),+    newEnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader,++    -- ** EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard+    EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard (..),+    newEnterpriseTopazSidekickPeopleAnswerPersonAnswerCard,++    -- ** EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus+    EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus (..),++    -- ** EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard+    EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard (..),+    newEnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard,++    -- ** EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType+    EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType (..),++    -- ** EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus+    EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus (..),++    -- ** EnterpriseTopazSidekickPeopleDisambiguationCard+    EnterpriseTopazSidekickPeopleDisambiguationCard (..),+    newEnterpriseTopazSidekickPeopleDisambiguationCard,++    -- ** EnterpriseTopazSidekickPerson+    EnterpriseTopazSidekickPerson (..),+    newEnterpriseTopazSidekickPerson,++    -- ** EnterpriseTopazSidekickPerson_AffinityLevel+    EnterpriseTopazSidekickPerson_AffinityLevel (..),++    -- ** EnterpriseTopazSidekickPerson_AttendingStatus+    EnterpriseTopazSidekickPerson_AttendingStatus (..),++    -- ** EnterpriseTopazSidekickPersonProfileCard+    EnterpriseTopazSidekickPersonProfileCard (..),+    newEnterpriseTopazSidekickPersonProfileCard,++    -- ** EnterpriseTopazSidekickPersonProfileCardRelatedPeople+    EnterpriseTopazSidekickPersonProfileCardRelatedPeople (..),+    newEnterpriseTopazSidekickPersonProfileCardRelatedPeople,++    -- ** EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation+    EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation (..),++    -- ** EnterpriseTopazSidekickPersonalizedDocsCardProto+    EnterpriseTopazSidekickPersonalizedDocsCardProto (..),+    newEnterpriseTopazSidekickPersonalizedDocsCardProto,++    -- ** EnterpriseTopazSidekickRankingParams+    EnterpriseTopazSidekickRankingParams (..),+    newEnterpriseTopazSidekickRankingParams,++    -- ** EnterpriseTopazSidekickRankingParams_Priority+    EnterpriseTopazSidekickRankingParams_Priority (..),++    -- ** EnterpriseTopazSidekickRankingParams_Type+    EnterpriseTopazSidekickRankingParams_Type (..),++    -- ** EnterpriseTopazSidekickRecentDocumentsCardProto+    EnterpriseTopazSidekickRecentDocumentsCardProto (..),+    newEnterpriseTopazSidekickRecentDocumentsCardProto,++    -- ** EnterpriseTopazSidekickScheduledMeeting+    EnterpriseTopazSidekickScheduledMeeting (..),+    newEnterpriseTopazSidekickScheduledMeeting,++    -- ** EnterpriseTopazSidekickShareMeetingDocsCardProto+    EnterpriseTopazSidekickShareMeetingDocsCardProto (..),+    newEnterpriseTopazSidekickShareMeetingDocsCardProto,++    -- ** EnterpriseTopazSidekickTimeSlot+    EnterpriseTopazSidekickTimeSlot (..),+    newEnterpriseTopazSidekickTimeSlot,++    -- ** EnumOperatorOptions+    EnumOperatorOptions (..),+    newEnumOperatorOptions,++    -- ** EnumPropertyOptions+    EnumPropertyOptions (..),+    newEnumPropertyOptions,++    -- ** EnumPropertyOptions_OrderedRanking+    EnumPropertyOptions_OrderedRanking (..),++    -- ** EnumValuePair+    EnumValuePair (..),+    newEnumValuePair,++    -- ** EnumValues+    EnumValues (..),+    newEnumValues,++    -- ** ErrorInfo+    ErrorInfo (..),+    newErrorInfo,++    -- ** ErrorMessage+    ErrorMessage (..),+    newErrorMessage,++    -- ** FacetBucket+    FacetBucket (..),+    newFacetBucket,++    -- ** FacetOptions+    FacetOptions (..),+    newFacetOptions,++    -- ** FacetResult+    FacetResult (..),+    newFacetResult,++    -- ** FieldViolation+    FieldViolation (..),+    newFieldViolation,++    -- ** Filter+    Filter (..),+    newFilter,++    -- ** FilterOptions+    FilterOptions (..),+    newFilterOptions,++    -- ** FreshnessOptions+    FreshnessOptions (..),+    newFreshnessOptions,++    -- ** GSuitePrincipal+    GSuitePrincipal (..),+    newGSuitePrincipal,++    -- ** GetCustomerIndexStatsResponse+    GetCustomerIndexStatsResponse (..),+    newGetCustomerIndexStatsResponse,++    -- ** GetCustomerQueryStatsResponse+    GetCustomerQueryStatsResponse (..),+    newGetCustomerQueryStatsResponse,++    -- ** GetCustomerSearchApplicationStatsResponse+    GetCustomerSearchApplicationStatsResponse (..),+    newGetCustomerSearchApplicationStatsResponse,++    -- ** GetCustomerSessionStatsResponse+    GetCustomerSessionStatsResponse (..),+    newGetCustomerSessionStatsResponse,++    -- ** GetCustomerUserStatsResponse+    GetCustomerUserStatsResponse (..),+    newGetCustomerUserStatsResponse,++    -- ** GetDataSourceIndexStatsResponse+    GetDataSourceIndexStatsResponse (..),+    newGetDataSourceIndexStatsResponse,++    -- ** GetSearchApplicationQueryStatsResponse+    GetSearchApplicationQueryStatsResponse (..),+    newGetSearchApplicationQueryStatsResponse,++    -- ** GetSearchApplicationSessionStatsResponse+    GetSearchApplicationSessionStatsResponse (..),+    newGetSearchApplicationSessionStatsResponse,++    -- ** GetSearchApplicationUserStatsResponse+    GetSearchApplicationUserStatsResponse (..),+    newGetSearchApplicationUserStatsResponse,++    -- ** HtmlOperatorOptions+    HtmlOperatorOptions (..),+    newHtmlOperatorOptions,++    -- ** HtmlPropertyOptions+    HtmlPropertyOptions (..),+    newHtmlPropertyOptions,++    -- ** HtmlValues+    HtmlValues (..),+    newHtmlValues,++    -- ** IndexItemOptions+    IndexItemOptions (..),+    newIndexItemOptions,++    -- ** IndexItemRequest+    IndexItemRequest (..),+    newIndexItemRequest,++    -- ** IndexItemRequest_Mode+    IndexItemRequest_Mode (..),++    -- ** InitializeCustomerRequest+    InitializeCustomerRequest (..),+    newInitializeCustomerRequest,++    -- ** IntegerFacetingOptions+    IntegerFacetingOptions (..),+    newIntegerFacetingOptions,++    -- ** IntegerOperatorOptions+    IntegerOperatorOptions (..),+    newIntegerOperatorOptions,++    -- ** IntegerPropertyOptions+    IntegerPropertyOptions (..),+    newIntegerPropertyOptions,++    -- ** IntegerPropertyOptions_OrderedRanking+    IntegerPropertyOptions_OrderedRanking (..),++    -- ** IntegerValues+    IntegerValues (..),+    newIntegerValues,++    -- ** Interaction+    Interaction (..),+    newInteraction,++    -- ** Interaction_Type+    Interaction_Type (..),++    -- ** Item+    Item (..),+    newItem,++    -- ** Item_ItemType+    Item_ItemType (..),++    -- ** ItemAcl+    ItemAcl (..),+    newItemAcl,++    -- ** ItemAcl_AclInheritanceType+    ItemAcl_AclInheritanceType (..),++    -- ** ItemContent+    ItemContent (..),+    newItemContent,++    -- ** ItemContent_ContentFormat+    ItemContent_ContentFormat (..),++    -- ** ItemCountByStatus+    ItemCountByStatus (..),+    newItemCountByStatus,++    -- ** ItemCountByStatus_StatusCode+    ItemCountByStatus_StatusCode (..),++    -- ** ItemMetadata+    ItemMetadata (..),+    newItemMetadata,++    -- ** ItemStatus+    ItemStatus (..),+    newItemStatus,++    -- ** ItemStatus_Code+    ItemStatus_Code (..),++    -- ** ItemStructuredData+    ItemStructuredData (..),+    newItemStructuredData,++    -- ** ListDataSourceResponse+    ListDataSourceResponse (..),+    newListDataSourceResponse,++    -- ** ListItemNamesForUnmappedIdentityResponse+    ListItemNamesForUnmappedIdentityResponse (..),+    newListItemNamesForUnmappedIdentityResponse,++    -- ** ListItemsResponse+    ListItemsResponse (..),+    newListItemsResponse,++    -- ** ListOperationsResponse+    ListOperationsResponse (..),+    newListOperationsResponse,++    -- ** ListQuerySourcesResponse+    ListQuerySourcesResponse (..),+    newListQuerySourcesResponse,++    -- ** ListSearchApplicationsResponse+    ListSearchApplicationsResponse (..),+    newListSearchApplicationsResponse,++    -- ** ListUnmappedIdentitiesResponse+    ListUnmappedIdentitiesResponse (..),+    newListUnmappedIdentitiesResponse,++    -- ** MapInfo+    MapInfo (..),+    newMapInfo,++    -- ** MapTile+    MapTile (..),+    newMapTile,++    -- ** MatchRange+    MatchRange (..),+    newMatchRange,++    -- ** Media+    Media (..),+    newMedia,++    -- ** Metadata+    Metadata (..),+    newMetadata,++    -- ** Metaline+    Metaline (..),+    newMetaline,++    -- ** Name+    Name (..),+    newName,++    -- ** NamedProperty+    NamedProperty (..),+    newNamedProperty,++    -- ** ObjectDefinition+    ObjectDefinition (..),+    newObjectDefinition,++    -- ** ObjectDisplayOptions+    ObjectDisplayOptions (..),+    newObjectDisplayOptions,++    -- ** ObjectOptions+    ObjectOptions (..),+    newObjectOptions,++    -- ** ObjectPropertyOptions+    ObjectPropertyOptions (..),+    newObjectPropertyOptions,++    -- ** ObjectValues+    ObjectValues (..),+    newObjectValues,++    -- ** Operation+    Operation (..),+    newOperation,++    -- ** Operation_Metadata+    Operation_Metadata (..),+    newOperation_Metadata,++    -- ** Operation_Response+    Operation_Response (..),+    newOperation_Response,++    -- ** PeoplePromotionCard+    PeoplePromotionCard (..),+    newPeoplePromotionCard,++    -- ** PeopleSuggestion+    PeopleSuggestion (..),+    newPeopleSuggestion,++    -- ** Person+    Person (..),+    newPerson,++    -- ** PersonCore+    PersonCore (..),+    newPersonCore,++    -- ** PersonCore_AvailabilityStatus+    PersonCore_AvailabilityStatus (..),++    -- ** PersonCore_Keywords+    PersonCore_Keywords (..),+    newPersonCore_Keywords,++    -- ** PhoneNumber+    PhoneNumber (..),+    newPhoneNumber,++    -- ** PhoneNumber_Type+    PhoneNumber_Type (..),++    -- ** Photo+    Photo (..),+    newPhoto,++    -- ** PollItemsRequest+    PollItemsRequest (..),+    newPollItemsRequest,++    -- ** PollItemsRequest_StatusCodesItem+    PollItemsRequest_StatusCodesItem (..),++    -- ** PollItemsResponse+    PollItemsResponse (..),+    newPollItemsResponse,++    -- ** Principal+    Principal (..),+    newPrincipal,++    -- ** ProcessingError+    ProcessingError (..),+    newProcessingError,++    -- ** ProcessingError_Code+    ProcessingError_Code (..),++    -- ** PropertyDefinition+    PropertyDefinition (..),+    newPropertyDefinition,++    -- ** PropertyDisplayOptions+    PropertyDisplayOptions (..),+    newPropertyDisplayOptions,++    -- ** PushItem+    PushItem (..),+    newPushItem,++    -- ** PushItem_Type+    PushItem_Type (..),++    -- ** PushItemRequest+    PushItemRequest (..),+    newPushItemRequest,++    -- ** QueryActivity+    QueryActivity (..),+    newQueryActivity,++    -- ** QueryCountByStatus+    QueryCountByStatus (..),+    newQueryCountByStatus,++    -- ** QueryInterpretation+    QueryInterpretation (..),+    newQueryInterpretation,++    -- ** QueryInterpretation_InterpretationType+    QueryInterpretation_InterpretationType (..),++    -- ** QueryInterpretation_Reason+    QueryInterpretation_Reason (..),++    -- ** QueryInterpretationConfig+    QueryInterpretationConfig (..),+    newQueryInterpretationConfig,++    -- ** QueryInterpretationOptions+    QueryInterpretationOptions (..),+    newQueryInterpretationOptions,++    -- ** QueryItem+    QueryItem (..),+    newQueryItem,++    -- ** QueryOperator+    QueryOperator (..),+    newQueryOperator,++    -- ** QueryOperator_Type+    QueryOperator_Type (..),++    -- ** QuerySource+    QuerySource (..),+    newQuerySource,++    -- ** QuerySuggestion+    QuerySuggestion (..),+    newQuerySuggestion,++    -- ** RemoveActivityRequest+    RemoveActivityRequest (..),+    newRemoveActivityRequest,++    -- ** RemoveActivityResponse+    RemoveActivityResponse (..),+    newRemoveActivityResponse,++    -- ** RepositoryError+    RepositoryError (..),+    newRepositoryError,++    -- ** RepositoryError_Type+    RepositoryError_Type (..),++    -- ** RequestOptions+    RequestOptions (..),+    newRequestOptions,++    -- ** ResetSearchApplicationRequest+    ResetSearchApplicationRequest (..),+    newResetSearchApplicationRequest,++    -- ** ResponseDebugInfo+    ResponseDebugInfo (..),+    newResponseDebugInfo,++    -- ** RestrictItem+    RestrictItem (..),+    newRestrictItem,++    -- ** ResultCounts+    ResultCounts (..),+    newResultCounts,++    -- ** ResultDebugInfo+    ResultDebugInfo (..),+    newResultDebugInfo,++    -- ** ResultDisplayField+    ResultDisplayField (..),+    newResultDisplayField,++    -- ** ResultDisplayLine+    ResultDisplayLine (..),+    newResultDisplayLine,++    -- ** ResultDisplayMetadata+    ResultDisplayMetadata (..),+    newResultDisplayMetadata,++    -- ** RetrievalImportance+    RetrievalImportance (..),+    newRetrievalImportance,++    -- ** RetrievalImportance_Importance+    RetrievalImportance_Importance (..),++    -- ** SafeHtmlProto+    SafeHtmlProto (..),+    newSafeHtmlProto,++    -- ** SafeUrlProto+    SafeUrlProto (..),+    newSafeUrlProto,++    -- ** Schema+    Schema (..),+    newSchema,++    -- ** ScoringConfig+    ScoringConfig (..),+    newScoringConfig,++    -- ** SearchApplication+    SearchApplication (..),+    newSearchApplication,++    -- ** SearchApplicationQueryStats+    SearchApplicationQueryStats (..),+    newSearchApplicationQueryStats,++    -- ** SearchApplicationSessionStats+    SearchApplicationSessionStats (..),+    newSearchApplicationSessionStats,++    -- ** SearchApplicationUserStats+    SearchApplicationUserStats (..),+    newSearchApplicationUserStats,++    -- ** SearchItemsByViewUrlRequest+    SearchItemsByViewUrlRequest (..),+    newSearchItemsByViewUrlRequest,++    -- ** SearchItemsByViewUrlResponse+    SearchItemsByViewUrlResponse (..),+    newSearchItemsByViewUrlResponse,++    -- ** SearchQualityMetadata+    SearchQualityMetadata (..),+    newSearchQualityMetadata,++    -- ** SearchRequest+    SearchRequest (..),+    newSearchRequest,++    -- ** SearchResponse+    SearchResponse (..),+    newSearchResponse,++    -- ** SearchResult+    SearchResult (..),+    newSearchResult,++    -- ** Snippet+    Snippet (..),+    newSnippet,++    -- ** SortOptions+    SortOptions (..),+    newSortOptions,++    -- ** SortOptions_SortOrder+    SortOptions_SortOrder (..),++    -- ** Source+    Source (..),+    newSource,++    -- ** Source_PredefinedSource+    Source_PredefinedSource (..),++    -- ** SourceConfig+    SourceConfig (..),+    newSourceConfig,++    -- ** SourceCrowdingConfig+    SourceCrowdingConfig (..),+    newSourceCrowdingConfig,++    -- ** SourceResultCount+    SourceResultCount (..),+    newSourceResultCount,++    -- ** SourceScoringConfig+    SourceScoringConfig (..),+    newSourceScoringConfig,++    -- ** SourceScoringConfig_SourceImportance+    SourceScoringConfig_SourceImportance (..),++    -- ** SpellResult+    SpellResult (..),+    newSpellResult,++    -- ** SpellResult_SuggestionType+    SpellResult_SuggestionType (..),++    -- ** StartUploadItemRequest+    StartUploadItemRequest (..),+    newStartUploadItemRequest,++    -- ** Status+    Status (..),+    newStatus,++    -- ** Status_DetailsItem+    Status_DetailsItem (..),+    newStatus_DetailsItem,++    -- ** StructuredDataObject+    StructuredDataObject (..),+    newStructuredDataObject,++    -- ** StructuredResult+    StructuredResult (..),+    newStructuredResult,++    -- ** SuggestRequest+    SuggestRequest (..),+    newSuggestRequest,++    -- ** SuggestResponse+    SuggestResponse (..),+    newSuggestResponse,++    -- ** SuggestResult+    SuggestResult (..),+    newSuggestResult,++    -- ** TextOperatorOptions+    TextOperatorOptions (..),+    newTextOperatorOptions,++    -- ** TextPropertyOptions+    TextPropertyOptions (..),+    newTextPropertyOptions,++    -- ** TextValues+    TextValues (..),+    newTextValues,++    -- ** ThirdPartyGenericCard+    ThirdPartyGenericCard (..),+    newThirdPartyGenericCard,++    -- ** TimestampOperatorOptions+    TimestampOperatorOptions (..),+    newTimestampOperatorOptions,++    -- ** TimestampPropertyOptions+    TimestampPropertyOptions (..),+    newTimestampPropertyOptions,++    -- ** TimestampValues+    TimestampValues (..),+    newTimestampValues,++    -- ** UnmappedIdentity+    UnmappedIdentity (..),+    newUnmappedIdentity,++    -- ** UnmappedIdentity_ResolutionStatusCode+    UnmappedIdentity_ResolutionStatusCode (..),++    -- ** UnreserveItemsRequest+    UnreserveItemsRequest (..),+    newUnreserveItemsRequest,++    -- ** UpdateDataSourceRequest+    UpdateDataSourceRequest (..),+    newUpdateDataSourceRequest,++    -- ** UpdateSchemaRequest+    UpdateSchemaRequest (..),+    newUpdateSchemaRequest,++    -- ** UploadItemRef+    UploadItemRef (..),+    newUploadItemRef,++    -- ** UserActivity+    UserActivity (..),+    newUserActivity,++    -- ** VPCSettings+    VPCSettings (..),+    newVPCSettings,++    -- ** Value+    Value (..),+    newValue,++    -- ** ValueFilter+    ValueFilter (..),+    newValueFilter,++    -- ** DebugIdentitysourcesUnmappedidsListResolutionStatusCode+    DebugIdentitysourcesUnmappedidsListResolutionStatusCode (..),++    -- ** IndexingDatasourcesItemsDeleteMode+    IndexingDatasourcesItemsDeleteMode (..),+  )+where++import Gogol.CloudSearch.Debug.Datasources.Items.CheckAccess+import Gogol.CloudSearch.Debug.Datasources.Items.SearchByViewUrl+import Gogol.CloudSearch.Debug.Datasources.Items.Unmappedids.List+import Gogol.CloudSearch.Debug.Identitysources.Items.ListForunmappedidentity+import Gogol.CloudSearch.Debug.Identitysources.Unmappedids.List+import Gogol.CloudSearch.Indexing.Datasources.DeleteSchema+import Gogol.CloudSearch.Indexing.Datasources.GetSchema+import Gogol.CloudSearch.Indexing.Datasources.Items.Delete+import Gogol.CloudSearch.Indexing.Datasources.Items.DeleteQueueItems+import Gogol.CloudSearch.Indexing.Datasources.Items.Get+import Gogol.CloudSearch.Indexing.Datasources.Items.Index+import Gogol.CloudSearch.Indexing.Datasources.Items.List+import Gogol.CloudSearch.Indexing.Datasources.Items.Poll+import Gogol.CloudSearch.Indexing.Datasources.Items.Push+import Gogol.CloudSearch.Indexing.Datasources.Items.Unreserve+import Gogol.CloudSearch.Indexing.Datasources.Items.Upload+import Gogol.CloudSearch.Indexing.Datasources.UpdateSchema+import Gogol.CloudSearch.InitializeCustomer+import Gogol.CloudSearch.Media.Upload+import Gogol.CloudSearch.Operations.Get+import Gogol.CloudSearch.Operations.Lro.List+import Gogol.CloudSearch.Query.DebugSearch+import Gogol.CloudSearch.Query.RemoveActivity+import Gogol.CloudSearch.Query.Search+import Gogol.CloudSearch.Query.Sources.List+import Gogol.CloudSearch.Query.Suggest+import Gogol.CloudSearch.Settings.Datasources.Create+import Gogol.CloudSearch.Settings.Datasources.Delete+import Gogol.CloudSearch.Settings.Datasources.Get+import Gogol.CloudSearch.Settings.Datasources.List+import Gogol.CloudSearch.Settings.Datasources.Patch+import Gogol.CloudSearch.Settings.Datasources.Update+import Gogol.CloudSearch.Settings.GetCustomer+import Gogol.CloudSearch.Settings.Searchapplications.Create+import Gogol.CloudSearch.Settings.Searchapplications.Delete+import Gogol.CloudSearch.Settings.Searchapplications.Get+import Gogol.CloudSearch.Settings.Searchapplications.List+import Gogol.CloudSearch.Settings.Searchapplications.Patch+import Gogol.CloudSearch.Settings.Searchapplications.Reset+import Gogol.CloudSearch.Settings.Searchapplications.Update+import Gogol.CloudSearch.Settings.UpdateCustomer+import Gogol.CloudSearch.Stats.GetIndex+import Gogol.CloudSearch.Stats.GetQuery+import Gogol.CloudSearch.Stats.GetSearchapplication+import Gogol.CloudSearch.Stats.GetSession+import Gogol.CloudSearch.Stats.GetUser+import Gogol.CloudSearch.Stats.Index.Datasources.Get+import Gogol.CloudSearch.Stats.Query.Searchapplications.Get+import Gogol.CloudSearch.Stats.Session.Searchapplications.Get+import Gogol.CloudSearch.Stats.User.Searchapplications.Get+import Gogol.CloudSearch.Types
+ gen/Gogol/CloudSearch/Debug/Datasources/Items/CheckAccess.hs view
@@ -0,0 +1,129 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Debug.Datasources.Items.CheckAccess+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Checks whether an item is accessible by specified principal. Principal must be a user; groups and domain values aren\'t supported. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.debug.datasources.items.checkAccess@.+module Gogol.CloudSearch.Debug.Datasources.Items.CheckAccess+  ( -- * Resource+    CloudSearchDebugDatasourcesItemsCheckAccessResource,++    -- ** Constructing a Request+    CloudSearchDebugDatasourcesItemsCheckAccess (..),+    newCloudSearchDebugDatasourcesItemsCheckAccess,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.debug.datasources.items.checkAccess@ method which the+-- 'CloudSearchDebugDatasourcesItemsCheckAccess' request conforms to.+type CloudSearchDebugDatasourcesItemsCheckAccessResource =+  "v1"+    Core.:> "debug"+    Core.:> Core.CaptureMode "name" "checkAccess" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Principal+    Core.:> Core.Post '[Core.JSON] CheckAccessResponse++-- | Checks whether an item is accessible by specified principal. Principal must be a user; groups and domain values aren\'t supported. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchDebugDatasourcesItemsCheckAccess' smart constructor.+data CloudSearchDebugDatasourcesItemsCheckAccess = CloudSearchDebugDatasourcesItemsCheckAccess+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | Item name, format: datasources\/{source/id}\/items\/{item/id}+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: Principal,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchDebugDatasourcesItemsCheckAccess' with the minimum fields required to make a request.+newCloudSearchDebugDatasourcesItemsCheckAccess ::+  -- |  Item name, format: datasources\/{source/id}\/items\/{item/id} See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  Principal ->+  CloudSearchDebugDatasourcesItemsCheckAccess+newCloudSearchDebugDatasourcesItemsCheckAccess name payload =+  CloudSearchDebugDatasourcesItemsCheckAccess+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      name = name,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchDebugDatasourcesItemsCheckAccess+  where+  type+    Rs CloudSearchDebugDatasourcesItemsCheckAccess =+      CheckAccessResponse+  type+    Scopes CloudSearchDebugDatasourcesItemsCheckAccess =+      '[CloudSearch'FullControl, CloudSearch'Debug]+  requestClient CloudSearchDebugDatasourcesItemsCheckAccess {..} =+    go+      name+      xgafv+      accessToken+      callback+      debugOptionsEnableDebugging+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchDebugDatasourcesItemsCheckAccessResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Debug/Datasources/Items/SearchByViewUrl.hs view
@@ -0,0 +1,126 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Debug.Datasources.Items.SearchByViewUrl+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Fetches the item whose viewUrl exactly matches that of the URL provided in the request. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.debug.datasources.items.searchByViewUrl@.+module Gogol.CloudSearch.Debug.Datasources.Items.SearchByViewUrl+  ( -- * Resource+    CloudSearchDebugDatasourcesItemsSearchByViewUrlResource,++    -- ** Constructing a Request+    CloudSearchDebugDatasourcesItemsSearchByViewUrl (..),+    newCloudSearchDebugDatasourcesItemsSearchByViewUrl,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.debug.datasources.items.searchByViewUrl@ method which the+-- 'CloudSearchDebugDatasourcesItemsSearchByViewUrl' request conforms to.+type CloudSearchDebugDatasourcesItemsSearchByViewUrlResource =+  "v1"+    Core.:> "debug"+    Core.:> Core.Capture "name" Core.Text+    Core.:> "items:searchByViewUrl"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] SearchItemsByViewUrlRequest+    Core.:> Core.Post '[Core.JSON] SearchItemsByViewUrlResponse++-- | Fetches the item whose viewUrl exactly matches that of the URL provided in the request. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchDebugDatasourcesItemsSearchByViewUrl' smart constructor.+data CloudSearchDebugDatasourcesItemsSearchByViewUrl = CloudSearchDebugDatasourcesItemsSearchByViewUrl+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Source name, format: datasources\/{source_id}+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: SearchItemsByViewUrlRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchDebugDatasourcesItemsSearchByViewUrl' with the minimum fields required to make a request.+newCloudSearchDebugDatasourcesItemsSearchByViewUrl ::+  -- |  Source name, format: datasources\/{source_id} See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  SearchItemsByViewUrlRequest ->+  CloudSearchDebugDatasourcesItemsSearchByViewUrl+newCloudSearchDebugDatasourcesItemsSearchByViewUrl name payload =+  CloudSearchDebugDatasourcesItemsSearchByViewUrl+    { xgafv =+        Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchDebugDatasourcesItemsSearchByViewUrl+  where+  type+    Rs CloudSearchDebugDatasourcesItemsSearchByViewUrl =+      SearchItemsByViewUrlResponse+  type+    Scopes CloudSearchDebugDatasourcesItemsSearchByViewUrl =+      '[CloudSearch'FullControl, CloudSearch'Debug]+  requestClient CloudSearchDebugDatasourcesItemsSearchByViewUrl {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchDebugDatasourcesItemsSearchByViewUrlResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Debug/Datasources/Items/Unmappedids/List.hs view
@@ -0,0 +1,134 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Debug.Datasources.Items.Unmappedids.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- List all unmapped identities for a specific item. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.debug.datasources.items.unmappedids.list@.+module Gogol.CloudSearch.Debug.Datasources.Items.Unmappedids.List+  ( -- * Resource+    CloudSearchDebugDatasourcesItemsUnmappedidsListResource,++    -- ** Constructing a Request+    CloudSearchDebugDatasourcesItemsUnmappedidsList (..),+    newCloudSearchDebugDatasourcesItemsUnmappedidsList,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.debug.datasources.items.unmappedids.list@ method which the+-- 'CloudSearchDebugDatasourcesItemsUnmappedidsList' request conforms to.+type CloudSearchDebugDatasourcesItemsUnmappedidsListResource =+  "v1"+    Core.:> "debug"+    Core.:> Core.Capture "parent" Core.Text+    Core.:> "unmappedids"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListUnmappedIdentitiesResponse++-- | List all unmapped identities for a specific item. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchDebugDatasourcesItemsUnmappedidsList' smart constructor.+data CloudSearchDebugDatasourcesItemsUnmappedidsList = CloudSearchDebugDatasourcesItemsUnmappedidsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | Maximum number of items to fetch in a request. Defaults to 100.+    pageSize :: (Core.Maybe Core.Int32),+    -- | The next/page/token value returned from a previous List request, if any.+    pageToken :: (Core.Maybe Core.Text),+    -- | The name of the item, in the following format: datasources\/{source_id}\/items\/{ID}+    parent :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchDebugDatasourcesItemsUnmappedidsList' with the minimum fields required to make a request.+newCloudSearchDebugDatasourcesItemsUnmappedidsList ::+  -- |  The name of the item, in the following format: datasources\/{source_id}\/items\/{ID} See 'parent'.+  Core.Text ->+  CloudSearchDebugDatasourcesItemsUnmappedidsList+newCloudSearchDebugDatasourcesItemsUnmappedidsList parent =+  CloudSearchDebugDatasourcesItemsUnmappedidsList+    { xgafv =+        Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      pageSize = Core.Nothing,+      pageToken = Core.Nothing,+      parent = parent,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchDebugDatasourcesItemsUnmappedidsList+  where+  type+    Rs CloudSearchDebugDatasourcesItemsUnmappedidsList =+      ListUnmappedIdentitiesResponse+  type+    Scopes CloudSearchDebugDatasourcesItemsUnmappedidsList =+      '[CloudSearch'FullControl, CloudSearch'Debug]+  requestClient CloudSearchDebugDatasourcesItemsUnmappedidsList {..} =+    go+      parent+      xgafv+      accessToken+      callback+      debugOptionsEnableDebugging+      pageSize+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchDebugDatasourcesItemsUnmappedidsListResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Debug/Identitysources/Items/ListForunmappedidentity.hs view
@@ -0,0 +1,147 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Debug.Identitysources.Items.ListForunmappedidentity+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists names of items associated with an unmapped identity. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.debug.identitysources.items.listForunmappedidentity@.+module Gogol.CloudSearch.Debug.Identitysources.Items.ListForunmappedidentity+  ( -- * Resource+    CloudSearchDebugIdentitysourcesItemsListForunmappedidentityResource,++    -- ** Constructing a Request+    CloudSearchDebugIdentitysourcesItemsListForunmappedidentity (..),+    newCloudSearchDebugIdentitysourcesItemsListForunmappedidentity,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.debug.identitysources.items.listForunmappedidentity@ method which the+-- 'CloudSearchDebugIdentitysourcesItemsListForunmappedidentity' request conforms to.+type CloudSearchDebugIdentitysourcesItemsListForunmappedidentityResource =+  "v1"+    Core.:> "debug"+    Core.:> Core.Capture "parent" Core.Text+    Core.:> "items:forunmappedidentity"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "groupResourceName" Core.Text+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "userResourceName" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListItemNamesForUnmappedIdentityResponse++-- | Lists names of items associated with an unmapped identity. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchDebugIdentitysourcesItemsListForunmappedidentity' smart constructor.+data CloudSearchDebugIdentitysourcesItemsListForunmappedidentity = CloudSearchDebugIdentitysourcesItemsListForunmappedidentity+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    groupResourceName :: (Core.Maybe Core.Text),+    -- | Maximum number of items to fetch in a request. Defaults to 100.+    pageSize :: (Core.Maybe Core.Int32),+    -- | The next/page/token value returned from a previous List request, if any.+    pageToken :: (Core.Maybe Core.Text),+    -- | The name of the identity source, in the following format: identitysources\/{source_id}}+    parent :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text),+    userResourceName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchDebugIdentitysourcesItemsListForunmappedidentity' with the minimum fields required to make a request.+newCloudSearchDebugIdentitysourcesItemsListForunmappedidentity ::+  -- |  The name of the identity source, in the following format: identitysources\/{source_id}} See 'parent'.+  Core.Text ->+  CloudSearchDebugIdentitysourcesItemsListForunmappedidentity+newCloudSearchDebugIdentitysourcesItemsListForunmappedidentity+  parent =+    CloudSearchDebugIdentitysourcesItemsListForunmappedidentity+      { xgafv =+          Core.Nothing,+        accessToken = Core.Nothing,+        callback = Core.Nothing,+        debugOptionsEnableDebugging =+          Core.Nothing,+        groupResourceName = Core.Nothing,+        pageSize = Core.Nothing,+        pageToken = Core.Nothing,+        parent = parent,+        uploadType = Core.Nothing,+        uploadProtocol = Core.Nothing,+        userResourceName = Core.Nothing+      }++instance+  Core.GoogleRequest+    CloudSearchDebugIdentitysourcesItemsListForunmappedidentity+  where+  type+    Rs CloudSearchDebugIdentitysourcesItemsListForunmappedidentity =+      ListItemNamesForUnmappedIdentityResponse+  type+    Scopes+      CloudSearchDebugIdentitysourcesItemsListForunmappedidentity =+      '[CloudSearch'FullControl, CloudSearch'Debug]+  requestClient+    CloudSearchDebugIdentitysourcesItemsListForunmappedidentity {..} =+      go+        parent+        xgafv+        accessToken+        callback+        debugOptionsEnableDebugging+        groupResourceName+        pageSize+        pageToken+        uploadType+        uploadProtocol+        userResourceName+        (Core.Just Core.AltJSON)+        cloudSearchService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  CloudSearchDebugIdentitysourcesItemsListForunmappedidentityResource+            )+            Core.mempty
+ gen/Gogol/CloudSearch/Debug/Identitysources/Unmappedids/List.hs view
@@ -0,0 +1,144 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Debug.Identitysources.Unmappedids.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists unmapped user identities for an identity source. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.debug.identitysources.unmappedids.list@.+module Gogol.CloudSearch.Debug.Identitysources.Unmappedids.List+  ( -- * Resource+    CloudSearchDebugIdentitysourcesUnmappedidsListResource,++    -- ** Constructing a Request+    CloudSearchDebugIdentitysourcesUnmappedidsList (..),+    newCloudSearchDebugIdentitysourcesUnmappedidsList,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.debug.identitysources.unmappedids.list@ method which the+-- 'CloudSearchDebugIdentitysourcesUnmappedidsList' request conforms to.+type CloudSearchDebugIdentitysourcesUnmappedidsListResource =+  "v1"+    Core.:> "debug"+    Core.:> Core.Capture "parent" Core.Text+    Core.:> "unmappedids"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam+              "resolutionStatusCode"+              DebugIdentitysourcesUnmappedidsListResolutionStatusCode+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListUnmappedIdentitiesResponse++-- | Lists unmapped user identities for an identity source. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchDebugIdentitysourcesUnmappedidsList' smart constructor.+data CloudSearchDebugIdentitysourcesUnmappedidsList = CloudSearchDebugIdentitysourcesUnmappedidsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | Maximum number of items to fetch in a request. Defaults to 100.+    pageSize :: (Core.Maybe Core.Int32),+    -- | The next/page/token value returned from a previous List request, if any.+    pageToken :: (Core.Maybe Core.Text),+    -- | The name of the identity source, in the following format: identitysources\/{source_id}+    parent :: Core.Text,+    -- | Limit users selection to this status.+    resolutionStatusCode ::+      ( Core.Maybe+          DebugIdentitysourcesUnmappedidsListResolutionStatusCode+      ),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchDebugIdentitysourcesUnmappedidsList' with the minimum fields required to make a request.+newCloudSearchDebugIdentitysourcesUnmappedidsList ::+  -- |  The name of the identity source, in the following format: identitysources\/{source_id} See 'parent'.+  Core.Text ->+  CloudSearchDebugIdentitysourcesUnmappedidsList+newCloudSearchDebugIdentitysourcesUnmappedidsList parent =+  CloudSearchDebugIdentitysourcesUnmappedidsList+    { xgafv =+        Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      pageSize = Core.Nothing,+      pageToken = Core.Nothing,+      parent = parent,+      resolutionStatusCode = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchDebugIdentitysourcesUnmappedidsList+  where+  type+    Rs CloudSearchDebugIdentitysourcesUnmappedidsList =+      ListUnmappedIdentitiesResponse+  type+    Scopes CloudSearchDebugIdentitysourcesUnmappedidsList =+      '[CloudSearch'FullControl, CloudSearch'Debug]+  requestClient CloudSearchDebugIdentitysourcesUnmappedidsList {..} =+    go+      parent+      xgafv+      accessToken+      callback+      debugOptionsEnableDebugging+      pageSize+      pageToken+      resolutionStatusCode+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchDebugIdentitysourcesUnmappedidsListResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Indexing/Datasources/DeleteSchema.hs view
@@ -0,0 +1,124 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Indexing.Datasources.DeleteSchema+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes the schema of a data source. __Note:__ This API requires an admin or service account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.deleteSchema@.+module Gogol.CloudSearch.Indexing.Datasources.DeleteSchema+  ( -- * Resource+    CloudSearchIndexingDatasourcesDeleteSchemaResource,++    -- ** Constructing a Request+    CloudSearchIndexingDatasourcesDeleteSchema (..),+    newCloudSearchIndexingDatasourcesDeleteSchema,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.indexing.datasources.deleteSchema@ method which the+-- 'CloudSearchIndexingDatasourcesDeleteSchema' request conforms to.+type CloudSearchIndexingDatasourcesDeleteSchemaResource =+  "v1"+    Core.:> "indexing"+    Core.:> Core.Capture "name" Core.Text+    Core.:> "schema"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Delete '[Core.JSON] Operation++-- | Deletes the schema of a data source. __Note:__ This API requires an admin or service account to execute.+--+-- /See:/ 'newCloudSearchIndexingDatasourcesDeleteSchema' smart constructor.+data CloudSearchIndexingDatasourcesDeleteSchema = CloudSearchIndexingDatasourcesDeleteSchema+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | The name of the data source to delete Schema. Format: datasources\/{source_id}+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchIndexingDatasourcesDeleteSchema' with the minimum fields required to make a request.+newCloudSearchIndexingDatasourcesDeleteSchema ::+  -- |  The name of the data source to delete Schema. Format: datasources\/{source_id} See 'name'.+  Core.Text ->+  CloudSearchIndexingDatasourcesDeleteSchema+newCloudSearchIndexingDatasourcesDeleteSchema name =+  CloudSearchIndexingDatasourcesDeleteSchema+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchIndexingDatasourcesDeleteSchema+  where+  type Rs CloudSearchIndexingDatasourcesDeleteSchema = Operation+  type+    Scopes CloudSearchIndexingDatasourcesDeleteSchema =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing+       ]+  requestClient CloudSearchIndexingDatasourcesDeleteSchema {..} =+    go+      name+      xgafv+      accessToken+      callback+      debugOptionsEnableDebugging+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchIndexingDatasourcesDeleteSchemaResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Indexing/Datasources/GetSchema.hs view
@@ -0,0 +1,121 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Indexing.Datasources.GetSchema+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets the schema of a data source. __Note:__ This API requires an admin or service account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.getSchema@.+module Gogol.CloudSearch.Indexing.Datasources.GetSchema+  ( -- * Resource+    CloudSearchIndexingDatasourcesGetSchemaResource,++    -- ** Constructing a Request+    CloudSearchIndexingDatasourcesGetSchema (..),+    newCloudSearchIndexingDatasourcesGetSchema,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.indexing.datasources.getSchema@ method which the+-- 'CloudSearchIndexingDatasourcesGetSchema' request conforms to.+type CloudSearchIndexingDatasourcesGetSchemaResource =+  "v1"+    Core.:> "indexing"+    Core.:> Core.Capture "name" Core.Text+    Core.:> "schema"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Schema++-- | Gets the schema of a data source. __Note:__ This API requires an admin or service account to execute.+--+-- /See:/ 'newCloudSearchIndexingDatasourcesGetSchema' smart constructor.+data CloudSearchIndexingDatasourcesGetSchema = CloudSearchIndexingDatasourcesGetSchema+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | The name of the data source to get Schema. Format: datasources\/{source_id}+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchIndexingDatasourcesGetSchema' with the minimum fields required to make a request.+newCloudSearchIndexingDatasourcesGetSchema ::+  -- |  The name of the data source to get Schema. Format: datasources\/{source_id} See 'name'.+  Core.Text ->+  CloudSearchIndexingDatasourcesGetSchema+newCloudSearchIndexingDatasourcesGetSchema name =+  CloudSearchIndexingDatasourcesGetSchema+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchIndexingDatasourcesGetSchema where+  type Rs CloudSearchIndexingDatasourcesGetSchema = Schema+  type+    Scopes CloudSearchIndexingDatasourcesGetSchema =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing+       ]+  requestClient CloudSearchIndexingDatasourcesGetSchema {..} =+    go+      name+      xgafv+      accessToken+      callback+      debugOptionsEnableDebugging+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchIndexingDatasourcesGetSchemaResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Indexing/Datasources/Items/Delete.hs view
@@ -0,0 +1,135 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Indexing.Datasources.Items.Delete+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes Item resource for the specified resource name. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.delete@.+module Gogol.CloudSearch.Indexing.Datasources.Items.Delete+  ( -- * Resource+    CloudSearchIndexingDatasourcesItemsDeleteResource,++    -- ** Constructing a Request+    CloudSearchIndexingDatasourcesItemsDelete (..),+    newCloudSearchIndexingDatasourcesItemsDelete,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.indexing.datasources.items.delete@ method which the+-- 'CloudSearchIndexingDatasourcesItemsDelete' request conforms to.+type CloudSearchIndexingDatasourcesItemsDeleteResource =+  "v1"+    Core.:> "indexing"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "connectorName" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "mode" IndexingDatasourcesItemsDeleteMode+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "version" Core.Base64+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Delete '[Core.JSON] Operation++-- | Deletes Item resource for the specified resource name. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ 'newCloudSearchIndexingDatasourcesItemsDelete' smart constructor.+data CloudSearchIndexingDatasourcesItemsDelete = CloudSearchIndexingDatasourcesItemsDelete+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of connector making this call. Format: datasources\/{source_id}\/connectors\/{ID}+    connectorName :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | Required. The RequestMode for this request.+    mode :: (Core.Maybe IndexingDatasourcesItemsDeleteMode),+    -- | Required. The name of the item to delete. Format: datasources\/{source/id}\/items\/{item/id}+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text),+    -- | Required. The incremented version of the item to delete from the index. The indexing system stores the version from the datasource as a byte string and compares the Item version in the index to the version of the queued Item using lexical ordering. Cloud Search Indexing won\'t delete any queued item with a version value that is less than or equal to the version of the currently indexed item. The maximum length for this field is 1024 bytes. For information on how item version affects the deletion process, refer to <https://developers.google.com/cloud-search/docs/guides/operations Handle revisions after manual deletes>.+    version :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchIndexingDatasourcesItemsDelete' with the minimum fields required to make a request.+newCloudSearchIndexingDatasourcesItemsDelete ::+  -- |  Required. The name of the item to delete. Format: datasources\/{source/id}\/items\/{item/id} See 'name'.+  Core.Text ->+  CloudSearchIndexingDatasourcesItemsDelete+newCloudSearchIndexingDatasourcesItemsDelete name =+  CloudSearchIndexingDatasourcesItemsDelete+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      connectorName = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      mode = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing,+      version = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchIndexingDatasourcesItemsDelete+  where+  type Rs CloudSearchIndexingDatasourcesItemsDelete = Operation+  type+    Scopes CloudSearchIndexingDatasourcesItemsDelete =+      '[CloudSearch'FullControl, CloudSearch'Indexing]+  requestClient CloudSearchIndexingDatasourcesItemsDelete {..} =+    go+      name+      xgafv+      accessToken+      callback+      connectorName+      debugOptionsEnableDebugging+      mode+      uploadType+      uploadProtocol+      version+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchIndexingDatasourcesItemsDeleteResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Indexing/Datasources/Items/DeleteQueueItems.hs view
@@ -0,0 +1,128 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Indexing.Datasources.Items.DeleteQueueItems+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes all items in a queue. This method is useful for deleting stale items. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.deleteQueueItems@.+module Gogol.CloudSearch.Indexing.Datasources.Items.DeleteQueueItems+  ( -- * Resource+    CloudSearchIndexingDatasourcesItemsDeleteQueueItemsResource,++    -- ** Constructing a Request+    CloudSearchIndexingDatasourcesItemsDeleteQueueItems (..),+    newCloudSearchIndexingDatasourcesItemsDeleteQueueItems,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.indexing.datasources.items.deleteQueueItems@ method which the+-- 'CloudSearchIndexingDatasourcesItemsDeleteQueueItems' request conforms to.+type CloudSearchIndexingDatasourcesItemsDeleteQueueItemsResource =+  "v1"+    Core.:> "indexing"+    Core.:> Core.Capture "name" Core.Text+    Core.:> "items:deleteQueueItems"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] DeleteQueueItemsRequest+    Core.:> Core.Post '[Core.JSON] Operation++-- | Deletes all items in a queue. This method is useful for deleting stale items. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ 'newCloudSearchIndexingDatasourcesItemsDeleteQueueItems' smart constructor.+data CloudSearchIndexingDatasourcesItemsDeleteQueueItems = CloudSearchIndexingDatasourcesItemsDeleteQueueItems+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the Data Source to delete items in a queue. Format: datasources\/{source_id}+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: DeleteQueueItemsRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchIndexingDatasourcesItemsDeleteQueueItems' with the minimum fields required to make a request.+newCloudSearchIndexingDatasourcesItemsDeleteQueueItems ::+  -- |  The name of the Data Source to delete items in a queue. Format: datasources\/{source_id} See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  DeleteQueueItemsRequest ->+  CloudSearchIndexingDatasourcesItemsDeleteQueueItems+newCloudSearchIndexingDatasourcesItemsDeleteQueueItems name payload =+  CloudSearchIndexingDatasourcesItemsDeleteQueueItems+    { xgafv =+        Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchIndexingDatasourcesItemsDeleteQueueItems+  where+  type+    Rs CloudSearchIndexingDatasourcesItemsDeleteQueueItems =+      Operation+  type+    Scopes CloudSearchIndexingDatasourcesItemsDeleteQueueItems =+      '[CloudSearch'FullControl, CloudSearch'Indexing]+  requestClient+    CloudSearchIndexingDatasourcesItemsDeleteQueueItems {..} =+      go+        name+        xgafv+        accessToken+        callback+        uploadType+        uploadProtocol+        (Core.Just Core.AltJSON)+        payload+        cloudSearchService+      where+        go =+          Core.buildClient+            ( Core.Proxy ::+                Core.Proxy+                  CloudSearchIndexingDatasourcesItemsDeleteQueueItemsResource+            )+            Core.mempty
+ gen/Gogol/CloudSearch/Indexing/Datasources/Items/Get.hs view
@@ -0,0 +1,122 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Indexing.Datasources.Items.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets Item resource by item name. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.get@.+module Gogol.CloudSearch.Indexing.Datasources.Items.Get+  ( -- * Resource+    CloudSearchIndexingDatasourcesItemsGetResource,++    -- ** Constructing a Request+    CloudSearchIndexingDatasourcesItemsGet (..),+    newCloudSearchIndexingDatasourcesItemsGet,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.indexing.datasources.items.get@ method which the+-- 'CloudSearchIndexingDatasourcesItemsGet' request conforms to.+type CloudSearchIndexingDatasourcesItemsGetResource =+  "v1"+    Core.:> "indexing"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "connectorName" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Item++-- | Gets Item resource by item name. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ 'newCloudSearchIndexingDatasourcesItemsGet' smart constructor.+data CloudSearchIndexingDatasourcesItemsGet = CloudSearchIndexingDatasourcesItemsGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of connector making this call. Format: datasources\/{source_id}\/connectors\/{ID}+    connectorName :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | The name of the item to get info. Format: datasources\/{source/id}\/items\/{item/id}+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchIndexingDatasourcesItemsGet' with the minimum fields required to make a request.+newCloudSearchIndexingDatasourcesItemsGet ::+  -- |  The name of the item to get info. Format: datasources\/{source/id}\/items\/{item/id} See 'name'.+  Core.Text ->+  CloudSearchIndexingDatasourcesItemsGet+newCloudSearchIndexingDatasourcesItemsGet name =+  CloudSearchIndexingDatasourcesItemsGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      connectorName = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchIndexingDatasourcesItemsGet where+  type Rs CloudSearchIndexingDatasourcesItemsGet = Item+  type+    Scopes CloudSearchIndexingDatasourcesItemsGet =+      '[CloudSearch'FullControl, CloudSearch'Indexing]+  requestClient CloudSearchIndexingDatasourcesItemsGet {..} =+    go+      name+      xgafv+      accessToken+      callback+      connectorName+      debugOptionsEnableDebugging+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchIndexingDatasourcesItemsGetResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Indexing/Datasources/Items/Index.hs view
@@ -0,0 +1,122 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Indexing.Datasources.Items.Index+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates Item ACL, metadata, and content. It will insert the Item if it does not exist. This method does not support partial updates. Fields with no provided values are cleared out in the Cloud Search index. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.index@.+module Gogol.CloudSearch.Indexing.Datasources.Items.Index+  ( -- * Resource+    CloudSearchIndexingDatasourcesItemsIndexResource,++    -- ** Constructing a Request+    CloudSearchIndexingDatasourcesItemsIndex (..),+    newCloudSearchIndexingDatasourcesItemsIndex,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.indexing.datasources.items.index@ method which the+-- 'CloudSearchIndexingDatasourcesItemsIndex' request conforms to.+type CloudSearchIndexingDatasourcesItemsIndexResource =+  "v1"+    Core.:> "indexing"+    Core.:> Core.CaptureMode "name" "index" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] IndexItemRequest+    Core.:> Core.Post '[Core.JSON] Operation++-- | Updates Item ACL, metadata, and content. It will insert the Item if it does not exist. This method does not support partial updates. Fields with no provided values are cleared out in the Cloud Search index. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ 'newCloudSearchIndexingDatasourcesItemsIndex' smart constructor.+data CloudSearchIndexingDatasourcesItemsIndex = CloudSearchIndexingDatasourcesItemsIndex+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the Item. Format: datasources\/{source/id}\/items\/{item/id} This is a required field. The maximum length is 1536 characters.+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: IndexItemRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchIndexingDatasourcesItemsIndex' with the minimum fields required to make a request.+newCloudSearchIndexingDatasourcesItemsIndex ::+  -- |  The name of the Item. Format: datasources\/{source/id}\/items\/{item/id} This is a required field. The maximum length is 1536 characters. See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  IndexItemRequest ->+  CloudSearchIndexingDatasourcesItemsIndex+newCloudSearchIndexingDatasourcesItemsIndex name payload =+  CloudSearchIndexingDatasourcesItemsIndex+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchIndexingDatasourcesItemsIndex+  where+  type Rs CloudSearchIndexingDatasourcesItemsIndex = Operation+  type+    Scopes CloudSearchIndexingDatasourcesItemsIndex =+      '[CloudSearch'FullControl, CloudSearch'Indexing]+  requestClient CloudSearchIndexingDatasourcesItemsIndex {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchIndexingDatasourcesItemsIndexResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Indexing/Datasources/Items/List.hs view
@@ -0,0 +1,138 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Indexing.Datasources.Items.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists all or a subset of Item resources. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.list@.+module Gogol.CloudSearch.Indexing.Datasources.Items.List+  ( -- * Resource+    CloudSearchIndexingDatasourcesItemsListResource,++    -- ** Constructing a Request+    CloudSearchIndexingDatasourcesItemsList (..),+    newCloudSearchIndexingDatasourcesItemsList,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.indexing.datasources.items.list@ method which the+-- 'CloudSearchIndexingDatasourcesItemsList' request conforms to.+type CloudSearchIndexingDatasourcesItemsListResource =+  "v1"+    Core.:> "indexing"+    Core.:> Core.Capture "name" Core.Text+    Core.:> "items"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "brief" Core.Bool+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "connectorName" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListItemsResponse++-- | Lists all or a subset of Item resources. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ 'newCloudSearchIndexingDatasourcesItemsList' smart constructor.+data CloudSearchIndexingDatasourcesItemsList = CloudSearchIndexingDatasourcesItemsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | When set to true, the indexing system only populates the following fields: name, version, queue. metadata.hash, metadata.title, metadata.sourceRepositoryURL, metadata.objectType, metadata.createTime, metadata.updateTime, metadata.contentLanguage, metadata.mimeType, structured_data.hash, content.hash, itemType, itemStatus.code, itemStatus.processingError.code, itemStatus.repositoryError.type, If this value is false, then all the fields are populated in Item.+    brief :: (Core.Maybe Core.Bool),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of connector making this call. Format: datasources\/{source_id}\/connectors\/{ID}+    connectorName :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | The name of the Data Source to list Items. Format: datasources\/{source_id}+    name :: Core.Text,+    -- | Maximum number of items to fetch in a request. The max value is 1000 when brief is true. The max value is 10 if brief is false. The default value is 10+    pageSize :: (Core.Maybe Core.Int32),+    -- | The next/page/token value returned from a previous List request, if any.+    pageToken :: (Core.Maybe Core.Text),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchIndexingDatasourcesItemsList' with the minimum fields required to make a request.+newCloudSearchIndexingDatasourcesItemsList ::+  -- |  The name of the Data Source to list Items. Format: datasources\/{source_id} See 'name'.+  Core.Text ->+  CloudSearchIndexingDatasourcesItemsList+newCloudSearchIndexingDatasourcesItemsList name =+  CloudSearchIndexingDatasourcesItemsList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      brief = Core.Nothing,+      callback = Core.Nothing,+      connectorName = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      name = name,+      pageSize = Core.Nothing,+      pageToken = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchIndexingDatasourcesItemsList where+  type Rs CloudSearchIndexingDatasourcesItemsList = ListItemsResponse+  type+    Scopes CloudSearchIndexingDatasourcesItemsList =+      '[CloudSearch'FullControl, CloudSearch'Indexing]+  requestClient CloudSearchIndexingDatasourcesItemsList {..} =+    go+      name+      xgafv+      accessToken+      brief+      callback+      connectorName+      debugOptionsEnableDebugging+      pageSize+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchIndexingDatasourcesItemsListResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Indexing/Datasources/Items/Poll.hs view
@@ -0,0 +1,120 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Indexing.Datasources.Items.Poll+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Polls for unreserved items from the indexing queue and marks a set as reserved, starting with items that have the oldest timestamp from the highest priority ItemStatus. The priority order is as follows: ERROR MODIFIED NEW_ITEM ACCEPTED Reserving items ensures that polling from other threads cannot create overlapping sets. After handling the reserved items, the client should put items back into the unreserved state, either by calling index, or by calling push with the type REQUEUE. Items automatically become available (unreserved) after 4 hours even if no update or push method is called. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.poll@.+module Gogol.CloudSearch.Indexing.Datasources.Items.Poll+  ( -- * Resource+    CloudSearchIndexingDatasourcesItemsPollResource,++    -- ** Constructing a Request+    CloudSearchIndexingDatasourcesItemsPoll (..),+    newCloudSearchIndexingDatasourcesItemsPoll,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.indexing.datasources.items.poll@ method which the+-- 'CloudSearchIndexingDatasourcesItemsPoll' request conforms to.+type CloudSearchIndexingDatasourcesItemsPollResource =+  "v1"+    Core.:> "indexing"+    Core.:> Core.Capture "name" Core.Text+    Core.:> "items:poll"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] PollItemsRequest+    Core.:> Core.Post '[Core.JSON] PollItemsResponse++-- | Polls for unreserved items from the indexing queue and marks a set as reserved, starting with items that have the oldest timestamp from the highest priority ItemStatus. The priority order is as follows: ERROR MODIFIED NEW_ITEM ACCEPTED Reserving items ensures that polling from other threads cannot create overlapping sets. After handling the reserved items, the client should put items back into the unreserved state, either by calling index, or by calling push with the type REQUEUE. Items automatically become available (unreserved) after 4 hours even if no update or push method is called. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ 'newCloudSearchIndexingDatasourcesItemsPoll' smart constructor.+data CloudSearchIndexingDatasourcesItemsPoll = CloudSearchIndexingDatasourcesItemsPoll+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the Data Source to poll items. Format: datasources\/{source_id}+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: PollItemsRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchIndexingDatasourcesItemsPoll' with the minimum fields required to make a request.+newCloudSearchIndexingDatasourcesItemsPoll ::+  -- |  The name of the Data Source to poll items. Format: datasources\/{source_id} See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  PollItemsRequest ->+  CloudSearchIndexingDatasourcesItemsPoll+newCloudSearchIndexingDatasourcesItemsPoll name payload =+  CloudSearchIndexingDatasourcesItemsPoll+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchIndexingDatasourcesItemsPoll where+  type Rs CloudSearchIndexingDatasourcesItemsPoll = PollItemsResponse+  type+    Scopes CloudSearchIndexingDatasourcesItemsPoll =+      '[CloudSearch'FullControl, CloudSearch'Indexing]+  requestClient CloudSearchIndexingDatasourcesItemsPoll {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchIndexingDatasourcesItemsPollResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Indexing/Datasources/Items/Push.hs view
@@ -0,0 +1,119 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Indexing.Datasources.Items.Push+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Pushes an item onto a queue for later polling and updating. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.push@.+module Gogol.CloudSearch.Indexing.Datasources.Items.Push+  ( -- * Resource+    CloudSearchIndexingDatasourcesItemsPushResource,++    -- ** Constructing a Request+    CloudSearchIndexingDatasourcesItemsPush (..),+    newCloudSearchIndexingDatasourcesItemsPush,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.indexing.datasources.items.push@ method which the+-- 'CloudSearchIndexingDatasourcesItemsPush' request conforms to.+type CloudSearchIndexingDatasourcesItemsPushResource =+  "v1"+    Core.:> "indexing"+    Core.:> Core.CaptureMode "name" "push" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] PushItemRequest+    Core.:> Core.Post '[Core.JSON] Item++-- | Pushes an item onto a queue for later polling and updating. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ 'newCloudSearchIndexingDatasourcesItemsPush' smart constructor.+data CloudSearchIndexingDatasourcesItemsPush = CloudSearchIndexingDatasourcesItemsPush+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the item to push into the indexing queue. Format: datasources\/{source_id}\/items\/{ID} This is a required field. The maximum length is 1536 characters.+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: PushItemRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchIndexingDatasourcesItemsPush' with the minimum fields required to make a request.+newCloudSearchIndexingDatasourcesItemsPush ::+  -- |  The name of the item to push into the indexing queue. Format: datasources\/{source_id}\/items\/{ID} This is a required field. The maximum length is 1536 characters. See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  PushItemRequest ->+  CloudSearchIndexingDatasourcesItemsPush+newCloudSearchIndexingDatasourcesItemsPush name payload =+  CloudSearchIndexingDatasourcesItemsPush+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchIndexingDatasourcesItemsPush where+  type Rs CloudSearchIndexingDatasourcesItemsPush = Item+  type+    Scopes CloudSearchIndexingDatasourcesItemsPush =+      '[CloudSearch'FullControl, CloudSearch'Indexing]+  requestClient CloudSearchIndexingDatasourcesItemsPush {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchIndexingDatasourcesItemsPushResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Indexing/Datasources/Items/Unreserve.hs view
@@ -0,0 +1,124 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Indexing.Datasources.Items.Unreserve+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Unreserves all items from a queue, making them all eligible to be polled. This method is useful for resetting the indexing queue after a connector has been restarted. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.unreserve@.+module Gogol.CloudSearch.Indexing.Datasources.Items.Unreserve+  ( -- * Resource+    CloudSearchIndexingDatasourcesItemsUnreserveResource,++    -- ** Constructing a Request+    CloudSearchIndexingDatasourcesItemsUnreserve (..),+    newCloudSearchIndexingDatasourcesItemsUnreserve,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.indexing.datasources.items.unreserve@ method which the+-- 'CloudSearchIndexingDatasourcesItemsUnreserve' request conforms to.+type CloudSearchIndexingDatasourcesItemsUnreserveResource =+  "v1"+    Core.:> "indexing"+    Core.:> Core.Capture "name" Core.Text+    Core.:> "items:unreserve"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] UnreserveItemsRequest+    Core.:> Core.Post '[Core.JSON] Operation++-- | Unreserves all items from a queue, making them all eligible to be polled. This method is useful for resetting the indexing queue after a connector has been restarted. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ 'newCloudSearchIndexingDatasourcesItemsUnreserve' smart constructor.+data CloudSearchIndexingDatasourcesItemsUnreserve = CloudSearchIndexingDatasourcesItemsUnreserve+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the Data Source to unreserve all items. Format: datasources\/{source_id}+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: UnreserveItemsRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchIndexingDatasourcesItemsUnreserve' with the minimum fields required to make a request.+newCloudSearchIndexingDatasourcesItemsUnreserve ::+  -- |  The name of the Data Source to unreserve all items. Format: datasources\/{source_id} See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  UnreserveItemsRequest ->+  CloudSearchIndexingDatasourcesItemsUnreserve+newCloudSearchIndexingDatasourcesItemsUnreserve name payload =+  CloudSearchIndexingDatasourcesItemsUnreserve+    { xgafv =+        Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchIndexingDatasourcesItemsUnreserve+  where+  type Rs CloudSearchIndexingDatasourcesItemsUnreserve = Operation+  type+    Scopes CloudSearchIndexingDatasourcesItemsUnreserve =+      '[CloudSearch'FullControl, CloudSearch'Indexing]+  requestClient CloudSearchIndexingDatasourcesItemsUnreserve {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchIndexingDatasourcesItemsUnreserveResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Indexing/Datasources/Items/Upload.hs view
@@ -0,0 +1,122 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Indexing.Datasources.Items.Upload+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates an upload session for uploading item content. For items smaller than 100 KB, it\'s easier to embed the content inline within an index request. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.upload@.+module Gogol.CloudSearch.Indexing.Datasources.Items.Upload+  ( -- * Resource+    CloudSearchIndexingDatasourcesItemsUploadResource,++    -- ** Constructing a Request+    CloudSearchIndexingDatasourcesItemsUpload (..),+    newCloudSearchIndexingDatasourcesItemsUpload,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.indexing.datasources.items.upload@ method which the+-- 'CloudSearchIndexingDatasourcesItemsUpload' request conforms to.+type CloudSearchIndexingDatasourcesItemsUploadResource =+  "v1"+    Core.:> "indexing"+    Core.:> Core.CaptureMode "name" "upload" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] StartUploadItemRequest+    Core.:> Core.Post '[Core.JSON] UploadItemRef++-- | Creates an upload session for uploading item content. For items smaller than 100 KB, it\'s easier to embed the content inline within an index request. This API requires an admin or service account to execute. The service account used is the one whitelisted in the corresponding data source.+--+-- /See:/ 'newCloudSearchIndexingDatasourcesItemsUpload' smart constructor.+data CloudSearchIndexingDatasourcesItemsUpload = CloudSearchIndexingDatasourcesItemsUpload+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the Item to start a resumable upload. Format: datasources\/{source/id}\/items\/{item/id}. The maximum length is 1536 bytes.+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: StartUploadItemRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchIndexingDatasourcesItemsUpload' with the minimum fields required to make a request.+newCloudSearchIndexingDatasourcesItemsUpload ::+  -- |  The name of the Item to start a resumable upload. Format: datasources\/{source/id}\/items\/{item/id}. The maximum length is 1536 bytes. See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  StartUploadItemRequest ->+  CloudSearchIndexingDatasourcesItemsUpload+newCloudSearchIndexingDatasourcesItemsUpload name payload =+  CloudSearchIndexingDatasourcesItemsUpload+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchIndexingDatasourcesItemsUpload+  where+  type Rs CloudSearchIndexingDatasourcesItemsUpload = UploadItemRef+  type+    Scopes CloudSearchIndexingDatasourcesItemsUpload =+      '[CloudSearch'FullControl, CloudSearch'Indexing]+  requestClient CloudSearchIndexingDatasourcesItemsUpload {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchIndexingDatasourcesItemsUploadResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Indexing/Datasources/UpdateSchema.hs view
@@ -0,0 +1,126 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Indexing.Datasources.UpdateSchema+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates the schema of a data source. This method does not perform incremental updates to the schema. Instead, this method updates the schema by overwriting the entire schema. __Note:__ This API requires an admin or service account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.updateSchema@.+module Gogol.CloudSearch.Indexing.Datasources.UpdateSchema+  ( -- * Resource+    CloudSearchIndexingDatasourcesUpdateSchemaResource,++    -- ** Constructing a Request+    CloudSearchIndexingDatasourcesUpdateSchema (..),+    newCloudSearchIndexingDatasourcesUpdateSchema,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.indexing.datasources.updateSchema@ method which the+-- 'CloudSearchIndexingDatasourcesUpdateSchema' request conforms to.+type CloudSearchIndexingDatasourcesUpdateSchemaResource =+  "v1"+    Core.:> "indexing"+    Core.:> Core.Capture "name" Core.Text+    Core.:> "schema"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] UpdateSchemaRequest+    Core.:> Core.Put '[Core.JSON] Operation++-- | Updates the schema of a data source. This method does not perform incremental updates to the schema. Instead, this method updates the schema by overwriting the entire schema. __Note:__ This API requires an admin or service account to execute.+--+-- /See:/ 'newCloudSearchIndexingDatasourcesUpdateSchema' smart constructor.+data CloudSearchIndexingDatasourcesUpdateSchema = CloudSearchIndexingDatasourcesUpdateSchema+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the data source to update Schema. Format: datasources\/{source_id}+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: UpdateSchemaRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchIndexingDatasourcesUpdateSchema' with the minimum fields required to make a request.+newCloudSearchIndexingDatasourcesUpdateSchema ::+  -- |  The name of the data source to update Schema. Format: datasources\/{source_id} See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  UpdateSchemaRequest ->+  CloudSearchIndexingDatasourcesUpdateSchema+newCloudSearchIndexingDatasourcesUpdateSchema name payload =+  CloudSearchIndexingDatasourcesUpdateSchema+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchIndexingDatasourcesUpdateSchema+  where+  type Rs CloudSearchIndexingDatasourcesUpdateSchema = Operation+  type+    Scopes CloudSearchIndexingDatasourcesUpdateSchema =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing+       ]+  requestClient CloudSearchIndexingDatasourcesUpdateSchema {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchIndexingDatasourcesUpdateSchemaResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/InitializeCustomer.hs view
@@ -0,0 +1,112 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.InitializeCustomer+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Enables @third party@ support in Google Cloud Search. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.initializeCustomer@.+module Gogol.CloudSearch.InitializeCustomer+  ( -- * Resource+    CloudSearchInitializeCustomerResource,++    -- ** Constructing a Request+    CloudSearchInitializeCustomer (..),+    newCloudSearchInitializeCustomer,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.initializeCustomer@ method which the+-- 'CloudSearchInitializeCustomer' request conforms to.+type CloudSearchInitializeCustomerResource =+  "v1:initializeCustomer"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] InitializeCustomerRequest+    Core.:> Core.Post '[Core.JSON] Operation++-- | Enables @third party@ support in Google Cloud Search. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchInitializeCustomer' smart constructor.+data CloudSearchInitializeCustomer = CloudSearchInitializeCustomer+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: InitializeCustomerRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchInitializeCustomer' with the minimum fields required to make a request.+newCloudSearchInitializeCustomer ::+  -- |  Multipart request metadata. See 'payload'.+  InitializeCustomerRequest ->+  CloudSearchInitializeCustomer+newCloudSearchInitializeCustomer payload =+  CloudSearchInitializeCustomer+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchInitializeCustomer where+  type Rs CloudSearchInitializeCustomer = Operation+  type+    Scopes CloudSearchInitializeCustomer =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing+       ]+  requestClient CloudSearchInitializeCustomer {..} =+    go+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchInitializeCustomerResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Internal/Product.hs view
@@ -0,0 +1,10963 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Internal.Product+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Gogol.CloudSearch.Internal.Product+  ( -- * Action+    Action (..),+    newAction,++    -- * AuditLoggingSettings+    AuditLoggingSettings (..),+    newAuditLoggingSettings,++    -- * BackgroundColoredText+    BackgroundColoredText (..),+    newBackgroundColoredText,++    -- * BooleanOperatorOptions+    BooleanOperatorOptions (..),+    newBooleanOperatorOptions,++    -- * BooleanPropertyOptions+    BooleanPropertyOptions (..),+    newBooleanPropertyOptions,++    -- * CheckAccessResponse+    CheckAccessResponse (..),+    newCheckAccessResponse,++    -- * CompositeFilter+    CompositeFilter (..),+    newCompositeFilter,++    -- * Content+    Content (..),+    newContent,++    -- * Context+    Context (..),+    newContext,++    -- * ContextAttribute+    ContextAttribute (..),+    newContextAttribute,++    -- * CustomerIndexStats+    CustomerIndexStats (..),+    newCustomerIndexStats,++    -- * CustomerQueryStats+    CustomerQueryStats (..),+    newCustomerQueryStats,++    -- * CustomerSearchApplicationStats+    CustomerSearchApplicationStats (..),+    newCustomerSearchApplicationStats,++    -- * CustomerSessionStats+    CustomerSessionStats (..),+    newCustomerSessionStats,++    -- * CustomerSettings+    CustomerSettings (..),+    newCustomerSettings,++    -- * CustomerUserStats+    CustomerUserStats (..),+    newCustomerUserStats,++    -- * DataSource+    DataSource (..),+    newDataSource,++    -- * DataSourceIndexStats+    DataSourceIndexStats (..),+    newDataSourceIndexStats,++    -- * DataSourceRestriction+    DataSourceRestriction (..),+    newDataSourceRestriction,++    -- * Date+    Date (..),+    newDate,++    -- * DateOperatorOptions+    DateOperatorOptions (..),+    newDateOperatorOptions,++    -- * DatePropertyOptions+    DatePropertyOptions (..),+    newDatePropertyOptions,++    -- * DateValues+    DateValues (..),+    newDateValues,++    -- * DebugOptions+    DebugOptions (..),+    newDebugOptions,++    -- * DebugResponse+    DebugResponse (..),+    newDebugResponse,++    -- * DeleteQueueItemsRequest+    DeleteQueueItemsRequest (..),+    newDeleteQueueItemsRequest,++    -- * DisplayedProperty+    DisplayedProperty (..),+    newDisplayedProperty,++    -- * DoubleOperatorOptions+    DoubleOperatorOptions (..),+    newDoubleOperatorOptions,++    -- * DoublePropertyOptions+    DoublePropertyOptions (..),+    newDoublePropertyOptions,++    -- * DoubleValues+    DoubleValues (..),+    newDoubleValues,++    -- * DriveFollowUpRestrict+    DriveFollowUpRestrict (..),+    newDriveFollowUpRestrict,++    -- * DriveLocationRestrict+    DriveLocationRestrict (..),+    newDriveLocationRestrict,++    -- * DriveMimeTypeRestrict+    DriveMimeTypeRestrict (..),+    newDriveMimeTypeRestrict,++    -- * DriveTimeSpanRestrict+    DriveTimeSpanRestrict (..),+    newDriveTimeSpanRestrict,++    -- * EmailAddress+    EmailAddress (..),+    newEmailAddress,++    -- * EnterpriseTopazFrontendTeamsLink+    EnterpriseTopazFrontendTeamsLink (..),+    newEnterpriseTopazFrontendTeamsLink,++    -- * EnterpriseTopazFrontendTeamsPersonCorePhoneNumber+    EnterpriseTopazFrontendTeamsPersonCorePhoneNumber (..),+    newEnterpriseTopazFrontendTeamsPersonCorePhoneNumber,++    -- * EnterpriseTopazSidekickAgendaEntry+    EnterpriseTopazSidekickAgendaEntry (..),+    newEnterpriseTopazSidekickAgendaEntry,++    -- * EnterpriseTopazSidekickAgendaGroupCardProto+    EnterpriseTopazSidekickAgendaGroupCardProto (..),+    newEnterpriseTopazSidekickAgendaGroupCardProto,++    -- * EnterpriseTopazSidekickAgendaGroupCardProtoContext+    EnterpriseTopazSidekickAgendaGroupCardProtoContext (..),+    newEnterpriseTopazSidekickAgendaGroupCardProtoContext,++    -- * EnterpriseTopazSidekickAgendaItem+    EnterpriseTopazSidekickAgendaItem (..),+    newEnterpriseTopazSidekickAgendaItem,++    -- * EnterpriseTopazSidekickAnswerAnswerList+    EnterpriseTopazSidekickAnswerAnswerList (..),+    newEnterpriseTopazSidekickAnswerAnswerList,++    -- * EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer+    EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer (..),+    newEnterpriseTopazSidekickAnswerAnswerListLabeledAnswer,++    -- * EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard+    EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard (..),+    newEnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard,++    -- * EnterpriseTopazSidekickAnswerSuggestedQueryCategory+    EnterpriseTopazSidekickAnswerSuggestedQueryCategory (..),+    newEnterpriseTopazSidekickAnswerSuggestedQueryCategory,++    -- * EnterpriseTopazSidekickAssistCardProto+    EnterpriseTopazSidekickAssistCardProto (..),+    newEnterpriseTopazSidekickAssistCardProto,++    -- * EnterpriseTopazSidekickCardMetadata+    EnterpriseTopazSidekickCardMetadata (..),+    newEnterpriseTopazSidekickCardMetadata,++    -- * EnterpriseTopazSidekickCommonDebugInfo+    EnterpriseTopazSidekickCommonDebugInfo (..),+    newEnterpriseTopazSidekickCommonDebugInfo,++    -- * EnterpriseTopazSidekickCommonDocument+    EnterpriseTopazSidekickCommonDocument (..),+    newEnterpriseTopazSidekickCommonDocument,++    -- * EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata+    EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata (..),+    newEnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata,++    -- * EnterpriseTopazSidekickCommonDocumentJustification+    EnterpriseTopazSidekickCommonDocumentJustification (..),+    newEnterpriseTopazSidekickCommonDocumentJustification,++    -- * EnterpriseTopazSidekickCommonPerson+    EnterpriseTopazSidekickCommonPerson (..),+    newEnterpriseTopazSidekickCommonPerson,++    -- * EnterpriseTopazSidekickCommonPersonBirthday+    EnterpriseTopazSidekickCommonPersonBirthday (..),+    newEnterpriseTopazSidekickCommonPersonBirthday,++    -- * EnterpriseTopazSidekickConflictingEventsCardProto+    EnterpriseTopazSidekickConflictingEventsCardProto (..),+    newEnterpriseTopazSidekickConflictingEventsCardProto,++    -- * EnterpriseTopazSidekickDocumentGroup+    EnterpriseTopazSidekickDocumentGroup (..),+    newEnterpriseTopazSidekickDocumentGroup,++    -- * EnterpriseTopazSidekickDocumentPerCategoryList+    EnterpriseTopazSidekickDocumentPerCategoryList (..),+    newEnterpriseTopazSidekickDocumentPerCategoryList,++    -- * EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry+    EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry (..),+    newEnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry,++    -- * EnterpriseTopazSidekickFindMeetingTimeCardProto+    EnterpriseTopazSidekickFindMeetingTimeCardProto (..),+    newEnterpriseTopazSidekickFindMeetingTimeCardProto,++    -- * EnterpriseTopazSidekickGap+    EnterpriseTopazSidekickGap (..),+    newEnterpriseTopazSidekickGap,++    -- * EnterpriseTopazSidekickGenericAnswerCard+    EnterpriseTopazSidekickGenericAnswerCard (..),+    newEnterpriseTopazSidekickGenericAnswerCard,++    -- * EnterpriseTopazSidekickGetAndKeepAheadCardProto+    EnterpriseTopazSidekickGetAndKeepAheadCardProto (..),+    newEnterpriseTopazSidekickGetAndKeepAheadCardProto,++    -- * EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents+    EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents (..),+    newEnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents,++    -- * EnterpriseTopazSidekickMeetingNotesCardError+    EnterpriseTopazSidekickMeetingNotesCardError (..),+    newEnterpriseTopazSidekickMeetingNotesCardError,++    -- * EnterpriseTopazSidekickMeetingNotesCardProto+    EnterpriseTopazSidekickMeetingNotesCardProto (..),+    newEnterpriseTopazSidekickMeetingNotesCardProto,++    -- * EnterpriseTopazSidekickMeetingNotesCardRequest+    EnterpriseTopazSidekickMeetingNotesCardRequest (..),+    newEnterpriseTopazSidekickMeetingNotesCardRequest,++    -- * EnterpriseTopazSidekickNlpMetadata+    EnterpriseTopazSidekickNlpMetadata (..),+    newEnterpriseTopazSidekickNlpMetadata,++    -- * EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo+    EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo (..),+    newEnterpriseTopazSidekickPeopleAnswerDisambiguationInfo,++    -- * EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson+    EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson (..),+    newEnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson,++    -- * EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader+    EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader (..),+    newEnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader,++    -- * EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard+    EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard (..),+    newEnterpriseTopazSidekickPeopleAnswerPersonAnswerCard,++    -- * EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard+    EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard (..),+    newEnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard,++    -- * EnterpriseTopazSidekickPeopleDisambiguationCard+    EnterpriseTopazSidekickPeopleDisambiguationCard (..),+    newEnterpriseTopazSidekickPeopleDisambiguationCard,++    -- * EnterpriseTopazSidekickPerson+    EnterpriseTopazSidekickPerson (..),+    newEnterpriseTopazSidekickPerson,++    -- * EnterpriseTopazSidekickPersonProfileCard+    EnterpriseTopazSidekickPersonProfileCard (..),+    newEnterpriseTopazSidekickPersonProfileCard,++    -- * EnterpriseTopazSidekickPersonProfileCardRelatedPeople+    EnterpriseTopazSidekickPersonProfileCardRelatedPeople (..),+    newEnterpriseTopazSidekickPersonProfileCardRelatedPeople,++    -- * EnterpriseTopazSidekickPersonalizedDocsCardProto+    EnterpriseTopazSidekickPersonalizedDocsCardProto (..),+    newEnterpriseTopazSidekickPersonalizedDocsCardProto,++    -- * EnterpriseTopazSidekickRankingParams+    EnterpriseTopazSidekickRankingParams (..),+    newEnterpriseTopazSidekickRankingParams,++    -- * EnterpriseTopazSidekickRecentDocumentsCardProto+    EnterpriseTopazSidekickRecentDocumentsCardProto (..),+    newEnterpriseTopazSidekickRecentDocumentsCardProto,++    -- * EnterpriseTopazSidekickScheduledMeeting+    EnterpriseTopazSidekickScheduledMeeting (..),+    newEnterpriseTopazSidekickScheduledMeeting,++    -- * EnterpriseTopazSidekickShareMeetingDocsCardProto+    EnterpriseTopazSidekickShareMeetingDocsCardProto (..),+    newEnterpriseTopazSidekickShareMeetingDocsCardProto,++    -- * EnterpriseTopazSidekickTimeSlot+    EnterpriseTopazSidekickTimeSlot (..),+    newEnterpriseTopazSidekickTimeSlot,++    -- * EnumOperatorOptions+    EnumOperatorOptions (..),+    newEnumOperatorOptions,++    -- * EnumPropertyOptions+    EnumPropertyOptions (..),+    newEnumPropertyOptions,++    -- * EnumValuePair+    EnumValuePair (..),+    newEnumValuePair,++    -- * EnumValues+    EnumValues (..),+    newEnumValues,++    -- * ErrorInfo+    ErrorInfo (..),+    newErrorInfo,++    -- * ErrorMessage+    ErrorMessage (..),+    newErrorMessage,++    -- * FacetBucket+    FacetBucket (..),+    newFacetBucket,++    -- * FacetOptions+    FacetOptions (..),+    newFacetOptions,++    -- * FacetResult+    FacetResult (..),+    newFacetResult,++    -- * FieldViolation+    FieldViolation (..),+    newFieldViolation,++    -- * Filter+    Filter (..),+    newFilter,++    -- * FilterOptions+    FilterOptions (..),+    newFilterOptions,++    -- * FreshnessOptions+    FreshnessOptions (..),+    newFreshnessOptions,++    -- * GSuitePrincipal+    GSuitePrincipal (..),+    newGSuitePrincipal,++    -- * GetCustomerIndexStatsResponse+    GetCustomerIndexStatsResponse (..),+    newGetCustomerIndexStatsResponse,++    -- * GetCustomerQueryStatsResponse+    GetCustomerQueryStatsResponse (..),+    newGetCustomerQueryStatsResponse,++    -- * GetCustomerSearchApplicationStatsResponse+    GetCustomerSearchApplicationStatsResponse (..),+    newGetCustomerSearchApplicationStatsResponse,++    -- * GetCustomerSessionStatsResponse+    GetCustomerSessionStatsResponse (..),+    newGetCustomerSessionStatsResponse,++    -- * GetCustomerUserStatsResponse+    GetCustomerUserStatsResponse (..),+    newGetCustomerUserStatsResponse,++    -- * GetDataSourceIndexStatsResponse+    GetDataSourceIndexStatsResponse (..),+    newGetDataSourceIndexStatsResponse,++    -- * GetSearchApplicationQueryStatsResponse+    GetSearchApplicationQueryStatsResponse (..),+    newGetSearchApplicationQueryStatsResponse,++    -- * GetSearchApplicationSessionStatsResponse+    GetSearchApplicationSessionStatsResponse (..),+    newGetSearchApplicationSessionStatsResponse,++    -- * GetSearchApplicationUserStatsResponse+    GetSearchApplicationUserStatsResponse (..),+    newGetSearchApplicationUserStatsResponse,++    -- * HtmlOperatorOptions+    HtmlOperatorOptions (..),+    newHtmlOperatorOptions,++    -- * HtmlPropertyOptions+    HtmlPropertyOptions (..),+    newHtmlPropertyOptions,++    -- * HtmlValues+    HtmlValues (..),+    newHtmlValues,++    -- * IndexItemOptions+    IndexItemOptions (..),+    newIndexItemOptions,++    -- * IndexItemRequest+    IndexItemRequest (..),+    newIndexItemRequest,++    -- * InitializeCustomerRequest+    InitializeCustomerRequest (..),+    newInitializeCustomerRequest,++    -- * IntegerFacetingOptions+    IntegerFacetingOptions (..),+    newIntegerFacetingOptions,++    -- * IntegerOperatorOptions+    IntegerOperatorOptions (..),+    newIntegerOperatorOptions,++    -- * IntegerPropertyOptions+    IntegerPropertyOptions (..),+    newIntegerPropertyOptions,++    -- * IntegerValues+    IntegerValues (..),+    newIntegerValues,++    -- * Interaction+    Interaction (..),+    newInteraction,++    -- * Item+    Item (..),+    newItem,++    -- * ItemAcl+    ItemAcl (..),+    newItemAcl,++    -- * ItemContent+    ItemContent (..),+    newItemContent,++    -- * ItemCountByStatus+    ItemCountByStatus (..),+    newItemCountByStatus,++    -- * ItemMetadata+    ItemMetadata (..),+    newItemMetadata,++    -- * ItemStatus+    ItemStatus (..),+    newItemStatus,++    -- * ItemStructuredData+    ItemStructuredData (..),+    newItemStructuredData,++    -- * ListDataSourceResponse+    ListDataSourceResponse (..),+    newListDataSourceResponse,++    -- * ListItemNamesForUnmappedIdentityResponse+    ListItemNamesForUnmappedIdentityResponse (..),+    newListItemNamesForUnmappedIdentityResponse,++    -- * ListItemsResponse+    ListItemsResponse (..),+    newListItemsResponse,++    -- * ListOperationsResponse+    ListOperationsResponse (..),+    newListOperationsResponse,++    -- * ListQuerySourcesResponse+    ListQuerySourcesResponse (..),+    newListQuerySourcesResponse,++    -- * ListSearchApplicationsResponse+    ListSearchApplicationsResponse (..),+    newListSearchApplicationsResponse,++    -- * ListUnmappedIdentitiesResponse+    ListUnmappedIdentitiesResponse (..),+    newListUnmappedIdentitiesResponse,++    -- * MapInfo+    MapInfo (..),+    newMapInfo,++    -- * MapTile+    MapTile (..),+    newMapTile,++    -- * MatchRange+    MatchRange (..),+    newMatchRange,++    -- * Media+    Media (..),+    newMedia,++    -- * Metadata+    Metadata (..),+    newMetadata,++    -- * Metaline+    Metaline (..),+    newMetaline,++    -- * Name+    Name (..),+    newName,++    -- * NamedProperty+    NamedProperty (..),+    newNamedProperty,++    -- * ObjectDefinition+    ObjectDefinition (..),+    newObjectDefinition,++    -- * ObjectDisplayOptions+    ObjectDisplayOptions (..),+    newObjectDisplayOptions,++    -- * ObjectOptions+    ObjectOptions (..),+    newObjectOptions,++    -- * ObjectPropertyOptions+    ObjectPropertyOptions (..),+    newObjectPropertyOptions,++    -- * ObjectValues+    ObjectValues (..),+    newObjectValues,++    -- * Operation+    Operation (..),+    newOperation,++    -- * Operation_Metadata+    Operation_Metadata (..),+    newOperation_Metadata,++    -- * Operation_Response+    Operation_Response (..),+    newOperation_Response,++    -- * PeoplePromotionCard+    PeoplePromotionCard (..),+    newPeoplePromotionCard,++    -- * PeopleSuggestion+    PeopleSuggestion (..),+    newPeopleSuggestion,++    -- * Person+    Person (..),+    newPerson,++    -- * PersonCore+    PersonCore (..),+    newPersonCore,++    -- * PersonCore_Keywords+    PersonCore_Keywords (..),+    newPersonCore_Keywords,++    -- * PhoneNumber+    PhoneNumber (..),+    newPhoneNumber,++    -- * Photo+    Photo (..),+    newPhoto,++    -- * PollItemsRequest+    PollItemsRequest (..),+    newPollItemsRequest,++    -- * PollItemsResponse+    PollItemsResponse (..),+    newPollItemsResponse,++    -- * Principal+    Principal (..),+    newPrincipal,++    -- * ProcessingError+    ProcessingError (..),+    newProcessingError,++    -- * PropertyDefinition+    PropertyDefinition (..),+    newPropertyDefinition,++    -- * PropertyDisplayOptions+    PropertyDisplayOptions (..),+    newPropertyDisplayOptions,++    -- * PushItem+    PushItem (..),+    newPushItem,++    -- * PushItemRequest+    PushItemRequest (..),+    newPushItemRequest,++    -- * QueryActivity+    QueryActivity (..),+    newQueryActivity,++    -- * QueryCountByStatus+    QueryCountByStatus (..),+    newQueryCountByStatus,++    -- * QueryInterpretation+    QueryInterpretation (..),+    newQueryInterpretation,++    -- * QueryInterpretationConfig+    QueryInterpretationConfig (..),+    newQueryInterpretationConfig,++    -- * QueryInterpretationOptions+    QueryInterpretationOptions (..),+    newQueryInterpretationOptions,++    -- * QueryItem+    QueryItem (..),+    newQueryItem,++    -- * QueryOperator+    QueryOperator (..),+    newQueryOperator,++    -- * QuerySource+    QuerySource (..),+    newQuerySource,++    -- * QuerySuggestion+    QuerySuggestion (..),+    newQuerySuggestion,++    -- * RemoveActivityRequest+    RemoveActivityRequest (..),+    newRemoveActivityRequest,++    -- * RemoveActivityResponse+    RemoveActivityResponse (..),+    newRemoveActivityResponse,++    -- * RepositoryError+    RepositoryError (..),+    newRepositoryError,++    -- * RequestOptions+    RequestOptions (..),+    newRequestOptions,++    -- * ResetSearchApplicationRequest+    ResetSearchApplicationRequest (..),+    newResetSearchApplicationRequest,++    -- * ResponseDebugInfo+    ResponseDebugInfo (..),+    newResponseDebugInfo,++    -- * RestrictItem+    RestrictItem (..),+    newRestrictItem,++    -- * ResultCounts+    ResultCounts (..),+    newResultCounts,++    -- * ResultDebugInfo+    ResultDebugInfo (..),+    newResultDebugInfo,++    -- * ResultDisplayField+    ResultDisplayField (..),+    newResultDisplayField,++    -- * ResultDisplayLine+    ResultDisplayLine (..),+    newResultDisplayLine,++    -- * ResultDisplayMetadata+    ResultDisplayMetadata (..),+    newResultDisplayMetadata,++    -- * RetrievalImportance+    RetrievalImportance (..),+    newRetrievalImportance,++    -- * SafeHtmlProto+    SafeHtmlProto (..),+    newSafeHtmlProto,++    -- * SafeUrlProto+    SafeUrlProto (..),+    newSafeUrlProto,++    -- * Schema+    Schema (..),+    newSchema,++    -- * ScoringConfig+    ScoringConfig (..),+    newScoringConfig,++    -- * SearchApplication+    SearchApplication (..),+    newSearchApplication,++    -- * SearchApplicationQueryStats+    SearchApplicationQueryStats (..),+    newSearchApplicationQueryStats,++    -- * SearchApplicationSessionStats+    SearchApplicationSessionStats (..),+    newSearchApplicationSessionStats,++    -- * SearchApplicationUserStats+    SearchApplicationUserStats (..),+    newSearchApplicationUserStats,++    -- * SearchItemsByViewUrlRequest+    SearchItemsByViewUrlRequest (..),+    newSearchItemsByViewUrlRequest,++    -- * SearchItemsByViewUrlResponse+    SearchItemsByViewUrlResponse (..),+    newSearchItemsByViewUrlResponse,++    -- * SearchQualityMetadata+    SearchQualityMetadata (..),+    newSearchQualityMetadata,++    -- * SearchRequest+    SearchRequest (..),+    newSearchRequest,++    -- * SearchResponse+    SearchResponse (..),+    newSearchResponse,++    -- * SearchResult+    SearchResult (..),+    newSearchResult,++    -- * Snippet+    Snippet (..),+    newSnippet,++    -- * SortOptions+    SortOptions (..),+    newSortOptions,++    -- * Source+    Source (..),+    newSource,++    -- * SourceConfig+    SourceConfig (..),+    newSourceConfig,++    -- * SourceCrowdingConfig+    SourceCrowdingConfig (..),+    newSourceCrowdingConfig,++    -- * SourceResultCount+    SourceResultCount (..),+    newSourceResultCount,++    -- * SourceScoringConfig+    SourceScoringConfig (..),+    newSourceScoringConfig,++    -- * SpellResult+    SpellResult (..),+    newSpellResult,++    -- * StartUploadItemRequest+    StartUploadItemRequest (..),+    newStartUploadItemRequest,++    -- * Status+    Status (..),+    newStatus,++    -- * Status_DetailsItem+    Status_DetailsItem (..),+    newStatus_DetailsItem,++    -- * StructuredDataObject+    StructuredDataObject (..),+    newStructuredDataObject,++    -- * StructuredResult+    StructuredResult (..),+    newStructuredResult,++    -- * SuggestRequest+    SuggestRequest (..),+    newSuggestRequest,++    -- * SuggestResponse+    SuggestResponse (..),+    newSuggestResponse,++    -- * SuggestResult+    SuggestResult (..),+    newSuggestResult,++    -- * TextOperatorOptions+    TextOperatorOptions (..),+    newTextOperatorOptions,++    -- * TextPropertyOptions+    TextPropertyOptions (..),+    newTextPropertyOptions,++    -- * TextValues+    TextValues (..),+    newTextValues,++    -- * ThirdPartyGenericCard+    ThirdPartyGenericCard (..),+    newThirdPartyGenericCard,++    -- * TimestampOperatorOptions+    TimestampOperatorOptions (..),+    newTimestampOperatorOptions,++    -- * TimestampPropertyOptions+    TimestampPropertyOptions (..),+    newTimestampPropertyOptions,++    -- * TimestampValues+    TimestampValues (..),+    newTimestampValues,++    -- * UnmappedIdentity+    UnmappedIdentity (..),+    newUnmappedIdentity,++    -- * UnreserveItemsRequest+    UnreserveItemsRequest (..),+    newUnreserveItemsRequest,++    -- * UpdateDataSourceRequest+    UpdateDataSourceRequest (..),+    newUpdateDataSourceRequest,++    -- * UpdateSchemaRequest+    UpdateSchemaRequest (..),+    newUpdateSchemaRequest,++    -- * UploadItemRef+    UploadItemRef (..),+    newUploadItemRef,++    -- * UserActivity+    UserActivity (..),+    newUserActivity,++    -- * VPCSettings+    VPCSettings (..),+    newVPCSettings,++    -- * Value+    Value (..),+    newValue,++    -- * ValueFilter+    ValueFilter (..),+    newValueFilter,+  )+where++import Gogol.CloudSearch.Internal.Sum+import Gogol.Prelude qualified as Core++--+-- /See:/ 'newAction' smart constructor.+data Action = Action+  { -- | [Required] Title of the action.+    title :: (Core.Maybe Core.Text),+    -- | [Optional] Url of the action.+    url :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Action' with the minimum fields required to make a request.+newAction ::+  Action+newAction = Action {title = Core.Nothing, url = Core.Nothing}++instance Core.FromJSON Action where+  parseJSON =+    Core.withObject+      "Action"+      ( \o ->+          Action Core.<$> (o Core..:? "title") Core.<*> (o Core..:? "url")+      )++instance Core.ToJSON Action where+  toJSON Action {..} =+    Core.object+      ( Core.catMaybes+          [("title" Core..=) Core.<$> title, ("url" Core..=) Core.<$> url]+      )++-- | Represents the settings for Cloud audit logging+--+-- /See:/ 'newAuditLoggingSettings' smart constructor.+data AuditLoggingSettings = AuditLoggingSettings+  { -- | Indicates whether audit logging is on\/off for admin activity read APIs i.e. Get\/List DataSources, Get\/List SearchApplications etc.+    logAdminReadActions :: (Core.Maybe Core.Bool),+    -- | Indicates whether audit logging is on\/off for data access read APIs i.e. ListItems, GetItem etc.+    logDataReadActions :: (Core.Maybe Core.Bool),+    -- | Indicates whether audit logging is on\/off for data access write APIs i.e. IndexItem etc.+    logDataWriteActions :: (Core.Maybe Core.Bool),+    -- | The resource name of the GCP Project to store audit logs. Cloud audit logging will be enabled after project/name has been updated through CustomerService. Format: projects\/{project/id}+    project :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'AuditLoggingSettings' with the minimum fields required to make a request.+newAuditLoggingSettings ::+  AuditLoggingSettings+newAuditLoggingSettings =+  AuditLoggingSettings+    { logAdminReadActions = Core.Nothing,+      logDataReadActions = Core.Nothing,+      logDataWriteActions = Core.Nothing,+      project = Core.Nothing+    }++instance Core.FromJSON AuditLoggingSettings where+  parseJSON =+    Core.withObject+      "AuditLoggingSettings"+      ( \o ->+          AuditLoggingSettings+            Core.<$> (o Core..:? "logAdminReadActions")+            Core.<*> (o Core..:? "logDataReadActions")+            Core.<*> (o Core..:? "logDataWriteActions")+            Core.<*> (o Core..:? "project")+      )++instance Core.ToJSON AuditLoggingSettings where+  toJSON AuditLoggingSettings {..} =+    Core.object+      ( Core.catMaybes+          [ ("logAdminReadActions" Core..=) Core.<$> logAdminReadActions,+            ("logDataReadActions" Core..=) Core.<$> logDataReadActions,+            ("logDataWriteActions" Core..=) Core.<$> logDataWriteActions,+            ("project" Core..=) Core.<$> project+          ]+      )++--+-- /See:/ 'newBackgroundColoredText' smart constructor.+data BackgroundColoredText = BackgroundColoredText+  { -- | [Optional] Color of the background. The text color can change depending on the selected background color, and the client does not have control over this. If missing, the background will be WHITE.+    backgroundColor :: (Core.Maybe BackgroundColoredText_BackgroundColor),+    -- | [Required] The text to display.+    text :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'BackgroundColoredText' with the minimum fields required to make a request.+newBackgroundColoredText ::+  BackgroundColoredText+newBackgroundColoredText =+  BackgroundColoredText+    { backgroundColor = Core.Nothing,+      text = Core.Nothing+    }++instance Core.FromJSON BackgroundColoredText where+  parseJSON =+    Core.withObject+      "BackgroundColoredText"+      ( \o ->+          BackgroundColoredText+            Core.<$> (o Core..:? "backgroundColor")+            Core.<*> (o Core..:? "text")+      )++instance Core.ToJSON BackgroundColoredText where+  toJSON BackgroundColoredText {..} =+    Core.object+      ( Core.catMaybes+          [ ("backgroundColor" Core..=) Core.<$> backgroundColor,+            ("text" Core..=) Core.<$> text+          ]+      )++-- | Used to provide a search operator for boolean properties. This is optional. Search operators let users restrict the query to specific fields relevant to the type of item being searched.+--+-- /See:/ 'newBooleanOperatorOptions' smart constructor.+newtype BooleanOperatorOptions = BooleanOperatorOptions+  { -- | Indicates the operator name required in the query in order to isolate the boolean property. For example, if operatorName is /closed/ and the property\'s name is /isClosed/, then queries like /closed:\<value>/ show results only where the value of the property named /isClosed/ matches /\<value>/. By contrast, a search that uses the same /\<value>/ without an operator returns all items where /\<value>/ matches the value of any String properties or text within the content field for the item. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    operatorName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'BooleanOperatorOptions' with the minimum fields required to make a request.+newBooleanOperatorOptions ::+  BooleanOperatorOptions+newBooleanOperatorOptions =+  BooleanOperatorOptions {operatorName = Core.Nothing}++instance Core.FromJSON BooleanOperatorOptions where+  parseJSON =+    Core.withObject+      "BooleanOperatorOptions"+      ( \o ->+          BooleanOperatorOptions Core.<$> (o Core..:? "operatorName")+      )++instance Core.ToJSON BooleanOperatorOptions where+  toJSON BooleanOperatorOptions {..} =+    Core.object+      (Core.catMaybes [("operatorName" Core..=) Core.<$> operatorName])++-- | The options for boolean properties.+--+-- /See:/ 'newBooleanPropertyOptions' smart constructor.+newtype BooleanPropertyOptions = BooleanPropertyOptions+  { -- | If set, describes how the boolean should be used as a search operator.+    operatorOptions :: (Core.Maybe BooleanOperatorOptions)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'BooleanPropertyOptions' with the minimum fields required to make a request.+newBooleanPropertyOptions ::+  BooleanPropertyOptions+newBooleanPropertyOptions =+  BooleanPropertyOptions {operatorOptions = Core.Nothing}++instance Core.FromJSON BooleanPropertyOptions where+  parseJSON =+    Core.withObject+      "BooleanPropertyOptions"+      ( \o ->+          BooleanPropertyOptions Core.<$> (o Core..:? "operatorOptions")+      )++instance Core.ToJSON BooleanPropertyOptions where+  toJSON BooleanPropertyOptions {..} =+    Core.object+      ( Core.catMaybes+          [("operatorOptions" Core..=) Core.<$> operatorOptions]+      )++--+-- /See:/ 'newCheckAccessResponse' smart constructor.+newtype CheckAccessResponse = CheckAccessResponse+  { -- | Returns true if principal has access. Returns false otherwise.+    hasAccess :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CheckAccessResponse' with the minimum fields required to make a request.+newCheckAccessResponse ::+  CheckAccessResponse+newCheckAccessResponse =+  CheckAccessResponse {hasAccess = Core.Nothing}++instance Core.FromJSON CheckAccessResponse where+  parseJSON =+    Core.withObject+      "CheckAccessResponse"+      (\o -> CheckAccessResponse Core.<$> (o Core..:? "hasAccess"))++instance Core.ToJSON CheckAccessResponse where+  toJSON CheckAccessResponse {..} =+    Core.object+      (Core.catMaybes [("hasAccess" Core..=) Core.<$> hasAccess])++--+-- /See:/ 'newCompositeFilter' smart constructor.+data CompositeFilter = CompositeFilter+  { -- | The logic operator of the sub filter.+    logicOperator :: (Core.Maybe CompositeFilter_LogicOperator),+    -- | Sub filters.+    subFilters :: (Core.Maybe [Filter])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CompositeFilter' with the minimum fields required to make a request.+newCompositeFilter ::+  CompositeFilter+newCompositeFilter =+  CompositeFilter+    { logicOperator = Core.Nothing,+      subFilters = Core.Nothing+    }++instance Core.FromJSON CompositeFilter where+  parseJSON =+    Core.withObject+      "CompositeFilter"+      ( \o ->+          CompositeFilter+            Core.<$> (o Core..:? "logicOperator")+            Core.<*> (o Core..:? "subFilters")+      )++instance Core.ToJSON CompositeFilter where+  toJSON CompositeFilter {..} =+    Core.object+      ( Core.catMaybes+          [ ("logicOperator" Core..=) Core.<$> logicOperator,+            ("subFilters" Core..=) Core.<$> subFilters+          ]+      )++--+-- /See:/ 'newContent' smart constructor.+data Content = Content+  { -- | [Optional] Actions for this card.+    actions :: (Core.Maybe [Action]),+    -- | [Optional] Description of the card.+    description :: (Core.Maybe SafeHtmlProto),+    -- | [Optional] Subtitle of the card.+    subtitle :: (Core.Maybe BackgroundColoredText),+    -- | [Optional] Title of the card.+    title :: (Core.Maybe BackgroundColoredText)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Content' with the minimum fields required to make a request.+newContent ::+  Content+newContent =+  Content+    { actions = Core.Nothing,+      description = Core.Nothing,+      subtitle = Core.Nothing,+      title = Core.Nothing+    }++instance Core.FromJSON Content where+  parseJSON =+    Core.withObject+      "Content"+      ( \o ->+          Content+            Core.<$> (o Core..:? "actions")+            Core.<*> (o Core..:? "description")+            Core.<*> (o Core..:? "subtitle")+            Core.<*> (o Core..:? "title")+      )++instance Core.ToJSON Content where+  toJSON Content {..} =+    Core.object+      ( Core.catMaybes+          [ ("actions" Core..=) Core.<$> actions,+            ("description" Core..=) Core.<$> description,+            ("subtitle" Core..=) Core.<$> subtitle,+            ("title" Core..=) Core.<$> title+          ]+      )++--+-- /See:/ 'newContext' smart constructor.+data Context = Context+  { -- | [Optional] App where the card should be shown. If missing, the card will be shown in TOPAZ.+    app :: (Core.Maybe [Context_AppItem]),+    -- | [Optional] Day of week when the card should be shown, where 0 is Monday.+    dayOfWeek :: (Core.Maybe [Core.Int32]),+    -- | [Optional] Date (in seconds since epoch) when the card should stop being shown. If missing, end/date/sec will be set to Jan 1st, 2100.+    endDateSec :: (Core.Maybe Core.Int64),+    -- | [Optional] End time in seconds, within a day, when the card should stop being shown if it\'s within [start/date/sec, end/date/sec]. If missing, this is set to 86400 (24 hours x 3600 sec\/hour), i.e., midnight next day.+    endDayOffsetSec :: (Core.Maybe Core.Int64),+    -- | [Optional] The locales for which the card should be triggered (e.g., en/US and en/CA). If missing, the card is going to show to clients regardless of their locale.+    locale :: (Core.Maybe [Core.Text]),+    -- | [Optional] Text-free locations where the card should be shown. This is expected to match the user\'s location in focus. If no location is specified, the card will be shown for any location.+    location :: (Core.Maybe [Core.Text]),+    -- | [Required only for Answer and RHS cards - will be ignored for Homepage] cards. It\'s the exact case-insensitive queries that will trigger the Answer or RHS card.+    query :: (Core.Maybe [Core.Text]),+    -- | [Optional] Date (in seconds since epoch) when the card should start being shown. If missing, start/date/sec will be Jan 1st, 1970 UTC.+    startDateSec :: (Core.Maybe Core.Int64),+    -- | [Optional] Start time in seconds, within a day, when the card should be shown if it\'s within [start/date/sec, end/date/sec]. If 0, the card will be shown from 12:00am on.+    startDayOffsetSec :: (Core.Maybe Core.Int64),+    -- | [Optional] Surface where the card should be shown in. If missing, the card will be shown in any surface.+    surface :: (Core.Maybe [Context_SurfaceItem]),+    -- | [Required] Type of the card (homepage, Answer or RHS).+    type' :: (Core.Maybe [Context_TypeItem])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Context' with the minimum fields required to make a request.+newContext ::+  Context+newContext =+  Context+    { app = Core.Nothing,+      dayOfWeek = Core.Nothing,+      endDateSec = Core.Nothing,+      endDayOffsetSec = Core.Nothing,+      locale = Core.Nothing,+      location = Core.Nothing,+      query = Core.Nothing,+      startDateSec = Core.Nothing,+      startDayOffsetSec = Core.Nothing,+      surface = Core.Nothing,+      type' = Core.Nothing+    }++instance Core.FromJSON Context where+  parseJSON =+    Core.withObject+      "Context"+      ( \o ->+          Context+            Core.<$> (o Core..:? "app")+            Core.<*> (o Core..:? "dayOfWeek")+            Core.<*> (o Core..:? "endDateSec" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "endDayOffsetSec" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "locale")+            Core.<*> (o Core..:? "location")+            Core.<*> (o Core..:? "query")+            Core.<*> (o Core..:? "startDateSec" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "startDayOffsetSec" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "surface")+            Core.<*> (o Core..:? "type")+      )++instance Core.ToJSON Context where+  toJSON Context {..} =+    Core.object+      ( Core.catMaybes+          [ ("app" Core..=) Core.<$> app,+            ("dayOfWeek" Core..=) Core.<$> dayOfWeek,+            ("endDateSec" Core..=) Core.. Core.AsText Core.<$> endDateSec,+            ("endDayOffsetSec" Core..=)+              Core.. Core.AsText+              Core.<$> endDayOffsetSec,+            ("locale" Core..=) Core.<$> locale,+            ("location" Core..=) Core.<$> location,+            ("query" Core..=) Core.<$> query,+            ("startDateSec" Core..=) Core.. Core.AsText Core.<$> startDateSec,+            ("startDayOffsetSec" Core..=)+              Core.. Core.AsText+              Core.<$> startDayOffsetSec,+            ("surface" Core..=) Core.<$> surface,+            ("type" Core..=) Core.<$> type'+          ]+      )++-- | A named attribute associated with an item which can be used for influencing the ranking of the item based on the context in the request.+--+-- /See:/ 'newContextAttribute' smart constructor.+data ContextAttribute = ContextAttribute+  { -- | The name of the attribute. It should not be empty. The maximum length is 32 characters. The name must start with a letter and can only contain letters (A-Z, a-z) or numbers (0-9). The name will be normalized (lower-cased) before being matched.+    name :: (Core.Maybe Core.Text),+    -- | Text values of the attribute. The maximum number of elements is 10. The maximum length of an element in the array is 32 characters. The value will be normalized (lower-cased) before being matched.+    values :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ContextAttribute' with the minimum fields required to make a request.+newContextAttribute ::+  ContextAttribute+newContextAttribute =+  ContextAttribute {name = Core.Nothing, values = Core.Nothing}++instance Core.FromJSON ContextAttribute where+  parseJSON =+    Core.withObject+      "ContextAttribute"+      ( \o ->+          ContextAttribute+            Core.<$> (o Core..:? "name")+            Core.<*> (o Core..:? "values")+      )++instance Core.ToJSON ContextAttribute where+  toJSON ContextAttribute {..} =+    Core.object+      ( Core.catMaybes+          [ ("name" Core..=) Core.<$> name,+            ("values" Core..=) Core.<$> values+          ]+      )++-- | Aggregation of items by status code as of the specified date.+--+-- /See:/ 'newCustomerIndexStats' smart constructor.+data CustomerIndexStats = CustomerIndexStats+  { -- | The date for which statistics were calculated.+    date :: (Core.Maybe Date),+    -- | Number of items aggregrated by status code.+    itemCountByStatus :: (Core.Maybe [ItemCountByStatus])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CustomerIndexStats' with the minimum fields required to make a request.+newCustomerIndexStats ::+  CustomerIndexStats+newCustomerIndexStats =+  CustomerIndexStats+    { date = Core.Nothing,+      itemCountByStatus = Core.Nothing+    }++instance Core.FromJSON CustomerIndexStats where+  parseJSON =+    Core.withObject+      "CustomerIndexStats"+      ( \o ->+          CustomerIndexStats+            Core.<$> (o Core..:? "date")+            Core.<*> (o Core..:? "itemCountByStatus")+      )++instance Core.ToJSON CustomerIndexStats where+  toJSON CustomerIndexStats {..} =+    Core.object+      ( Core.catMaybes+          [ ("date" Core..=) Core.<$> date,+            ("itemCountByStatus" Core..=) Core.<$> itemCountByStatus+          ]+      )++--+-- /See:/ 'newCustomerQueryStats' smart constructor.+data CustomerQueryStats = CustomerQueryStats+  { -- | The date for which query stats were calculated. Stats calculated on the next day close to midnight are returned.+    date :: (Core.Maybe Date),+    queryCountByStatus :: (Core.Maybe [QueryCountByStatus])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CustomerQueryStats' with the minimum fields required to make a request.+newCustomerQueryStats ::+  CustomerQueryStats+newCustomerQueryStats =+  CustomerQueryStats+    { date = Core.Nothing,+      queryCountByStatus = Core.Nothing+    }++instance Core.FromJSON CustomerQueryStats where+  parseJSON =+    Core.withObject+      "CustomerQueryStats"+      ( \o ->+          CustomerQueryStats+            Core.<$> (o Core..:? "date")+            Core.<*> (o Core..:? "queryCountByStatus")+      )++instance Core.ToJSON CustomerQueryStats where+  toJSON CustomerQueryStats {..} =+    Core.object+      ( Core.catMaybes+          [ ("date" Core..=) Core.<$> date,+            ("queryCountByStatus" Core..=) Core.<$> queryCountByStatus+          ]+      )++-- | Search application stats for a customer for the given date.+--+-- /See:/ 'newCustomerSearchApplicationStats' smart constructor.+data CustomerSearchApplicationStats = CustomerSearchApplicationStats+  { -- | The count of search applications for the date.+    count :: (Core.Maybe Core.Int64),+    -- | The date for which search application stats were calculated.+    date :: (Core.Maybe Date)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CustomerSearchApplicationStats' with the minimum fields required to make a request.+newCustomerSearchApplicationStats ::+  CustomerSearchApplicationStats+newCustomerSearchApplicationStats =+  CustomerSearchApplicationStats+    { count = Core.Nothing,+      date = Core.Nothing+    }++instance Core.FromJSON CustomerSearchApplicationStats where+  parseJSON =+    Core.withObject+      "CustomerSearchApplicationStats"+      ( \o ->+          CustomerSearchApplicationStats+            Core.<$> (o Core..:? "count" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "date")+      )++instance Core.ToJSON CustomerSearchApplicationStats where+  toJSON CustomerSearchApplicationStats {..} =+    Core.object+      ( Core.catMaybes+          [ ("count" Core..=) Core.. Core.AsText Core.<$> count,+            ("date" Core..=) Core.<$> date+          ]+      )++--+-- /See:/ 'newCustomerSessionStats' smart constructor.+data CustomerSessionStats = CustomerSessionStats+  { -- | The date for which session stats were calculated. Stats are calculated on the following day, close to midnight PST, and then returned.+    date :: (Core.Maybe Date),+    -- | The count of search sessions on the day+    searchSessionsCount :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CustomerSessionStats' with the minimum fields required to make a request.+newCustomerSessionStats ::+  CustomerSessionStats+newCustomerSessionStats =+  CustomerSessionStats+    { date = Core.Nothing,+      searchSessionsCount = Core.Nothing+    }++instance Core.FromJSON CustomerSessionStats where+  parseJSON =+    Core.withObject+      "CustomerSessionStats"+      ( \o ->+          CustomerSessionStats+            Core.<$> (o Core..:? "date")+            Core.<*> ( o+                         Core..:? "searchSessionsCount"+                         Core.<&> Core.fmap Core.fromAsText+                     )+      )++instance Core.ToJSON CustomerSessionStats where+  toJSON CustomerSessionStats {..} =+    Core.object+      ( Core.catMaybes+          [ ("date" Core..=) Core.<$> date,+            ("searchSessionsCount" Core..=)+              Core.. Core.AsText+              Core.<$> searchSessionsCount+          ]+      )++-- | Represents settings at a customer level.+--+-- /See:/ 'newCustomerSettings' smart constructor.+data CustomerSettings = CustomerSettings+  { -- | Audit Logging settings for the customer. If update_mask is empty then this field will be updated based on UpdateCustomerSettings request.+    auditLoggingSettings :: (Core.Maybe AuditLoggingSettings),+    -- | VPC SC settings for the customer. If update_mask is empty then this field will be updated based on UpdateCustomerSettings request.+    vpcSettings :: (Core.Maybe VPCSettings)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CustomerSettings' with the minimum fields required to make a request.+newCustomerSettings ::+  CustomerSettings+newCustomerSettings =+  CustomerSettings+    { auditLoggingSettings = Core.Nothing,+      vpcSettings = Core.Nothing+    }++instance Core.FromJSON CustomerSettings where+  parseJSON =+    Core.withObject+      "CustomerSettings"+      ( \o ->+          CustomerSettings+            Core.<$> (o Core..:? "auditLoggingSettings")+            Core.<*> (o Core..:? "vpcSettings")+      )++instance Core.ToJSON CustomerSettings where+  toJSON CustomerSettings {..} =+    Core.object+      ( Core.catMaybes+          [ ("auditLoggingSettings" Core..=) Core.<$> auditLoggingSettings,+            ("vpcSettings" Core..=) Core.<$> vpcSettings+          ]+      )++--+-- /See:/ 'newCustomerUserStats' smart constructor.+data CustomerUserStats = CustomerUserStats+  { -- | The date for which session stats were calculated. Stats calculated on the next day close to midnight are returned.+    date :: (Core.Maybe Date),+    -- | The count of unique active users in the past one day+    oneDayActiveUsersCount :: (Core.Maybe Core.Int64),+    -- | The count of unique active users in the past seven days+    sevenDaysActiveUsersCount :: (Core.Maybe Core.Int64),+    -- | The count of unique active users in the past thirty days+    thirtyDaysActiveUsersCount :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CustomerUserStats' with the minimum fields required to make a request.+newCustomerUserStats ::+  CustomerUserStats+newCustomerUserStats =+  CustomerUserStats+    { date = Core.Nothing,+      oneDayActiveUsersCount = Core.Nothing,+      sevenDaysActiveUsersCount = Core.Nothing,+      thirtyDaysActiveUsersCount = Core.Nothing+    }++instance Core.FromJSON CustomerUserStats where+  parseJSON =+    Core.withObject+      "CustomerUserStats"+      ( \o ->+          CustomerUserStats+            Core.<$> (o Core..:? "date")+            Core.<*> ( o+                         Core..:? "oneDayActiveUsersCount"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> ( o+                         Core..:? "sevenDaysActiveUsersCount"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> ( o+                         Core..:? "thirtyDaysActiveUsersCount"+                         Core.<&> Core.fmap Core.fromAsText+                     )+      )++instance Core.ToJSON CustomerUserStats where+  toJSON CustomerUserStats {..} =+    Core.object+      ( Core.catMaybes+          [ ("date" Core..=) Core.<$> date,+            ("oneDayActiveUsersCount" Core..=)+              Core.. Core.AsText+              Core.<$> oneDayActiveUsersCount,+            ("sevenDaysActiveUsersCount" Core..=)+              Core.. Core.AsText+              Core.<$> sevenDaysActiveUsersCount,+            ("thirtyDaysActiveUsersCount" Core..=)+              Core.. Core.AsText+              Core.<$> thirtyDaysActiveUsersCount+          ]+      )++-- | Datasource is a logical namespace for items to be indexed. All items must belong to a datasource. This is the prerequisite before items can be indexed into Cloud Search.+--+-- /See:/ 'newDataSource' smart constructor.+data DataSource = DataSource+  { -- | If true, sets the datasource to read-only mode. In read-only mode, the Indexing API rejects any requests to index or delete items in this source. Enabling read-only mode does not stop the processing of previously accepted data.+    disableModifications :: (Core.Maybe Core.Bool),+    -- | Disable serving any search or assist results.+    disableServing :: (Core.Maybe Core.Bool),+    -- | Required. Display name of the datasource The maximum length is 300 characters.+    displayName :: (Core.Maybe Core.Text),+    -- | List of service accounts that have indexing access.+    indexingServiceAccounts :: (Core.Maybe [Core.Text]),+    -- | This field restricts visibility to items at the datasource level. Items within the datasource are restricted to the union of users and groups included in this field. Note that, this does not ensure access to a specific item, as users need to have ACL permissions on the contained items. This ensures a high level access on the entire datasource, and that the individual items are not shared outside this visibility.+    itemsVisibility :: (Core.Maybe [GSuitePrincipal]),+    -- | The name of the datasource resource. Format: datasources\/{source_id}. The name is ignored when creating a datasource.+    name :: (Core.Maybe Core.Text),+    -- | IDs of the Long Running Operations (LROs) currently running for this schema.+    operationIds :: (Core.Maybe [Core.Text]),+    -- | Can a user request to get thumbnail URI for Items indexed in this data source.+    returnThumbnailUrls :: (Core.Maybe Core.Bool),+    -- | A short name or alias for the source. This value will be used to match the \'source\' operator. For example, if the short name is /\<value>/ then queries like /source:\<value>/ will only return results for this source. The value must be unique across all datasources. The value must only contain alphanumeric characters (a-zA-Z0-9). The value cannot start with \'google\' and cannot be one of the following: mail, gmail, docs, drive, groups, sites, calendar, hangouts, gplus, keep, people, teams. Its maximum length is 32 characters.+    shortName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DataSource' with the minimum fields required to make a request.+newDataSource ::+  DataSource+newDataSource =+  DataSource+    { disableModifications = Core.Nothing,+      disableServing = Core.Nothing,+      displayName = Core.Nothing,+      indexingServiceAccounts = Core.Nothing,+      itemsVisibility = Core.Nothing,+      name = Core.Nothing,+      operationIds = Core.Nothing,+      returnThumbnailUrls = Core.Nothing,+      shortName = Core.Nothing+    }++instance Core.FromJSON DataSource where+  parseJSON =+    Core.withObject+      "DataSource"+      ( \o ->+          DataSource+            Core.<$> (o Core..:? "disableModifications")+            Core.<*> (o Core..:? "disableServing")+            Core.<*> (o Core..:? "displayName")+            Core.<*> (o Core..:? "indexingServiceAccounts")+            Core.<*> (o Core..:? "itemsVisibility")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "operationIds")+            Core.<*> (o Core..:? "returnThumbnailUrls")+            Core.<*> (o Core..:? "shortName")+      )++instance Core.ToJSON DataSource where+  toJSON DataSource {..} =+    Core.object+      ( Core.catMaybes+          [ ("disableModifications" Core..=) Core.<$> disableModifications,+            ("disableServing" Core..=) Core.<$> disableServing,+            ("displayName" Core..=) Core.<$> displayName,+            ("indexingServiceAccounts" Core..=)+              Core.<$> indexingServiceAccounts,+            ("itemsVisibility" Core..=) Core.<$> itemsVisibility,+            ("name" Core..=) Core.<$> name,+            ("operationIds" Core..=) Core.<$> operationIds,+            ("returnThumbnailUrls" Core..=) Core.<$> returnThumbnailUrls,+            ("shortName" Core..=) Core.<$> shortName+          ]+      )++-- | Aggregation of items by status code as of the specified date.+--+-- /See:/ 'newDataSourceIndexStats' smart constructor.+data DataSourceIndexStats = DataSourceIndexStats+  { -- | The date for which index stats were calculated. If the date of request is not the current date then stats calculated on the next day are returned. Stats are calculated close to mid night in this case. If date of request is current date, then real time stats are returned.+    date :: (Core.Maybe Date),+    -- | Number of items aggregrated by status code.+    itemCountByStatus :: (Core.Maybe [ItemCountByStatus])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DataSourceIndexStats' with the minimum fields required to make a request.+newDataSourceIndexStats ::+  DataSourceIndexStats+newDataSourceIndexStats =+  DataSourceIndexStats+    { date = Core.Nothing,+      itemCountByStatus = Core.Nothing+    }++instance Core.FromJSON DataSourceIndexStats where+  parseJSON =+    Core.withObject+      "DataSourceIndexStats"+      ( \o ->+          DataSourceIndexStats+            Core.<$> (o Core..:? "date")+            Core.<*> (o Core..:? "itemCountByStatus")+      )++instance Core.ToJSON DataSourceIndexStats where+  toJSON DataSourceIndexStats {..} =+    Core.object+      ( Core.catMaybes+          [ ("date" Core..=) Core.<$> date,+            ("itemCountByStatus" Core..=) Core.<$> itemCountByStatus+          ]+      )++-- | Restriction on Datasource.+--+-- /See:/ 'newDataSourceRestriction' smart constructor.+data DataSourceRestriction = DataSourceRestriction+  { -- | Filter options restricting the results. If multiple filters are present, they are grouped by object type before joining. Filters with the same object type are joined conjunctively, then the resulting expressions are joined disjunctively. The maximum number of elements is 20. NOTE: Suggest API supports only few filters at the moment: \"objecttype\", \"type\" and \"mimetype\". For now, schema specific filters cannot be used to filter suggestions.+    filterOptions :: (Core.Maybe [FilterOptions]),+    -- | The source of restriction.+    source :: (Core.Maybe Source)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DataSourceRestriction' with the minimum fields required to make a request.+newDataSourceRestriction ::+  DataSourceRestriction+newDataSourceRestriction =+  DataSourceRestriction+    { filterOptions = Core.Nothing,+      source = Core.Nothing+    }++instance Core.FromJSON DataSourceRestriction where+  parseJSON =+    Core.withObject+      "DataSourceRestriction"+      ( \o ->+          DataSourceRestriction+            Core.<$> (o Core..:? "filterOptions")+            Core.<*> (o Core..:? "source")+      )++instance Core.ToJSON DataSourceRestriction where+  toJSON DataSourceRestriction {..} =+    Core.object+      ( Core.catMaybes+          [ ("filterOptions" Core..=) Core.<$> filterOptions,+            ("source" Core..=) Core.<$> source+          ]+      )++-- | Represents a whole calendar date, for example a date of birth. The time of day and time zone are either specified elsewhere or are not significant. The date is relative to the <https://en.wikipedia.org/wiki/Proleptic_Gregorian_calendar Proleptic Gregorian Calendar>. The date must be a valid calendar date between the year 1 and 9999.+--+-- /See:/ 'newDate' smart constructor.+data Date = Date+  { -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    day :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    month :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    year :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Date' with the minimum fields required to make a request.+newDate ::+  Date+newDate =+  Date+    { day = Core.Nothing,+      month = Core.Nothing,+      year = Core.Nothing+    }++instance Core.FromJSON Date where+  parseJSON =+    Core.withObject+      "Date"+      ( \o ->+          Date+            Core.<$> (o Core..:? "day")+            Core.<*> (o Core..:? "month")+            Core.<*> (o Core..:? "year")+      )++instance Core.ToJSON Date where+  toJSON Date {..} =+    Core.object+      ( Core.catMaybes+          [ ("day" Core..=) Core.<$> day,+            ("month" Core..=) Core.<$> month,+            ("year" Core..=) Core.<$> year+          ]+      )++-- | Optional. Provides a search operator for date properties. Search operators let users restrict the query to specific fields relevant to the type of item being searched.+--+-- /See:/ 'newDateOperatorOptions' smart constructor.+data DateOperatorOptions = DateOperatorOptions+  { -- | Indicates the operator name required in the query in order to isolate the date property using the greater-than operator. For example, if greaterThanOperatorName is /closedafter/ and the property\'s name is /closeDate/, then queries like /closedafter:\<value>/ show results only where the value of the property named /closeDate/ is later than /\<value>/. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    greaterThanOperatorName :: (Core.Maybe Core.Text),+    -- | Indicates the operator name required in the query in order to isolate the date property using the less-than operator. For example, if lessThanOperatorName is /closedbefore/ and the property\'s name is /closeDate/, then queries like /closedbefore:\<value>/ show results only where the value of the property named /closeDate/ is earlier than /\<value>/. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    lessThanOperatorName :: (Core.Maybe Core.Text),+    -- | Indicates the actual string required in the query in order to isolate the date property. For example, suppose an issue tracking schema object has a property named /closeDate/ that specifies an operator with an operatorName of /closedon/. For searches on that data, queries like /closedon:\<value>/ show results only where the value of the /closeDate/ property matches /\<value>/. By contrast, a search that uses the same /\<value>/ without an operator returns all items where /\<value>/ matches the value of any String properties or text within the content field for the indexed datasource. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    operatorName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DateOperatorOptions' with the minimum fields required to make a request.+newDateOperatorOptions ::+  DateOperatorOptions+newDateOperatorOptions =+  DateOperatorOptions+    { greaterThanOperatorName = Core.Nothing,+      lessThanOperatorName = Core.Nothing,+      operatorName = Core.Nothing+    }++instance Core.FromJSON DateOperatorOptions where+  parseJSON =+    Core.withObject+      "DateOperatorOptions"+      ( \o ->+          DateOperatorOptions+            Core.<$> (o Core..:? "greaterThanOperatorName")+            Core.<*> (o Core..:? "lessThanOperatorName")+            Core.<*> (o Core..:? "operatorName")+      )++instance Core.ToJSON DateOperatorOptions where+  toJSON DateOperatorOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("greaterThanOperatorName" Core..=)+              Core.<$> greaterThanOperatorName,+            ("lessThanOperatorName" Core..=) Core.<$> lessThanOperatorName,+            ("operatorName" Core..=) Core.<$> operatorName+          ]+      )++-- | The options for date properties.+--+-- /See:/ 'newDatePropertyOptions' smart constructor.+newtype DatePropertyOptions = DatePropertyOptions+  { -- | If set, describes how the date should be used as a search operator.+    operatorOptions :: (Core.Maybe DateOperatorOptions)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DatePropertyOptions' with the minimum fields required to make a request.+newDatePropertyOptions ::+  DatePropertyOptions+newDatePropertyOptions =+  DatePropertyOptions {operatorOptions = Core.Nothing}++instance Core.FromJSON DatePropertyOptions where+  parseJSON =+    Core.withObject+      "DatePropertyOptions"+      ( \o ->+          DatePropertyOptions Core.<$> (o Core..:? "operatorOptions")+      )++instance Core.ToJSON DatePropertyOptions where+  toJSON DatePropertyOptions {..} =+    Core.object+      ( Core.catMaybes+          [("operatorOptions" Core..=) Core.<$> operatorOptions]+      )++-- | List of date values.+--+-- /See:/ 'newDateValues' smart constructor.+newtype DateValues = DateValues+  { values :: (Core.Maybe [Date])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DateValues' with the minimum fields required to make a request.+newDateValues ::+  DateValues+newDateValues = DateValues {values = Core.Nothing}++instance Core.FromJSON DateValues where+  parseJSON =+    Core.withObject+      "DateValues"+      (\o -> DateValues Core.<$> (o Core..:? "values"))++instance Core.ToJSON DateValues where+  toJSON DateValues {..} =+    Core.object (Core.catMaybes [("values" Core..=) Core.<$> values])++-- | Shared request debug options for all cloudsearch RPC methods.+--+-- /See:/ 'newDebugOptions' smart constructor.+newtype DebugOptions = DebugOptions+  { -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    enableDebugging :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DebugOptions' with the minimum fields required to make a request.+newDebugOptions ::+  DebugOptions+newDebugOptions = DebugOptions {enableDebugging = Core.Nothing}++instance Core.FromJSON DebugOptions where+  parseJSON =+    Core.withObject+      "DebugOptions"+      (\o -> DebugOptions Core.<$> (o Core..:? "enableDebugging"))++instance Core.ToJSON DebugOptions where+  toJSON DebugOptions {..} =+    Core.object+      ( Core.catMaybes+          [("enableDebugging" Core..=) Core.<$> enableDebugging]+      )++-- | Debug Search Response.+--+-- /See:/ 'newDebugResponse' smart constructor.+data DebugResponse = DebugResponse+  { -- | Serialized string of GenericSearchRequest.+    gsrRequest :: (Core.Maybe Core.Base64),+    -- | Serialized string of GenericSearchResponse.+    gsrResponse :: (Core.Maybe Core.Base64),+    -- | Search response.+    searchResponse :: (Core.Maybe SearchResponse)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DebugResponse' with the minimum fields required to make a request.+newDebugResponse ::+  DebugResponse+newDebugResponse =+  DebugResponse+    { gsrRequest = Core.Nothing,+      gsrResponse = Core.Nothing,+      searchResponse = Core.Nothing+    }++instance Core.FromJSON DebugResponse where+  parseJSON =+    Core.withObject+      "DebugResponse"+      ( \o ->+          DebugResponse+            Core.<$> (o Core..:? "gsrRequest")+            Core.<*> (o Core..:? "gsrResponse")+            Core.<*> (o Core..:? "searchResponse")+      )++instance Core.ToJSON DebugResponse where+  toJSON DebugResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("gsrRequest" Core..=) Core.<$> gsrRequest,+            ("gsrResponse" Core..=) Core.<$> gsrResponse,+            ("searchResponse" Core..=) Core.<$> searchResponse+          ]+      )++--+-- /See:/ 'newDeleteQueueItemsRequest' smart constructor.+data DeleteQueueItemsRequest = DeleteQueueItemsRequest+  { -- | The name of connector making this call. Format: datasources\/{source_id}\/connectors\/{ID}+    connectorName :: (Core.Maybe Core.Text),+    -- | Common debug options.+    debugOptions :: (Core.Maybe DebugOptions),+    -- | The name of a queue to delete items from.+    queue :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DeleteQueueItemsRequest' with the minimum fields required to make a request.+newDeleteQueueItemsRequest ::+  DeleteQueueItemsRequest+newDeleteQueueItemsRequest =+  DeleteQueueItemsRequest+    { connectorName = Core.Nothing,+      debugOptions = Core.Nothing,+      queue = Core.Nothing+    }++instance Core.FromJSON DeleteQueueItemsRequest where+  parseJSON =+    Core.withObject+      "DeleteQueueItemsRequest"+      ( \o ->+          DeleteQueueItemsRequest+            Core.<$> (o Core..:? "connectorName")+            Core.<*> (o Core..:? "debugOptions")+            Core.<*> (o Core..:? "queue")+      )++instance Core.ToJSON DeleteQueueItemsRequest where+  toJSON DeleteQueueItemsRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("connectorName" Core..=) Core.<$> connectorName,+            ("debugOptions" Core..=) Core.<$> debugOptions,+            ("queue" Core..=) Core.<$> queue+          ]+      )++-- | A reference to a top-level property within the object that should be displayed in search results. The values of the chosen properties is displayed in the search results along with the display label for that property if one is specified. If a display label is not specified, only the values is shown.+--+-- /See:/ 'newDisplayedProperty' smart constructor.+newtype DisplayedProperty = DisplayedProperty+  { -- | The name of the top-level property as defined in a property definition for the object. If the name is not a defined property in the schema, an error is given when attempting to update the schema.+    propertyName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DisplayedProperty' with the minimum fields required to make a request.+newDisplayedProperty ::+  DisplayedProperty+newDisplayedProperty =+  DisplayedProperty {propertyName = Core.Nothing}++instance Core.FromJSON DisplayedProperty where+  parseJSON =+    Core.withObject+      "DisplayedProperty"+      (\o -> DisplayedProperty Core.<$> (o Core..:? "propertyName"))++instance Core.ToJSON DisplayedProperty where+  toJSON DisplayedProperty {..} =+    Core.object+      (Core.catMaybes [("propertyName" Core..=) Core.<$> propertyName])++-- | Used to provide a search operator for double properties. This is optional. Search operators let users restrict the query to specific fields relevant to the type of item being searched.+--+-- /See:/ 'newDoubleOperatorOptions' smart constructor.+newtype DoubleOperatorOptions = DoubleOperatorOptions+  { -- | Indicates the operator name required in the query in order to use the double property in sorting or as a facet. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    operatorName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DoubleOperatorOptions' with the minimum fields required to make a request.+newDoubleOperatorOptions ::+  DoubleOperatorOptions+newDoubleOperatorOptions =+  DoubleOperatorOptions {operatorName = Core.Nothing}++instance Core.FromJSON DoubleOperatorOptions where+  parseJSON =+    Core.withObject+      "DoubleOperatorOptions"+      (\o -> DoubleOperatorOptions Core.<$> (o Core..:? "operatorName"))++instance Core.ToJSON DoubleOperatorOptions where+  toJSON DoubleOperatorOptions {..} =+    Core.object+      (Core.catMaybes [("operatorName" Core..=) Core.<$> operatorName])++-- | The options for double properties.+--+-- /See:/ 'newDoublePropertyOptions' smart constructor.+newtype DoublePropertyOptions = DoublePropertyOptions+  { -- | If set, describes how the double should be used as a search operator.+    operatorOptions :: (Core.Maybe DoubleOperatorOptions)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DoublePropertyOptions' with the minimum fields required to make a request.+newDoublePropertyOptions ::+  DoublePropertyOptions+newDoublePropertyOptions =+  DoublePropertyOptions {operatorOptions = Core.Nothing}++instance Core.FromJSON DoublePropertyOptions where+  parseJSON =+    Core.withObject+      "DoublePropertyOptions"+      ( \o ->+          DoublePropertyOptions Core.<$> (o Core..:? "operatorOptions")+      )++instance Core.ToJSON DoublePropertyOptions where+  toJSON DoublePropertyOptions {..} =+    Core.object+      ( Core.catMaybes+          [("operatorOptions" Core..=) Core.<$> operatorOptions]+      )++-- | List of double values.+--+-- /See:/ 'newDoubleValues' smart constructor.+newtype DoubleValues = DoubleValues+  { values :: (Core.Maybe [Core.Double])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DoubleValues' with the minimum fields required to make a request.+newDoubleValues ::+  DoubleValues+newDoubleValues = DoubleValues {values = Core.Nothing}++instance Core.FromJSON DoubleValues where+  parseJSON =+    Core.withObject+      "DoubleValues"+      (\o -> DoubleValues Core.<$> (o Core..:? "values"))++instance Core.ToJSON DoubleValues where+  toJSON DoubleValues {..} =+    Core.object (Core.catMaybes [("values" Core..=) Core.<$> values])++-- | Drive follow-up search restricts (e.g. \"followup:suggestions\").+--+-- /See:/ 'newDriveFollowUpRestrict' smart constructor.+newtype DriveFollowUpRestrict = DriveFollowUpRestrict+  { type' :: (Core.Maybe DriveFollowUpRestrict_Type)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DriveFollowUpRestrict' with the minimum fields required to make a request.+newDriveFollowUpRestrict ::+  DriveFollowUpRestrict+newDriveFollowUpRestrict =+  DriveFollowUpRestrict {type' = Core.Nothing}++instance Core.FromJSON DriveFollowUpRestrict where+  parseJSON =+    Core.withObject+      "DriveFollowUpRestrict"+      (\o -> DriveFollowUpRestrict Core.<$> (o Core..:? "type"))++instance Core.ToJSON DriveFollowUpRestrict where+  toJSON DriveFollowUpRestrict {..} =+    Core.object (Core.catMaybes [("type" Core..=) Core.<$> type'])++-- | Drive location search restricts (e.g. \"is:starred\").+--+-- /See:/ 'newDriveLocationRestrict' smart constructor.+newtype DriveLocationRestrict = DriveLocationRestrict+  { type' :: (Core.Maybe DriveLocationRestrict_Type)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DriveLocationRestrict' with the minimum fields required to make a request.+newDriveLocationRestrict ::+  DriveLocationRestrict+newDriveLocationRestrict =+  DriveLocationRestrict {type' = Core.Nothing}++instance Core.FromJSON DriveLocationRestrict where+  parseJSON =+    Core.withObject+      "DriveLocationRestrict"+      (\o -> DriveLocationRestrict Core.<$> (o Core..:? "type"))++instance Core.ToJSON DriveLocationRestrict where+  toJSON DriveLocationRestrict {..} =+    Core.object (Core.catMaybes [("type" Core..=) Core.<$> type'])++-- | Drive mime-type search restricts (e.g. \"type:pdf\").+--+-- /See:/ 'newDriveMimeTypeRestrict' smart constructor.+newtype DriveMimeTypeRestrict = DriveMimeTypeRestrict+  { type' :: (Core.Maybe DriveMimeTypeRestrict_Type)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DriveMimeTypeRestrict' with the minimum fields required to make a request.+newDriveMimeTypeRestrict ::+  DriveMimeTypeRestrict+newDriveMimeTypeRestrict =+  DriveMimeTypeRestrict {type' = Core.Nothing}++instance Core.FromJSON DriveMimeTypeRestrict where+  parseJSON =+    Core.withObject+      "DriveMimeTypeRestrict"+      (\o -> DriveMimeTypeRestrict Core.<$> (o Core..:? "type"))++instance Core.ToJSON DriveMimeTypeRestrict where+  toJSON DriveMimeTypeRestrict {..} =+    Core.object (Core.catMaybes [("type" Core..=) Core.<$> type'])++-- | The time span search restrict (e.g. \"after:2017-09-11 before:2017-09-12\").+--+-- /See:/ 'newDriveTimeSpanRestrict' smart constructor.+newtype DriveTimeSpanRestrict = DriveTimeSpanRestrict+  { type' :: (Core.Maybe DriveTimeSpanRestrict_Type)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'DriveTimeSpanRestrict' with the minimum fields required to make a request.+newDriveTimeSpanRestrict ::+  DriveTimeSpanRestrict+newDriveTimeSpanRestrict =+  DriveTimeSpanRestrict {type' = Core.Nothing}++instance Core.FromJSON DriveTimeSpanRestrict where+  parseJSON =+    Core.withObject+      "DriveTimeSpanRestrict"+      (\o -> DriveTimeSpanRestrict Core.<$> (o Core..:? "type"))++instance Core.ToJSON DriveTimeSpanRestrict where+  toJSON DriveTimeSpanRestrict {..} =+    Core.object (Core.catMaybes [("type" Core..=) Core.<$> type'])++-- | A person\'s email address.+--+-- /See:/ 'newEmailAddress' smart constructor.+data EmailAddress = EmailAddress+  { -- | If the value of type is custom, this property contains the custom type string.+    customType :: (Core.Maybe Core.Text),+    -- | The email address.+    emailAddress :: (Core.Maybe Core.Text),+    -- | The URL to send email.+    emailUrl :: (Core.Maybe Core.Text),+    -- | Indicates if this is the user\'s primary email. Only one entry can be marked as primary.+    primary :: (Core.Maybe Core.Bool),+    -- | The type of the email account. Acceptable values are: \"custom\", \"home\", \"other\", \"work\".+    type' :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EmailAddress' with the minimum fields required to make a request.+newEmailAddress ::+  EmailAddress+newEmailAddress =+  EmailAddress+    { customType = Core.Nothing,+      emailAddress = Core.Nothing,+      emailUrl = Core.Nothing,+      primary = Core.Nothing,+      type' = Core.Nothing+    }++instance Core.FromJSON EmailAddress where+  parseJSON =+    Core.withObject+      "EmailAddress"+      ( \o ->+          EmailAddress+            Core.<$> (o Core..:? "customType")+            Core.<*> (o Core..:? "emailAddress")+            Core.<*> (o Core..:? "emailUrl")+            Core.<*> (o Core..:? "primary")+            Core.<*> (o Core..:? "type")+      )++instance Core.ToJSON EmailAddress where+  toJSON EmailAddress {..} =+    Core.object+      ( Core.catMaybes+          [ ("customType" Core..=) Core.<$> customType,+            ("emailAddress" Core..=) Core.<$> emailAddress,+            ("emailUrl" Core..=) Core.<$> emailUrl,+            ("primary" Core..=) Core.<$> primary,+            ("type" Core..=) Core.<$> type'+          ]+      )++--+-- /See:/ 'newEnterpriseTopazFrontendTeamsLink' smart constructor.+data EnterpriseTopazFrontendTeamsLink = EnterpriseTopazFrontendTeamsLink+  { -- | The identifying link type+    type' :: (Core.Maybe Core.Text),+    url :: (Core.Maybe SafeUrlProto)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazFrontendTeamsLink' with the minimum fields required to make a request.+newEnterpriseTopazFrontendTeamsLink ::+  EnterpriseTopazFrontendTeamsLink+newEnterpriseTopazFrontendTeamsLink =+  EnterpriseTopazFrontendTeamsLink+    { type' = Core.Nothing,+      url = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazFrontendTeamsLink where+  parseJSON =+    Core.withObject+      "EnterpriseTopazFrontendTeamsLink"+      ( \o ->+          EnterpriseTopazFrontendTeamsLink+            Core.<$> (o Core..:? "type")+            Core.<*> (o Core..:? "url")+      )++instance Core.ToJSON EnterpriseTopazFrontendTeamsLink where+  toJSON EnterpriseTopazFrontendTeamsLink {..} =+    Core.object+      ( Core.catMaybes+          [("type" Core..=) Core.<$> type', ("url" Core..=) Core.<$> url]+      )++--+-- /See:/ 'newEnterpriseTopazFrontendTeamsPersonCorePhoneNumber' smart constructor.+data EnterpriseTopazFrontendTeamsPersonCorePhoneNumber = EnterpriseTopazFrontendTeamsPersonCorePhoneNumber+  { -- | Phone number in no particular format (as comes from the Focus profile).+    phoneNumber :: (Core.Maybe Core.Text),+    -- | Phone number URL+    phoneUrl :: (Core.Maybe SafeUrlProto),+    type' :: (Core.Maybe EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazFrontendTeamsPersonCorePhoneNumber' with the minimum fields required to make a request.+newEnterpriseTopazFrontendTeamsPersonCorePhoneNumber ::+  EnterpriseTopazFrontendTeamsPersonCorePhoneNumber+newEnterpriseTopazFrontendTeamsPersonCorePhoneNumber =+  EnterpriseTopazFrontendTeamsPersonCorePhoneNumber+    { phoneNumber =+        Core.Nothing,+      phoneUrl = Core.Nothing,+      type' = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazFrontendTeamsPersonCorePhoneNumber+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazFrontendTeamsPersonCorePhoneNumber"+      ( \o ->+          EnterpriseTopazFrontendTeamsPersonCorePhoneNumber+            Core.<$> (o Core..:? "phoneNumber")+            Core.<*> (o Core..:? "phoneUrl")+            Core.<*> (o Core..:? "type")+      )++instance+  Core.ToJSON+    EnterpriseTopazFrontendTeamsPersonCorePhoneNumber+  where+  toJSON EnterpriseTopazFrontendTeamsPersonCorePhoneNumber {..} =+    Core.object+      ( Core.catMaybes+          [ ("phoneNumber" Core..=) Core.<$> phoneNumber,+            ("phoneUrl" Core..=) Core.<$> phoneUrl,+            ("type" Core..=) Core.<$> type'+          ]+      )++-- | An AgendaEntry, e.g., a Calendar Event.+--+-- /See:/ 'newEnterpriseTopazSidekickAgendaEntry' smart constructor.+data EnterpriseTopazSidekickAgendaEntry = EnterpriseTopazSidekickAgendaEntry+  { -- | URL of the agenda item.+    agendaItemUrl :: (Core.Maybe Core.Text),+    -- | The chronology from the present.+    chronology :: (Core.Maybe EnterpriseTopazSidekickAgendaEntry_Chronology),+    -- | Person who created the event.+    creator :: (Core.Maybe EnterpriseTopazSidekickPerson),+    -- | Attendance status for the current user making the request. This is a convenience data member in order to avoid figuring out the same by iterating the invitee list above on the caller side.+    currentUserAttendingStatus ::+      ( Core.Maybe+          EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus+      ),+    -- | Description of the agenda item (i.e., typically, summary in calendar event).+    description :: (Core.Maybe Core.Text),+    -- | Items related to the current AgendaEntry. E.g., related drive\/mail\/groups documents.+    document :: (Core.Maybe [EnterpriseTopazSidekickCommonDocument]),+    -- | End date \"Friday, August 26\" in the user\'s timezone.+    endDate :: (Core.Maybe Core.Text),+    -- | End time (HH:mm) in the user\'s timezone.+    endTime :: (Core.Maybe Core.Text),+    -- | End time in milliseconds+    endTimeMs :: (Core.Maybe Core.Int64),+    -- | Event id provided by Calendar API.+    eventId :: (Core.Maybe Core.Text),+    -- | Whether the guests can invite other guests.+    guestsCanInviteOthers :: (Core.Maybe Core.Bool),+    -- | Whether the guests can modify the event.+    guestsCanModify :: (Core.Maybe Core.Bool),+    -- | Whether the guests of the event can be seen. If false, the user is going to be reported as the only attendee to the meeting, even though there may be more attendees.+    guestsCanSeeGuests :: (Core.Maybe Core.Bool),+    -- | Hangout meeting identifier.+    hangoutId :: (Core.Maybe Core.Text),+    -- | Absolute URL for the Hangout meeting.+    hangoutUrl :: (Core.Maybe Core.Text),+    -- | People attending the meeting.+    invitee :: (Core.Maybe [EnterpriseTopazSidekickPerson]),+    -- | Whether the entry lasts all day.+    isAllDay :: (Core.Maybe Core.Bool),+    -- | Last time the event was modified.+    lastModificationTimeMs :: (Core.Maybe Core.Int64),+    -- | Agenda item location.+    location :: (Core.Maybe Core.Text),+    -- | Whether this should be notified to the user.+    notifyToUser :: (Core.Maybe Core.Bool),+    -- | Whether guest list is not returned because number of attendees is too large.+    otherAttendeesExcluded :: (Core.Maybe Core.Bool),+    -- | Whether the requester is the owner of the agenda entry.+    requesterIsOwner :: (Core.Maybe Core.Bool),+    -- | Whether the details of this entry should be displayed to the user.+    showFullEventDetailsToUse :: (Core.Maybe Core.Bool),+    -- | Start date \"Friday, August 26\" in the user\'s timezone.+    startDate :: (Core.Maybe Core.Text),+    -- | Start time (HH:mm) in the user\'s timezone.+    startTime :: (Core.Maybe Core.Text),+    -- | Start time in milliseconds.+    startTimeMs :: (Core.Maybe Core.Int64),+    -- | User\'s calendar timezone;+    timeZone :: (Core.Maybe Core.Text),+    -- | Title of the agenda item.+    title :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickAgendaEntry' with the minimum fields required to make a request.+newEnterpriseTopazSidekickAgendaEntry ::+  EnterpriseTopazSidekickAgendaEntry+newEnterpriseTopazSidekickAgendaEntry =+  EnterpriseTopazSidekickAgendaEntry+    { agendaItemUrl = Core.Nothing,+      chronology = Core.Nothing,+      creator = Core.Nothing,+      currentUserAttendingStatus = Core.Nothing,+      description = Core.Nothing,+      document = Core.Nothing,+      endDate = Core.Nothing,+      endTime = Core.Nothing,+      endTimeMs = Core.Nothing,+      eventId = Core.Nothing,+      guestsCanInviteOthers = Core.Nothing,+      guestsCanModify = Core.Nothing,+      guestsCanSeeGuests = Core.Nothing,+      hangoutId = Core.Nothing,+      hangoutUrl = Core.Nothing,+      invitee = Core.Nothing,+      isAllDay = Core.Nothing,+      lastModificationTimeMs = Core.Nothing,+      location = Core.Nothing,+      notifyToUser = Core.Nothing,+      otherAttendeesExcluded = Core.Nothing,+      requesterIsOwner = Core.Nothing,+      showFullEventDetailsToUse = Core.Nothing,+      startDate = Core.Nothing,+      startTime = Core.Nothing,+      startTimeMs = Core.Nothing,+      timeZone = Core.Nothing,+      title = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickAgendaEntry where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickAgendaEntry"+      ( \o ->+          EnterpriseTopazSidekickAgendaEntry+            Core.<$> (o Core..:? "agendaItemUrl")+            Core.<*> (o Core..:? "chronology")+            Core.<*> (o Core..:? "creator")+            Core.<*> (o Core..:? "currentUserAttendingStatus")+            Core.<*> (o Core..:? "description")+            Core.<*> (o Core..:? "document")+            Core.<*> (o Core..:? "endDate")+            Core.<*> (o Core..:? "endTime")+            Core.<*> (o Core..:? "endTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "eventId")+            Core.<*> (o Core..:? "guestsCanInviteOthers")+            Core.<*> (o Core..:? "guestsCanModify")+            Core.<*> (o Core..:? "guestsCanSeeGuests")+            Core.<*> (o Core..:? "hangoutId")+            Core.<*> (o Core..:? "hangoutUrl")+            Core.<*> (o Core..:? "invitee")+            Core.<*> (o Core..:? "isAllDay")+            Core.<*> ( o+                         Core..:? "lastModificationTimeMs"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "location")+            Core.<*> (o Core..:? "notifyToUser")+            Core.<*> (o Core..:? "otherAttendeesExcluded")+            Core.<*> (o Core..:? "requesterIsOwner")+            Core.<*> (o Core..:? "showFullEventDetailsToUse")+            Core.<*> (o Core..:? "startDate")+            Core.<*> (o Core..:? "startTime")+            Core.<*> (o Core..:? "startTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "timeZone")+            Core.<*> (o Core..:? "title")+      )++instance Core.ToJSON EnterpriseTopazSidekickAgendaEntry where+  toJSON EnterpriseTopazSidekickAgendaEntry {..} =+    Core.object+      ( Core.catMaybes+          [ ("agendaItemUrl" Core..=) Core.<$> agendaItemUrl,+            ("chronology" Core..=) Core.<$> chronology,+            ("creator" Core..=) Core.<$> creator,+            ("currentUserAttendingStatus" Core..=)+              Core.<$> currentUserAttendingStatus,+            ("description" Core..=) Core.<$> description,+            ("document" Core..=) Core.<$> document,+            ("endDate" Core..=) Core.<$> endDate,+            ("endTime" Core..=) Core.<$> endTime,+            ("endTimeMs" Core..=) Core.. Core.AsText Core.<$> endTimeMs,+            ("eventId" Core..=) Core.<$> eventId,+            ("guestsCanInviteOthers" Core..=) Core.<$> guestsCanInviteOthers,+            ("guestsCanModify" Core..=) Core.<$> guestsCanModify,+            ("guestsCanSeeGuests" Core..=) Core.<$> guestsCanSeeGuests,+            ("hangoutId" Core..=) Core.<$> hangoutId,+            ("hangoutUrl" Core..=) Core.<$> hangoutUrl,+            ("invitee" Core..=) Core.<$> invitee,+            ("isAllDay" Core..=) Core.<$> isAllDay,+            ("lastModificationTimeMs" Core..=)+              Core.. Core.AsText+              Core.<$> lastModificationTimeMs,+            ("location" Core..=) Core.<$> location,+            ("notifyToUser" Core..=) Core.<$> notifyToUser,+            ("otherAttendeesExcluded" Core..=) Core.<$> otherAttendeesExcluded,+            ("requesterIsOwner" Core..=) Core.<$> requesterIsOwner,+            ("showFullEventDetailsToUse" Core..=)+              Core.<$> showFullEventDetailsToUse,+            ("startDate" Core..=) Core.<$> startDate,+            ("startTime" Core..=) Core.<$> startTime,+            ("startTimeMs" Core..=) Core.. Core.AsText Core.<$> startTimeMs,+            ("timeZone" Core..=) Core.<$> timeZone,+            ("title" Core..=) Core.<$> title+          ]+      )++--+-- /See:/ 'newEnterpriseTopazSidekickAgendaGroupCardProto' smart constructor.+data EnterpriseTopazSidekickAgendaGroupCardProto = EnterpriseTopazSidekickAgendaGroupCardProto+  { agendaItem :: (Core.Maybe [EnterpriseTopazSidekickAgendaItem]),+    context :: (Core.Maybe EnterpriseTopazSidekickAgendaGroupCardProtoContext),+    currentAgendaItem :: (Core.Maybe EnterpriseTopazSidekickAgendaItem)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickAgendaGroupCardProto' with the minimum fields required to make a request.+newEnterpriseTopazSidekickAgendaGroupCardProto ::+  EnterpriseTopazSidekickAgendaGroupCardProto+newEnterpriseTopazSidekickAgendaGroupCardProto =+  EnterpriseTopazSidekickAgendaGroupCardProto+    { agendaItem =+        Core.Nothing,+      context = Core.Nothing,+      currentAgendaItem = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickAgendaGroupCardProto where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickAgendaGroupCardProto"+      ( \o ->+          EnterpriseTopazSidekickAgendaGroupCardProto+            Core.<$> (o Core..:? "agendaItem")+            Core.<*> (o Core..:? "context")+            Core.<*> (o Core..:? "currentAgendaItem")+      )++instance Core.ToJSON EnterpriseTopazSidekickAgendaGroupCardProto where+  toJSON EnterpriseTopazSidekickAgendaGroupCardProto {..} =+    Core.object+      ( Core.catMaybes+          [ ("agendaItem" Core..=) Core.<$> agendaItem,+            ("context" Core..=) Core.<$> context,+            ("currentAgendaItem" Core..=) Core.<$> currentAgendaItem+          ]+      )++-- | The context that resulted in the generation of the card.+--+-- /See:/ 'newEnterpriseTopazSidekickAgendaGroupCardProtoContext' smart constructor.+data EnterpriseTopazSidekickAgendaGroupCardProtoContext = EnterpriseTopazSidekickAgendaGroupCardProtoContext+  { -- | User friendly free text that describes the context of the card (e.g. \"Next meeting with Bob\"). This is largely only applicable when the card is generated from a query.+    context :: (Core.Maybe Core.Text),+    -- | Localized free text that describes the dates represented by the card. Currently, the card will only represent a single day.+    date :: (Core.Maybe Core.Text),+    -- | Represents restrictions applied to the events requested in the user\'s query.+    eventsRestrict ::+      ( Core.Maybe+          EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict+      )+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickAgendaGroupCardProtoContext' with the minimum fields required to make a request.+newEnterpriseTopazSidekickAgendaGroupCardProtoContext ::+  EnterpriseTopazSidekickAgendaGroupCardProtoContext+newEnterpriseTopazSidekickAgendaGroupCardProtoContext =+  EnterpriseTopazSidekickAgendaGroupCardProtoContext+    { context =+        Core.Nothing,+      date = Core.Nothing,+      eventsRestrict = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickAgendaGroupCardProtoContext+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickAgendaGroupCardProtoContext"+      ( \o ->+          EnterpriseTopazSidekickAgendaGroupCardProtoContext+            Core.<$> (o Core..:? "context")+            Core.<*> (o Core..:? "date")+            Core.<*> (o Core..:? "eventsRestrict")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickAgendaGroupCardProtoContext+  where+  toJSON EnterpriseTopazSidekickAgendaGroupCardProtoContext {..} =+    Core.object+      ( Core.catMaybes+          [ ("context" Core..=) Core.<$> context,+            ("date" Core..=) Core.<$> date,+            ("eventsRestrict" Core..=) Core.<$> eventsRestrict+          ]+      )++--+-- /See:/ 'newEnterpriseTopazSidekickAgendaItem' smart constructor.+data EnterpriseTopazSidekickAgendaItem = EnterpriseTopazSidekickAgendaItem+  { conflictedGroup :: (Core.Maybe EnterpriseTopazSidekickConflictingEventsCardProto),+    gapBefore :: (Core.Maybe EnterpriseTopazSidekickGap),+    meeting :: (Core.Maybe EnterpriseTopazSidekickAgendaEntry)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickAgendaItem' with the minimum fields required to make a request.+newEnterpriseTopazSidekickAgendaItem ::+  EnterpriseTopazSidekickAgendaItem+newEnterpriseTopazSidekickAgendaItem =+  EnterpriseTopazSidekickAgendaItem+    { conflictedGroup = Core.Nothing,+      gapBefore = Core.Nothing,+      meeting = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickAgendaItem where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickAgendaItem"+      ( \o ->+          EnterpriseTopazSidekickAgendaItem+            Core.<$> (o Core..:? "conflictedGroup")+            Core.<*> (o Core..:? "gapBefore")+            Core.<*> (o Core..:? "meeting")+      )++instance Core.ToJSON EnterpriseTopazSidekickAgendaItem where+  toJSON EnterpriseTopazSidekickAgendaItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("conflictedGroup" Core..=) Core.<$> conflictedGroup,+            ("gapBefore" Core..=) Core.<$> gapBefore,+            ("meeting" Core..=) Core.<$> meeting+          ]+      )++-- | A list of answers represented as free text.+--+-- /See:/ 'newEnterpriseTopazSidekickAnswerAnswerList' smart constructor.+data EnterpriseTopazSidekickAnswerAnswerList = EnterpriseTopazSidekickAnswerAnswerList+  { -- | Answers that have a corresponding label.+    labeledAnswer :: (Core.Maybe [EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer]),+    -- | Answer type.+    type' :: (Core.Maybe EnterpriseTopazSidekickAnswerAnswerList_Type)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickAnswerAnswerList' with the minimum fields required to make a request.+newEnterpriseTopazSidekickAnswerAnswerList ::+  EnterpriseTopazSidekickAnswerAnswerList+newEnterpriseTopazSidekickAnswerAnswerList =+  EnterpriseTopazSidekickAnswerAnswerList+    { labeledAnswer =+        Core.Nothing,+      type' = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickAnswerAnswerList where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickAnswerAnswerList"+      ( \o ->+          EnterpriseTopazSidekickAnswerAnswerList+            Core.<$> (o Core..:? "labeledAnswer")+            Core.<*> (o Core..:? "type")+      )++instance Core.ToJSON EnterpriseTopazSidekickAnswerAnswerList where+  toJSON EnterpriseTopazSidekickAnswerAnswerList {..} =+    Core.object+      ( Core.catMaybes+          [ ("labeledAnswer" Core..=) Core.<$> labeledAnswer,+            ("type" Core..=) Core.<$> type'+          ]+      )++-- | An answer with a corresponding label.+--+-- /See:/ 'newEnterpriseTopazSidekickAnswerAnswerListLabeledAnswer' smart constructor.+data EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer = EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer+  { -- | The free text answer.+    answer :: (Core.Maybe Core.Text),+    -- | A localized label for the answer (e.g. \"Cell phone\" vs \"Desk phone\").+    label :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer' with the minimum fields required to make a request.+newEnterpriseTopazSidekickAnswerAnswerListLabeledAnswer ::+  EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer+newEnterpriseTopazSidekickAnswerAnswerListLabeledAnswer =+  EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer+    { answer =+        Core.Nothing,+      label = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer"+      ( \o ->+          EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer+            Core.<$> (o Core..:? "answer")+            Core.<*> (o Core..:? "label")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer+  where+  toJSON EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer {..} =+    Core.object+      ( Core.catMaybes+          [ ("answer" Core..=) Core.<$> answer,+            ("label" Core..=) Core.<$> label+          ]+      )++-- | Contains a list of suggested queries. Allows the user to determine what natural language queries they can ask Cloud Search (e.g. \"what can I search for?\").+--+-- /See:/ 'newEnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard' smart constructor.+newtype EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard = EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard+  { -- | A list of queries to suggest.+    suggestedQueryCategory :: (Core.Maybe [EnterpriseTopazSidekickAnswerSuggestedQueryCategory])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard' with the minimum fields required to make a request.+newEnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard ::+  EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard+newEnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard =+  EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard+    { suggestedQueryCategory =+        Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard"+      ( \o ->+          EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard+            Core.<$> (o Core..:? "suggestedQueryCategory")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard+  where+  toJSON EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard {..} =+    Core.object+      ( Core.catMaybes+          [ ("suggestedQueryCategory" Core..=)+              Core.<$> suggestedQueryCategory+          ]+      )++-- | Contains a list of suggested queries for a single category.+--+-- /See:/ 'newEnterpriseTopazSidekickAnswerSuggestedQueryCategory' smart constructor.+data EnterpriseTopazSidekickAnswerSuggestedQueryCategory = EnterpriseTopazSidekickAnswerSuggestedQueryCategory+  { -- | The query list category.+    category ::+      ( Core.Maybe+          EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category+      ),+    -- | Whether this category is enabled.+    isEnabled :: (Core.Maybe Core.Bool),+    -- | List of suggested queries to show the user.+    query :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickAnswerSuggestedQueryCategory' with the minimum fields required to make a request.+newEnterpriseTopazSidekickAnswerSuggestedQueryCategory ::+  EnterpriseTopazSidekickAnswerSuggestedQueryCategory+newEnterpriseTopazSidekickAnswerSuggestedQueryCategory =+  EnterpriseTopazSidekickAnswerSuggestedQueryCategory+    { category =+        Core.Nothing,+      isEnabled = Core.Nothing,+      query = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickAnswerSuggestedQueryCategory+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickAnswerSuggestedQueryCategory"+      ( \o ->+          EnterpriseTopazSidekickAnswerSuggestedQueryCategory+            Core.<$> (o Core..:? "category")+            Core.<*> (o Core..:? "isEnabled")+            Core.<*> (o Core..:? "query")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickAnswerSuggestedQueryCategory+  where+  toJSON EnterpriseTopazSidekickAnswerSuggestedQueryCategory {..} =+    Core.object+      ( Core.catMaybes+          [ ("category" Core..=) Core.<$> category,+            ("isEnabled" Core..=) Core.<$> isEnabled,+            ("query" Core..=) Core.<$> query+          ]+      )++-- | Wrapper proto for the Assist cards.+--+-- /See:/ 'newEnterpriseTopazSidekickAssistCardProto' smart constructor.+data EnterpriseTopazSidekickAssistCardProto = EnterpriseTopazSidekickAssistCardProto+  { -- | Agenda group card.+    agendaGroupCardProto :: (Core.Maybe EnterpriseTopazSidekickAgendaGroupCardProto),+    -- | Card metadata such as chronology and render mode of the card.+    cardMetadata :: (Core.Maybe EnterpriseTopazSidekickCardMetadata),+    -- | Card type.+    cardType :: (Core.Maybe EnterpriseTopazSidekickAssistCardProto_CardType),+    -- | Conflicting events card.+    conflictingMeetingsCard :: (Core.Maybe EnterpriseTopazSidekickConflictingEventsCardProto),+    -- | Answer card for documents that are applicable to the current query.+    documentListCard :: (Core.Maybe EnterpriseTopazSidekickDocumentPerCategoryList),+    -- | Documents with mentions.+    documentsWithMentions :: (Core.Maybe EnterpriseTopazSidekickDocumentPerCategoryList),+    -- | Find meeting time card.+    findMeetingTimeCard :: (Core.Maybe EnterpriseTopazSidekickFindMeetingTimeCardProto),+    -- | Generic answer card.+    genericAnswerCard :: (Core.Maybe EnterpriseTopazSidekickGenericAnswerCard),+    -- | Get and keep ahead card.+    getAndKeepAheadCard :: (Core.Maybe EnterpriseTopazSidekickGetAndKeepAheadCardProto),+    -- | Meeting card.+    meeting :: (Core.Maybe EnterpriseTopazSidekickAgendaEntry),+    -- | Meeting notes card.+    meetingNotesCard :: (Core.Maybe EnterpriseTopazSidekickMeetingNotesCardProto),+    -- | Request for meeting notes card.+    meetingNotesCardRequest :: (Core.Maybe EnterpriseTopazSidekickMeetingNotesCardRequest),+    -- | The people disambiguation card.+    peopleDisambiguationCard :: (Core.Maybe EnterpriseTopazSidekickPeopleDisambiguationCard),+    -- | People Search promotion card.+    peoplePromotionCard :: (Core.Maybe PeoplePromotionCard),+    -- | Answer card that represents a single person.+    personAnswerCard :: (Core.Maybe EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard),+    -- | Full profile card.+    personProfileCard :: (Core.Maybe EnterpriseTopazSidekickPersonProfileCard),+    -- | Card with recommended documents for the user.+    personalizedDocsCard :: (Core.Maybe EnterpriseTopazSidekickPersonalizedDocsCardProto),+    -- | Answer card that represents a list of people related to a person.+    relatedPeopleAnswerCard ::+      ( Core.Maybe+          EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard+      ),+    -- | Sahre meeting docs card.+    shareMeetingDocsCard :: (Core.Maybe EnterpriseTopazSidekickShareMeetingDocsCardProto),+    -- | Shared documents.+    sharedDocuments :: (Core.Maybe EnterpriseTopazSidekickDocumentPerCategoryList),+    -- | Answer card for what natural language queries the user can ask.+    suggestedQueryAnswerCard :: (Core.Maybe EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard),+    -- | Third party answer cards.+    thirdPartyAnswerCard :: (Core.Maybe ThirdPartyGenericCard),+    -- | Work In Progress card.+    workInProgressCardProto :: (Core.Maybe EnterpriseTopazSidekickRecentDocumentsCardProto)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickAssistCardProto' with the minimum fields required to make a request.+newEnterpriseTopazSidekickAssistCardProto ::+  EnterpriseTopazSidekickAssistCardProto+newEnterpriseTopazSidekickAssistCardProto =+  EnterpriseTopazSidekickAssistCardProto+    { agendaGroupCardProto =+        Core.Nothing,+      cardMetadata = Core.Nothing,+      cardType = Core.Nothing,+      conflictingMeetingsCard = Core.Nothing,+      documentListCard = Core.Nothing,+      documentsWithMentions = Core.Nothing,+      findMeetingTimeCard = Core.Nothing,+      genericAnswerCard = Core.Nothing,+      getAndKeepAheadCard = Core.Nothing,+      meeting = Core.Nothing,+      meetingNotesCard = Core.Nothing,+      meetingNotesCardRequest = Core.Nothing,+      peopleDisambiguationCard = Core.Nothing,+      peoplePromotionCard = Core.Nothing,+      personAnswerCard = Core.Nothing,+      personProfileCard = Core.Nothing,+      personalizedDocsCard = Core.Nothing,+      relatedPeopleAnswerCard = Core.Nothing,+      shareMeetingDocsCard = Core.Nothing,+      sharedDocuments = Core.Nothing,+      suggestedQueryAnswerCard = Core.Nothing,+      thirdPartyAnswerCard = Core.Nothing,+      workInProgressCardProto = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickAssistCardProto where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickAssistCardProto"+      ( \o ->+          EnterpriseTopazSidekickAssistCardProto+            Core.<$> (o Core..:? "agendaGroupCardProto")+            Core.<*> (o Core..:? "cardMetadata")+            Core.<*> (o Core..:? "cardType")+            Core.<*> (o Core..:? "conflictingMeetingsCard")+            Core.<*> (o Core..:? "documentListCard")+            Core.<*> (o Core..:? "documentsWithMentions")+            Core.<*> (o Core..:? "findMeetingTimeCard")+            Core.<*> (o Core..:? "genericAnswerCard")+            Core.<*> (o Core..:? "getAndKeepAheadCard")+            Core.<*> (o Core..:? "meeting")+            Core.<*> (o Core..:? "meetingNotesCard")+            Core.<*> (o Core..:? "meetingNotesCardRequest")+            Core.<*> (o Core..:? "peopleDisambiguationCard")+            Core.<*> (o Core..:? "peoplePromotionCard")+            Core.<*> (o Core..:? "personAnswerCard")+            Core.<*> (o Core..:? "personProfileCard")+            Core.<*> (o Core..:? "personalizedDocsCard")+            Core.<*> (o Core..:? "relatedPeopleAnswerCard")+            Core.<*> (o Core..:? "shareMeetingDocsCard")+            Core.<*> (o Core..:? "sharedDocuments")+            Core.<*> (o Core..:? "suggestedQueryAnswerCard")+            Core.<*> (o Core..:? "thirdPartyAnswerCard")+            Core.<*> (o Core..:? "workInProgressCardProto")+      )++instance Core.ToJSON EnterpriseTopazSidekickAssistCardProto where+  toJSON EnterpriseTopazSidekickAssistCardProto {..} =+    Core.object+      ( Core.catMaybes+          [ ("agendaGroupCardProto" Core..=) Core.<$> agendaGroupCardProto,+            ("cardMetadata" Core..=) Core.<$> cardMetadata,+            ("cardType" Core..=) Core.<$> cardType,+            ("conflictingMeetingsCard" Core..=)+              Core.<$> conflictingMeetingsCard,+            ("documentListCard" Core..=) Core.<$> documentListCard,+            ("documentsWithMentions" Core..=) Core.<$> documentsWithMentions,+            ("findMeetingTimeCard" Core..=) Core.<$> findMeetingTimeCard,+            ("genericAnswerCard" Core..=) Core.<$> genericAnswerCard,+            ("getAndKeepAheadCard" Core..=) Core.<$> getAndKeepAheadCard,+            ("meeting" Core..=) Core.<$> meeting,+            ("meetingNotesCard" Core..=) Core.<$> meetingNotesCard,+            ("meetingNotesCardRequest" Core..=)+              Core.<$> meetingNotesCardRequest,+            ("peopleDisambiguationCard" Core..=)+              Core.<$> peopleDisambiguationCard,+            ("peoplePromotionCard" Core..=) Core.<$> peoplePromotionCard,+            ("personAnswerCard" Core..=) Core.<$> personAnswerCard,+            ("personProfileCard" Core..=) Core.<$> personProfileCard,+            ("personalizedDocsCard" Core..=) Core.<$> personalizedDocsCard,+            ("relatedPeopleAnswerCard" Core..=)+              Core.<$> relatedPeopleAnswerCard,+            ("shareMeetingDocsCard" Core..=) Core.<$> shareMeetingDocsCard,+            ("sharedDocuments" Core..=) Core.<$> sharedDocuments,+            ("suggestedQueryAnswerCard" Core..=)+              Core.<$> suggestedQueryAnswerCard,+            ("thirdPartyAnswerCard" Core..=) Core.<$> thirdPartyAnswerCard,+            ("workInProgressCardProto" Core..=)+              Core.<$> workInProgressCardProto+          ]+      )++-- | Card metadata.+--+-- /See:/ 'newEnterpriseTopazSidekickCardMetadata' smart constructor.+data EnterpriseTopazSidekickCardMetadata = EnterpriseTopazSidekickCardMetadata+  { -- | Declares a preference for how this card should be packed in MSCR. All cards in a response must correspond to a single category. As a result, cards may be dropped from the response if this field is set. Any card that does not match the category of the card with the highest priority in the response will be dropped.+    cardCategory :: (Core.Maybe EnterpriseTopazSidekickCardMetadata_CardCategory),+    -- | An ID to identify the card and match actions to it. Be thoughtful of new card IDs since actions will be associated to that ID. E.g., if two card IDs collide, the system will think that the actions have been applied to the same card. Similarly, if EAS can return multiple cards of the same type (e.g., Meetings), ensure that the card_id identifies a given instance of the card so that, e.g., dismissals only affect the dismissed card as opposed to affecting all meeting cards.+    cardId :: (Core.Maybe Core.Text),+    -- | Chronology.+    chronology :: (Core.Maybe EnterpriseTopazSidekickCardMetadata_Chronology),+    -- | Debug info (only reported if request\'s debug_level > 0).+    debugInfo :: (Core.Maybe Core.Text),+    -- | Information about the NLP done to get the card.+    nlpMetadata :: (Core.Maybe EnterpriseTopazSidekickNlpMetadata),+    -- | Ranking params.+    rankingParams :: (Core.Maybe EnterpriseTopazSidekickRankingParams),+    -- | Render mode.+    renderMode :: (Core.Maybe EnterpriseTopazSidekickCardMetadata_RenderMode)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickCardMetadata' with the minimum fields required to make a request.+newEnterpriseTopazSidekickCardMetadata ::+  EnterpriseTopazSidekickCardMetadata+newEnterpriseTopazSidekickCardMetadata =+  EnterpriseTopazSidekickCardMetadata+    { cardCategory = Core.Nothing,+      cardId = Core.Nothing,+      chronology = Core.Nothing,+      debugInfo = Core.Nothing,+      nlpMetadata = Core.Nothing,+      rankingParams = Core.Nothing,+      renderMode = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickCardMetadata where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickCardMetadata"+      ( \o ->+          EnterpriseTopazSidekickCardMetadata+            Core.<$> (o Core..:? "cardCategory")+            Core.<*> (o Core..:? "cardId")+            Core.<*> (o Core..:? "chronology")+            Core.<*> (o Core..:? "debugInfo")+            Core.<*> (o Core..:? "nlpMetadata")+            Core.<*> (o Core..:? "rankingParams")+            Core.<*> (o Core..:? "renderMode")+      )++instance Core.ToJSON EnterpriseTopazSidekickCardMetadata where+  toJSON EnterpriseTopazSidekickCardMetadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("cardCategory" Core..=) Core.<$> cardCategory,+            ("cardId" Core..=) Core.<$> cardId,+            ("chronology" Core..=) Core.<$> chronology,+            ("debugInfo" Core..=) Core.<$> debugInfo,+            ("nlpMetadata" Core..=) Core.<$> nlpMetadata,+            ("rankingParams" Core..=) Core.<$> rankingParams,+            ("renderMode" Core..=) Core.<$> renderMode+          ]+      )++-- | Container of debugging information in all object levels. Extend as needed.+--+-- /See:/ 'newEnterpriseTopazSidekickCommonDebugInfo' smart constructor.+newtype EnterpriseTopazSidekickCommonDebugInfo = EnterpriseTopazSidekickCommonDebugInfo+  { -- | Debug message.+    message :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickCommonDebugInfo' with the minimum fields required to make a request.+newEnterpriseTopazSidekickCommonDebugInfo ::+  EnterpriseTopazSidekickCommonDebugInfo+newEnterpriseTopazSidekickCommonDebugInfo =+  EnterpriseTopazSidekickCommonDebugInfo {message = Core.Nothing}++instance Core.FromJSON EnterpriseTopazSidekickCommonDebugInfo where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickCommonDebugInfo"+      ( \o ->+          EnterpriseTopazSidekickCommonDebugInfo+            Core.<$> (o Core..:? "message")+      )++instance Core.ToJSON EnterpriseTopazSidekickCommonDebugInfo where+  toJSON EnterpriseTopazSidekickCommonDebugInfo {..} =+    Core.object+      (Core.catMaybes [("message" Core..=) Core.<$> message])++-- | Representation of a document. NEXT_TAG: 15+--+-- /See:/ 'newEnterpriseTopazSidekickCommonDocument' smart constructor.+data EnterpriseTopazSidekickCommonDocument = EnterpriseTopazSidekickCommonDocument+  { -- | Access type, i.e., whether the user has access to the document or not.+    accessType :: (Core.Maybe EnterpriseTopazSidekickCommonDocument_AccessType),+    -- | Information for debugging.+    debugInfo :: (Core.Maybe EnterpriseTopazSidekickCommonDebugInfo),+    -- | Document id.+    documentId :: (Core.Maybe Core.Text),+    -- | Drive document metadata.+    driveDocumentMetadata ::+      ( Core.Maybe+          EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata+      ),+    -- | Generic Drive-based url in the format of drive.google.com\/open to be used for deeplink+    genericUrl :: (Core.Maybe Core.Text),+    -- | Justification on why the document is selected.+    justification :: (Core.Maybe EnterpriseTopazSidekickCommonDocumentJustification),+    -- | MIME type+    mimeType :: (Core.Maybe Core.Text),+    -- | Document provenance.+    provenance :: (Core.Maybe EnterpriseTopazSidekickCommonDocument_Provenance),+    -- | Justification of why this document is being returned.+    reason :: (Core.Maybe EnterpriseTopazSidekickCommonDocument_Reason),+    -- | A sampling of the text from the document.+    snippet :: (Core.Maybe Core.Text),+    -- | Thumbnail URL.+    thumbnailUrl :: (Core.Maybe Core.Text),+    -- | Title of the document.+    title :: (Core.Maybe Core.Text),+    -- | Type of the document.+    type' :: (Core.Maybe EnterpriseTopazSidekickCommonDocument_Type),+    -- | Absolute URL of the document.+    url :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickCommonDocument' with the minimum fields required to make a request.+newEnterpriseTopazSidekickCommonDocument ::+  EnterpriseTopazSidekickCommonDocument+newEnterpriseTopazSidekickCommonDocument =+  EnterpriseTopazSidekickCommonDocument+    { accessType = Core.Nothing,+      debugInfo = Core.Nothing,+      documentId = Core.Nothing,+      driveDocumentMetadata = Core.Nothing,+      genericUrl = Core.Nothing,+      justification = Core.Nothing,+      mimeType = Core.Nothing,+      provenance = Core.Nothing,+      reason = Core.Nothing,+      snippet = Core.Nothing,+      thumbnailUrl = Core.Nothing,+      title = Core.Nothing,+      type' = Core.Nothing,+      url = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickCommonDocument where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickCommonDocument"+      ( \o ->+          EnterpriseTopazSidekickCommonDocument+            Core.<$> (o Core..:? "accessType")+            Core.<*> (o Core..:? "debugInfo")+            Core.<*> (o Core..:? "documentId")+            Core.<*> (o Core..:? "driveDocumentMetadata")+            Core.<*> (o Core..:? "genericUrl")+            Core.<*> (o Core..:? "justification")+            Core.<*> (o Core..:? "mimeType")+            Core.<*> (o Core..:? "provenance")+            Core.<*> (o Core..:? "reason")+            Core.<*> (o Core..:? "snippet")+            Core.<*> (o Core..:? "thumbnailUrl")+            Core.<*> (o Core..:? "title")+            Core.<*> (o Core..:? "type")+            Core.<*> (o Core..:? "url")+      )++instance Core.ToJSON EnterpriseTopazSidekickCommonDocument where+  toJSON EnterpriseTopazSidekickCommonDocument {..} =+    Core.object+      ( Core.catMaybes+          [ ("accessType" Core..=) Core.<$> accessType,+            ("debugInfo" Core..=) Core.<$> debugInfo,+            ("documentId" Core..=) Core.<$> documentId,+            ("driveDocumentMetadata" Core..=) Core.<$> driveDocumentMetadata,+            ("genericUrl" Core..=) Core.<$> genericUrl,+            ("justification" Core..=) Core.<$> justification,+            ("mimeType" Core..=) Core.<$> mimeType,+            ("provenance" Core..=) Core.<$> provenance,+            ("reason" Core..=) Core.<$> reason,+            ("snippet" Core..=) Core.<$> snippet,+            ("thumbnailUrl" Core..=) Core.<$> thumbnailUrl,+            ("title" Core..=) Core.<$> title,+            ("type" Core..=) Core.<$> type',+            ("url" Core..=) Core.<$> url+          ]+      )++-- | Meta data for drive documents.+--+-- /See:/ 'newEnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata' smart constructor.+data EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata = EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata+  { -- | The drive document cosmo id. Client could use the id to build a URL to open a document. Please use Document.document_id.+    documentId :: (Core.Maybe Core.Text),+    -- | Additional field to identify whether a document is private since scope set to LIMITED can mean both that the doc is private or that it\'s shared with others. is_private indicates whether the doc is not shared with anyone except for the owner.+    isPrivate :: (Core.Maybe Core.Bool),+    -- | Timestamp of the most recent comment added to the document in milliseconds since epoch.+    lastCommentTimeMs :: (Core.Maybe Core.Word64),+    -- | Timestamp of the most recent edit from the current user in milliseconds since epoch.+    lastEditTimeMs :: (Core.Maybe Core.Word64),+    -- | Last modification time of the document (independent of the user that modified it).+    lastModificationTimeMillis :: (Core.Maybe Core.Int64),+    -- | Timestamp of the last updated time of the document in milliseconds since epoch.+    lastUpdatedTimeMs :: (Core.Maybe Core.Word64),+    -- | Timestamp of the most recent view from the current user in milliseconds since epoch.+    lastViewTimeMs :: (Core.Maybe Core.Word64),+    -- | The owner of the document.+    owner :: (Core.Maybe EnterpriseTopazSidekickCommonPerson),+    -- | ACL scope of the document which identifies the sharing status of the doc (e.g., limited, shared with link, team drive, ...).+    scope ::+      ( Core.Maybe+          EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope+      )+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata' with the minimum fields required to make a request.+newEnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata ::+  EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata+newEnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata =+  EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata+    { documentId =+        Core.Nothing,+      isPrivate = Core.Nothing,+      lastCommentTimeMs = Core.Nothing,+      lastEditTimeMs = Core.Nothing,+      lastModificationTimeMillis =+        Core.Nothing,+      lastUpdatedTimeMs = Core.Nothing,+      lastViewTimeMs = Core.Nothing,+      owner = Core.Nothing,+      scope = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata"+      ( \o ->+          EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata+            Core.<$> (o Core..:? "documentId")+            Core.<*> (o Core..:? "isPrivate")+            Core.<*> (o Core..:? "lastCommentTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "lastEditTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> ( o+                         Core..:? "lastModificationTimeMillis"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "lastUpdatedTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "lastViewTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "owner")+            Core.<*> (o Core..:? "scope")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata+  where+  toJSON+    EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata {..} =+      Core.object+        ( Core.catMaybes+            [ ("documentId" Core..=) Core.<$> documentId,+              ("isPrivate" Core..=) Core.<$> isPrivate,+              ("lastCommentTimeMs" Core..=)+                Core.. Core.AsText+                Core.<$> lastCommentTimeMs,+              ("lastEditTimeMs" Core..=)+                Core.. Core.AsText+                Core.<$> lastEditTimeMs,+              ("lastModificationTimeMillis" Core..=)+                Core.. Core.AsText+                Core.<$> lastModificationTimeMillis,+              ("lastUpdatedTimeMs" Core..=)+                Core.. Core.AsText+                Core.<$> lastUpdatedTimeMs,+              ("lastViewTimeMs" Core..=)+                Core.. Core.AsText+                Core.<$> lastViewTimeMs,+              ("owner" Core..=) Core.<$> owner,+              ("scope" Core..=) Core.<$> scope+            ]+        )++-- | Justification of why we are reporting the document.+--+-- /See:/ 'newEnterpriseTopazSidekickCommonDocumentJustification' smart constructor.+data EnterpriseTopazSidekickCommonDocumentJustification = EnterpriseTopazSidekickCommonDocumentJustification+  { -- | A locale aware message that explains why this document was selected.+    justification :: (Core.Maybe Core.Text),+    -- | Reason on why the document is selected. Populate for trending documents.+    reason ::+      ( Core.Maybe+          EnterpriseTopazSidekickCommonDocumentJustification_Reason+      )+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickCommonDocumentJustification' with the minimum fields required to make a request.+newEnterpriseTopazSidekickCommonDocumentJustification ::+  EnterpriseTopazSidekickCommonDocumentJustification+newEnterpriseTopazSidekickCommonDocumentJustification =+  EnterpriseTopazSidekickCommonDocumentJustification+    { justification =+        Core.Nothing,+      reason = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickCommonDocumentJustification+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickCommonDocumentJustification"+      ( \o ->+          EnterpriseTopazSidekickCommonDocumentJustification+            Core.<$> (o Core..:? "justification")+            Core.<*> (o Core..:? "reason")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickCommonDocumentJustification+  where+  toJSON EnterpriseTopazSidekickCommonDocumentJustification {..} =+    Core.object+      ( Core.catMaybes+          [ ("justification" Core..=) Core.<$> justification,+            ("reason" Core..=) Core.<$> reason+          ]+      )++-- | Common representation of a person.+--+-- /See:/ 'newEnterpriseTopazSidekickCommonPerson' smart constructor.+data EnterpriseTopazSidekickCommonPerson = EnterpriseTopazSidekickCommonPerson+  { -- | The birthday.+    birthday :: (Core.Maybe EnterpriseTopazSidekickCommonPersonBirthday),+    -- | Cell phone number.+    cellPhone :: (Core.Maybe Core.Text),+    -- | The department the person works in (e.g. Engineering).+    department :: (Core.Maybe Core.Text),+    -- | Desk location (e.g. US-MTV-PR55-5-5B1I).+    deskLocation :: (Core.Maybe Core.Text),+    -- | Work desk phone number.+    deskPhone :: (Core.Maybe Core.Text),+    -- | The full name.+    displayName :: (Core.Maybe Core.Text),+    -- | Email.+    email :: (Core.Maybe Core.Text),+    -- | The last name.+    familyName :: (Core.Maybe Core.Text),+    -- | The fully formatted address (e.g. 1255 Pear Avenue, Mountain View 94043, United States).+    fullAddress :: (Core.Maybe Core.Text),+    -- | This field is deprecated. The obfuscated_id should be used instead.+    gaiaId :: (Core.Maybe Core.Int64),+    -- | The first name.+    givenName :: (Core.Maybe Core.Text),+    -- | The person\'s job title (e.g. Software Engineer).+    jobTitle :: (Core.Maybe Core.Text),+    -- | The manager.+    manager :: (Core.Maybe EnterpriseTopazSidekickCommonPerson),+    -- | The obfuscated GAIA ID.+    obfuscatedId :: (Core.Maybe Core.Text),+    -- | The URL for the Focus profile picture.+    photoUrl :: (Core.Maybe Core.Text),+    -- | The street address (e.g. 1255 Pear Avenue).+    streetAddress :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickCommonPerson' with the minimum fields required to make a request.+newEnterpriseTopazSidekickCommonPerson ::+  EnterpriseTopazSidekickCommonPerson+newEnterpriseTopazSidekickCommonPerson =+  EnterpriseTopazSidekickCommonPerson+    { birthday = Core.Nothing,+      cellPhone = Core.Nothing,+      department = Core.Nothing,+      deskLocation = Core.Nothing,+      deskPhone = Core.Nothing,+      displayName = Core.Nothing,+      email = Core.Nothing,+      familyName = Core.Nothing,+      fullAddress = Core.Nothing,+      gaiaId = Core.Nothing,+      givenName = Core.Nothing,+      jobTitle = Core.Nothing,+      manager = Core.Nothing,+      obfuscatedId = Core.Nothing,+      photoUrl = Core.Nothing,+      streetAddress = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickCommonPerson where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickCommonPerson"+      ( \o ->+          EnterpriseTopazSidekickCommonPerson+            Core.<$> (o Core..:? "birthday")+            Core.<*> (o Core..:? "cellPhone")+            Core.<*> (o Core..:? "department")+            Core.<*> (o Core..:? "deskLocation")+            Core.<*> (o Core..:? "deskPhone")+            Core.<*> (o Core..:? "displayName")+            Core.<*> (o Core..:? "email")+            Core.<*> (o Core..:? "familyName")+            Core.<*> (o Core..:? "fullAddress")+            Core.<*> (o Core..:? "gaiaId" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "givenName")+            Core.<*> (o Core..:? "jobTitle")+            Core.<*> (o Core..:? "manager")+            Core.<*> (o Core..:? "obfuscatedId")+            Core.<*> (o Core..:? "photoUrl")+            Core.<*> (o Core..:? "streetAddress")+      )++instance Core.ToJSON EnterpriseTopazSidekickCommonPerson where+  toJSON EnterpriseTopazSidekickCommonPerson {..} =+    Core.object+      ( Core.catMaybes+          [ ("birthday" Core..=) Core.<$> birthday,+            ("cellPhone" Core..=) Core.<$> cellPhone,+            ("department" Core..=) Core.<$> department,+            ("deskLocation" Core..=) Core.<$> deskLocation,+            ("deskPhone" Core..=) Core.<$> deskPhone,+            ("displayName" Core..=) Core.<$> displayName,+            ("email" Core..=) Core.<$> email,+            ("familyName" Core..=) Core.<$> familyName,+            ("fullAddress" Core..=) Core.<$> fullAddress,+            ("gaiaId" Core..=) Core.. Core.AsText Core.<$> gaiaId,+            ("givenName" Core..=) Core.<$> givenName,+            ("jobTitle" Core..=) Core.<$> jobTitle,+            ("manager" Core..=) Core.<$> manager,+            ("obfuscatedId" Core..=) Core.<$> obfuscatedId,+            ("photoUrl" Core..=) Core.<$> photoUrl,+            ("streetAddress" Core..=) Core.<$> streetAddress+          ]+      )++--+-- /See:/ 'newEnterpriseTopazSidekickCommonPersonBirthday' smart constructor.+newtype EnterpriseTopazSidekickCommonPersonBirthday = EnterpriseTopazSidekickCommonPersonBirthday+  { -- | Unstructured birthday.+    value :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickCommonPersonBirthday' with the minimum fields required to make a request.+newEnterpriseTopazSidekickCommonPersonBirthday ::+  EnterpriseTopazSidekickCommonPersonBirthday+newEnterpriseTopazSidekickCommonPersonBirthday =+  EnterpriseTopazSidekickCommonPersonBirthday {value = Core.Nothing}++instance Core.FromJSON EnterpriseTopazSidekickCommonPersonBirthday where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickCommonPersonBirthday"+      ( \o ->+          EnterpriseTopazSidekickCommonPersonBirthday+            Core.<$> (o Core..:? "value")+      )++instance Core.ToJSON EnterpriseTopazSidekickCommonPersonBirthday where+  toJSON EnterpriseTopazSidekickCommonPersonBirthday {..} =+    Core.object (Core.catMaybes [("value" Core..=) Core.<$> value])++-- | Conflicting meetings card proto.+--+-- /See:/ 'newEnterpriseTopazSidekickConflictingEventsCardProto' smart constructor.+data EnterpriseTopazSidekickConflictingEventsCardProto = EnterpriseTopazSidekickConflictingEventsCardProto+  { -- | All the events that conflict with main_event.+    conflictingEvent :: (Core.Maybe [EnterpriseTopazSidekickAgendaEntry]),+    -- | The event identified as being the most important.+    mainEvent :: (Core.Maybe EnterpriseTopazSidekickAgendaEntry)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickConflictingEventsCardProto' with the minimum fields required to make a request.+newEnterpriseTopazSidekickConflictingEventsCardProto ::+  EnterpriseTopazSidekickConflictingEventsCardProto+newEnterpriseTopazSidekickConflictingEventsCardProto =+  EnterpriseTopazSidekickConflictingEventsCardProto+    { conflictingEvent =+        Core.Nothing,+      mainEvent = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickConflictingEventsCardProto+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickConflictingEventsCardProto"+      ( \o ->+          EnterpriseTopazSidekickConflictingEventsCardProto+            Core.<$> (o Core..:? "conflictingEvent")+            Core.<*> (o Core..:? "mainEvent")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickConflictingEventsCardProto+  where+  toJSON EnterpriseTopazSidekickConflictingEventsCardProto {..} =+    Core.object+      ( Core.catMaybes+          [ ("conflictingEvent" Core..=) Core.<$> conflictingEvent,+            ("mainEvent" Core..=) Core.<$> mainEvent+          ]+      )++-- | Represents a mapping between a document type and its corresponding documents. Use for Work in Progress card in v1 homepage.+--+-- /See:/ 'newEnterpriseTopazSidekickDocumentGroup' smart constructor.+data EnterpriseTopazSidekickDocumentGroup = EnterpriseTopazSidekickDocumentGroup+  { -- | Document group type+    groupType :: (Core.Maybe EnterpriseTopazSidekickDocumentGroup_GroupType),+    -- | The list of corresponding documents.+    personalizedDocument :: (Core.Maybe [EnterpriseTopazSidekickCommonDocument])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickDocumentGroup' with the minimum fields required to make a request.+newEnterpriseTopazSidekickDocumentGroup ::+  EnterpriseTopazSidekickDocumentGroup+newEnterpriseTopazSidekickDocumentGroup =+  EnterpriseTopazSidekickDocumentGroup+    { groupType = Core.Nothing,+      personalizedDocument = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickDocumentGroup where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickDocumentGroup"+      ( \o ->+          EnterpriseTopazSidekickDocumentGroup+            Core.<$> (o Core..:? "groupType")+            Core.<*> (o Core..:? "personalizedDocument")+      )++instance Core.ToJSON EnterpriseTopazSidekickDocumentGroup where+  toJSON EnterpriseTopazSidekickDocumentGroup {..} =+    Core.object+      ( Core.catMaybes+          [ ("groupType" Core..=) Core.<$> groupType,+            ("personalizedDocument" Core..=) Core.<$> personalizedDocument+          ]+      )++--+-- /See:/ 'newEnterpriseTopazSidekickDocumentPerCategoryList' smart constructor.+data EnterpriseTopazSidekickDocumentPerCategoryList = EnterpriseTopazSidekickDocumentPerCategoryList+  { documents ::+      ( Core.Maybe+          [EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry]+      ),+    -- | Localized message explaining how the documents were derived (e.g. from the last 30 days activity). This field is optional.+    helpMessage :: (Core.Maybe Core.Text),+    listType ::+      ( Core.Maybe+          EnterpriseTopazSidekickDocumentPerCategoryList_ListType+      ),+    -- | Description of the types of documents present in the list.+    listTypeDescription :: (Core.Maybe Core.Text),+    -- | Response message in case no documents are present in the card.+    responseMessage :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickDocumentPerCategoryList' with the minimum fields required to make a request.+newEnterpriseTopazSidekickDocumentPerCategoryList ::+  EnterpriseTopazSidekickDocumentPerCategoryList+newEnterpriseTopazSidekickDocumentPerCategoryList =+  EnterpriseTopazSidekickDocumentPerCategoryList+    { documents =+        Core.Nothing,+      helpMessage = Core.Nothing,+      listType = Core.Nothing,+      listTypeDescription = Core.Nothing,+      responseMessage = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickDocumentPerCategoryList+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickDocumentPerCategoryList"+      ( \o ->+          EnterpriseTopazSidekickDocumentPerCategoryList+            Core.<$> (o Core..:? "documents")+            Core.<*> (o Core..:? "helpMessage")+            Core.<*> (o Core..:? "listType")+            Core.<*> (o Core..:? "listTypeDescription")+            Core.<*> (o Core..:? "responseMessage")+      )++instance Core.ToJSON EnterpriseTopazSidekickDocumentPerCategoryList where+  toJSON EnterpriseTopazSidekickDocumentPerCategoryList {..} =+    Core.object+      ( Core.catMaybes+          [ ("documents" Core..=) Core.<$> documents,+            ("helpMessage" Core..=) Core.<$> helpMessage,+            ("listType" Core..=) Core.<$> listType,+            ("listTypeDescription" Core..=) Core.<$> listTypeDescription,+            ("responseMessage" Core..=) Core.<$> responseMessage+          ]+      )++--+-- /See:/ 'newEnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry' smart constructor.+data EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry = EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry+  { category ::+      ( Core.Maybe+          EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+      ),+    document :: (Core.Maybe EnterpriseTopazSidekickCommonDocument),+    -- | Reason this document was selected.+    rationale :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry' with the minimum fields required to make a request.+newEnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry ::+  EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry+newEnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry =+  EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry+    { category =+        Core.Nothing,+      document =+        Core.Nothing,+      rationale =+        Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry"+      ( \o ->+          EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry+            Core.<$> (o Core..:? "category")+            Core.<*> (o Core..:? "document")+            Core.<*> (o Core..:? "rationale")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry+  where+  toJSON+    EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry {..} =+      Core.object+        ( Core.catMaybes+            [ ("category" Core..=) Core.<$> category,+              ("document" Core..=) Core.<$> document,+              ("rationale" Core..=) Core.<$> rationale+            ]+        )++-- | Response to find meeting time among a set of people.+--+-- /See:/ 'newEnterpriseTopazSidekickFindMeetingTimeCardProto' smart constructor.+data EnterpriseTopazSidekickFindMeetingTimeCardProto = EnterpriseTopazSidekickFindMeetingTimeCardProto+  { -- | Slots when all attendees have availability.+    commonAvailableTimeSlots :: (Core.Maybe [EnterpriseTopazSidekickTimeSlot]),+    -- | Invitees to the event.+    invitees :: (Core.Maybe [EnterpriseTopazSidekickPerson]),+    -- | Requester.+    requester :: (Core.Maybe EnterpriseTopazSidekickPerson),+    -- | Details about the scheduled meeting, if one exists.+    scheduledMeeting :: (Core.Maybe EnterpriseTopazSidekickScheduledMeeting),+    -- | Invitees that have been skipped in the computation, most likely because they are groups.+    skippedInvitees :: (Core.Maybe [EnterpriseTopazSidekickPerson]),+    -- | Min and max timestamp used to find a common available timeslot.+    timeBoundaries :: (Core.Maybe EnterpriseTopazSidekickTimeSlot),+    -- | Timezone ID.+    timezoneId :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickFindMeetingTimeCardProto' with the minimum fields required to make a request.+newEnterpriseTopazSidekickFindMeetingTimeCardProto ::+  EnterpriseTopazSidekickFindMeetingTimeCardProto+newEnterpriseTopazSidekickFindMeetingTimeCardProto =+  EnterpriseTopazSidekickFindMeetingTimeCardProto+    { commonAvailableTimeSlots =+        Core.Nothing,+      invitees = Core.Nothing,+      requester = Core.Nothing,+      scheduledMeeting = Core.Nothing,+      skippedInvitees = Core.Nothing,+      timeBoundaries = Core.Nothing,+      timezoneId = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickFindMeetingTimeCardProto+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickFindMeetingTimeCardProto"+      ( \o ->+          EnterpriseTopazSidekickFindMeetingTimeCardProto+            Core.<$> (o Core..:? "commonAvailableTimeSlots")+            Core.<*> (o Core..:? "invitees")+            Core.<*> (o Core..:? "requester")+            Core.<*> (o Core..:? "scheduledMeeting")+            Core.<*> (o Core..:? "skippedInvitees")+            Core.<*> (o Core..:? "timeBoundaries")+            Core.<*> (o Core..:? "timezoneId")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickFindMeetingTimeCardProto+  where+  toJSON EnterpriseTopazSidekickFindMeetingTimeCardProto {..} =+    Core.object+      ( Core.catMaybes+          [ ("commonAvailableTimeSlots" Core..=)+              Core.<$> commonAvailableTimeSlots,+            ("invitees" Core..=) Core.<$> invitees,+            ("requester" Core..=) Core.<$> requester,+            ("scheduledMeeting" Core..=) Core.<$> scheduledMeeting,+            ("skippedInvitees" Core..=) Core.<$> skippedInvitees,+            ("timeBoundaries" Core..=) Core.<$> timeBoundaries,+            ("timezoneId" Core..=) Core.<$> timezoneId+          ]+      )++--+-- /See:/ 'newEnterpriseTopazSidekickGap' smart constructor.+data EnterpriseTopazSidekickGap = EnterpriseTopazSidekickGap+  { -- | Localized time string in the format: 1 hour 15 minutes+    displayRemainingTime :: (Core.Maybe Core.Text),+    -- | Localized time string in the format:(Locale CZ) 8:30 odp.+    endTime :: (Core.Maybe Core.Text),+    endTimeMs :: (Core.Maybe Core.Word64),+    remainingTime :: (Core.Maybe Core.Duration),+    -- | Localized time string in the format:(Locale CZ) 8:30 odp.+    startTime :: (Core.Maybe Core.Text),+    startTimeMs :: (Core.Maybe Core.Word64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickGap' with the minimum fields required to make a request.+newEnterpriseTopazSidekickGap ::+  EnterpriseTopazSidekickGap+newEnterpriseTopazSidekickGap =+  EnterpriseTopazSidekickGap+    { displayRemainingTime = Core.Nothing,+      endTime = Core.Nothing,+      endTimeMs = Core.Nothing,+      remainingTime = Core.Nothing,+      startTime = Core.Nothing,+      startTimeMs = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickGap where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickGap"+      ( \o ->+          EnterpriseTopazSidekickGap+            Core.<$> (o Core..:? "displayRemainingTime")+            Core.<*> (o Core..:? "endTime")+            Core.<*> (o Core..:? "endTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "remainingTime")+            Core.<*> (o Core..:? "startTime")+            Core.<*> (o Core..:? "startTimeMs" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON EnterpriseTopazSidekickGap where+  toJSON EnterpriseTopazSidekickGap {..} =+    Core.object+      ( Core.catMaybes+          [ ("displayRemainingTime" Core..=) Core.<$> displayRemainingTime,+            ("endTime" Core..=) Core.<$> endTime,+            ("endTimeMs" Core..=) Core.. Core.AsText Core.<$> endTimeMs,+            ("remainingTime" Core..=) Core.<$> remainingTime,+            ("startTime" Core..=) Core.<$> startTime,+            ("startTimeMs" Core..=) Core.. Core.AsText Core.<$> startTimeMs+          ]+      )++--+-- /See:/ 'newEnterpriseTopazSidekickGenericAnswerCard' smart constructor.+data EnterpriseTopazSidekickGenericAnswerCard = EnterpriseTopazSidekickGenericAnswerCard+  { -- | The answer.+    answer :: (Core.Maybe Core.Text),+    -- | Title or header of the card.+    title :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickGenericAnswerCard' with the minimum fields required to make a request.+newEnterpriseTopazSidekickGenericAnswerCard ::+  EnterpriseTopazSidekickGenericAnswerCard+newEnterpriseTopazSidekickGenericAnswerCard =+  EnterpriseTopazSidekickGenericAnswerCard+    { answer = Core.Nothing,+      title = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickGenericAnswerCard where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickGenericAnswerCard"+      ( \o ->+          EnterpriseTopazSidekickGenericAnswerCard+            Core.<$> (o Core..:? "answer")+            Core.<*> (o Core..:? "title")+      )++instance Core.ToJSON EnterpriseTopazSidekickGenericAnswerCard where+  toJSON EnterpriseTopazSidekickGenericAnswerCard {..} =+    Core.object+      ( Core.catMaybes+          [ ("answer" Core..=) Core.<$> answer,+            ("title" Core..=) Core.<$> title+          ]+      )++-- | Get and keep ahead card+--+-- /See:/ 'newEnterpriseTopazSidekickGetAndKeepAheadCardProto' smart constructor.+data EnterpriseTopazSidekickGetAndKeepAheadCardProto = EnterpriseTopazSidekickGetAndKeepAheadCardProto+  { declinedEvents ::+      ( Core.Maybe+          EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents+      ),+    mentionedDocuments :: (Core.Maybe EnterpriseTopazSidekickDocumentPerCategoryList),+    sharedDocuments :: (Core.Maybe EnterpriseTopazSidekickDocumentPerCategoryList)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickGetAndKeepAheadCardProto' with the minimum fields required to make a request.+newEnterpriseTopazSidekickGetAndKeepAheadCardProto ::+  EnterpriseTopazSidekickGetAndKeepAheadCardProto+newEnterpriseTopazSidekickGetAndKeepAheadCardProto =+  EnterpriseTopazSidekickGetAndKeepAheadCardProto+    { declinedEvents =+        Core.Nothing,+      mentionedDocuments = Core.Nothing,+      sharedDocuments = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickGetAndKeepAheadCardProto+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickGetAndKeepAheadCardProto"+      ( \o ->+          EnterpriseTopazSidekickGetAndKeepAheadCardProto+            Core.<$> (o Core..:? "declinedEvents")+            Core.<*> (o Core..:? "mentionedDocuments")+            Core.<*> (o Core..:? "sharedDocuments")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickGetAndKeepAheadCardProto+  where+  toJSON EnterpriseTopazSidekickGetAndKeepAheadCardProto {..} =+    Core.object+      ( Core.catMaybes+          [ ("declinedEvents" Core..=) Core.<$> declinedEvents,+            ("mentionedDocuments" Core..=) Core.<$> mentionedDocuments,+            ("sharedDocuments" Core..=) Core.<$> sharedDocuments+          ]+      )++-- | A list of events where all guests declined.+--+-- /See:/ 'newEnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents' smart constructor.+newtype EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents = EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents+  { events :: (Core.Maybe [EnterpriseTopazSidekickAgendaEntry])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents' with the minimum fields required to make a request.+newEnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents ::+  EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents+newEnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents =+  EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents+    { events =+        Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents"+      ( \o ->+          EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents+            Core.<$> (o Core..:? "events")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents+  where+  toJSON+    EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents {..} =+      Core.object (Core.catMaybes [("events" Core..=) Core.<$> events])++-- | Errors in the creation of meeting notes.+--+-- /See:/ 'newEnterpriseTopazSidekickMeetingNotesCardError' smart constructor.+data EnterpriseTopazSidekickMeetingNotesCardError = EnterpriseTopazSidekickMeetingNotesCardError+  { -- | The description of the reason why create-meeting-notes failed.+    description :: (Core.Maybe Core.Text),+    -- | The event to request meeting notes creation+    event :: (Core.Maybe EnterpriseTopazSidekickAgendaEntry),+    -- | The reason why create-meeting-notes failed.+    reason :: (Core.Maybe EnterpriseTopazSidekickMeetingNotesCardError_Reason)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickMeetingNotesCardError' with the minimum fields required to make a request.+newEnterpriseTopazSidekickMeetingNotesCardError ::+  EnterpriseTopazSidekickMeetingNotesCardError+newEnterpriseTopazSidekickMeetingNotesCardError =+  EnterpriseTopazSidekickMeetingNotesCardError+    { description =+        Core.Nothing,+      event = Core.Nothing,+      reason = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickMeetingNotesCardError where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickMeetingNotesCardError"+      ( \o ->+          EnterpriseTopazSidekickMeetingNotesCardError+            Core.<$> (o Core..:? "description")+            Core.<*> (o Core..:? "event")+            Core.<*> (o Core..:? "reason")+      )++instance Core.ToJSON EnterpriseTopazSidekickMeetingNotesCardError where+  toJSON EnterpriseTopazSidekickMeetingNotesCardError {..} =+    Core.object+      ( Core.catMaybes+          [ ("description" Core..=) Core.<$> description,+            ("event" Core..=) Core.<$> event,+            ("reason" Core..=) Core.<$> reason+          ]+      )++-- | Information about the meeting notes created.+--+-- /See:/ 'newEnterpriseTopazSidekickMeetingNotesCardProto' smart constructor.+data EnterpriseTopazSidekickMeetingNotesCardProto = EnterpriseTopazSidekickMeetingNotesCardProto+  { -- | The event to request meeting notes creation.+    event :: (Core.Maybe EnterpriseTopazSidekickAgendaEntry),+    -- | Google Drive ID (a.k.a. resource ID) of the file.+    fileId :: (Core.Maybe Core.Text),+    -- | Title we want to show for meeting notes in the answer card+    title :: (Core.Maybe Core.Text),+    -- | New URL.+    url :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickMeetingNotesCardProto' with the minimum fields required to make a request.+newEnterpriseTopazSidekickMeetingNotesCardProto ::+  EnterpriseTopazSidekickMeetingNotesCardProto+newEnterpriseTopazSidekickMeetingNotesCardProto =+  EnterpriseTopazSidekickMeetingNotesCardProto+    { event =+        Core.Nothing,+      fileId = Core.Nothing,+      title = Core.Nothing,+      url = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickMeetingNotesCardProto where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickMeetingNotesCardProto"+      ( \o ->+          EnterpriseTopazSidekickMeetingNotesCardProto+            Core.<$> (o Core..:? "event")+            Core.<*> (o Core..:? "fileId")+            Core.<*> (o Core..:? "title")+            Core.<*> (o Core..:? "url")+      )++instance Core.ToJSON EnterpriseTopazSidekickMeetingNotesCardProto where+  toJSON EnterpriseTopazSidekickMeetingNotesCardProto {..} =+    Core.object+      ( Core.catMaybes+          [ ("event" Core..=) Core.<$> event,+            ("fileId" Core..=) Core.<$> fileId,+            ("title" Core..=) Core.<$> title,+            ("url" Core..=) Core.<$> url+          ]+      )++-- | Meeting notes card request.+--+-- /See:/ 'newEnterpriseTopazSidekickMeetingNotesCardRequest' smart constructor.+data EnterpriseTopazSidekickMeetingNotesCardRequest = EnterpriseTopazSidekickMeetingNotesCardRequest+  { -- | Who are the meeting notes created for.+    canCreateFor ::+      ( Core.Maybe+          [EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem]+      ),+    -- | The error and reason if known error occured.+    error :: (Core.Maybe EnterpriseTopazSidekickMeetingNotesCardError),+    -- | The event to request meeting notes creation+    event :: (Core.Maybe EnterpriseTopazSidekickAgendaEntry)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickMeetingNotesCardRequest' with the minimum fields required to make a request.+newEnterpriseTopazSidekickMeetingNotesCardRequest ::+  EnterpriseTopazSidekickMeetingNotesCardRequest+newEnterpriseTopazSidekickMeetingNotesCardRequest =+  EnterpriseTopazSidekickMeetingNotesCardRequest+    { canCreateFor =+        Core.Nothing,+      error = Core.Nothing,+      event = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickMeetingNotesCardRequest+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickMeetingNotesCardRequest"+      ( \o ->+          EnterpriseTopazSidekickMeetingNotesCardRequest+            Core.<$> (o Core..:? "canCreateFor")+            Core.<*> (o Core..:? "error")+            Core.<*> (o Core..:? "event")+      )++instance Core.ToJSON EnterpriseTopazSidekickMeetingNotesCardRequest where+  toJSON EnterpriseTopazSidekickMeetingNotesCardRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("canCreateFor" Core..=) Core.<$> canCreateFor,+            ("error" Core..=) Core.<$> error,+            ("event" Core..=) Core.<$> event+          ]+      )++-- | Metadata about the NLP interpretation of the query.+--+-- /See:/ 'newEnterpriseTopazSidekickNlpMetadata' smart constructor.+newtype EnterpriseTopazSidekickNlpMetadata = EnterpriseTopazSidekickNlpMetadata+  { -- | Confidence of the interpretation that generated this card.+    confidence :: (Core.Maybe Core.Double)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickNlpMetadata' with the minimum fields required to make a request.+newEnterpriseTopazSidekickNlpMetadata ::+  EnterpriseTopazSidekickNlpMetadata+newEnterpriseTopazSidekickNlpMetadata =+  EnterpriseTopazSidekickNlpMetadata {confidence = Core.Nothing}++instance Core.FromJSON EnterpriseTopazSidekickNlpMetadata where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickNlpMetadata"+      ( \o ->+          EnterpriseTopazSidekickNlpMetadata+            Core.<$> (o Core..:? "confidence")+      )++instance Core.ToJSON EnterpriseTopazSidekickNlpMetadata where+  toJSON EnterpriseTopazSidekickNlpMetadata {..} =+    Core.object+      (Core.catMaybes [("confidence" Core..=) Core.<$> confidence])++-- | Metadata for disambiguation.+--+-- /See:/ 'newEnterpriseTopazSidekickPeopleAnswerDisambiguationInfo' smart constructor.+data EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo = EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo+  { -- | A list of people that also matched the query. This list is not complete.+    disambiguation ::+      ( Core.Maybe+          [EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson]+      ),+    -- | The name that was extracted from the query. This may be in the form of the given name, last name, full name, LDAP, or email address. This name can be considered suitable for displaying to the user and can largely be considered to be normalized (e.g. \"Bob\'s\" -> \"Bob\").+    name :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo' with the minimum fields required to make a request.+newEnterpriseTopazSidekickPeopleAnswerDisambiguationInfo ::+  EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo+newEnterpriseTopazSidekickPeopleAnswerDisambiguationInfo =+  EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo+    { disambiguation =+        Core.Nothing,+      name = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo"+      ( \o ->+          EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo+            Core.<$> (o Core..:? "disambiguation")+            Core.<*> (o Core..:? "name")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo+  where+  toJSON EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo {..} =+    Core.object+      ( Core.catMaybes+          [ ("disambiguation" Core..=) Core.<$> disambiguation,+            ("name" Core..=) Core.<$> name+          ]+      )++-- | A person that also matches the query, but was not selected due to a lower affinity with the requesting user.+--+-- /See:/ 'newEnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson' smart constructor.+data EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson = EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson+  { -- | The profile of this person.+    person :: (Core.Maybe EnterpriseTopazSidekickCommonPerson),+    -- | The query that can be used to produce an answer card with the same attribute, but for this person.+    query :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson' with the minimum fields required to make a request.+newEnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson ::+  EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson+newEnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson =+  EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson+    { person =+        Core.Nothing,+      query = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson"+      ( \o ->+          EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson+            Core.<$> (o Core..:? "person")+            Core.<*> (o Core..:? "query")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson+  where+  toJSON+    EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson {..} =+      Core.object+        ( Core.catMaybes+            [ ("person" Core..=) Core.<$> person,+              ("query" Core..=) Core.<$> query+            ]+        )++-- | Recommended header to display for the card.+--+-- /See:/ 'newEnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader' smart constructor.+newtype EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader = EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader+  { -- | The suggested title to display. This defaults to the user\'s query.+    title :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader' with the minimum fields required to make a request.+newEnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader ::+  EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader+newEnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader =+  EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader+    { title =+        Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader"+      ( \o ->+          EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader+            Core.<$> (o Core..:? "title")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader+  where+  toJSON+    EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader {..} =+      Core.object (Core.catMaybes [("title" Core..=) Core.<$> title])++-- | An answer card for a single person.+--+-- /See:/ 'newEnterpriseTopazSidekickPeopleAnswerPersonAnswerCard' smart constructor.+data EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard = EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard+  { -- | List of answers.+    answer :: (Core.Maybe [SafeHtmlProto]),+    -- | List of answers.+    answerText :: (Core.Maybe EnterpriseTopazSidekickAnswerAnswerList),+    -- | Disambiguation information.+    disambiguationInfo :: (Core.Maybe EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo),+    -- | The header to display for the card.+    header ::+      ( Core.Maybe+          EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader+      ),+    -- | The response status.+    responseStatus ::+      ( Core.Maybe+          EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus+      ),+    -- | Localized user friendly message to display to the user in the case of missing data or an error.+    statusMessage :: (Core.Maybe Core.Text),+    -- | The profile of the person that was the subject of the query.+    subject :: (Core.Maybe EnterpriseTopazSidekickCommonPerson)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard' with the minimum fields required to make a request.+newEnterpriseTopazSidekickPeopleAnswerPersonAnswerCard ::+  EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard+newEnterpriseTopazSidekickPeopleAnswerPersonAnswerCard =+  EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard+    { answer =+        Core.Nothing,+      answerText = Core.Nothing,+      disambiguationInfo = Core.Nothing,+      header = Core.Nothing,+      responseStatus = Core.Nothing,+      statusMessage = Core.Nothing,+      subject = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard"+      ( \o ->+          EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard+            Core.<$> (o Core..:? "answer")+            Core.<*> (o Core..:? "answerText")+            Core.<*> (o Core..:? "disambiguationInfo")+            Core.<*> (o Core..:? "header")+            Core.<*> (o Core..:? "responseStatus")+            Core.<*> (o Core..:? "statusMessage")+            Core.<*> (o Core..:? "subject")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard+  where+  toJSON EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard {..} =+    Core.object+      ( Core.catMaybes+          [ ("answer" Core..=) Core.<$> answer,+            ("answerText" Core..=) Core.<$> answerText,+            ("disambiguationInfo" Core..=) Core.<$> disambiguationInfo,+            ("header" Core..=) Core.<$> header,+            ("responseStatus" Core..=) Core.<$> responseStatus,+            ("statusMessage" Core..=) Core.<$> statusMessage,+            ("subject" Core..=) Core.<$> subject+          ]+      )++-- | An answer card for a list of people that are related to the subject of the query.+--+-- /See:/ 'newEnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard' smart constructor.+data EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard = EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard+  { -- | Disambiguation information.+    disambiguationInfo :: (Core.Maybe EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo),+    -- | The header to display for the card.+    header ::+      ( Core.Maybe+          EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader+      ),+    -- | A list of people that are related to the query subject.+    relatedPeople :: (Core.Maybe [EnterpriseTopazSidekickCommonPerson]),+    -- | Defines the type of relation the list of people have with the subject of the card.+    relationType ::+      ( Core.Maybe+          EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType+      ),+    -- | The response status.+    responseStatus ::+      ( Core.Maybe+          EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus+      ),+    -- | Localized user friendly message to display to the user in the case of missing data or an error.+    statusMessage :: (Core.Maybe Core.Text),+    -- | The profile of the person that was the subject of the query.+    subject :: (Core.Maybe EnterpriseTopazSidekickCommonPerson)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard' with the minimum fields required to make a request.+newEnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard ::+  EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard+newEnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard =+  EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard+    { disambiguationInfo =+        Core.Nothing,+      header = Core.Nothing,+      relatedPeople = Core.Nothing,+      relationType = Core.Nothing,+      responseStatus = Core.Nothing,+      statusMessage = Core.Nothing,+      subject = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard"+      ( \o ->+          EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard+            Core.<$> (o Core..:? "disambiguationInfo")+            Core.<*> (o Core..:? "header")+            Core.<*> (o Core..:? "relatedPeople")+            Core.<*> (o Core..:? "relationType")+            Core.<*> (o Core..:? "responseStatus")+            Core.<*> (o Core..:? "statusMessage")+            Core.<*> (o Core..:? "subject")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard+  where+  toJSON+    EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard {..} =+      Core.object+        ( Core.catMaybes+            [ ("disambiguationInfo" Core..=) Core.<$> disambiguationInfo,+              ("header" Core..=) Core.<$> header,+              ("relatedPeople" Core..=) Core.<$> relatedPeople,+              ("relationType" Core..=) Core.<$> relationType,+              ("responseStatus" Core..=) Core.<$> responseStatus,+              ("statusMessage" Core..=) Core.<$> statusMessage,+              ("subject" Core..=) Core.<$> subject+            ]+        )++--+-- /See:/ 'newEnterpriseTopazSidekickPeopleDisambiguationCard' smart constructor.+newtype EnterpriseTopazSidekickPeopleDisambiguationCard = EnterpriseTopazSidekickPeopleDisambiguationCard+  { -- | Candidate persons for the query.+    person :: (Core.Maybe [EnterpriseTopazSidekickCommonPerson])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickPeopleDisambiguationCard' with the minimum fields required to make a request.+newEnterpriseTopazSidekickPeopleDisambiguationCard ::+  EnterpriseTopazSidekickPeopleDisambiguationCard+newEnterpriseTopazSidekickPeopleDisambiguationCard =+  EnterpriseTopazSidekickPeopleDisambiguationCard+    { person =+        Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickPeopleDisambiguationCard+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickPeopleDisambiguationCard"+      ( \o ->+          EnterpriseTopazSidekickPeopleDisambiguationCard+            Core.<$> (o Core..:? "person")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickPeopleDisambiguationCard+  where+  toJSON EnterpriseTopazSidekickPeopleDisambiguationCard {..} =+    Core.object (Core.catMaybes [("person" Core..=) Core.<$> person])++-- | Person.+--+-- /See:/ 'newEnterpriseTopazSidekickPerson' smart constructor.+data EnterpriseTopazSidekickPerson = EnterpriseTopazSidekickPerson+  { -- | The level of affinity this person has with the requesting user.+    affinityLevel :: (Core.Maybe EnterpriseTopazSidekickPerson_AffinityLevel),+    -- | Attendance status of the person when included in a meeting event.+    attendingStatus :: (Core.Maybe EnterpriseTopazSidekickPerson_AttendingStatus),+    -- | Email.+    email :: (Core.Maybe Core.Text),+    -- | Gaia id.+    gaiaId :: (Core.Maybe Core.Int64),+    -- | Whether the invitee is a group.+    isGroup :: (Core.Maybe Core.Bool),+    -- | Name.+    name :: (Core.Maybe Core.Text),+    -- | Obfuscated Gaia id.+    obfuscatedGaiaId :: (Core.Maybe Core.Text),+    -- | Absolute URL to the profile photo of the person.+    photoUrl :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickPerson' with the minimum fields required to make a request.+newEnterpriseTopazSidekickPerson ::+  EnterpriseTopazSidekickPerson+newEnterpriseTopazSidekickPerson =+  EnterpriseTopazSidekickPerson+    { affinityLevel = Core.Nothing,+      attendingStatus = Core.Nothing,+      email = Core.Nothing,+      gaiaId = Core.Nothing,+      isGroup = Core.Nothing,+      name = Core.Nothing,+      obfuscatedGaiaId = Core.Nothing,+      photoUrl = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickPerson where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickPerson"+      ( \o ->+          EnterpriseTopazSidekickPerson+            Core.<$> (o Core..:? "affinityLevel")+            Core.<*> (o Core..:? "attendingStatus")+            Core.<*> (o Core..:? "email")+            Core.<*> (o Core..:? "gaiaId" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "isGroup")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "obfuscatedGaiaId")+            Core.<*> (o Core..:? "photoUrl")+      )++instance Core.ToJSON EnterpriseTopazSidekickPerson where+  toJSON EnterpriseTopazSidekickPerson {..} =+    Core.object+      ( Core.catMaybes+          [ ("affinityLevel" Core..=) Core.<$> affinityLevel,+            ("attendingStatus" Core..=) Core.<$> attendingStatus,+            ("email" Core..=) Core.<$> email,+            ("gaiaId" Core..=) Core.. Core.AsText Core.<$> gaiaId,+            ("isGroup" Core..=) Core.<$> isGroup,+            ("name" Core..=) Core.<$> name,+            ("obfuscatedGaiaId" Core..=) Core.<$> obfuscatedGaiaId,+            ("photoUrl" Core..=) Core.<$> photoUrl+          ]+      )++--+-- /See:/ 'newEnterpriseTopazSidekickPersonProfileCard' smart constructor.+data EnterpriseTopazSidekickPersonProfileCard = EnterpriseTopazSidekickPersonProfileCard+  { relatedPeople ::+      ( Core.Maybe+          [EnterpriseTopazSidekickPersonProfileCardRelatedPeople]+      ),+    -- | The subject of the card.+    subject :: (Core.Maybe EnterpriseTopazSidekickCommonPerson)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickPersonProfileCard' with the minimum fields required to make a request.+newEnterpriseTopazSidekickPersonProfileCard ::+  EnterpriseTopazSidekickPersonProfileCard+newEnterpriseTopazSidekickPersonProfileCard =+  EnterpriseTopazSidekickPersonProfileCard+    { relatedPeople =+        Core.Nothing,+      subject = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickPersonProfileCard where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickPersonProfileCard"+      ( \o ->+          EnterpriseTopazSidekickPersonProfileCard+            Core.<$> (o Core..:? "relatedPeople")+            Core.<*> (o Core..:? "subject")+      )++instance Core.ToJSON EnterpriseTopazSidekickPersonProfileCard where+  toJSON EnterpriseTopazSidekickPersonProfileCard {..} =+    Core.object+      ( Core.catMaybes+          [ ("relatedPeople" Core..=) Core.<$> relatedPeople,+            ("subject" Core..=) Core.<$> subject+          ]+      )++--+-- /See:/ 'newEnterpriseTopazSidekickPersonProfileCardRelatedPeople' smart constructor.+data EnterpriseTopazSidekickPersonProfileCardRelatedPeople = EnterpriseTopazSidekickPersonProfileCardRelatedPeople+  { -- | Related people.+    relatedPerson :: (Core.Maybe [EnterpriseTopazSidekickCommonPerson]),+    -- | Relation type.+    relation ::+      ( Core.Maybe+          EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation+      )+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickPersonProfileCardRelatedPeople' with the minimum fields required to make a request.+newEnterpriseTopazSidekickPersonProfileCardRelatedPeople ::+  EnterpriseTopazSidekickPersonProfileCardRelatedPeople+newEnterpriseTopazSidekickPersonProfileCardRelatedPeople =+  EnterpriseTopazSidekickPersonProfileCardRelatedPeople+    { relatedPerson =+        Core.Nothing,+      relation = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickPersonProfileCardRelatedPeople+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickPersonProfileCardRelatedPeople"+      ( \o ->+          EnterpriseTopazSidekickPersonProfileCardRelatedPeople+            Core.<$> (o Core..:? "relatedPerson")+            Core.<*> (o Core..:? "relation")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickPersonProfileCardRelatedPeople+  where+  toJSON EnterpriseTopazSidekickPersonProfileCardRelatedPeople {..} =+    Core.object+      ( Core.catMaybes+          [ ("relatedPerson" Core..=) Core.<$> relatedPerson,+            ("relation" Core..=) Core.<$> relation+          ]+      )++-- | Personalized docs card proto.+--+-- /See:/ 'newEnterpriseTopazSidekickPersonalizedDocsCardProto' smart constructor.+newtype EnterpriseTopazSidekickPersonalizedDocsCardProto = EnterpriseTopazSidekickPersonalizedDocsCardProto+  { -- | Document group.+    documentGroup :: (Core.Maybe [EnterpriseTopazSidekickDocumentGroup])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickPersonalizedDocsCardProto' with the minimum fields required to make a request.+newEnterpriseTopazSidekickPersonalizedDocsCardProto ::+  EnterpriseTopazSidekickPersonalizedDocsCardProto+newEnterpriseTopazSidekickPersonalizedDocsCardProto =+  EnterpriseTopazSidekickPersonalizedDocsCardProto+    { documentGroup =+        Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickPersonalizedDocsCardProto+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickPersonalizedDocsCardProto"+      ( \o ->+          EnterpriseTopazSidekickPersonalizedDocsCardProto+            Core.<$> (o Core..:? "documentGroup")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickPersonalizedDocsCardProto+  where+  toJSON EnterpriseTopazSidekickPersonalizedDocsCardProto {..} =+    Core.object+      (Core.catMaybes [("documentGroup" Core..=) Core.<$> documentGroup])++-- | Ranking params.+--+-- /See:/ 'newEnterpriseTopazSidekickRankingParams' smart constructor.+data EnterpriseTopazSidekickRankingParams = EnterpriseTopazSidekickRankingParams+  { -- | The end-time that this object will expect to occur. If the type is marked as FIXED, then this end-time will persist after bidding. If the type is marked as FLEXIBLE, this field is NOT expected to be filled and will be filled in after it has won a bid. Expected to be set when type is set to FIXED.+    endTimeMs :: (Core.Maybe Core.Word64),+    -- | The priority to determine between objects that have the same start/time/ms The lower-value of priority == ranked higher. Max-priority = 0. Expected to be set for all types.+    priority :: (Core.Maybe EnterpriseTopazSidekickRankingParams_Priority),+    -- | The score of the card to be used to break priority-ties+    score :: (Core.Maybe Core.Double),+    -- | The span that this card will take in the stream Expected to be set when type is set to FLEXIBLE.+    spanMs :: (Core.Maybe Core.Word64),+    -- | The start-time that this object will bid-for If the type is marked as FIXED, then this start-time will persist after bidding. If the type is marked as FLEXIBLE, then it will occur at the given time or sometime after the requested time. Expected to be set for all types.+    startTimeMs :: (Core.Maybe Core.Word64),+    -- | The packing type of this object.+    type' :: (Core.Maybe EnterpriseTopazSidekickRankingParams_Type)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickRankingParams' with the minimum fields required to make a request.+newEnterpriseTopazSidekickRankingParams ::+  EnterpriseTopazSidekickRankingParams+newEnterpriseTopazSidekickRankingParams =+  EnterpriseTopazSidekickRankingParams+    { endTimeMs = Core.Nothing,+      priority = Core.Nothing,+      score = Core.Nothing,+      spanMs = Core.Nothing,+      startTimeMs = Core.Nothing,+      type' = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickRankingParams where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickRankingParams"+      ( \o ->+          EnterpriseTopazSidekickRankingParams+            Core.<$> (o Core..:? "endTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "priority")+            Core.<*> (o Core..:? "score")+            Core.<*> (o Core..:? "spanMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "startTimeMs" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "type")+      )++instance Core.ToJSON EnterpriseTopazSidekickRankingParams where+  toJSON EnterpriseTopazSidekickRankingParams {..} =+    Core.object+      ( Core.catMaybes+          [ ("endTimeMs" Core..=) Core.. Core.AsText Core.<$> endTimeMs,+            ("priority" Core..=) Core.<$> priority,+            ("score" Core..=) Core.<$> score,+            ("spanMs" Core..=) Core.. Core.AsText Core.<$> spanMs,+            ("startTimeMs" Core..=) Core.. Core.AsText Core.<$> startTimeMs,+            ("type" Core..=) Core.<$> type'+          ]+      )++--+-- /See:/ 'newEnterpriseTopazSidekickRecentDocumentsCardProto' smart constructor.+newtype EnterpriseTopazSidekickRecentDocumentsCardProto = EnterpriseTopazSidekickRecentDocumentsCardProto+  { document :: (Core.Maybe [EnterpriseTopazSidekickCommonDocument])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickRecentDocumentsCardProto' with the minimum fields required to make a request.+newEnterpriseTopazSidekickRecentDocumentsCardProto ::+  EnterpriseTopazSidekickRecentDocumentsCardProto+newEnterpriseTopazSidekickRecentDocumentsCardProto =+  EnterpriseTopazSidekickRecentDocumentsCardProto+    { document =+        Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickRecentDocumentsCardProto+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickRecentDocumentsCardProto"+      ( \o ->+          EnterpriseTopazSidekickRecentDocumentsCardProto+            Core.<$> (o Core..:? "document")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickRecentDocumentsCardProto+  where+  toJSON EnterpriseTopazSidekickRecentDocumentsCardProto {..} =+    Core.object+      (Core.catMaybes [("document" Core..=) Core.<$> document])++-- | Details about scheduled meetings.+--+-- /See:/ 'newEnterpriseTopazSidekickScheduledMeeting' smart constructor.+data EnterpriseTopazSidekickScheduledMeeting = EnterpriseTopazSidekickScheduledMeeting+  { -- | The meeting location.+    meetingLocation :: (Core.Maybe Core.Text),+    -- | The meeting time slot.+    meetingTime :: (Core.Maybe EnterpriseTopazSidekickTimeSlot),+    -- | The meeting title.+    meetingTitle :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickScheduledMeeting' with the minimum fields required to make a request.+newEnterpriseTopazSidekickScheduledMeeting ::+  EnterpriseTopazSidekickScheduledMeeting+newEnterpriseTopazSidekickScheduledMeeting =+  EnterpriseTopazSidekickScheduledMeeting+    { meetingLocation =+        Core.Nothing,+      meetingTime = Core.Nothing,+      meetingTitle = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickScheduledMeeting where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickScheduledMeeting"+      ( \o ->+          EnterpriseTopazSidekickScheduledMeeting+            Core.<$> (o Core..:? "meetingLocation")+            Core.<*> (o Core..:? "meetingTime")+            Core.<*> (o Core..:? "meetingTitle")+      )++instance Core.ToJSON EnterpriseTopazSidekickScheduledMeeting where+  toJSON EnterpriseTopazSidekickScheduledMeeting {..} =+    Core.object+      ( Core.catMaybes+          [ ("meetingLocation" Core..=) Core.<$> meetingLocation,+            ("meetingTime" Core..=) Core.<$> meetingTime,+            ("meetingTitle" Core..=) Core.<$> meetingTitle+          ]+      )++-- | Share meeting docs card proto.+--+-- /See:/ 'newEnterpriseTopazSidekickShareMeetingDocsCardProto' smart constructor.+data EnterpriseTopazSidekickShareMeetingDocsCardProto = EnterpriseTopazSidekickShareMeetingDocsCardProto+  { -- | Documents to share for the given meeting.+    document :: (Core.Maybe [EnterpriseTopazSidekickCommonDocument]),+    -- | Event.+    event :: (Core.Maybe EnterpriseTopazSidekickAgendaEntry)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickShareMeetingDocsCardProto' with the minimum fields required to make a request.+newEnterpriseTopazSidekickShareMeetingDocsCardProto ::+  EnterpriseTopazSidekickShareMeetingDocsCardProto+newEnterpriseTopazSidekickShareMeetingDocsCardProto =+  EnterpriseTopazSidekickShareMeetingDocsCardProto+    { document =+        Core.Nothing,+      event = Core.Nothing+    }++instance+  Core.FromJSON+    EnterpriseTopazSidekickShareMeetingDocsCardProto+  where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickShareMeetingDocsCardProto"+      ( \o ->+          EnterpriseTopazSidekickShareMeetingDocsCardProto+            Core.<$> (o Core..:? "document")+            Core.<*> (o Core..:? "event")+      )++instance+  Core.ToJSON+    EnterpriseTopazSidekickShareMeetingDocsCardProto+  where+  toJSON EnterpriseTopazSidekickShareMeetingDocsCardProto {..} =+    Core.object+      ( Core.catMaybes+          [ ("document" Core..=) Core.<$> document,+            ("event" Core..=) Core.<$> event+          ]+      )++-- | Slot of time.+--+-- /See:/ 'newEnterpriseTopazSidekickTimeSlot' smart constructor.+data EnterpriseTopazSidekickTimeSlot = EnterpriseTopazSidekickTimeSlot+  { -- | Day end time at the user\'s timezone.+    endTimeDay :: (Core.Maybe Core.Text),+    -- | Hour and minute of the end time at the user\'s timezone.+    endTimeHourAndMinute :: (Core.Maybe Core.Text),+    -- | End time in milliseconds.+    endTimeInMillis :: (Core.Maybe Core.Int64),+    -- | Day start time at user\'s timezone.+    startTimeDay :: (Core.Maybe Core.Text),+    -- | Hour and minute of the start time at the user\'s timezone.+    startTimeHourAndMinute :: (Core.Maybe Core.Text),+    -- | Start time in milliseconds.+    startTimeInMillis :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnterpriseTopazSidekickTimeSlot' with the minimum fields required to make a request.+newEnterpriseTopazSidekickTimeSlot ::+  EnterpriseTopazSidekickTimeSlot+newEnterpriseTopazSidekickTimeSlot =+  EnterpriseTopazSidekickTimeSlot+    { endTimeDay = Core.Nothing,+      endTimeHourAndMinute = Core.Nothing,+      endTimeInMillis = Core.Nothing,+      startTimeDay = Core.Nothing,+      startTimeHourAndMinute = Core.Nothing,+      startTimeInMillis = Core.Nothing+    }++instance Core.FromJSON EnterpriseTopazSidekickTimeSlot where+  parseJSON =+    Core.withObject+      "EnterpriseTopazSidekickTimeSlot"+      ( \o ->+          EnterpriseTopazSidekickTimeSlot+            Core.<$> (o Core..:? "endTimeDay")+            Core.<*> (o Core..:? "endTimeHourAndMinute")+            Core.<*> (o Core..:? "endTimeInMillis" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "startTimeDay")+            Core.<*> (o Core..:? "startTimeHourAndMinute")+            Core.<*> ( o+                         Core..:? "startTimeInMillis"+                         Core.<&> Core.fmap Core.fromAsText+                     )+      )++instance Core.ToJSON EnterpriseTopazSidekickTimeSlot where+  toJSON EnterpriseTopazSidekickTimeSlot {..} =+    Core.object+      ( Core.catMaybes+          [ ("endTimeDay" Core..=) Core.<$> endTimeDay,+            ("endTimeHourAndMinute" Core..=) Core.<$> endTimeHourAndMinute,+            ("endTimeInMillis" Core..=)+              Core.. Core.AsText+              Core.<$> endTimeInMillis,+            ("startTimeDay" Core..=) Core.<$> startTimeDay,+            ("startTimeHourAndMinute" Core..=) Core.<$> startTimeHourAndMinute,+            ("startTimeInMillis" Core..=)+              Core.. Core.AsText+              Core.<$> startTimeInMillis+          ]+      )++-- | Used to provide a search operator for enum properties. This is optional. Search operators let users restrict the query to specific fields relevant to the type of item being searched. For example, if you provide no operator for a /priority/ enum property with possible values /p0/ and /p1/, a query that contains the term /p0/ returns items that have /p0/ as the value of the /priority/ property, as well as any items that contain the string /p0/ in other fields. If you provide an operator name for the enum, such as /priority/, then search users can use that operator to refine results to only items that have /p0/ as this property\'s value, with the query /priority:p0/.+--+-- /See:/ 'newEnumOperatorOptions' smart constructor.+newtype EnumOperatorOptions = EnumOperatorOptions+  { -- | Indicates the operator name required in the query in order to isolate the enum property. For example, if operatorName is /priority/ and the property\'s name is /priorityVal/, then queries like /priority:\<value>/ show results only where the value of the property named /priorityVal/ matches /\<value>/. By contrast, a search that uses the same /\<value>/ without an operator returns all items where /\<value>/ matches the value of any String properties or text within the content field for the item. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    operatorName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnumOperatorOptions' with the minimum fields required to make a request.+newEnumOperatorOptions ::+  EnumOperatorOptions+newEnumOperatorOptions =+  EnumOperatorOptions {operatorName = Core.Nothing}++instance Core.FromJSON EnumOperatorOptions where+  parseJSON =+    Core.withObject+      "EnumOperatorOptions"+      (\o -> EnumOperatorOptions Core.<$> (o Core..:? "operatorName"))++instance Core.ToJSON EnumOperatorOptions where+  toJSON EnumOperatorOptions {..} =+    Core.object+      (Core.catMaybes [("operatorName" Core..=) Core.<$> operatorName])++-- | The options for enum properties, which allow you to define a restricted set of strings to match user queries, set rankings for those string values, and define an operator name to be paired with those strings so that users can narrow results to only items with a specific value. For example, for items in a request tracking system with priority information, you could define /p0/ as an allowable enum value and tie this enum to the operator name /priority/ so that search users could add /priority:p0/ to their query to restrict the set of results to only those items indexed with the value /p0/.+--+-- /See:/ 'newEnumPropertyOptions' smart constructor.+data EnumPropertyOptions = EnumPropertyOptions+  { -- | If set, describes how the enum should be used as a search operator.+    operatorOptions :: (Core.Maybe EnumOperatorOptions),+    -- | Used to specify the ordered ranking for the enumeration that determines how the integer values provided in the possible EnumValuePairs are used to rank results. If specified, integer values must be provided for all possible EnumValuePair values given for this property. Can only be used if isRepeatable is false.+    orderedRanking :: (Core.Maybe EnumPropertyOptions_OrderedRanking),+    -- | The list of possible values for the enumeration property. All EnumValuePairs must provide a string value. If you specify an integer value for one EnumValuePair, then all possible EnumValuePairs must provide an integer value. Both the string value and integer value must be unique over all possible values. Once set, possible values cannot be removed or modified. If you supply an ordered ranking and think you might insert additional enum values in the future, leave gaps in the initial integer values to allow adding a value in between previously registered values. The maximum number of elements is 100.+    possibleValues :: (Core.Maybe [EnumValuePair])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnumPropertyOptions' with the minimum fields required to make a request.+newEnumPropertyOptions ::+  EnumPropertyOptions+newEnumPropertyOptions =+  EnumPropertyOptions+    { operatorOptions = Core.Nothing,+      orderedRanking = Core.Nothing,+      possibleValues = Core.Nothing+    }++instance Core.FromJSON EnumPropertyOptions where+  parseJSON =+    Core.withObject+      "EnumPropertyOptions"+      ( \o ->+          EnumPropertyOptions+            Core.<$> (o Core..:? "operatorOptions")+            Core.<*> (o Core..:? "orderedRanking")+            Core.<*> (o Core..:? "possibleValues")+      )++instance Core.ToJSON EnumPropertyOptions where+  toJSON EnumPropertyOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("operatorOptions" Core..=) Core.<$> operatorOptions,+            ("orderedRanking" Core..=) Core.<$> orderedRanking,+            ("possibleValues" Core..=) Core.<$> possibleValues+          ]+      )++-- | The enumeration value pair defines two things: a required string value and an optional integer value. The string value defines the necessary query term required to retrieve that item, such as /p0/ for a priority item. The integer value determines the ranking of that string value relative to other enumerated values for the same property. For example, you might associate /p0/ with /0/ and define another enum pair such as /p1/ and /1/. You must use the integer value in combination with ordered ranking to set the ranking of a given value relative to other enumerated values for the same property name. Here, a ranking order of DESCENDING for /priority/ properties results in a ranking boost for items indexed with a value of /p0/ compared to items indexed with a value of /p1/. Without a specified ranking order, the integer value has no effect on item ranking.+--+-- /See:/ 'newEnumValuePair' smart constructor.+data EnumValuePair = EnumValuePair+  { -- | The integer value of the EnumValuePair which must be non-negative. Optional.+    integerValue :: (Core.Maybe Core.Int32),+    -- | The string value of the EnumValuePair. The maximum length is 32 characters.+    stringValue :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnumValuePair' with the minimum fields required to make a request.+newEnumValuePair ::+  EnumValuePair+newEnumValuePair =+  EnumValuePair+    { integerValue = Core.Nothing,+      stringValue = Core.Nothing+    }++instance Core.FromJSON EnumValuePair where+  parseJSON =+    Core.withObject+      "EnumValuePair"+      ( \o ->+          EnumValuePair+            Core.<$> (o Core..:? "integerValue")+            Core.<*> (o Core..:? "stringValue")+      )++instance Core.ToJSON EnumValuePair where+  toJSON EnumValuePair {..} =+    Core.object+      ( Core.catMaybes+          [ ("integerValue" Core..=) Core.<$> integerValue,+            ("stringValue" Core..=) Core.<$> stringValue+          ]+      )++-- | List of enum values.+--+-- /See:/ 'newEnumValues' smart constructor.+newtype EnumValues = EnumValues+  { -- | The maximum allowable length for string values is 32 characters.+    values :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'EnumValues' with the minimum fields required to make a request.+newEnumValues ::+  EnumValues+newEnumValues = EnumValues {values = Core.Nothing}++instance Core.FromJSON EnumValues where+  parseJSON =+    Core.withObject+      "EnumValues"+      (\o -> EnumValues Core.<$> (o Core..:? "values"))++instance Core.ToJSON EnumValues where+  toJSON EnumValues {..} =+    Core.object (Core.catMaybes [("values" Core..=) Core.<$> values])++-- | Error information about the response.+--+-- /See:/ 'newErrorInfo' smart constructor.+newtype ErrorInfo = ErrorInfo+  { errorMessages :: (Core.Maybe [ErrorMessage])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ErrorInfo' with the minimum fields required to make a request.+newErrorInfo ::+  ErrorInfo+newErrorInfo = ErrorInfo {errorMessages = Core.Nothing}++instance Core.FromJSON ErrorInfo where+  parseJSON =+    Core.withObject+      "ErrorInfo"+      (\o -> ErrorInfo Core.<$> (o Core..:? "errorMessages"))++instance Core.ToJSON ErrorInfo where+  toJSON ErrorInfo {..} =+    Core.object+      (Core.catMaybes [("errorMessages" Core..=) Core.<$> errorMessages])++-- | Error message per source response.+--+-- /See:/ 'newErrorMessage' smart constructor.+data ErrorMessage = ErrorMessage+  { errorMessage :: (Core.Maybe Core.Text),+    source :: (Core.Maybe Source)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ErrorMessage' with the minimum fields required to make a request.+newErrorMessage ::+  ErrorMessage+newErrorMessage =+  ErrorMessage {errorMessage = Core.Nothing, source = Core.Nothing}++instance Core.FromJSON ErrorMessage where+  parseJSON =+    Core.withObject+      "ErrorMessage"+      ( \o ->+          ErrorMessage+            Core.<$> (o Core..:? "errorMessage")+            Core.<*> (o Core..:? "source")+      )++instance Core.ToJSON ErrorMessage where+  toJSON ErrorMessage {..} =+    Core.object+      ( Core.catMaybes+          [ ("errorMessage" Core..=) Core.<$> errorMessage,+            ("source" Core..=) Core.<$> source+          ]+      )++-- | A bucket in a facet is the basic unit of operation. A bucket can comprise either a single value OR a contiguous range of values, depending on the type of the field bucketed. FacetBucket is currently used only for returning the response object.+--+-- /See:/ 'newFacetBucket' smart constructor.+data FacetBucket = FacetBucket+  { -- | Number of results that match the bucket value. Counts are only returned for searches when count accuracy is ensured. Cloud Search does not guarantee facet counts for any query and facet counts might be present only intermittently, even for identical queries. Do not build dependencies on facet count existence; instead use facet ount percentages which are always returned.+    count :: (Core.Maybe Core.Int32),+    -- | Filter to be passed in the search request if the corresponding bucket is selected.+    filter :: (Core.Maybe Filter),+    -- | Percent of results that match the bucket value. The returned value is between (0-100], and is rounded down to an integer if fractional. If the value is not explicitly returned, it represents a percentage value that rounds to 0. Percentages are returned for all searches, but are an estimate. Because percentages are always returned, you should render percentages instead of counts.+    percentage :: (Core.Maybe Core.Int32),+    value :: (Core.Maybe Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'FacetBucket' with the minimum fields required to make a request.+newFacetBucket ::+  FacetBucket+newFacetBucket =+  FacetBucket+    { count = Core.Nothing,+      filter = Core.Nothing,+      percentage = Core.Nothing,+      value = Core.Nothing+    }++instance Core.FromJSON FacetBucket where+  parseJSON =+    Core.withObject+      "FacetBucket"+      ( \o ->+          FacetBucket+            Core.<$> (o Core..:? "count")+            Core.<*> (o Core..:? "filter")+            Core.<*> (o Core..:? "percentage")+            Core.<*> (o Core..:? "value")+      )++instance Core.ToJSON FacetBucket where+  toJSON FacetBucket {..} =+    Core.object+      ( Core.catMaybes+          [ ("count" Core..=) Core.<$> count,+            ("filter" Core..=) Core.<$> filter,+            ("percentage" Core..=) Core.<$> percentage,+            ("value" Core..=) Core.<$> value+          ]+      )++-- | Specifies operators to return facet results for. There will be one FacetResult for every source/name\/object/type\/operator_name combination.+--+-- /See:/ 'newFacetOptions' smart constructor.+data FacetOptions = FacetOptions+  { -- | If set, describes integer faceting options for the given integer property. The corresponding integer property in the schema should be marked isFacetable. The number of buckets returned would be minimum of this and num/facet/buckets.+    integerFacetingOptions :: (Core.Maybe IntegerFacetingOptions),+    -- | Maximum number of facet buckets that should be returned for this facet. Defaults to 10. Maximum value is 100.+    numFacetBuckets :: (Core.Maybe Core.Int32),+    -- | If object_type is set, only those objects of that type will be used to compute facets. If empty, then all objects will be used to compute facets.+    objectType :: (Core.Maybe Core.Text),+    -- | The name of the operator chosen for faceting. \@see cloudsearch.SchemaPropertyOptions+    operatorName :: (Core.Maybe Core.Text),+    -- | Source name to facet on. Format: datasources\/{source_id} If empty, all data sources will be used.+    sourceName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'FacetOptions' with the minimum fields required to make a request.+newFacetOptions ::+  FacetOptions+newFacetOptions =+  FacetOptions+    { integerFacetingOptions = Core.Nothing,+      numFacetBuckets = Core.Nothing,+      objectType = Core.Nothing,+      operatorName = Core.Nothing,+      sourceName = Core.Nothing+    }++instance Core.FromJSON FacetOptions where+  parseJSON =+    Core.withObject+      "FacetOptions"+      ( \o ->+          FacetOptions+            Core.<$> (o Core..:? "integerFacetingOptions")+            Core.<*> (o Core..:? "numFacetBuckets")+            Core.<*> (o Core..:? "objectType")+            Core.<*> (o Core..:? "operatorName")+            Core.<*> (o Core..:? "sourceName")+      )++instance Core.ToJSON FacetOptions where+  toJSON FacetOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("integerFacetingOptions" Core..=)+              Core.<$> integerFacetingOptions,+            ("numFacetBuckets" Core..=) Core.<$> numFacetBuckets,+            ("objectType" Core..=) Core.<$> objectType,+            ("operatorName" Core..=) Core.<$> operatorName,+            ("sourceName" Core..=) Core.<$> sourceName+          ]+      )++-- | Source specific facet response+--+-- /See:/ 'newFacetResult' smart constructor.+data FacetResult = FacetResult+  { -- | FacetBuckets for values in response containing at least a single result with the corresponding filter.+    buckets :: (Core.Maybe [FacetBucket]),+    -- | Object type for which facet results are returned. Can be empty.+    objectType :: (Core.Maybe Core.Text),+    -- | The name of the operator chosen for faceting. \@see cloudsearch.SchemaPropertyOptions+    operatorName :: (Core.Maybe Core.Text),+    -- | Source name for which facet results are returned. Will not be empty.+    sourceName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'FacetResult' with the minimum fields required to make a request.+newFacetResult ::+  FacetResult+newFacetResult =+  FacetResult+    { buckets = Core.Nothing,+      objectType = Core.Nothing,+      operatorName = Core.Nothing,+      sourceName = Core.Nothing+    }++instance Core.FromJSON FacetResult where+  parseJSON =+    Core.withObject+      "FacetResult"+      ( \o ->+          FacetResult+            Core.<$> (o Core..:? "buckets")+            Core.<*> (o Core..:? "objectType")+            Core.<*> (o Core..:? "operatorName")+            Core.<*> (o Core..:? "sourceName")+      )++instance Core.ToJSON FacetResult where+  toJSON FacetResult {..} =+    Core.object+      ( Core.catMaybes+          [ ("buckets" Core..=) Core.<$> buckets,+            ("objectType" Core..=) Core.<$> objectType,+            ("operatorName" Core..=) Core.<$> operatorName,+            ("sourceName" Core..=) Core.<$> sourceName+          ]+      )++--+-- /See:/ 'newFieldViolation' smart constructor.+data FieldViolation = FieldViolation+  { -- | The description of the error.+    description :: (Core.Maybe Core.Text),+    -- | Path of field with violation.+    field :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'FieldViolation' with the minimum fields required to make a request.+newFieldViolation ::+  FieldViolation+newFieldViolation =+  FieldViolation {description = Core.Nothing, field = Core.Nothing}++instance Core.FromJSON FieldViolation where+  parseJSON =+    Core.withObject+      "FieldViolation"+      ( \o ->+          FieldViolation+            Core.<$> (o Core..:? "description")+            Core.<*> (o Core..:? "field")+      )++instance Core.ToJSON FieldViolation where+  toJSON FieldViolation {..} =+    Core.object+      ( Core.catMaybes+          [ ("description" Core..=) Core.<$> description,+            ("field" Core..=) Core.<$> field+          ]+      )++-- | A generic way of expressing filters in a query, which supports two approaches: __1. Setting a ValueFilter.__ The name must match an operator_name defined in the schema for your data source. __2. Setting a CompositeFilter.__ The filters are evaluated using the logical operator. The top-level operators can only be either an AND or a NOT. AND can appear only at the top-most level. OR can appear only under a top-level AND.+--+-- /See:/ 'newFilter' smart constructor.+data Filter = Filter+  { compositeFilter :: (Core.Maybe CompositeFilter),+    valueFilter :: (Core.Maybe ValueFilter)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Filter' with the minimum fields required to make a request.+newFilter ::+  Filter+newFilter =+  Filter+    { compositeFilter = Core.Nothing,+      valueFilter = Core.Nothing+    }++instance Core.FromJSON Filter where+  parseJSON =+    Core.withObject+      "Filter"+      ( \o ->+          Filter+            Core.<$> (o Core..:? "compositeFilter")+            Core.<*> (o Core..:? "valueFilter")+      )++instance Core.ToJSON Filter where+  toJSON Filter {..} =+    Core.object+      ( Core.catMaybes+          [ ("compositeFilter" Core..=) Core.<$> compositeFilter,+            ("valueFilter" Core..=) Core.<$> valueFilter+          ]+      )++-- | Filter options to be applied on query.+--+-- /See:/ 'newFilterOptions' smart constructor.+data FilterOptions = FilterOptions+  { -- | Generic filter to restrict the search, such as @lang:en@, @site:xyz@.+    filter :: (Core.Maybe Filter),+    -- | If object_type is set, only objects of that type are returned. This should correspond to the name of the object that was registered within the definition of schema. The maximum length is 256 characters.+    objectType :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'FilterOptions' with the minimum fields required to make a request.+newFilterOptions ::+  FilterOptions+newFilterOptions =+  FilterOptions {filter = Core.Nothing, objectType = Core.Nothing}++instance Core.FromJSON FilterOptions where+  parseJSON =+    Core.withObject+      "FilterOptions"+      ( \o ->+          FilterOptions+            Core.<$> (o Core..:? "filter")+            Core.<*> (o Core..:? "objectType")+      )++instance Core.ToJSON FilterOptions where+  toJSON FilterOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("filter" Core..=) Core.<$> filter,+            ("objectType" Core..=) Core.<$> objectType+          ]+      )++-- | Indicates which freshness property to use when adjusting search ranking for an item. Fresher, more recent dates indicate higher quality. Use the freshness option property that best works with your data. For fileshare documents, last modified time is most relevant. For calendar event data, the time when the event occurs is a more relevant freshness indicator. In this way, calendar events that occur closer to the time of the search query are considered higher quality and ranked accordingly.+--+-- /See:/ 'newFreshnessOptions' smart constructor.+data FreshnessOptions = FreshnessOptions+  { -- | The duration after which an object should be considered stale. The default value is 180 days (in seconds).+    freshnessDuration :: (Core.Maybe Core.Duration),+    -- | This property indicates the freshness level of the object in the index. If set, this property must be a top-level property within the property definitions and it must be a timestamp type or date type. Otherwise, the Indexing API uses updateTime as the freshness indicator. The maximum length is 256 characters. When a property is used to calculate freshness, the value defaults to 2 years from the current time.+    freshnessProperty :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'FreshnessOptions' with the minimum fields required to make a request.+newFreshnessOptions ::+  FreshnessOptions+newFreshnessOptions =+  FreshnessOptions+    { freshnessDuration = Core.Nothing,+      freshnessProperty = Core.Nothing+    }++instance Core.FromJSON FreshnessOptions where+  parseJSON =+    Core.withObject+      "FreshnessOptions"+      ( \o ->+          FreshnessOptions+            Core.<$> (o Core..:? "freshnessDuration")+            Core.<*> (o Core..:? "freshnessProperty")+      )++instance Core.ToJSON FreshnessOptions where+  toJSON FreshnessOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("freshnessDuration" Core..=) Core.<$> freshnessDuration,+            ("freshnessProperty" Core..=) Core.<$> freshnessProperty+          ]+      )++--+-- /See:/ 'newGSuitePrincipal' smart constructor.+data GSuitePrincipal = GSuitePrincipal+  { -- | This principal represents all users of the Google Workspace domain of the customer.+    gsuiteDomain :: (Core.Maybe Core.Bool),+    -- | This principal references a Google Workspace group name.+    gsuiteGroupEmail :: (Core.Maybe Core.Text),+    -- | This principal references a Google Workspace user account.+    gsuiteUserEmail :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GSuitePrincipal' with the minimum fields required to make a request.+newGSuitePrincipal ::+  GSuitePrincipal+newGSuitePrincipal =+  GSuitePrincipal+    { gsuiteDomain = Core.Nothing,+      gsuiteGroupEmail = Core.Nothing,+      gsuiteUserEmail = Core.Nothing+    }++instance Core.FromJSON GSuitePrincipal where+  parseJSON =+    Core.withObject+      "GSuitePrincipal"+      ( \o ->+          GSuitePrincipal+            Core.<$> (o Core..:? "gsuiteDomain")+            Core.<*> (o Core..:? "gsuiteGroupEmail")+            Core.<*> (o Core..:? "gsuiteUserEmail")+      )++instance Core.ToJSON GSuitePrincipal where+  toJSON GSuitePrincipal {..} =+    Core.object+      ( Core.catMaybes+          [ ("gsuiteDomain" Core..=) Core.<$> gsuiteDomain,+            ("gsuiteGroupEmail" Core..=) Core.<$> gsuiteGroupEmail,+            ("gsuiteUserEmail" Core..=) Core.<$> gsuiteUserEmail+          ]+      )++--+-- /See:/ 'newGetCustomerIndexStatsResponse' smart constructor.+data GetCustomerIndexStatsResponse = GetCustomerIndexStatsResponse+  { -- | Average item count for the given date range for which billing is done.+    averageIndexedItemCount :: (Core.Maybe Core.Int64),+    -- | Summary of indexed item counts, one for each day in the requested range.+    stats :: (Core.Maybe [CustomerIndexStats])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetCustomerIndexStatsResponse' with the minimum fields required to make a request.+newGetCustomerIndexStatsResponse ::+  GetCustomerIndexStatsResponse+newGetCustomerIndexStatsResponse =+  GetCustomerIndexStatsResponse+    { averageIndexedItemCount =+        Core.Nothing,+      stats = Core.Nothing+    }++instance Core.FromJSON GetCustomerIndexStatsResponse where+  parseJSON =+    Core.withObject+      "GetCustomerIndexStatsResponse"+      ( \o ->+          GetCustomerIndexStatsResponse+            Core.<$> ( o+                         Core..:? "averageIndexedItemCount"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "stats")+      )++instance Core.ToJSON GetCustomerIndexStatsResponse where+  toJSON GetCustomerIndexStatsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("averageIndexedItemCount" Core..=)+              Core.. Core.AsText+              Core.<$> averageIndexedItemCount,+            ("stats" Core..=) Core.<$> stats+          ]+      )++--+-- /See:/ 'newGetCustomerQueryStatsResponse' smart constructor.+data GetCustomerQueryStatsResponse = GetCustomerQueryStatsResponse+  { stats :: (Core.Maybe [CustomerQueryStats]),+    -- | Total successful query count (status code 200) for the given date range.+    totalQueryCount :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetCustomerQueryStatsResponse' with the minimum fields required to make a request.+newGetCustomerQueryStatsResponse ::+  GetCustomerQueryStatsResponse+newGetCustomerQueryStatsResponse =+  GetCustomerQueryStatsResponse+    { stats = Core.Nothing,+      totalQueryCount = Core.Nothing+    }++instance Core.FromJSON GetCustomerQueryStatsResponse where+  parseJSON =+    Core.withObject+      "GetCustomerQueryStatsResponse"+      ( \o ->+          GetCustomerQueryStatsResponse+            Core.<$> (o Core..:? "stats")+            Core.<*> (o Core..:? "totalQueryCount" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON GetCustomerQueryStatsResponse where+  toJSON GetCustomerQueryStatsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("stats" Core..=) Core.<$> stats,+            ("totalQueryCount" Core..=)+              Core.. Core.AsText+              Core.<$> totalQueryCount+          ]+      )++-- | Response format for search application stats for a customer.+--+-- /See:/ 'newGetCustomerSearchApplicationStatsResponse' smart constructor.+data GetCustomerSearchApplicationStatsResponse = GetCustomerSearchApplicationStatsResponse+  { -- | Average search application count for the given date range.+    averageSearchApplicationCount :: (Core.Maybe Core.Int64),+    -- | Search application stats by date.+    stats :: (Core.Maybe [CustomerSearchApplicationStats])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetCustomerSearchApplicationStatsResponse' with the minimum fields required to make a request.+newGetCustomerSearchApplicationStatsResponse ::+  GetCustomerSearchApplicationStatsResponse+newGetCustomerSearchApplicationStatsResponse =+  GetCustomerSearchApplicationStatsResponse+    { averageSearchApplicationCount =+        Core.Nothing,+      stats = Core.Nothing+    }++instance Core.FromJSON GetCustomerSearchApplicationStatsResponse where+  parseJSON =+    Core.withObject+      "GetCustomerSearchApplicationStatsResponse"+      ( \o ->+          GetCustomerSearchApplicationStatsResponse+            Core.<$> ( o+                         Core..:? "averageSearchApplicationCount"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "stats")+      )++instance Core.ToJSON GetCustomerSearchApplicationStatsResponse where+  toJSON GetCustomerSearchApplicationStatsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("averageSearchApplicationCount" Core..=)+              Core.. Core.AsText+              Core.<$> averageSearchApplicationCount,+            ("stats" Core..=) Core.<$> stats+          ]+      )++--+-- /See:/ 'newGetCustomerSessionStatsResponse' smart constructor.+newtype GetCustomerSessionStatsResponse = GetCustomerSessionStatsResponse+  { stats :: (Core.Maybe [CustomerSessionStats])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetCustomerSessionStatsResponse' with the minimum fields required to make a request.+newGetCustomerSessionStatsResponse ::+  GetCustomerSessionStatsResponse+newGetCustomerSessionStatsResponse =+  GetCustomerSessionStatsResponse {stats = Core.Nothing}++instance Core.FromJSON GetCustomerSessionStatsResponse where+  parseJSON =+    Core.withObject+      "GetCustomerSessionStatsResponse"+      ( \o ->+          GetCustomerSessionStatsResponse Core.<$> (o Core..:? "stats")+      )++instance Core.ToJSON GetCustomerSessionStatsResponse where+  toJSON GetCustomerSessionStatsResponse {..} =+    Core.object (Core.catMaybes [("stats" Core..=) Core.<$> stats])++--+-- /See:/ 'newGetCustomerUserStatsResponse' smart constructor.+newtype GetCustomerUserStatsResponse = GetCustomerUserStatsResponse+  { stats :: (Core.Maybe [CustomerUserStats])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetCustomerUserStatsResponse' with the minimum fields required to make a request.+newGetCustomerUserStatsResponse ::+  GetCustomerUserStatsResponse+newGetCustomerUserStatsResponse =+  GetCustomerUserStatsResponse {stats = Core.Nothing}++instance Core.FromJSON GetCustomerUserStatsResponse where+  parseJSON =+    Core.withObject+      "GetCustomerUserStatsResponse"+      (\o -> GetCustomerUserStatsResponse Core.<$> (o Core..:? "stats"))++instance Core.ToJSON GetCustomerUserStatsResponse where+  toJSON GetCustomerUserStatsResponse {..} =+    Core.object (Core.catMaybes [("stats" Core..=) Core.<$> stats])++--+-- /See:/ 'newGetDataSourceIndexStatsResponse' smart constructor.+data GetDataSourceIndexStatsResponse = GetDataSourceIndexStatsResponse+  { -- | Average item count for the given date range for which billing is done.+    averageIndexedItemCount :: (Core.Maybe Core.Int64),+    -- | Summary of indexed item counts, one for each day in the requested range.+    stats :: (Core.Maybe [DataSourceIndexStats])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetDataSourceIndexStatsResponse' with the minimum fields required to make a request.+newGetDataSourceIndexStatsResponse ::+  GetDataSourceIndexStatsResponse+newGetDataSourceIndexStatsResponse =+  GetDataSourceIndexStatsResponse+    { averageIndexedItemCount =+        Core.Nothing,+      stats = Core.Nothing+    }++instance Core.FromJSON GetDataSourceIndexStatsResponse where+  parseJSON =+    Core.withObject+      "GetDataSourceIndexStatsResponse"+      ( \o ->+          GetDataSourceIndexStatsResponse+            Core.<$> ( o+                         Core..:? "averageIndexedItemCount"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "stats")+      )++instance Core.ToJSON GetDataSourceIndexStatsResponse where+  toJSON GetDataSourceIndexStatsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("averageIndexedItemCount" Core..=)+              Core.. Core.AsText+              Core.<$> averageIndexedItemCount,+            ("stats" Core..=) Core.<$> stats+          ]+      )++-- | Response format for getting query stats for a search application between given dates.+--+-- /See:/ 'newGetSearchApplicationQueryStatsResponse' smart constructor.+data GetSearchApplicationQueryStatsResponse = GetSearchApplicationQueryStatsResponse+  { -- | Query stats per date for a search application.+    stats :: (Core.Maybe [SearchApplicationQueryStats]),+    -- | Total successful query count (status code 200) for the given date range.+    totalQueryCount :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetSearchApplicationQueryStatsResponse' with the minimum fields required to make a request.+newGetSearchApplicationQueryStatsResponse ::+  GetSearchApplicationQueryStatsResponse+newGetSearchApplicationQueryStatsResponse =+  GetSearchApplicationQueryStatsResponse+    { stats = Core.Nothing,+      totalQueryCount = Core.Nothing+    }++instance Core.FromJSON GetSearchApplicationQueryStatsResponse where+  parseJSON =+    Core.withObject+      "GetSearchApplicationQueryStatsResponse"+      ( \o ->+          GetSearchApplicationQueryStatsResponse+            Core.<$> (o Core..:? "stats")+            Core.<*> (o Core..:? "totalQueryCount" Core.<&> Core.fmap Core.fromAsText)+      )++instance Core.ToJSON GetSearchApplicationQueryStatsResponse where+  toJSON GetSearchApplicationQueryStatsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("stats" Core..=) Core.<$> stats,+            ("totalQueryCount" Core..=)+              Core.. Core.AsText+              Core.<$> totalQueryCount+          ]+      )++--+-- /See:/ 'newGetSearchApplicationSessionStatsResponse' smart constructor.+newtype GetSearchApplicationSessionStatsResponse = GetSearchApplicationSessionStatsResponse+  { stats :: (Core.Maybe [SearchApplicationSessionStats])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetSearchApplicationSessionStatsResponse' with the minimum fields required to make a request.+newGetSearchApplicationSessionStatsResponse ::+  GetSearchApplicationSessionStatsResponse+newGetSearchApplicationSessionStatsResponse =+  GetSearchApplicationSessionStatsResponse {stats = Core.Nothing}++instance Core.FromJSON GetSearchApplicationSessionStatsResponse where+  parseJSON =+    Core.withObject+      "GetSearchApplicationSessionStatsResponse"+      ( \o ->+          GetSearchApplicationSessionStatsResponse+            Core.<$> (o Core..:? "stats")+      )++instance Core.ToJSON GetSearchApplicationSessionStatsResponse where+  toJSON GetSearchApplicationSessionStatsResponse {..} =+    Core.object (Core.catMaybes [("stats" Core..=) Core.<$> stats])++--+-- /See:/ 'newGetSearchApplicationUserStatsResponse' smart constructor.+newtype GetSearchApplicationUserStatsResponse = GetSearchApplicationUserStatsResponse+  { stats :: (Core.Maybe [SearchApplicationUserStats])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'GetSearchApplicationUserStatsResponse' with the minimum fields required to make a request.+newGetSearchApplicationUserStatsResponse ::+  GetSearchApplicationUserStatsResponse+newGetSearchApplicationUserStatsResponse =+  GetSearchApplicationUserStatsResponse {stats = Core.Nothing}++instance Core.FromJSON GetSearchApplicationUserStatsResponse where+  parseJSON =+    Core.withObject+      "GetSearchApplicationUserStatsResponse"+      ( \o ->+          GetSearchApplicationUserStatsResponse+            Core.<$> (o Core..:? "stats")+      )++instance Core.ToJSON GetSearchApplicationUserStatsResponse where+  toJSON GetSearchApplicationUserStatsResponse {..} =+    Core.object (Core.catMaybes [("stats" Core..=) Core.<$> stats])++-- | Used to provide a search operator for html properties. This is optional. Search operators let users restrict the query to specific fields relevant to the type of item being searched.+--+-- /See:/ 'newHtmlOperatorOptions' smart constructor.+newtype HtmlOperatorOptions = HtmlOperatorOptions+  { -- | Indicates the operator name required in the query in order to isolate the html property. For example, if operatorName is /subject/ and the property\'s name is /subjectLine/, then queries like /subject:\<value>/ show results only where the value of the property named /subjectLine/ matches /\<value>/. By contrast, a search that uses the same /\<value>/ without an operator return all items where /\<value>/ matches the value of any html properties or text within the content field for the item. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    operatorName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'HtmlOperatorOptions' with the minimum fields required to make a request.+newHtmlOperatorOptions ::+  HtmlOperatorOptions+newHtmlOperatorOptions =+  HtmlOperatorOptions {operatorName = Core.Nothing}++instance Core.FromJSON HtmlOperatorOptions where+  parseJSON =+    Core.withObject+      "HtmlOperatorOptions"+      (\o -> HtmlOperatorOptions Core.<$> (o Core..:? "operatorName"))++instance Core.ToJSON HtmlOperatorOptions where+  toJSON HtmlOperatorOptions {..} =+    Core.object+      (Core.catMaybes [("operatorName" Core..=) Core.<$> operatorName])++-- | The options for html properties.+--+-- /See:/ 'newHtmlPropertyOptions' smart constructor.+data HtmlPropertyOptions = HtmlPropertyOptions+  { -- | If set, describes how the property should be used as a search operator.+    operatorOptions :: (Core.Maybe HtmlOperatorOptions),+    -- | Indicates the search quality importance of the tokens within the field when used for retrieval. Can only be set to DEFAULT or NONE.+    retrievalImportance :: (Core.Maybe RetrievalImportance)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'HtmlPropertyOptions' with the minimum fields required to make a request.+newHtmlPropertyOptions ::+  HtmlPropertyOptions+newHtmlPropertyOptions =+  HtmlPropertyOptions+    { operatorOptions = Core.Nothing,+      retrievalImportance = Core.Nothing+    }++instance Core.FromJSON HtmlPropertyOptions where+  parseJSON =+    Core.withObject+      "HtmlPropertyOptions"+      ( \o ->+          HtmlPropertyOptions+            Core.<$> (o Core..:? "operatorOptions")+            Core.<*> (o Core..:? "retrievalImportance")+      )++instance Core.ToJSON HtmlPropertyOptions where+  toJSON HtmlPropertyOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("operatorOptions" Core..=) Core.<$> operatorOptions,+            ("retrievalImportance" Core..=) Core.<$> retrievalImportance+          ]+      )++-- | List of html values.+--+-- /See:/ 'newHtmlValues' smart constructor.+newtype HtmlValues = HtmlValues+  { -- | The maximum allowable length for html values is 2048 characters.+    values :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'HtmlValues' with the minimum fields required to make a request.+newHtmlValues ::+  HtmlValues+newHtmlValues = HtmlValues {values = Core.Nothing}++instance Core.FromJSON HtmlValues where+  parseJSON =+    Core.withObject+      "HtmlValues"+      (\o -> HtmlValues Core.<$> (o Core..:? "values"))++instance Core.ToJSON HtmlValues where+  toJSON HtmlValues {..} =+    Core.object (Core.catMaybes [("values" Core..=) Core.<$> values])++--+-- /See:/ 'newIndexItemOptions' smart constructor.+newtype IndexItemOptions = IndexItemOptions+  { -- | Specifies if the index request should allow Google Workspace principals that do not exist or are deleted.+    allowUnknownGsuitePrincipals :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'IndexItemOptions' with the minimum fields required to make a request.+newIndexItemOptions ::+  IndexItemOptions+newIndexItemOptions =+  IndexItemOptions {allowUnknownGsuitePrincipals = Core.Nothing}++instance Core.FromJSON IndexItemOptions where+  parseJSON =+    Core.withObject+      "IndexItemOptions"+      ( \o ->+          IndexItemOptions+            Core.<$> (o Core..:? "allowUnknownGsuitePrincipals")+      )++instance Core.ToJSON IndexItemOptions where+  toJSON IndexItemOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("allowUnknownGsuitePrincipals" Core..=)+              Core.<$> allowUnknownGsuitePrincipals+          ]+      )++--+-- /See:/ 'newIndexItemRequest' smart constructor.+data IndexItemRequest = IndexItemRequest+  { -- | The name of connector making this call. Format: datasources\/{source_id}\/connectors\/{ID}+    connectorName :: (Core.Maybe Core.Text),+    -- | Common debug options.+    debugOptions :: (Core.Maybe DebugOptions),+    indexItemOptions :: (Core.Maybe IndexItemOptions),+    -- | The name of the item. Format: datasources\/{source/id}\/items\/{item/id}+    item :: (Core.Maybe Item),+    -- | Required. The RequestMode for this request.+    mode :: (Core.Maybe IndexItemRequest_Mode)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'IndexItemRequest' with the minimum fields required to make a request.+newIndexItemRequest ::+  IndexItemRequest+newIndexItemRequest =+  IndexItemRequest+    { connectorName = Core.Nothing,+      debugOptions = Core.Nothing,+      indexItemOptions = Core.Nothing,+      item = Core.Nothing,+      mode = Core.Nothing+    }++instance Core.FromJSON IndexItemRequest where+  parseJSON =+    Core.withObject+      "IndexItemRequest"+      ( \o ->+          IndexItemRequest+            Core.<$> (o Core..:? "connectorName")+            Core.<*> (o Core..:? "debugOptions")+            Core.<*> (o Core..:? "indexItemOptions")+            Core.<*> (o Core..:? "item")+            Core.<*> (o Core..:? "mode")+      )++instance Core.ToJSON IndexItemRequest where+  toJSON IndexItemRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("connectorName" Core..=) Core.<$> connectorName,+            ("debugOptions" Core..=) Core.<$> debugOptions,+            ("indexItemOptions" Core..=) Core.<$> indexItemOptions,+            ("item" Core..=) Core.<$> item,+            ("mode" Core..=) Core.<$> mode+          ]+      )++-- | Request message for @InitializeCustomer@ method.+--+-- /See:/ 'newInitializeCustomerRequest' smart constructor.+data InitializeCustomerRequest = InitializeCustomerRequest+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'InitializeCustomerRequest' with the minimum fields required to make a request.+newInitializeCustomerRequest ::+  InitializeCustomerRequest+newInitializeCustomerRequest = InitializeCustomerRequest++instance Core.FromJSON InitializeCustomerRequest where+  parseJSON =+    Core.withObject+      "InitializeCustomerRequest"+      (\o -> Core.pure InitializeCustomerRequest)++instance Core.ToJSON InitializeCustomerRequest where+  toJSON = Core.const Core.emptyObject++-- | Used to specify integer faceting options.+--+-- /See:/ 'newIntegerFacetingOptions' smart constructor.+newtype IntegerFacetingOptions = IntegerFacetingOptions+  { -- | Buckets for given integer values should be in strictly ascending order. For example, if values supplied are (1,5,10,100), the following facet buckets will be formed {\<1, [1,5), [5-10), [10-100), >=100}.+    integerBuckets :: (Core.Maybe [Core.Int64])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'IntegerFacetingOptions' with the minimum fields required to make a request.+newIntegerFacetingOptions ::+  IntegerFacetingOptions+newIntegerFacetingOptions =+  IntegerFacetingOptions {integerBuckets = Core.Nothing}++instance Core.FromJSON IntegerFacetingOptions where+  parseJSON =+    Core.withObject+      "IntegerFacetingOptions"+      ( \o ->+          IntegerFacetingOptions+            Core.<$> ( o+                         Core..:? "integerBuckets"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+      )++instance Core.ToJSON IntegerFacetingOptions where+  toJSON IntegerFacetingOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("integerBuckets" Core..=)+              Core.. Core.fmap Core.AsText+              Core.<$> integerBuckets+          ]+      )++-- | Used to provide a search operator for integer properties. This is optional. Search operators let users restrict the query to specific fields relevant to the type of item being searched.+--+-- /See:/ 'newIntegerOperatorOptions' smart constructor.+data IntegerOperatorOptions = IntegerOperatorOptions+  { -- | Indicates the operator name required in the query in order to isolate the integer property using the greater-than operator. For example, if greaterThanOperatorName is /priorityabove/ and the property\'s name is /priorityVal/, then queries like /priorityabove:\<value>/ show results only where the value of the property named /priorityVal/ is greater than /\<value>/. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    greaterThanOperatorName :: (Core.Maybe Core.Text),+    -- | Indicates the operator name required in the query in order to isolate the integer property using the less-than operator. For example, if lessThanOperatorName is /prioritybelow/ and the property\'s name is /priorityVal/, then queries like /prioritybelow:\<value>/ show results only where the value of the property named /priorityVal/ is less than /\<value>/. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    lessThanOperatorName :: (Core.Maybe Core.Text),+    -- | Indicates the operator name required in the query in order to isolate the integer property. For example, if operatorName is /priority/ and the property\'s name is /priorityVal/, then queries like /priority:\<value>/ show results only where the value of the property named /priorityVal/ matches /\<value>/. By contrast, a search that uses the same /\<value>/ without an operator returns all items where /\<value>/ matches the value of any String properties or text within the content field for the item. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    operatorName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'IntegerOperatorOptions' with the minimum fields required to make a request.+newIntegerOperatorOptions ::+  IntegerOperatorOptions+newIntegerOperatorOptions =+  IntegerOperatorOptions+    { greaterThanOperatorName = Core.Nothing,+      lessThanOperatorName = Core.Nothing,+      operatorName = Core.Nothing+    }++instance Core.FromJSON IntegerOperatorOptions where+  parseJSON =+    Core.withObject+      "IntegerOperatorOptions"+      ( \o ->+          IntegerOperatorOptions+            Core.<$> (o Core..:? "greaterThanOperatorName")+            Core.<*> (o Core..:? "lessThanOperatorName")+            Core.<*> (o Core..:? "operatorName")+      )++instance Core.ToJSON IntegerOperatorOptions where+  toJSON IntegerOperatorOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("greaterThanOperatorName" Core..=)+              Core.<$> greaterThanOperatorName,+            ("lessThanOperatorName" Core..=) Core.<$> lessThanOperatorName,+            ("operatorName" Core..=) Core.<$> operatorName+          ]+      )++-- | The options for integer properties.+--+-- /See:/ 'newIntegerPropertyOptions' smart constructor.+data IntegerPropertyOptions = IntegerPropertyOptions+  { -- | If set, describes integer faceting options for the given integer property. The corresponding integer property should be marked isFacetable.+    integerFacetingOptions :: (Core.Maybe IntegerFacetingOptions),+    -- | The maximum value of the property. The minimum and maximum values for the property are used to rank results according to the ordered ranking. Indexing requests with values greater than the maximum are accepted and ranked with the same weight as items indexed with the maximum value.+    maximumValue :: (Core.Maybe Core.Int64),+    -- | The minimum value of the property. The minimum and maximum values for the property are used to rank results according to the ordered ranking. Indexing requests with values less than the minimum are accepted and ranked with the same weight as items indexed with the minimum value.+    minimumValue :: (Core.Maybe Core.Int64),+    -- | If set, describes how the integer should be used as a search operator.+    operatorOptions :: (Core.Maybe IntegerOperatorOptions),+    -- | Used to specify the ordered ranking for the integer. Can only be used if isRepeatable is false.+    orderedRanking :: (Core.Maybe IntegerPropertyOptions_OrderedRanking)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'IntegerPropertyOptions' with the minimum fields required to make a request.+newIntegerPropertyOptions ::+  IntegerPropertyOptions+newIntegerPropertyOptions =+  IntegerPropertyOptions+    { integerFacetingOptions = Core.Nothing,+      maximumValue = Core.Nothing,+      minimumValue = Core.Nothing,+      operatorOptions = Core.Nothing,+      orderedRanking = Core.Nothing+    }++instance Core.FromJSON IntegerPropertyOptions where+  parseJSON =+    Core.withObject+      "IntegerPropertyOptions"+      ( \o ->+          IntegerPropertyOptions+            Core.<$> (o Core..:? "integerFacetingOptions")+            Core.<*> (o Core..:? "maximumValue" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "minimumValue" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "operatorOptions")+            Core.<*> (o Core..:? "orderedRanking")+      )++instance Core.ToJSON IntegerPropertyOptions where+  toJSON IntegerPropertyOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("integerFacetingOptions" Core..=)+              Core.<$> integerFacetingOptions,+            ("maximumValue" Core..=) Core.. Core.AsText Core.<$> maximumValue,+            ("minimumValue" Core..=) Core.. Core.AsText Core.<$> minimumValue,+            ("operatorOptions" Core..=) Core.<$> operatorOptions,+            ("orderedRanking" Core..=) Core.<$> orderedRanking+          ]+      )++-- | List of integer values.+--+-- /See:/ 'newIntegerValues' smart constructor.+newtype IntegerValues = IntegerValues+  { values :: (Core.Maybe [Core.Int64])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'IntegerValues' with the minimum fields required to make a request.+newIntegerValues ::+  IntegerValues+newIntegerValues = IntegerValues {values = Core.Nothing}++instance Core.FromJSON IntegerValues where+  parseJSON =+    Core.withObject+      "IntegerValues"+      ( \o ->+          IntegerValues+            Core.<$> ( o+                         Core..:? "values"+                         Core.<&> Core.fmap (Core.fmap Core.fromAsText)+                     )+      )++instance Core.ToJSON IntegerValues where+  toJSON IntegerValues {..} =+    Core.object+      ( Core.catMaybes+          [("values" Core..=) Core.. Core.fmap Core.AsText Core.<$> values]+      )++-- | Represents an interaction between a user and an item.+--+-- /See:/ 'newInteraction' smart constructor.+data Interaction = Interaction+  { -- | The time when the user acted on the item. If multiple actions of the same type exist for a single user, only the most recent action is recorded.+    interactionTime :: (Core.Maybe Core.DateTime),+    -- | The user that acted on the item.+    principal :: (Core.Maybe Principal),+    type' :: (Core.Maybe Interaction_Type)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Interaction' with the minimum fields required to make a request.+newInteraction ::+  Interaction+newInteraction =+  Interaction+    { interactionTime = Core.Nothing,+      principal = Core.Nothing,+      type' = Core.Nothing+    }++instance Core.FromJSON Interaction where+  parseJSON =+    Core.withObject+      "Interaction"+      ( \o ->+          Interaction+            Core.<$> (o Core..:? "interactionTime")+            Core.<*> (o Core..:? "principal")+            Core.<*> (o Core..:? "type")+      )++instance Core.ToJSON Interaction where+  toJSON Interaction {..} =+    Core.object+      ( Core.catMaybes+          [ ("interactionTime" Core..=) Core.<$> interactionTime,+            ("principal" Core..=) Core.<$> principal,+            ("type" Core..=) Core.<$> type'+          ]+      )++-- | Represents a single object that is an item in the search index, such as a file, folder, or a database record.+--+-- /See:/ 'newItem' smart constructor.+data Item = Item+  { -- | Access control list for this item.+    acl :: (Core.Maybe ItemAcl),+    -- | Item content to be indexed and made text searchable.+    content :: (Core.Maybe ItemContent),+    -- | The type for this item.+    itemType :: (Core.Maybe Item_ItemType),+    -- | The metadata information.+    metadata :: (Core.Maybe ItemMetadata),+    -- | The name of the Item. Format: datasources\/{source/id}\/items\/{item/id} This is a required field. The maximum length is 1536 characters.+    name :: (Core.Maybe Core.Text),+    -- | Additional state connector can store for this item. The maximum length is 10000 bytes.+    payload :: (Core.Maybe Core.Base64),+    -- | Queue this item belongs to. The maximum length is 100 characters.+    queue :: (Core.Maybe Core.Text),+    -- | Status of the item. Output only field.+    status :: (Core.Maybe ItemStatus),+    -- | The structured data for the item that should conform to a registered object definition in the schema for the data source.+    structuredData :: (Core.Maybe ItemStructuredData),+    -- | Required. The indexing system stores the version from the datasource as a byte string and compares the Item version in the index to the version of the queued Item using lexical ordering. Cloud Search Indexing won\'t index or delete any queued item with a version value that is less than or equal to the version of the currently indexed item. The maximum length for this field is 1024 bytes. For information on how item version affects the deletion process, refer to <https://developers.google.com/cloud-search/docs/guides/operations Handle revisions after manual deletes>.+    version :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Item' with the minimum fields required to make a request.+newItem ::+  Item+newItem =+  Item+    { acl = Core.Nothing,+      content = Core.Nothing,+      itemType = Core.Nothing,+      metadata = Core.Nothing,+      name = Core.Nothing,+      payload = Core.Nothing,+      queue = Core.Nothing,+      status = Core.Nothing,+      structuredData = Core.Nothing,+      version = Core.Nothing+    }++instance Core.FromJSON Item where+  parseJSON =+    Core.withObject+      "Item"+      ( \o ->+          Item+            Core.<$> (o Core..:? "acl")+            Core.<*> (o Core..:? "content")+            Core.<*> (o Core..:? "itemType")+            Core.<*> (o Core..:? "metadata")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "payload")+            Core.<*> (o Core..:? "queue")+            Core.<*> (o Core..:? "status")+            Core.<*> (o Core..:? "structuredData")+            Core.<*> (o Core..:? "version")+      )++instance Core.ToJSON Item where+  toJSON Item {..} =+    Core.object+      ( Core.catMaybes+          [ ("acl" Core..=) Core.<$> acl,+            ("content" Core..=) Core.<$> content,+            ("itemType" Core..=) Core.<$> itemType,+            ("metadata" Core..=) Core.<$> metadata,+            ("name" Core..=) Core.<$> name,+            ("payload" Core..=) Core.<$> payload,+            ("queue" Core..=) Core.<$> queue,+            ("status" Core..=) Core.<$> status,+            ("structuredData" Core..=) Core.<$> structuredData,+            ("version" Core..=) Core.<$> version+          ]+      )++-- | Access control list information for the item. For more information see <https://developers.google.com/cloud-search/docs/guides/acls Map ACLs>.+--+-- /See:/ 'newItemAcl' smart constructor.+data ItemAcl = ItemAcl+  { -- | Sets the type of access rules to apply when an item inherits its ACL from a parent. This should always be set in tandem with the inheritAclFrom field. Also, when the inheritAclFrom field is set, this field should be set to a valid AclInheritanceType.+    aclInheritanceType :: (Core.Maybe ItemAcl_AclInheritanceType),+    -- | List of principals who are explicitly denied access to the item in search results. While principals are denied access by default, use denied readers to handle exceptions and override the list allowed readers. The maximum number of elements is 100.+    deniedReaders :: (Core.Maybe [Principal]),+    -- | The name of the item to inherit the Access Permission List (ACL) from. Note: ACL inheritance /only/ provides access permissions to child items and does not define structural relationships, nor does it provide convenient ways to delete large groups of items. Deleting an ACL parent from the index only alters the access permissions of child items that reference the parent in the inheritAclFrom field. The item is still in the index, but may not visible in search results. By contrast, deletion of a container item also deletes all items that reference the container via the containerName field. The maximum length for this field is 1536 characters.+    inheritAclFrom :: (Core.Maybe Core.Text),+    -- | Optional. List of owners for the item. This field has no bearing on document access permissions. It does, however, offer a slight ranking boosts items where the querying user is an owner. The maximum number of elements is 5.+    owners :: (Core.Maybe [Principal]),+    -- | List of principals who are allowed to see the item in search results. Optional if inheriting permissions from another item or if the item is not intended to be visible, such as virtual containers. The maximum number of elements is 1000.+    readers :: (Core.Maybe [Principal])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ItemAcl' with the minimum fields required to make a request.+newItemAcl ::+  ItemAcl+newItemAcl =+  ItemAcl+    { aclInheritanceType = Core.Nothing,+      deniedReaders = Core.Nothing,+      inheritAclFrom = Core.Nothing,+      owners = Core.Nothing,+      readers = Core.Nothing+    }++instance Core.FromJSON ItemAcl where+  parseJSON =+    Core.withObject+      "ItemAcl"+      ( \o ->+          ItemAcl+            Core.<$> (o Core..:? "aclInheritanceType")+            Core.<*> (o Core..:? "deniedReaders")+            Core.<*> (o Core..:? "inheritAclFrom")+            Core.<*> (o Core..:? "owners")+            Core.<*> (o Core..:? "readers")+      )++instance Core.ToJSON ItemAcl where+  toJSON ItemAcl {..} =+    Core.object+      ( Core.catMaybes+          [ ("aclInheritanceType" Core..=) Core.<$> aclInheritanceType,+            ("deniedReaders" Core..=) Core.<$> deniedReaders,+            ("inheritAclFrom" Core..=) Core.<$> inheritAclFrom,+            ("owners" Core..=) Core.<$> owners,+            ("readers" Core..=) Core.<$> readers+          ]+      )++-- | Content of an item to be indexed and surfaced by Cloud Search. Only UTF-8 encoded strings are allowed as inlineContent. If the content is uploaded and not binary, it must be UTF-8 encoded.+--+-- /See:/ 'newItemContent' smart constructor.+data ItemContent = ItemContent+  { -- | Upload reference ID of a previously uploaded content via write method.+    contentDataRef :: (Core.Maybe UploadItemRef),+    contentFormat :: (Core.Maybe ItemContent_ContentFormat),+    -- | Hashing info calculated and provided by the API client for content. Can be used with the items.push method to calculate modified state. The maximum length is 2048 characters.+    hash :: (Core.Maybe Core.Text),+    -- | Content that is supplied inlined within the update method. The maximum length is 102400 bytes (100 KiB).+    inlineContent :: (Core.Maybe Core.Base64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ItemContent' with the minimum fields required to make a request.+newItemContent ::+  ItemContent+newItemContent =+  ItemContent+    { contentDataRef = Core.Nothing,+      contentFormat = Core.Nothing,+      hash = Core.Nothing,+      inlineContent = Core.Nothing+    }++instance Core.FromJSON ItemContent where+  parseJSON =+    Core.withObject+      "ItemContent"+      ( \o ->+          ItemContent+            Core.<$> (o Core..:? "contentDataRef")+            Core.<*> (o Core..:? "contentFormat")+            Core.<*> (o Core..:? "hash")+            Core.<*> (o Core..:? "inlineContent")+      )++instance Core.ToJSON ItemContent where+  toJSON ItemContent {..} =+    Core.object+      ( Core.catMaybes+          [ ("contentDataRef" Core..=) Core.<$> contentDataRef,+            ("contentFormat" Core..=) Core.<$> contentFormat,+            ("hash" Core..=) Core.<$> hash,+            ("inlineContent" Core..=) Core.<$> inlineContent+          ]+      )++--+-- /See:/ 'newItemCountByStatus' smart constructor.+data ItemCountByStatus = ItemCountByStatus+  { -- | Number of items matching the status code.+    count :: (Core.Maybe Core.Int64),+    -- | Number of items matching the status code for which billing is done. This excludes virtual container items from the total count. This count would not be applicable for items with ERROR or NEW_ITEM status code.+    indexedItemsCount :: (Core.Maybe Core.Int64),+    -- | Status of the items.+    statusCode :: (Core.Maybe ItemCountByStatus_StatusCode)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ItemCountByStatus' with the minimum fields required to make a request.+newItemCountByStatus ::+  ItemCountByStatus+newItemCountByStatus =+  ItemCountByStatus+    { count = Core.Nothing,+      indexedItemsCount = Core.Nothing,+      statusCode = Core.Nothing+    }++instance Core.FromJSON ItemCountByStatus where+  parseJSON =+    Core.withObject+      "ItemCountByStatus"+      ( \o ->+          ItemCountByStatus+            Core.<$> (o Core..:? "count" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "indexedItemsCount" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "statusCode")+      )++instance Core.ToJSON ItemCountByStatus where+  toJSON ItemCountByStatus {..} =+    Core.object+      ( Core.catMaybes+          [ ("count" Core..=) Core.. Core.AsText Core.<$> count,+            ("indexedItemsCount" Core..=)+              Core.. Core.AsText+              Core.<$> indexedItemsCount,+            ("statusCode" Core..=) Core.<$> statusCode+          ]+      )++-- | Available metadata fields for the item.+--+-- /See:/ 'newItemMetadata' smart constructor.+data ItemMetadata = ItemMetadata+  { -- | The name of the container for this item. Deletion of the container item leads to automatic deletion of this item. Note: ACLs are not inherited from a container item. To provide ACL inheritance for an item, use the inheritAclFrom field. The maximum length is 1536 characters.+    containerName :: (Core.Maybe Core.Text),+    -- | The BCP-47 language code for the item, such as \"en-US\" or \"sr-Latn\". For more information, see http:\/\/www.unicode.org\/reports\/tr35\/#Unicode/locale/identifier. The maximum length is 32 characters.+    contentLanguage :: (Core.Maybe Core.Text),+    -- | A set of named attributes associated with the item. This can be used for influencing the ranking of the item based on the context in the request. The maximum number of elements is 10.+    contextAttributes :: (Core.Maybe [ContextAttribute]),+    -- | The time when the item was created in the source repository.+    createTime :: (Core.Maybe Core.DateTime),+    -- | Hashing value provided by the API caller. This can be used with the items.push method to calculate modified state. The maximum length is 2048 characters.+    hash :: (Core.Maybe Core.Text),+    -- | A list of interactions for the item. Interactions are used to improve Search quality, but are not exposed to end users. The maximum number of elements is 1000.+    interactions :: (Core.Maybe [Interaction]),+    -- | Additional keywords or phrases that should match the item. Used internally for user generated content. The maximum number of elements is 100. The maximum length is 8192 characters.+    keywords :: (Core.Maybe [Core.Text]),+    -- | The original mime-type of ItemContent.content in the source repository. The maximum length is 256 characters.+    mimeType :: (Core.Maybe Core.Text),+    -- | The type of the item. This should correspond to the name of an object definition in the schema registered for the data source. For example, if the schema for the data source contains an object definition with name \'document\', then item indexing requests for objects of that type should set objectType to \'document\'. The maximum length is 256 characters.+    objectType :: (Core.Maybe Core.Text),+    -- | Additional search quality metadata of the item+    searchQualityMetadata :: (Core.Maybe SearchQualityMetadata),+    -- | Link to the source repository serving the data. Seach results apply this link to the title. Whitespace or special characters may cause Cloud Seach result links to trigger a redirect notice; to avoid this, encode the URL. The maximum length is 2048 characters.+    sourceRepositoryUrl :: (Core.Maybe Core.Text),+    -- | The title of the item. If given, this will be the displayed title of the Search result. The maximum length is 2048 characters.+    title :: (Core.Maybe Core.Text),+    -- | The time when the item was last modified in the source repository.+    updateTime :: (Core.Maybe Core.DateTime)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ItemMetadata' with the minimum fields required to make a request.+newItemMetadata ::+  ItemMetadata+newItemMetadata =+  ItemMetadata+    { containerName = Core.Nothing,+      contentLanguage = Core.Nothing,+      contextAttributes = Core.Nothing,+      createTime = Core.Nothing,+      hash = Core.Nothing,+      interactions = Core.Nothing,+      keywords = Core.Nothing,+      mimeType = Core.Nothing,+      objectType = Core.Nothing,+      searchQualityMetadata = Core.Nothing,+      sourceRepositoryUrl = Core.Nothing,+      title = Core.Nothing,+      updateTime = Core.Nothing+    }++instance Core.FromJSON ItemMetadata where+  parseJSON =+    Core.withObject+      "ItemMetadata"+      ( \o ->+          ItemMetadata+            Core.<$> (o Core..:? "containerName")+            Core.<*> (o Core..:? "contentLanguage")+            Core.<*> (o Core..:? "contextAttributes")+            Core.<*> (o Core..:? "createTime")+            Core.<*> (o Core..:? "hash")+            Core.<*> (o Core..:? "interactions")+            Core.<*> (o Core..:? "keywords")+            Core.<*> (o Core..:? "mimeType")+            Core.<*> (o Core..:? "objectType")+            Core.<*> (o Core..:? "searchQualityMetadata")+            Core.<*> (o Core..:? "sourceRepositoryUrl")+            Core.<*> (o Core..:? "title")+            Core.<*> (o Core..:? "updateTime")+      )++instance Core.ToJSON ItemMetadata where+  toJSON ItemMetadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("containerName" Core..=) Core.<$> containerName,+            ("contentLanguage" Core..=) Core.<$> contentLanguage,+            ("contextAttributes" Core..=) Core.<$> contextAttributes,+            ("createTime" Core..=) Core.<$> createTime,+            ("hash" Core..=) Core.<$> hash,+            ("interactions" Core..=) Core.<$> interactions,+            ("keywords" Core..=) Core.<$> keywords,+            ("mimeType" Core..=) Core.<$> mimeType,+            ("objectType" Core..=) Core.<$> objectType,+            ("searchQualityMetadata" Core..=) Core.<$> searchQualityMetadata,+            ("sourceRepositoryUrl" Core..=) Core.<$> sourceRepositoryUrl,+            ("title" Core..=) Core.<$> title,+            ("updateTime" Core..=) Core.<$> updateTime+          ]+      )++-- | This contains item\'s status and any errors.+--+-- /See:/ 'newItemStatus' smart constructor.+data ItemStatus = ItemStatus+  { -- | Status code.+    code :: (Core.Maybe ItemStatus_Code),+    -- | Error details in case the item is in ERROR state.+    processingErrors :: (Core.Maybe [ProcessingError]),+    -- | Repository error reported by connector.+    repositoryErrors :: (Core.Maybe [RepositoryError])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ItemStatus' with the minimum fields required to make a request.+newItemStatus ::+  ItemStatus+newItemStatus =+  ItemStatus+    { code = Core.Nothing,+      processingErrors = Core.Nothing,+      repositoryErrors = Core.Nothing+    }++instance Core.FromJSON ItemStatus where+  parseJSON =+    Core.withObject+      "ItemStatus"+      ( \o ->+          ItemStatus+            Core.<$> (o Core..:? "code")+            Core.<*> (o Core..:? "processingErrors")+            Core.<*> (o Core..:? "repositoryErrors")+      )++instance Core.ToJSON ItemStatus where+  toJSON ItemStatus {..} =+    Core.object+      ( Core.catMaybes+          [ ("code" Core..=) Core.<$> code,+            ("processingErrors" Core..=) Core.<$> processingErrors,+            ("repositoryErrors" Core..=) Core.<$> repositoryErrors+          ]+      )++-- | Available structured data fields for the item.+--+-- /See:/ 'newItemStructuredData' smart constructor.+data ItemStructuredData = ItemStructuredData+  { -- | Hashing value provided by the API caller. This can be used with the items.push method to calculate modified state. The maximum length is 2048 characters.+    hash :: (Core.Maybe Core.Text),+    -- | The structured data object that should conform to a registered object definition in the schema for the data source.+    object :: (Core.Maybe StructuredDataObject)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ItemStructuredData' with the minimum fields required to make a request.+newItemStructuredData ::+  ItemStructuredData+newItemStructuredData =+  ItemStructuredData {hash = Core.Nothing, object = Core.Nothing}++instance Core.FromJSON ItemStructuredData where+  parseJSON =+    Core.withObject+      "ItemStructuredData"+      ( \o ->+          ItemStructuredData+            Core.<$> (o Core..:? "hash")+            Core.<*> (o Core..:? "object")+      )++instance Core.ToJSON ItemStructuredData where+  toJSON ItemStructuredData {..} =+    Core.object+      ( Core.catMaybes+          [ ("hash" Core..=) Core.<$> hash,+            ("object" Core..=) Core.<$> object+          ]+      )++--+-- /See:/ 'newListDataSourceResponse' smart constructor.+data ListDataSourceResponse = ListDataSourceResponse+  { -- | Token to retrieve the next page of results, or empty if there are no more results in the list.+    nextPageToken :: (Core.Maybe Core.Text),+    sources :: (Core.Maybe [DataSource])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ListDataSourceResponse' with the minimum fields required to make a request.+newListDataSourceResponse ::+  ListDataSourceResponse+newListDataSourceResponse =+  ListDataSourceResponse+    { nextPageToken = Core.Nothing,+      sources = Core.Nothing+    }++instance Core.FromJSON ListDataSourceResponse where+  parseJSON =+    Core.withObject+      "ListDataSourceResponse"+      ( \o ->+          ListDataSourceResponse+            Core.<$> (o Core..:? "nextPageToken")+            Core.<*> (o Core..:? "sources")+      )++instance Core.ToJSON ListDataSourceResponse where+  toJSON ListDataSourceResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("nextPageToken" Core..=) Core.<$> nextPageToken,+            ("sources" Core..=) Core.<$> sources+          ]+      )++--+-- /See:/ 'newListItemNamesForUnmappedIdentityResponse' smart constructor.+data ListItemNamesForUnmappedIdentityResponse = ListItemNamesForUnmappedIdentityResponse+  { itemNames :: (Core.Maybe [Core.Text]),+    -- | Token to retrieve the next page of results, or empty if there are no more results in the list.+    nextPageToken :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ListItemNamesForUnmappedIdentityResponse' with the minimum fields required to make a request.+newListItemNamesForUnmappedIdentityResponse ::+  ListItemNamesForUnmappedIdentityResponse+newListItemNamesForUnmappedIdentityResponse =+  ListItemNamesForUnmappedIdentityResponse+    { itemNames =+        Core.Nothing,+      nextPageToken = Core.Nothing+    }++instance Core.FromJSON ListItemNamesForUnmappedIdentityResponse where+  parseJSON =+    Core.withObject+      "ListItemNamesForUnmappedIdentityResponse"+      ( \o ->+          ListItemNamesForUnmappedIdentityResponse+            Core.<$> (o Core..:? "itemNames")+            Core.<*> (o Core..:? "nextPageToken")+      )++instance Core.ToJSON ListItemNamesForUnmappedIdentityResponse where+  toJSON ListItemNamesForUnmappedIdentityResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("itemNames" Core..=) Core.<$> itemNames,+            ("nextPageToken" Core..=) Core.<$> nextPageToken+          ]+      )++--+-- /See:/ 'newListItemsResponse' smart constructor.+data ListItemsResponse = ListItemsResponse+  { items :: (Core.Maybe [Item]),+    -- | Token to retrieve the next page of results, or empty if there are no more results in the list.+    nextPageToken :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ListItemsResponse' with the minimum fields required to make a request.+newListItemsResponse ::+  ListItemsResponse+newListItemsResponse =+  ListItemsResponse+    { items = Core.Nothing,+      nextPageToken = Core.Nothing+    }++instance Core.FromJSON ListItemsResponse where+  parseJSON =+    Core.withObject+      "ListItemsResponse"+      ( \o ->+          ListItemsResponse+            Core.<$> (o Core..:? "items")+            Core.<*> (o Core..:? "nextPageToken")+      )++instance Core.ToJSON ListItemsResponse where+  toJSON ListItemsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("items" Core..=) Core.<$> items,+            ("nextPageToken" Core..=) Core.<$> nextPageToken+          ]+      )++-- | The response message for Operations.ListOperations.+--+-- /See:/ 'newListOperationsResponse' smart constructor.+data ListOperationsResponse = ListOperationsResponse+  { -- | The standard List next-page token.+    nextPageToken :: (Core.Maybe Core.Text),+    -- | A list of operations that matches the specified filter in the request.+    operations :: (Core.Maybe [Operation])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ListOperationsResponse' with the minimum fields required to make a request.+newListOperationsResponse ::+  ListOperationsResponse+newListOperationsResponse =+  ListOperationsResponse+    { nextPageToken = Core.Nothing,+      operations = Core.Nothing+    }++instance Core.FromJSON ListOperationsResponse where+  parseJSON =+    Core.withObject+      "ListOperationsResponse"+      ( \o ->+          ListOperationsResponse+            Core.<$> (o Core..:? "nextPageToken")+            Core.<*> (o Core..:? "operations")+      )++instance Core.ToJSON ListOperationsResponse where+  toJSON ListOperationsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("nextPageToken" Core..=) Core.<$> nextPageToken,+            ("operations" Core..=) Core.<$> operations+          ]+      )++-- | List sources response.+--+-- /See:/ 'newListQuerySourcesResponse' smart constructor.+data ListQuerySourcesResponse = ListQuerySourcesResponse+  { nextPageToken :: (Core.Maybe Core.Text),+    sources :: (Core.Maybe [QuerySource])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ListQuerySourcesResponse' with the minimum fields required to make a request.+newListQuerySourcesResponse ::+  ListQuerySourcesResponse+newListQuerySourcesResponse =+  ListQuerySourcesResponse+    { nextPageToken = Core.Nothing,+      sources = Core.Nothing+    }++instance Core.FromJSON ListQuerySourcesResponse where+  parseJSON =+    Core.withObject+      "ListQuerySourcesResponse"+      ( \o ->+          ListQuerySourcesResponse+            Core.<$> (o Core..:? "nextPageToken")+            Core.<*> (o Core..:? "sources")+      )++instance Core.ToJSON ListQuerySourcesResponse where+  toJSON ListQuerySourcesResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("nextPageToken" Core..=) Core.<$> nextPageToken,+            ("sources" Core..=) Core.<$> sources+          ]+      )++--+-- /See:/ 'newListSearchApplicationsResponse' smart constructor.+data ListSearchApplicationsResponse = ListSearchApplicationsResponse+  { -- | Token to retrieve the next page of results, or empty if there are no more results in the list.+    nextPageToken :: (Core.Maybe Core.Text),+    searchApplications :: (Core.Maybe [SearchApplication])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ListSearchApplicationsResponse' with the minimum fields required to make a request.+newListSearchApplicationsResponse ::+  ListSearchApplicationsResponse+newListSearchApplicationsResponse =+  ListSearchApplicationsResponse+    { nextPageToken = Core.Nothing,+      searchApplications = Core.Nothing+    }++instance Core.FromJSON ListSearchApplicationsResponse where+  parseJSON =+    Core.withObject+      "ListSearchApplicationsResponse"+      ( \o ->+          ListSearchApplicationsResponse+            Core.<$> (o Core..:? "nextPageToken")+            Core.<*> (o Core..:? "searchApplications")+      )++instance Core.ToJSON ListSearchApplicationsResponse where+  toJSON ListSearchApplicationsResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("nextPageToken" Core..=) Core.<$> nextPageToken,+            ("searchApplications" Core..=) Core.<$> searchApplications+          ]+      )++--+-- /See:/ 'newListUnmappedIdentitiesResponse' smart constructor.+data ListUnmappedIdentitiesResponse = ListUnmappedIdentitiesResponse+  { -- | Token to retrieve the next page of results, or empty if there are no more results in the list.+    nextPageToken :: (Core.Maybe Core.Text),+    unmappedIdentities :: (Core.Maybe [UnmappedIdentity])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ListUnmappedIdentitiesResponse' with the minimum fields required to make a request.+newListUnmappedIdentitiesResponse ::+  ListUnmappedIdentitiesResponse+newListUnmappedIdentitiesResponse =+  ListUnmappedIdentitiesResponse+    { nextPageToken = Core.Nothing,+      unmappedIdentities = Core.Nothing+    }++instance Core.FromJSON ListUnmappedIdentitiesResponse where+  parseJSON =+    Core.withObject+      "ListUnmappedIdentitiesResponse"+      ( \o ->+          ListUnmappedIdentitiesResponse+            Core.<$> (o Core..:? "nextPageToken")+            Core.<*> (o Core..:? "unmappedIdentities")+      )++instance Core.ToJSON ListUnmappedIdentitiesResponse where+  toJSON ListUnmappedIdentitiesResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("nextPageToken" Core..=) Core.<$> nextPageToken,+            ("unmappedIdentities" Core..=) Core.<$> unmappedIdentities+          ]+      )++-- | Geo information used for rendering a map that shows the user\'s work location.+--+-- /See:/ 'newMapInfo' smart constructor.+data MapInfo = MapInfo+  { -- | Latitude in degrees+    lat :: (Core.Maybe Core.Double),+    -- | URL to a view of a map centered on the user\'s work location in Campus Maps (for google.com) or Google Maps (external).+    locationUrl :: (Core.Maybe SafeUrlProto),+    -- | Longitude in degrees+    long :: (Core.Maybe Core.Double),+    -- | MapTiles for the area around a user\'s work location+    mapTile :: (Core.Maybe [MapTile]),+    -- | The zoom level of the map. A constant zoom value of 18 is used for now to match the zoom of the map shown on a Moma Teams Profile page+    zoom :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'MapInfo' with the minimum fields required to make a request.+newMapInfo ::+  MapInfo+newMapInfo =+  MapInfo+    { lat = Core.Nothing,+      locationUrl = Core.Nothing,+      long = Core.Nothing,+      mapTile = Core.Nothing,+      zoom = Core.Nothing+    }++instance Core.FromJSON MapInfo where+  parseJSON =+    Core.withObject+      "MapInfo"+      ( \o ->+          MapInfo+            Core.<$> (o Core..:? "lat")+            Core.<*> (o Core..:? "locationUrl")+            Core.<*> (o Core..:? "long")+            Core.<*> (o Core..:? "mapTile")+            Core.<*> (o Core..:? "zoom")+      )++instance Core.ToJSON MapInfo where+  toJSON MapInfo {..} =+    Core.object+      ( Core.catMaybes+          [ ("lat" Core..=) Core.<$> lat,+            ("locationUrl" Core..=) Core.<$> locationUrl,+            ("long" Core..=) Core.<$> long,+            ("mapTile" Core..=) Core.<$> mapTile,+            ("zoom" Core..=) Core.<$> zoom+          ]+      )++-- | Information used to render a map tile image in the proper location on a map.+--+-- /See:/ 'newMapTile' smart constructor.+data MapTile = MapTile+  { -- | URL to an image file containing an office layout of the user\'s location for their organization, if one is available. For google.com, this image is from Corp Campus Maps.+    imageUrl :: (Core.Maybe SafeUrlProto),+    -- | Map tile x coordinate+    tileX :: (Core.Maybe Core.Double),+    -- | Map tile y coordinate+    tileY :: (Core.Maybe Core.Double)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'MapTile' with the minimum fields required to make a request.+newMapTile ::+  MapTile+newMapTile =+  MapTile+    { imageUrl = Core.Nothing,+      tileX = Core.Nothing,+      tileY = Core.Nothing+    }++instance Core.FromJSON MapTile where+  parseJSON =+    Core.withObject+      "MapTile"+      ( \o ->+          MapTile+            Core.<$> (o Core..:? "imageUrl")+            Core.<*> (o Core..:? "tileX")+            Core.<*> (o Core..:? "tileY")+      )++instance Core.ToJSON MapTile where+  toJSON MapTile {..} =+    Core.object+      ( Core.catMaybes+          [ ("imageUrl" Core..=) Core.<$> imageUrl,+            ("tileX" Core..=) Core.<$> tileX,+            ("tileY" Core..=) Core.<$> tileY+          ]+      )++-- | Matched range of a snippet [start, end).+--+-- /See:/ 'newMatchRange' smart constructor.+data MatchRange = MatchRange+  { -- | End of the match in the snippet.+    end :: (Core.Maybe Core.Int32),+    -- | Starting position of the match in the snippet.+    start :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'MatchRange' with the minimum fields required to make a request.+newMatchRange ::+  MatchRange+newMatchRange =+  MatchRange {end = Core.Nothing, start = Core.Nothing}++instance Core.FromJSON MatchRange where+  parseJSON =+    Core.withObject+      "MatchRange"+      ( \o ->+          MatchRange+            Core.<$> (o Core..:? "end")+            Core.<*> (o Core..:? "start")+      )++instance Core.ToJSON MatchRange where+  toJSON MatchRange {..} =+    Core.object+      ( Core.catMaybes+          [("end" Core..=) Core.<$> end, ("start" Core..=) Core.<$> start]+      )++-- | Media resource.+--+-- /See:/ 'newMedia' smart constructor.+newtype Media = Media+  { -- | Name of the media resource.+    resourceName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Media' with the minimum fields required to make a request.+newMedia ::+  Media+newMedia = Media {resourceName = Core.Nothing}++instance Core.FromJSON Media where+  parseJSON =+    Core.withObject+      "Media"+      (\o -> Media Core.<$> (o Core..:? "resourceName"))++instance Core.ToJSON Media where+  toJSON Media {..} =+    Core.object+      (Core.catMaybes [("resourceName" Core..=) Core.<$> resourceName])++-- | Metadata of a matched search result.+--+-- /See:/ 'newMetadata' smart constructor.+data Metadata = Metadata+  { -- | The creation time for this document or object in the search result.+    createTime :: (Core.Maybe Core.DateTime),+    -- | Options that specify how to display a structured data search result.+    displayOptions :: (Core.Maybe ResultDisplayMetadata),+    -- | Indexed fields in structured data, returned as a generic named property.+    fields :: (Core.Maybe [NamedProperty]),+    -- | Mime type of the search result.+    mimeType :: (Core.Maybe Core.Text),+    -- | Object type of the search result.+    objectType :: (Core.Maybe Core.Text),+    -- | Owner (usually creator) of the document or object of the search result.+    owner :: (Core.Maybe Person),+    -- | The named source for the result, such as Gmail.+    source :: (Core.Maybe Source),+    -- | The thumbnail URL of the result.+    thumbnailUrl :: (Core.Maybe Core.Text),+    -- | The last modified date for the object in the search result. If not set in the item, the value returned here is empty. When @updateTime@ is used for calculating freshness and is not set, this value defaults to 2 years from the current time.+    updateTime :: (Core.Maybe Core.DateTime)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Metadata' with the minimum fields required to make a request.+newMetadata ::+  Metadata+newMetadata =+  Metadata+    { createTime = Core.Nothing,+      displayOptions = Core.Nothing,+      fields = Core.Nothing,+      mimeType = Core.Nothing,+      objectType = Core.Nothing,+      owner = Core.Nothing,+      source = Core.Nothing,+      thumbnailUrl = Core.Nothing,+      updateTime = Core.Nothing+    }++instance Core.FromJSON Metadata where+  parseJSON =+    Core.withObject+      "Metadata"+      ( \o ->+          Metadata+            Core.<$> (o Core..:? "createTime")+            Core.<*> (o Core..:? "displayOptions")+            Core.<*> (o Core..:? "fields")+            Core.<*> (o Core..:? "mimeType")+            Core.<*> (o Core..:? "objectType")+            Core.<*> (o Core..:? "owner")+            Core.<*> (o Core..:? "source")+            Core.<*> (o Core..:? "thumbnailUrl")+            Core.<*> (o Core..:? "updateTime")+      )++instance Core.ToJSON Metadata where+  toJSON Metadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("createTime" Core..=) Core.<$> createTime,+            ("displayOptions" Core..=) Core.<$> displayOptions,+            ("fields" Core..=) Core.<$> fields,+            ("mimeType" Core..=) Core.<$> mimeType,+            ("objectType" Core..=) Core.<$> objectType,+            ("owner" Core..=) Core.<$> owner,+            ("source" Core..=) Core.<$> source,+            ("thumbnailUrl" Core..=) Core.<$> thumbnailUrl,+            ("updateTime" Core..=) Core.<$> updateTime+          ]+      )++-- | A metaline is a list of properties that are displayed along with the search result to provide context.+--+-- /See:/ 'newMetaline' smart constructor.+newtype Metaline = Metaline+  { -- | The list of displayed properties for the metaline. The maximum number of properties is 5.+    properties :: (Core.Maybe [DisplayedProperty])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Metaline' with the minimum fields required to make a request.+newMetaline ::+  Metaline+newMetaline = Metaline {properties = Core.Nothing}++instance Core.FromJSON Metaline where+  parseJSON =+    Core.withObject+      "Metaline"+      (\o -> Metaline Core.<$> (o Core..:? "properties"))++instance Core.ToJSON Metaline where+  toJSON Metaline {..} =+    Core.object+      (Core.catMaybes [("properties" Core..=) Core.<$> properties])++-- | A person\'s name.+--+-- /See:/ 'newName' smart constructor.+newtype Name = Name+  { -- | The read-only display name formatted according to the locale specified by the viewer\'s account or the @Accept-Language@ HTTP header.+    displayName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Name' with the minimum fields required to make a request.+newName ::+  Name+newName = Name {displayName = Core.Nothing}++instance Core.FromJSON Name where+  parseJSON =+    Core.withObject+      "Name"+      (\o -> Name Core.<$> (o Core..:? "displayName"))++instance Core.ToJSON Name where+  toJSON Name {..} =+    Core.object+      (Core.catMaybes [("displayName" Core..=) Core.<$> displayName])++-- | A typed name-value pair for structured data. The type of the value should be the same as the registered type for the @name@ property in the object definition of @objectType@.+--+-- /See:/ 'newNamedProperty' smart constructor.+data NamedProperty = NamedProperty+  { booleanValue :: (Core.Maybe Core.Bool),+    dateValues :: (Core.Maybe DateValues),+    doubleValues :: (Core.Maybe DoubleValues),+    enumValues :: (Core.Maybe EnumValues),+    htmlValues :: (Core.Maybe HtmlValues),+    integerValues :: (Core.Maybe IntegerValues),+    -- | The name of the property. This name should correspond to the name of the property that was registered for object definition in the schema. The maximum allowable length for this property is 256 characters.+    name :: (Core.Maybe Core.Text),+    objectValues :: (Core.Maybe ObjectValues),+    textValues :: (Core.Maybe TextValues),+    timestampValues :: (Core.Maybe TimestampValues)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'NamedProperty' with the minimum fields required to make a request.+newNamedProperty ::+  NamedProperty+newNamedProperty =+  NamedProperty+    { booleanValue = Core.Nothing,+      dateValues = Core.Nothing,+      doubleValues = Core.Nothing,+      enumValues = Core.Nothing,+      htmlValues = Core.Nothing,+      integerValues = Core.Nothing,+      name = Core.Nothing,+      objectValues = Core.Nothing,+      textValues = Core.Nothing,+      timestampValues = Core.Nothing+    }++instance Core.FromJSON NamedProperty where+  parseJSON =+    Core.withObject+      "NamedProperty"+      ( \o ->+          NamedProperty+            Core.<$> (o Core..:? "booleanValue")+            Core.<*> (o Core..:? "dateValues")+            Core.<*> (o Core..:? "doubleValues")+            Core.<*> (o Core..:? "enumValues")+            Core.<*> (o Core..:? "htmlValues")+            Core.<*> (o Core..:? "integerValues")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "objectValues")+            Core.<*> (o Core..:? "textValues")+            Core.<*> (o Core..:? "timestampValues")+      )++instance Core.ToJSON NamedProperty where+  toJSON NamedProperty {..} =+    Core.object+      ( Core.catMaybes+          [ ("booleanValue" Core..=) Core.<$> booleanValue,+            ("dateValues" Core..=) Core.<$> dateValues,+            ("doubleValues" Core..=) Core.<$> doubleValues,+            ("enumValues" Core..=) Core.<$> enumValues,+            ("htmlValues" Core..=) Core.<$> htmlValues,+            ("integerValues" Core..=) Core.<$> integerValues,+            ("name" Core..=) Core.<$> name,+            ("objectValues" Core..=) Core.<$> objectValues,+            ("textValues" Core..=) Core.<$> textValues,+            ("timestampValues" Core..=) Core.<$> timestampValues+          ]+      )++-- | The definition for an object within a data source.+--+-- /See:/ 'newObjectDefinition' smart constructor.+data ObjectDefinition = ObjectDefinition+  { -- | The name for the object, which then defines its type. Item indexing requests should set the objectType field equal to this value. For example, if /name/ is /Document/, then indexing requests for items of type Document should set objectType equal to /Document/. Each object definition must be uniquely named within a schema. The name must start with a letter and can only contain letters (A-Z, a-z) or numbers (0-9). The maximum length is 256 characters.+    name :: (Core.Maybe Core.Text),+    -- | The optional object-specific options.+    options :: (Core.Maybe ObjectOptions),+    -- | The property definitions for the object. The maximum number of elements is 1000.+    propertyDefinitions :: (Core.Maybe [PropertyDefinition])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ObjectDefinition' with the minimum fields required to make a request.+newObjectDefinition ::+  ObjectDefinition+newObjectDefinition =+  ObjectDefinition+    { name = Core.Nothing,+      options = Core.Nothing,+      propertyDefinitions = Core.Nothing+    }++instance Core.FromJSON ObjectDefinition where+  parseJSON =+    Core.withObject+      "ObjectDefinition"+      ( \o ->+          ObjectDefinition+            Core.<$> (o Core..:? "name")+            Core.<*> (o Core..:? "options")+            Core.<*> (o Core..:? "propertyDefinitions")+      )++instance Core.ToJSON ObjectDefinition where+  toJSON ObjectDefinition {..} =+    Core.object+      ( Core.catMaybes+          [ ("name" Core..=) Core.<$> name,+            ("options" Core..=) Core.<$> options,+            ("propertyDefinitions" Core..=) Core.<$> propertyDefinitions+          ]+      )++-- | The display options for an object.+--+-- /See:/ 'newObjectDisplayOptions' smart constructor.+data ObjectDisplayOptions = ObjectDisplayOptions+  { -- | Defines the properties that are displayed in the metalines of the search results. The property values are displayed in the order given here. If a property holds multiple values, all of the values are displayed before the next properties. For this reason, it is a good practice to specify singular properties before repeated properties in this list. All of the properties must set is_returnable to true. The maximum number of metalines is 3.+    metalines :: (Core.Maybe [Metaline]),+    -- | The user friendly label to display in the search result to indicate the type of the item. This is OPTIONAL; if not provided, an object label isn\'t displayed on the context line of the search results. The maximum length is 64 characters.+    objectDisplayLabel :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ObjectDisplayOptions' with the minimum fields required to make a request.+newObjectDisplayOptions ::+  ObjectDisplayOptions+newObjectDisplayOptions =+  ObjectDisplayOptions+    { metalines = Core.Nothing,+      objectDisplayLabel = Core.Nothing+    }++instance Core.FromJSON ObjectDisplayOptions where+  parseJSON =+    Core.withObject+      "ObjectDisplayOptions"+      ( \o ->+          ObjectDisplayOptions+            Core.<$> (o Core..:? "metalines")+            Core.<*> (o Core..:? "objectDisplayLabel")+      )++instance Core.ToJSON ObjectDisplayOptions where+  toJSON ObjectDisplayOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("metalines" Core..=) Core.<$> metalines,+            ("objectDisplayLabel" Core..=) Core.<$> objectDisplayLabel+          ]+      )++-- | The options for an object.+--+-- /See:/ 'newObjectOptions' smart constructor.+data ObjectOptions = ObjectOptions+  { -- | The options that determine how the object is displayed in the Cloud Search results page.+    displayOptions :: (Core.Maybe ObjectDisplayOptions),+    -- | The freshness options for an object.+    freshnessOptions :: (Core.Maybe FreshnessOptions),+    -- | Operators that can be used to filter suggestions. For Suggest API, only operators mentioned here will be honored in the FilterOptions. Only TEXT and ENUM operators are supported. NOTE: \"objecttype\", \"type\" and \"mimetype\" are already supported. This property is to configure schema specific operators. Even though this is an array, only one operator can be specified. This is an array for future extensibility. Operators mapping to multiple properties within the same object are not supported. If the operator spans across different object types, this option has to be set once for each object definition.+    suggestionFilteringOperators :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ObjectOptions' with the minimum fields required to make a request.+newObjectOptions ::+  ObjectOptions+newObjectOptions =+  ObjectOptions+    { displayOptions = Core.Nothing,+      freshnessOptions = Core.Nothing,+      suggestionFilteringOperators = Core.Nothing+    }++instance Core.FromJSON ObjectOptions where+  parseJSON =+    Core.withObject+      "ObjectOptions"+      ( \o ->+          ObjectOptions+            Core.<$> (o Core..:? "displayOptions")+            Core.<*> (o Core..:? "freshnessOptions")+            Core.<*> (o Core..:? "suggestionFilteringOperators")+      )++instance Core.ToJSON ObjectOptions where+  toJSON ObjectOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("displayOptions" Core..=) Core.<$> displayOptions,+            ("freshnessOptions" Core..=) Core.<$> freshnessOptions,+            ("suggestionFilteringOperators" Core..=)+              Core.<$> suggestionFilteringOperators+          ]+      )++-- | The options for object properties.+--+-- /See:/ 'newObjectPropertyOptions' smart constructor.+newtype ObjectPropertyOptions = ObjectPropertyOptions+  { -- | The properties of the sub-object. These properties represent a nested object. For example, if this property represents a postal address, the subobjectProperties might be named /street/, /city/, and /state/. The maximum number of elements is 1000.+    subobjectProperties :: (Core.Maybe [PropertyDefinition])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ObjectPropertyOptions' with the minimum fields required to make a request.+newObjectPropertyOptions ::+  ObjectPropertyOptions+newObjectPropertyOptions =+  ObjectPropertyOptions {subobjectProperties = Core.Nothing}++instance Core.FromJSON ObjectPropertyOptions where+  parseJSON =+    Core.withObject+      "ObjectPropertyOptions"+      ( \o ->+          ObjectPropertyOptions Core.<$> (o Core..:? "subobjectProperties")+      )++instance Core.ToJSON ObjectPropertyOptions where+  toJSON ObjectPropertyOptions {..} =+    Core.object+      ( Core.catMaybes+          [("subobjectProperties" Core..=) Core.<$> subobjectProperties]+      )++-- | List of object values.+--+-- /See:/ 'newObjectValues' smart constructor.+newtype ObjectValues = ObjectValues+  { values :: (Core.Maybe [StructuredDataObject])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ObjectValues' with the minimum fields required to make a request.+newObjectValues ::+  ObjectValues+newObjectValues = ObjectValues {values = Core.Nothing}++instance Core.FromJSON ObjectValues where+  parseJSON =+    Core.withObject+      "ObjectValues"+      (\o -> ObjectValues Core.<$> (o Core..:? "values"))++instance Core.ToJSON ObjectValues where+  toJSON ObjectValues {..} =+    Core.object (Core.catMaybes [("values" Core..=) Core.<$> values])++-- | This resource represents a long-running operation that is the result of a network API call.+--+-- /See:/ 'newOperation' smart constructor.+data Operation = Operation+  { -- | If the value is @false@, it means the operation is still in progress. If @true@, the operation is completed, and either @error@ or @response@ is available.+    done :: (Core.Maybe Core.Bool),+    -- | The error result of the operation in case of failure or cancellation.+    error :: (Core.Maybe Status),+    -- | Service-specific metadata associated with the operation. It typically contains progress information and common metadata such as create time. Some services might not provide such metadata. Any method that returns a long-running operation should document the metadata type, if any.+    metadata :: (Core.Maybe Operation_Metadata),+    -- | The server-assigned name, which is only unique within the same service that originally returns it. If you use the default HTTP mapping, the @name@ should be a resource name ending with @operations\/{unique_id}@.+    name :: (Core.Maybe Core.Text),+    -- | The normal, successful response of the operation. If the original method returns no data on success, such as @Delete@, the response is @google.protobuf.Empty@. If the original method is standard @Get@\/@Create@\/@Update@, the response should be the resource. For other methods, the response should have the type @XxxResponse@, where @Xxx@ is the original method name. For example, if the original method name is @TakeSnapshot()@, the inferred response type is @TakeSnapshotResponse@.+    response :: (Core.Maybe Operation_Response)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Operation' with the minimum fields required to make a request.+newOperation ::+  Operation+newOperation =+  Operation+    { done = Core.Nothing,+      error = Core.Nothing,+      metadata = Core.Nothing,+      name = Core.Nothing,+      response = Core.Nothing+    }++instance Core.FromJSON Operation where+  parseJSON =+    Core.withObject+      "Operation"+      ( \o ->+          Operation+            Core.<$> (o Core..:? "done")+            Core.<*> (o Core..:? "error")+            Core.<*> (o Core..:? "metadata")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "response")+      )++instance Core.ToJSON Operation where+  toJSON Operation {..} =+    Core.object+      ( Core.catMaybes+          [ ("done" Core..=) Core.<$> done,+            ("error" Core..=) Core.<$> error,+            ("metadata" Core..=) Core.<$> metadata,+            ("name" Core..=) Core.<$> name,+            ("response" Core..=) Core.<$> response+          ]+      )++-- | Service-specific metadata associated with the operation. It typically contains progress information and common metadata such as create time. Some services might not provide such metadata. Any method that returns a long-running operation should document the metadata type, if any.+--+-- /See:/ 'newOperation_Metadata' smart constructor.+newtype Operation_Metadata = Operation_Metadata+  { -- | Properties of the object. Contains field \@type with type URL.+    additional :: (Core.HashMap Core.Text Core.Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Operation_Metadata' with the minimum fields required to make a request.+newOperation_Metadata ::+  -- |  Properties of the object. Contains field \@type with type URL. See 'additional'.+  Core.HashMap Core.Text Core.Value ->+  Operation_Metadata+newOperation_Metadata additional =+  Operation_Metadata {additional = additional}++instance Core.FromJSON Operation_Metadata where+  parseJSON =+    Core.withObject+      "Operation_Metadata"+      (\o -> Operation_Metadata Core.<$> (Core.parseJSONObject o))++instance Core.ToJSON Operation_Metadata where+  toJSON Operation_Metadata {..} = Core.toJSON additional++-- | The normal, successful response of the operation. If the original method returns no data on success, such as @Delete@, the response is @google.protobuf.Empty@. If the original method is standard @Get@\/@Create@\/@Update@, the response should be the resource. For other methods, the response should have the type @XxxResponse@, where @Xxx@ is the original method name. For example, if the original method name is @TakeSnapshot()@, the inferred response type is @TakeSnapshotResponse@.+--+-- /See:/ 'newOperation_Response' smart constructor.+newtype Operation_Response = Operation_Response+  { -- | Properties of the object. Contains field \@type with type URL.+    additional :: (Core.HashMap Core.Text Core.Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Operation_Response' with the minimum fields required to make a request.+newOperation_Response ::+  -- |  Properties of the object. Contains field \@type with type URL. See 'additional'.+  Core.HashMap Core.Text Core.Value ->+  Operation_Response+newOperation_Response additional =+  Operation_Response {additional = additional}++instance Core.FromJSON Operation_Response where+  parseJSON =+    Core.withObject+      "Operation_Response"+      (\o -> Operation_Response Core.<$> (Core.parseJSONObject o))++instance Core.ToJSON Operation_Response where+  toJSON Operation_Response {..} = Core.toJSON additional++--+-- /See:/ 'newPeoplePromotionCard' smart constructor.+newtype PeoplePromotionCard = PeoplePromotionCard+  { people :: (Core.Maybe [PersonCore])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PeoplePromotionCard' with the minimum fields required to make a request.+newPeoplePromotionCard ::+  PeoplePromotionCard+newPeoplePromotionCard = PeoplePromotionCard {people = Core.Nothing}++instance Core.FromJSON PeoplePromotionCard where+  parseJSON =+    Core.withObject+      "PeoplePromotionCard"+      (\o -> PeoplePromotionCard Core.<$> (o Core..:? "people"))++instance Core.ToJSON PeoplePromotionCard where+  toJSON PeoplePromotionCard {..} =+    Core.object (Core.catMaybes [("people" Core..=) Core.<$> people])++-- | This field contains information about the person being suggested.+--+-- /See:/ 'newPeopleSuggestion' smart constructor.+newtype PeopleSuggestion = PeopleSuggestion+  { -- | Suggested person. All fields of the person object might not be populated.+    person :: (Core.Maybe Person)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PeopleSuggestion' with the minimum fields required to make a request.+newPeopleSuggestion ::+  PeopleSuggestion+newPeopleSuggestion = PeopleSuggestion {person = Core.Nothing}++instance Core.FromJSON PeopleSuggestion where+  parseJSON =+    Core.withObject+      "PeopleSuggestion"+      (\o -> PeopleSuggestion Core.<$> (o Core..:? "person"))++instance Core.ToJSON PeopleSuggestion where+  toJSON PeopleSuggestion {..} =+    Core.object (Core.catMaybes [("person" Core..=) Core.<$> person])++-- | Object to represent a person.+--+-- /See:/ 'newPerson' smart constructor.+data Person = Person+  { -- | The person\'s email addresses+    emailAddresses :: (Core.Maybe [EmailAddress]),+    -- | The resource name of the person to provide information about. See <https://developers.google.com/people/api/rest/v1/people/get People.get> from the Google People API.+    name :: (Core.Maybe Core.Text),+    -- | Obfuscated ID of a person.+    obfuscatedId :: (Core.Maybe Core.Text),+    -- | The person\'s name+    personNames :: (Core.Maybe [Name]),+    -- | The person\'s phone numbers+    phoneNumbers :: (Core.Maybe [PhoneNumber]),+    -- | A person\'s read-only photo. A picture shown next to the person\'s name to help others recognize the person in search results.+    photos :: (Core.Maybe [Photo])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Person' with the minimum fields required to make a request.+newPerson ::+  Person+newPerson =+  Person+    { emailAddresses = Core.Nothing,+      name = Core.Nothing,+      obfuscatedId = Core.Nothing,+      personNames = Core.Nothing,+      phoneNumbers = Core.Nothing,+      photos = Core.Nothing+    }++instance Core.FromJSON Person where+  parseJSON =+    Core.withObject+      "Person"+      ( \o ->+          Person+            Core.<$> (o Core..:? "emailAddresses")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "obfuscatedId")+            Core.<*> (o Core..:? "personNames")+            Core.<*> (o Core..:? "phoneNumbers")+            Core.<*> (o Core..:? "photos")+      )++instance Core.ToJSON Person where+  toJSON Person {..} =+    Core.object+      ( Core.catMaybes+          [ ("emailAddresses" Core..=) Core.<$> emailAddresses,+            ("name" Core..=) Core.<$> name,+            ("obfuscatedId" Core..=) Core.<$> obfuscatedId,+            ("personNames" Core..=) Core.<$> personNames,+            ("phoneNumbers" Core..=) Core.<$> phoneNumbers,+            ("photos" Core..=) Core.<$> photos+          ]+      )++-- | Information for rendering a person. NEXT ID: 37+--+-- /See:/ 'newPersonCore' smart constructor.+data PersonCore = PersonCore+  { -- | Instructions for how to address this person (e.g. custom pronouns). For google.com this is a set of pronouns from a defined list of options.+    addressMeAs :: (Core.Maybe Core.Text),+    -- | People the profile owner is an admin to. Note that not all fields of these PersonCores will be set, in particular, relationships will be empty.+    adminTo :: (Core.Maybe [PersonCore]),+    -- | The profile owner\'s admins in no particular order. Note that not all fields of these PersonCores will be set, in particular, relationships will be empty.+    admins :: (Core.Maybe [PersonCore]),+    availabilityStatus :: (Core.Maybe PersonCore_AvailabilityStatus),+    -- | Person birthday.+    birthday :: (Core.Maybe Date),+    -- | The URL to open the profile owner\'s primary calendar.+    calendarUrl :: (Core.Maybe SafeUrlProto),+    -- | The URL to start a chat conversation with the profile owner. For google.com this is a Hangouts URL.+    chatUrl :: (Core.Maybe SafeUrlProto),+    -- | Person\'s cost center as a string, e.g. \"926: Googler Apps\".+    costCenter :: (Core.Maybe Core.Text),+    -- | The person\'s Organization department, e.g. \"People Operations\". For google.com this is usually called \"area\".+    department :: (Core.Maybe Core.Text),+    -- | A subset of the profile owner\'s direct reports. The number of entities here may be less than total/direct/reports_count, because typically ProfileResponse does not include all the person\'s reports, if there are too many to retrieve efficiently. Note that not all fields of these PersonCores will be set, in particular, relationships will be empty.+    directReports :: (Core.Maybe [PersonCore]),+    -- | The profile owner\'s direct dotted line managers in no particular order. Note that not all fields of these PersonCores will be set, in particular, relationships will be empty.+    dottedLineManagers :: (Core.Maybe [PersonCore]),+    -- | A subset of the profile owner\'s dotted-line reports. The number of entities here may be less than total/dlr/count. Note that not all fields of these PersonCores will be set, in particular, relationships will be empty.+    dottedLineReports :: (Core.Maybe [PersonCore]),+    -- | E-mail addresses of the person. The primary or preferred email should be first.+    emails :: (Core.Maybe [Core.Text]),+    -- | Person\'s employee number (external ID of type \"organization\") For google.com this is the badge number (e.g. 2 for Larry Page).+    employeeId :: (Core.Maybe Core.Text),+    -- | A fingerprint used by PAPI to reliably determine if a resource has changed Externally it is used as part of the etag.+    fingerprint :: (Core.Maybe Core.Text),+    -- | Full-time equivalent (in ‰) (e.g. 800 for a person who\'s working 80%).+    ftePermille :: (Core.Maybe Core.Int64),+    geoLocation :: (Core.Maybe MapInfo),+    gmailUrl :: (Core.Maybe Core.Text),+    -- | Profile owner\'s job title (e.g. \"Software Engineer\"). For google.com this is the Workday preferred job title.+    jobTitle :: (Core.Maybe Core.Text),+    -- | List of keys to use from the map \'keywords\'.+    keywordTypes :: (Core.Maybe [Core.Text]),+    -- | Custom keywords the domain admin has added.+    keywords :: (Core.Maybe PersonCore_Keywords),+    -- | Custom links the profile owner has added.+    links :: (Core.Maybe [EnterpriseTopazFrontendTeamsLink]),+    -- | Detailed desk location within the company. For google.com this is the desk location code (e.g. \"DE-MUC-ARP-6T2-6T2C0C\") if the person has a desk.+    location :: (Core.Maybe Core.Text),+    -- | The profile owner\'s management chain from top to bottom, where managers[0] is the CEO, manager[N-2] is the person\'s manager\'s manager and managers[N-1] is the person\'s direct manager. Note that not all fields of these PersonCores will be set, in particular, relationships will be empty.+    managers :: (Core.Maybe [PersonCore]),+    -- | Custom mission statement the profile owner has added.+    mission :: (Core.Maybe Core.Text),+    -- | Human-readable Unicode display name.+    name :: (Core.Maybe Core.Text),+    -- | Office\/building identifier within the company. For google.com this is the office code (e.g. \"DE-MUC-ARP\").+    officeLocation :: (Core.Maybe Core.Text),+    -- | The person\'s obfuscated Gaia ID.+    personId :: (Core.Maybe Core.Text),+    phoneNumbers :: (Core.Maybe [EnterpriseTopazFrontendTeamsPersonCorePhoneNumber]),+    -- | Person photo.+    photoUrl :: (Core.Maybe SafeUrlProto),+    -- | Postal address of office\/building.+    postalAddress :: (Core.Maybe Core.Text),+    -- | Total count of the profile owner\'s direct reports.+    totalDirectReportsCount :: (Core.Maybe Core.Int32),+    -- | Total count of the profile owner\'s dotted-line reports.+    totalDlrCount :: (Core.Maybe Core.Int32),+    -- | The sum of all profile owner\'s reports and their own full-time-equivalents in ‰ (e.g. 1800 if one report is working 80% and profile owner 100%).+    totalFteCount :: (Core.Maybe Core.Int64),+    -- | External ID of type \"login_id\" for the profile. For google.com this is the username\/LDAP.+    username :: (Core.Maybe Core.Text),+    waldoComeBackTime :: (Core.Maybe Core.DateTime)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PersonCore' with the minimum fields required to make a request.+newPersonCore ::+  PersonCore+newPersonCore =+  PersonCore+    { addressMeAs = Core.Nothing,+      adminTo = Core.Nothing,+      admins = Core.Nothing,+      availabilityStatus = Core.Nothing,+      birthday = Core.Nothing,+      calendarUrl = Core.Nothing,+      chatUrl = Core.Nothing,+      costCenter = Core.Nothing,+      department = Core.Nothing,+      directReports = Core.Nothing,+      dottedLineManagers = Core.Nothing,+      dottedLineReports = Core.Nothing,+      emails = Core.Nothing,+      employeeId = Core.Nothing,+      fingerprint = Core.Nothing,+      ftePermille = Core.Nothing,+      geoLocation = Core.Nothing,+      gmailUrl = Core.Nothing,+      jobTitle = Core.Nothing,+      keywordTypes = Core.Nothing,+      keywords = Core.Nothing,+      links = Core.Nothing,+      location = Core.Nothing,+      managers = Core.Nothing,+      mission = Core.Nothing,+      name = Core.Nothing,+      officeLocation = Core.Nothing,+      personId = Core.Nothing,+      phoneNumbers = Core.Nothing,+      photoUrl = Core.Nothing,+      postalAddress = Core.Nothing,+      totalDirectReportsCount = Core.Nothing,+      totalDlrCount = Core.Nothing,+      totalFteCount = Core.Nothing,+      username = Core.Nothing,+      waldoComeBackTime = Core.Nothing+    }++instance Core.FromJSON PersonCore where+  parseJSON =+    Core.withObject+      "PersonCore"+      ( \o ->+          PersonCore+            Core.<$> (o Core..:? "addressMeAs")+            Core.<*> (o Core..:? "adminTo")+            Core.<*> (o Core..:? "admins")+            Core.<*> (o Core..:? "availabilityStatus")+            Core.<*> (o Core..:? "birthday")+            Core.<*> (o Core..:? "calendarUrl")+            Core.<*> (o Core..:? "chatUrl")+            Core.<*> (o Core..:? "costCenter")+            Core.<*> (o Core..:? "department")+            Core.<*> (o Core..:? "directReports")+            Core.<*> (o Core..:? "dottedLineManagers")+            Core.<*> (o Core..:? "dottedLineReports")+            Core.<*> (o Core..:? "emails")+            Core.<*> (o Core..:? "employeeId")+            Core.<*> (o Core..:? "fingerprint")+            Core.<*> (o Core..:? "ftePermille" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "geoLocation")+            Core.<*> (o Core..:? "gmailUrl")+            Core.<*> (o Core..:? "jobTitle")+            Core.<*> (o Core..:? "keywordTypes")+            Core.<*> (o Core..:? "keywords")+            Core.<*> (o Core..:? "links")+            Core.<*> (o Core..:? "location")+            Core.<*> (o Core..:? "managers")+            Core.<*> (o Core..:? "mission")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "officeLocation")+            Core.<*> (o Core..:? "personId")+            Core.<*> (o Core..:? "phoneNumbers")+            Core.<*> (o Core..:? "photoUrl")+            Core.<*> (o Core..:? "postalAddress")+            Core.<*> (o Core..:? "totalDirectReportsCount")+            Core.<*> (o Core..:? "totalDlrCount")+            Core.<*> (o Core..:? "totalFteCount" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "username")+            Core.<*> (o Core..:? "waldoComeBackTime")+      )++instance Core.ToJSON PersonCore where+  toJSON PersonCore {..} =+    Core.object+      ( Core.catMaybes+          [ ("addressMeAs" Core..=) Core.<$> addressMeAs,+            ("adminTo" Core..=) Core.<$> adminTo,+            ("admins" Core..=) Core.<$> admins,+            ("availabilityStatus" Core..=) Core.<$> availabilityStatus,+            ("birthday" Core..=) Core.<$> birthday,+            ("calendarUrl" Core..=) Core.<$> calendarUrl,+            ("chatUrl" Core..=) Core.<$> chatUrl,+            ("costCenter" Core..=) Core.<$> costCenter,+            ("department" Core..=) Core.<$> department,+            ("directReports" Core..=) Core.<$> directReports,+            ("dottedLineManagers" Core..=) Core.<$> dottedLineManagers,+            ("dottedLineReports" Core..=) Core.<$> dottedLineReports,+            ("emails" Core..=) Core.<$> emails,+            ("employeeId" Core..=) Core.<$> employeeId,+            ("fingerprint" Core..=) Core.<$> fingerprint,+            ("ftePermille" Core..=) Core.. Core.AsText Core.<$> ftePermille,+            ("geoLocation" Core..=) Core.<$> geoLocation,+            ("gmailUrl" Core..=) Core.<$> gmailUrl,+            ("jobTitle" Core..=) Core.<$> jobTitle,+            ("keywordTypes" Core..=) Core.<$> keywordTypes,+            ("keywords" Core..=) Core.<$> keywords,+            ("links" Core..=) Core.<$> links,+            ("location" Core..=) Core.<$> location,+            ("managers" Core..=) Core.<$> managers,+            ("mission" Core..=) Core.<$> mission,+            ("name" Core..=) Core.<$> name,+            ("officeLocation" Core..=) Core.<$> officeLocation,+            ("personId" Core..=) Core.<$> personId,+            ("phoneNumbers" Core..=) Core.<$> phoneNumbers,+            ("photoUrl" Core..=) Core.<$> photoUrl,+            ("postalAddress" Core..=) Core.<$> postalAddress,+            ("totalDirectReportsCount" Core..=)+              Core.<$> totalDirectReportsCount,+            ("totalDlrCount" Core..=) Core.<$> totalDlrCount,+            ("totalFteCount" Core..=)+              Core.. Core.AsText+              Core.<$> totalFteCount,+            ("username" Core..=) Core.<$> username,+            ("waldoComeBackTime" Core..=) Core.<$> waldoComeBackTime+          ]+      )++-- | Custom keywords the domain admin has added.+--+-- /See:/ 'newPersonCore_Keywords' smart constructor.+newtype PersonCore_Keywords = PersonCore_Keywords+  { additional :: (Core.HashMap Core.Text Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PersonCore_Keywords' with the minimum fields required to make a request.+newPersonCore_Keywords ::+  -- |  See 'additional'.+  Core.HashMap Core.Text Core.Text ->+  PersonCore_Keywords+newPersonCore_Keywords additional =+  PersonCore_Keywords {additional = additional}++instance Core.FromJSON PersonCore_Keywords where+  parseJSON =+    Core.withObject+      "PersonCore_Keywords"+      (\o -> PersonCore_Keywords Core.<$> (Core.parseJSONObject o))++instance Core.ToJSON PersonCore_Keywords where+  toJSON PersonCore_Keywords {..} = Core.toJSON additional++-- | A person\'s Phone Number+--+-- /See:/ 'newPhoneNumber' smart constructor.+data PhoneNumber = PhoneNumber+  { -- | The phone number of the person.+    phoneNumber :: (Core.Maybe Core.Text),+    type' :: (Core.Maybe PhoneNumber_Type)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PhoneNumber' with the minimum fields required to make a request.+newPhoneNumber ::+  PhoneNumber+newPhoneNumber =+  PhoneNumber {phoneNumber = Core.Nothing, type' = Core.Nothing}++instance Core.FromJSON PhoneNumber where+  parseJSON =+    Core.withObject+      "PhoneNumber"+      ( \o ->+          PhoneNumber+            Core.<$> (o Core..:? "phoneNumber")+            Core.<*> (o Core..:? "type")+      )++instance Core.ToJSON PhoneNumber where+  toJSON PhoneNumber {..} =+    Core.object+      ( Core.catMaybes+          [ ("phoneNumber" Core..=) Core.<$> phoneNumber,+            ("type" Core..=) Core.<$> type'+          ]+      )++-- | A person\'s photo.+--+-- /See:/ 'newPhoto' smart constructor.+newtype Photo = Photo+  { -- | The URL of the photo.+    url :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Photo' with the minimum fields required to make a request.+newPhoto ::+  Photo+newPhoto = Photo {url = Core.Nothing}++instance Core.FromJSON Photo where+  parseJSON =+    Core.withObject+      "Photo"+      (\o -> Photo Core.<$> (o Core..:? "url"))++instance Core.ToJSON Photo where+  toJSON Photo {..} =+    Core.object (Core.catMaybes [("url" Core..=) Core.<$> url])++--+-- /See:/ 'newPollItemsRequest' smart constructor.+data PollItemsRequest = PollItemsRequest+  { -- | The name of connector making this call. Format: datasources\/{source_id}\/connectors\/{ID}+    connectorName :: (Core.Maybe Core.Text),+    -- | Common debug options.+    debugOptions :: (Core.Maybe DebugOptions),+    -- | Maximum number of items to return. The maximum value is 100 and the default value is 20.+    limit :: (Core.Maybe Core.Int32),+    -- | Queue name to fetch items from. If unspecified, PollItems will fetch from \'default\' queue. The maximum length is 100 characters.+    queue :: (Core.Maybe Core.Text),+    -- | Limit the items polled to the ones with these statuses.+    statusCodes :: (Core.Maybe [PollItemsRequest_StatusCodesItem])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PollItemsRequest' with the minimum fields required to make a request.+newPollItemsRequest ::+  PollItemsRequest+newPollItemsRequest =+  PollItemsRequest+    { connectorName = Core.Nothing,+      debugOptions = Core.Nothing,+      limit = Core.Nothing,+      queue = Core.Nothing,+      statusCodes = Core.Nothing+    }++instance Core.FromJSON PollItemsRequest where+  parseJSON =+    Core.withObject+      "PollItemsRequest"+      ( \o ->+          PollItemsRequest+            Core.<$> (o Core..:? "connectorName")+            Core.<*> (o Core..:? "debugOptions")+            Core.<*> (o Core..:? "limit")+            Core.<*> (o Core..:? "queue")+            Core.<*> (o Core..:? "statusCodes")+      )++instance Core.ToJSON PollItemsRequest where+  toJSON PollItemsRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("connectorName" Core..=) Core.<$> connectorName,+            ("debugOptions" Core..=) Core.<$> debugOptions,+            ("limit" Core..=) Core.<$> limit,+            ("queue" Core..=) Core.<$> queue,+            ("statusCodes" Core..=) Core.<$> statusCodes+          ]+      )++--+-- /See:/ 'newPollItemsResponse' smart constructor.+newtype PollItemsResponse = PollItemsResponse+  { -- | Set of items from the queue available for connector to process. These items have the following subset of fields populated: version metadata.hash structured_data.hash content.hash payload status queue+    items :: (Core.Maybe [Item])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PollItemsResponse' with the minimum fields required to make a request.+newPollItemsResponse ::+  PollItemsResponse+newPollItemsResponse = PollItemsResponse {items = Core.Nothing}++instance Core.FromJSON PollItemsResponse where+  parseJSON =+    Core.withObject+      "PollItemsResponse"+      (\o -> PollItemsResponse Core.<$> (o Core..:? "items"))++instance Core.ToJSON PollItemsResponse where+  toJSON PollItemsResponse {..} =+    Core.object (Core.catMaybes [("items" Core..=) Core.<$> items])++-- | Reference to a user, group, or domain.+--+-- /See:/ 'newPrincipal' smart constructor.+data Principal = Principal+  { -- | This principal is a group identified using an external identity. The name field must specify the group resource name with this format: identitysources\/{source_id}\/groups\/{ID}+    groupResourceName :: (Core.Maybe Core.Text),+    -- | This principal is a Google Workspace user, group or domain.+    gsuitePrincipal :: (Core.Maybe GSuitePrincipal),+    -- | This principal is a user identified using an external identity. The name field must specify the user resource name with this format: identitysources\/{source_id}\/users\/{ID}+    userResourceName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Principal' with the minimum fields required to make a request.+newPrincipal ::+  Principal+newPrincipal =+  Principal+    { groupResourceName = Core.Nothing,+      gsuitePrincipal = Core.Nothing,+      userResourceName = Core.Nothing+    }++instance Core.FromJSON Principal where+  parseJSON =+    Core.withObject+      "Principal"+      ( \o ->+          Principal+            Core.<$> (o Core..:? "groupResourceName")+            Core.<*> (o Core..:? "gsuitePrincipal")+            Core.<*> (o Core..:? "userResourceName")+      )++instance Core.ToJSON Principal where+  toJSON Principal {..} =+    Core.object+      ( Core.catMaybes+          [ ("groupResourceName" Core..=) Core.<$> groupResourceName,+            ("gsuitePrincipal" Core..=) Core.<$> gsuitePrincipal,+            ("userResourceName" Core..=) Core.<$> userResourceName+          ]+      )++--+-- /See:/ 'newProcessingError' smart constructor.+data ProcessingError = ProcessingError+  { -- | Error code indicating the nature of the error.+    code :: (Core.Maybe ProcessingError_Code),+    -- | The description of the error.+    errorMessage :: (Core.Maybe Core.Text),+    -- | In case the item fields are invalid, this field contains the details about the validation errors.+    fieldViolations :: (Core.Maybe [FieldViolation])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ProcessingError' with the minimum fields required to make a request.+newProcessingError ::+  ProcessingError+newProcessingError =+  ProcessingError+    { code = Core.Nothing,+      errorMessage = Core.Nothing,+      fieldViolations = Core.Nothing+    }++instance Core.FromJSON ProcessingError where+  parseJSON =+    Core.withObject+      "ProcessingError"+      ( \o ->+          ProcessingError+            Core.<$> (o Core..:? "code")+            Core.<*> (o Core..:? "errorMessage")+            Core.<*> (o Core..:? "fieldViolations")+      )++instance Core.ToJSON ProcessingError where+  toJSON ProcessingError {..} =+    Core.object+      ( Core.catMaybes+          [ ("code" Core..=) Core.<$> code,+            ("errorMessage" Core..=) Core.<$> errorMessage,+            ("fieldViolations" Core..=) Core.<$> fieldViolations+          ]+      )++-- | The definition of a property within an object.+--+-- /See:/ 'newPropertyDefinition' smart constructor.+data PropertyDefinition = PropertyDefinition+  { booleanPropertyOptions :: (Core.Maybe BooleanPropertyOptions),+    datePropertyOptions :: (Core.Maybe DatePropertyOptions),+    -- | The options that determine how the property is displayed in the Cloud Search results page if it\'s specified to be displayed in the object\'s display options.+    displayOptions :: (Core.Maybe PropertyDisplayOptions),+    doublePropertyOptions :: (Core.Maybe DoublePropertyOptions),+    enumPropertyOptions :: (Core.Maybe EnumPropertyOptions),+    htmlPropertyOptions :: (Core.Maybe HtmlPropertyOptions),+    integerPropertyOptions :: (Core.Maybe IntegerPropertyOptions),+    -- | Indicates that the property can be used for generating facets. Cannot be true for properties whose type is object. IsReturnable must be true to set this option. Only supported for boolean, enum, integer, and text properties.+    isFacetable :: (Core.Maybe Core.Bool),+    -- | Indicates that multiple values are allowed for the property. For example, a document only has one description but can have multiple comments. Cannot be true for properties whose type is a boolean. If set to false, properties that contain more than one value cause the indexing request for that item to be rejected.+    isRepeatable :: (Core.Maybe Core.Bool),+    -- | Indicates that the property identifies data that should be returned in search results via the Query API. If set to /true/, indicates that Query API users can use matching property fields in results. However, storing fields requires more space allocation and uses more bandwidth for search queries, which impacts performance over large datasets. Set to /true/ here only if the field is needed for search results. Cannot be true for properties whose type is an object.+    isReturnable :: (Core.Maybe Core.Bool),+    -- | Indicates that the property can be used for sorting. Cannot be true for properties that are repeatable. Cannot be true for properties whose type is object. IsReturnable must be true to set this option. Only supported for boolean, date, double, integer, and timestamp properties.+    isSortable :: (Core.Maybe Core.Bool),+    -- | Indicates that the property can be used for generating query suggestions.+    isSuggestable :: (Core.Maybe Core.Bool),+    -- | Indicates that users can perform wildcard search for this property. Only supported for Text properties. IsReturnable must be true to set this option. In a given datasource maximum of 5 properties can be marked as is/wildcard/searchable. For more details, see <https://developers.google.com/cloud-search/docs/guides/schema-guide#properties Define object properties>+    isWildcardSearchable :: (Core.Maybe Core.Bool),+    -- | The name of the property. Item indexing requests sent to the Indexing API should set the property name equal to this value. For example, if name is /subject/line/, then indexing requests for document items with subject fields should set the name for that field equal to /subject/line/. Use the name as the identifier for the object property. Once registered as a property for an object, you cannot re-use this name for another property within that object. The name must start with a letter and can only contain letters (A-Z, a-z) or numbers (0-9). The maximum length is 256 characters.+    name :: (Core.Maybe Core.Text),+    objectPropertyOptions :: (Core.Maybe ObjectPropertyOptions),+    textPropertyOptions :: (Core.Maybe TextPropertyOptions),+    timestampPropertyOptions :: (Core.Maybe TimestampPropertyOptions)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PropertyDefinition' with the minimum fields required to make a request.+newPropertyDefinition ::+  PropertyDefinition+newPropertyDefinition =+  PropertyDefinition+    { booleanPropertyOptions = Core.Nothing,+      datePropertyOptions = Core.Nothing,+      displayOptions = Core.Nothing,+      doublePropertyOptions = Core.Nothing,+      enumPropertyOptions = Core.Nothing,+      htmlPropertyOptions = Core.Nothing,+      integerPropertyOptions = Core.Nothing,+      isFacetable = Core.Nothing,+      isRepeatable = Core.Nothing,+      isReturnable = Core.Nothing,+      isSortable = Core.Nothing,+      isSuggestable = Core.Nothing,+      isWildcardSearchable = Core.Nothing,+      name = Core.Nothing,+      objectPropertyOptions = Core.Nothing,+      textPropertyOptions = Core.Nothing,+      timestampPropertyOptions = Core.Nothing+    }++instance Core.FromJSON PropertyDefinition where+  parseJSON =+    Core.withObject+      "PropertyDefinition"+      ( \o ->+          PropertyDefinition+            Core.<$> (o Core..:? "booleanPropertyOptions")+            Core.<*> (o Core..:? "datePropertyOptions")+            Core.<*> (o Core..:? "displayOptions")+            Core.<*> (o Core..:? "doublePropertyOptions")+            Core.<*> (o Core..:? "enumPropertyOptions")+            Core.<*> (o Core..:? "htmlPropertyOptions")+            Core.<*> (o Core..:? "integerPropertyOptions")+            Core.<*> (o Core..:? "isFacetable")+            Core.<*> (o Core..:? "isRepeatable")+            Core.<*> (o Core..:? "isReturnable")+            Core.<*> (o Core..:? "isSortable")+            Core.<*> (o Core..:? "isSuggestable")+            Core.<*> (o Core..:? "isWildcardSearchable")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "objectPropertyOptions")+            Core.<*> (o Core..:? "textPropertyOptions")+            Core.<*> (o Core..:? "timestampPropertyOptions")+      )++instance Core.ToJSON PropertyDefinition where+  toJSON PropertyDefinition {..} =+    Core.object+      ( Core.catMaybes+          [ ("booleanPropertyOptions" Core..=)+              Core.<$> booleanPropertyOptions,+            ("datePropertyOptions" Core..=) Core.<$> datePropertyOptions,+            ("displayOptions" Core..=) Core.<$> displayOptions,+            ("doublePropertyOptions" Core..=) Core.<$> doublePropertyOptions,+            ("enumPropertyOptions" Core..=) Core.<$> enumPropertyOptions,+            ("htmlPropertyOptions" Core..=) Core.<$> htmlPropertyOptions,+            ("integerPropertyOptions" Core..=) Core.<$> integerPropertyOptions,+            ("isFacetable" Core..=) Core.<$> isFacetable,+            ("isRepeatable" Core..=) Core.<$> isRepeatable,+            ("isReturnable" Core..=) Core.<$> isReturnable,+            ("isSortable" Core..=) Core.<$> isSortable,+            ("isSuggestable" Core..=) Core.<$> isSuggestable,+            ("isWildcardSearchable" Core..=) Core.<$> isWildcardSearchable,+            ("name" Core..=) Core.<$> name,+            ("objectPropertyOptions" Core..=) Core.<$> objectPropertyOptions,+            ("textPropertyOptions" Core..=) Core.<$> textPropertyOptions,+            ("timestampPropertyOptions" Core..=)+              Core.<$> timestampPropertyOptions+          ]+      )++-- | The display options for a property.+--+-- /See:/ 'newPropertyDisplayOptions' smart constructor.+newtype PropertyDisplayOptions = PropertyDisplayOptions+  { -- | The user friendly label for the property that is used if the property is specified to be displayed in ObjectDisplayOptions. If provided, the display label is shown in front of the property values when the property is part of the object display options. For example, if the property value is \'1\', the value by itself may not be useful context for the user. If the display name given was \'priority\', then the user sees \'priority : 1\' in the search results which provides clear context to search users. This is OPTIONAL; if not given, only the property values are displayed. The maximum length is 64 characters.+    displayLabel :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PropertyDisplayOptions' with the minimum fields required to make a request.+newPropertyDisplayOptions ::+  PropertyDisplayOptions+newPropertyDisplayOptions =+  PropertyDisplayOptions {displayLabel = Core.Nothing}++instance Core.FromJSON PropertyDisplayOptions where+  parseJSON =+    Core.withObject+      "PropertyDisplayOptions"+      ( \o ->+          PropertyDisplayOptions Core.<$> (o Core..:? "displayLabel")+      )++instance Core.ToJSON PropertyDisplayOptions where+  toJSON PropertyDisplayOptions {..} =+    Core.object+      (Core.catMaybes [("displayLabel" Core..=) Core.<$> displayLabel])++-- | Represents an item to be pushed to the indexing queue.+--+-- /See:/ 'newPushItem' smart constructor.+data PushItem = PushItem+  { -- | Content hash of the item according to the repository. If specified, this is used to determine how to modify this item\'s status. Setting this field and the type field results in argument error. The maximum length is 2048 characters.+    contentHash :: (Core.Maybe Core.Text),+    -- | The metadata hash of the item according to the repository. If specified, this is used to determine how to modify this item\'s status. Setting this field and the type field results in argument error. The maximum length is 2048 characters.+    metadataHash :: (Core.Maybe Core.Text),+    -- | Provides additional document state information for the connector, such as an alternate repository ID and other metadata. The maximum length is 8192 bytes.+    payload :: (Core.Maybe Core.Base64),+    -- | Queue to which this item belongs. The @default@ queue is chosen if this field is not specified. The maximum length is 512 characters.+    queue :: (Core.Maybe Core.Text),+    -- | Populate this field to store Connector or repository error details. This information is displayed in the Admin Console. This field may only be populated when the Type is REPOSITORY_ERROR.+    repositoryError :: (Core.Maybe RepositoryError),+    -- | Structured data hash of the item according to the repository. If specified, this is used to determine how to modify this item\'s status. Setting this field and the type field results in argument error. The maximum length is 2048 characters.+    structuredDataHash :: (Core.Maybe Core.Text),+    -- | The type of the push operation that defines the push behavior.+    type' :: (Core.Maybe PushItem_Type)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PushItem' with the minimum fields required to make a request.+newPushItem ::+  PushItem+newPushItem =+  PushItem+    { contentHash = Core.Nothing,+      metadataHash = Core.Nothing,+      payload = Core.Nothing,+      queue = Core.Nothing,+      repositoryError = Core.Nothing,+      structuredDataHash = Core.Nothing,+      type' = Core.Nothing+    }++instance Core.FromJSON PushItem where+  parseJSON =+    Core.withObject+      "PushItem"+      ( \o ->+          PushItem+            Core.<$> (o Core..:? "contentHash")+            Core.<*> (o Core..:? "metadataHash")+            Core.<*> (o Core..:? "payload")+            Core.<*> (o Core..:? "queue")+            Core.<*> (o Core..:? "repositoryError")+            Core.<*> (o Core..:? "structuredDataHash")+            Core.<*> (o Core..:? "type")+      )++instance Core.ToJSON PushItem where+  toJSON PushItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("contentHash" Core..=) Core.<$> contentHash,+            ("metadataHash" Core..=) Core.<$> metadataHash,+            ("payload" Core..=) Core.<$> payload,+            ("queue" Core..=) Core.<$> queue,+            ("repositoryError" Core..=) Core.<$> repositoryError,+            ("structuredDataHash" Core..=) Core.<$> structuredDataHash,+            ("type" Core..=) Core.<$> type'+          ]+      )++--+-- /See:/ 'newPushItemRequest' smart constructor.+data PushItemRequest = PushItemRequest+  { -- | The name of connector making this call. Format: datasources\/{source_id}\/connectors\/{ID}+    connectorName :: (Core.Maybe Core.Text),+    -- | Common debug options.+    debugOptions :: (Core.Maybe DebugOptions),+    -- | Item to push onto the queue.+    item :: (Core.Maybe PushItem)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'PushItemRequest' with the minimum fields required to make a request.+newPushItemRequest ::+  PushItemRequest+newPushItemRequest =+  PushItemRequest+    { connectorName = Core.Nothing,+      debugOptions = Core.Nothing,+      item = Core.Nothing+    }++instance Core.FromJSON PushItemRequest where+  parseJSON =+    Core.withObject+      "PushItemRequest"+      ( \o ->+          PushItemRequest+            Core.<$> (o Core..:? "connectorName")+            Core.<*> (o Core..:? "debugOptions")+            Core.<*> (o Core..:? "item")+      )++instance Core.ToJSON PushItemRequest where+  toJSON PushItemRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("connectorName" Core..=) Core.<$> connectorName,+            ("debugOptions" Core..=) Core.<$> debugOptions,+            ("item" Core..=) Core.<$> item+          ]+      )++-- | Details about a user\'s query activity.+--+-- /See:/ 'newQueryActivity' smart constructor.+newtype QueryActivity = QueryActivity+  { -- | User input query to be logged\/removed.+    query :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'QueryActivity' with the minimum fields required to make a request.+newQueryActivity ::+  QueryActivity+newQueryActivity = QueryActivity {query = Core.Nothing}++instance Core.FromJSON QueryActivity where+  parseJSON =+    Core.withObject+      "QueryActivity"+      (\o -> QueryActivity Core.<$> (o Core..:? "query"))++instance Core.ToJSON QueryActivity where+  toJSON QueryActivity {..} =+    Core.object (Core.catMaybes [("query" Core..=) Core.<$> query])++--+-- /See:/ 'newQueryCountByStatus' smart constructor.+data QueryCountByStatus = QueryCountByStatus+  { count :: (Core.Maybe Core.Int64),+    -- | This represents the http status code.+    statusCode :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'QueryCountByStatus' with the minimum fields required to make a request.+newQueryCountByStatus ::+  QueryCountByStatus+newQueryCountByStatus =+  QueryCountByStatus+    { count = Core.Nothing,+      statusCode = Core.Nothing+    }++instance Core.FromJSON QueryCountByStatus where+  parseJSON =+    Core.withObject+      "QueryCountByStatus"+      ( \o ->+          QueryCountByStatus+            Core.<$> (o Core..:? "count" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "statusCode")+      )++instance Core.ToJSON QueryCountByStatus where+  toJSON QueryCountByStatus {..} =+    Core.object+      ( Core.catMaybes+          [ ("count" Core..=) Core.. Core.AsText Core.<$> count,+            ("statusCode" Core..=) Core.<$> statusCode+          ]+      )++--+-- /See:/ 'newQueryInterpretation' smart constructor.+data QueryInterpretation = QueryInterpretation+  { interpretationType :: (Core.Maybe QueryInterpretation_InterpretationType),+    -- | The interpretation of the query used in search. For example, queries with natural language intent like \"email from john\" will be interpreted as \"from:john source:mail\". This field will not be filled when the reason is NOT/ENOUGH/RESULTS/FOUND/FOR/USER/QUERY.+    interpretedQuery :: (Core.Maybe Core.Text),+    -- | The reason for interpretation of the query. This field will not be UNSPECIFIED if the interpretation type is not NONE.+    reason :: (Core.Maybe QueryInterpretation_Reason)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'QueryInterpretation' with the minimum fields required to make a request.+newQueryInterpretation ::+  QueryInterpretation+newQueryInterpretation =+  QueryInterpretation+    { interpretationType = Core.Nothing,+      interpretedQuery = Core.Nothing,+      reason = Core.Nothing+    }++instance Core.FromJSON QueryInterpretation where+  parseJSON =+    Core.withObject+      "QueryInterpretation"+      ( \o ->+          QueryInterpretation+            Core.<$> (o Core..:? "interpretationType")+            Core.<*> (o Core..:? "interpretedQuery")+            Core.<*> (o Core..:? "reason")+      )++instance Core.ToJSON QueryInterpretation where+  toJSON QueryInterpretation {..} =+    Core.object+      ( Core.catMaybes+          [ ("interpretationType" Core..=) Core.<$> interpretationType,+            ("interpretedQuery" Core..=) Core.<$> interpretedQuery,+            ("reason" Core..=) Core.<$> reason+          ]+      )++-- | Default options to interpret user query.+--+-- /See:/ 'newQueryInterpretationConfig' smart constructor.+data QueryInterpretationConfig = QueryInterpretationConfig+  { -- | Set this flag to disable supplemental results retrieval, setting a flag here will not retrieve supplemental results for queries associated with a given search application. If this flag is set to True, it will take precedence over the option set at Query level. For the default value of False, query level flag will set the correct interpretation for supplemental results.+    forceDisableSupplementalResults :: (Core.Maybe Core.Bool),+    -- | Enable this flag to turn off all internal optimizations like natural language (NL) interpretation of queries, supplemental results retrieval, and usage of synonyms including custom ones. If this flag is set to True, it will take precedence over the option set at Query level. For the default value of False, query level flag will set the correct interpretation for verbatim mode.+    forceVerbatimMode :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'QueryInterpretationConfig' with the minimum fields required to make a request.+newQueryInterpretationConfig ::+  QueryInterpretationConfig+newQueryInterpretationConfig =+  QueryInterpretationConfig+    { forceDisableSupplementalResults =+        Core.Nothing,+      forceVerbatimMode = Core.Nothing+    }++instance Core.FromJSON QueryInterpretationConfig where+  parseJSON =+    Core.withObject+      "QueryInterpretationConfig"+      ( \o ->+          QueryInterpretationConfig+            Core.<$> (o Core..:? "forceDisableSupplementalResults")+            Core.<*> (o Core..:? "forceVerbatimMode")+      )++instance Core.ToJSON QueryInterpretationConfig where+  toJSON QueryInterpretationConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("forceDisableSupplementalResults" Core..=)+              Core.<$> forceDisableSupplementalResults,+            ("forceVerbatimMode" Core..=) Core.<$> forceVerbatimMode+          ]+      )++-- | Options to interpret user query.+--+-- /See:/ 'newQueryInterpretationOptions' smart constructor.+data QueryInterpretationOptions = QueryInterpretationOptions+  { -- | Flag to disable natural language (NL) interpretation of queries. Default is false, Set to true to disable natural language interpretation. NL interpretation only applies to predefined datasources.+    disableNlInterpretation :: (Core.Maybe Core.Bool),+    -- | Use this flag to disable supplemental results for a query. Supplemental results setting chosen at SearchApplication level will take precedence if set to True.+    disableSupplementalResults :: (Core.Maybe Core.Bool),+    -- | Enable this flag to turn off all internal optimizations like natural language (NL) interpretation of queries, supplemental result retrieval, and usage of synonyms including custom ones. Nl interpretation will be disabled if either one of the two flags is true.+    enableVerbatimMode :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'QueryInterpretationOptions' with the minimum fields required to make a request.+newQueryInterpretationOptions ::+  QueryInterpretationOptions+newQueryInterpretationOptions =+  QueryInterpretationOptions+    { disableNlInterpretation =+        Core.Nothing,+      disableSupplementalResults = Core.Nothing,+      enableVerbatimMode = Core.Nothing+    }++instance Core.FromJSON QueryInterpretationOptions where+  parseJSON =+    Core.withObject+      "QueryInterpretationOptions"+      ( \o ->+          QueryInterpretationOptions+            Core.<$> (o Core..:? "disableNlInterpretation")+            Core.<*> (o Core..:? "disableSupplementalResults")+            Core.<*> (o Core..:? "enableVerbatimMode")+      )++instance Core.ToJSON QueryInterpretationOptions where+  toJSON QueryInterpretationOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("disableNlInterpretation" Core..=)+              Core.<$> disableNlInterpretation,+            ("disableSupplementalResults" Core..=)+              Core.<$> disableSupplementalResults,+            ("enableVerbatimMode" Core..=) Core.<$> enableVerbatimMode+          ]+      )++-- | Information relevant only to a query entry.+--+-- /See:/ 'newQueryItem' smart constructor.+newtype QueryItem = QueryItem+  { -- | True if the text was generated by means other than a previous user search.+    isSynthetic :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'QueryItem' with the minimum fields required to make a request.+newQueryItem ::+  QueryItem+newQueryItem = QueryItem {isSynthetic = Core.Nothing}++instance Core.FromJSON QueryItem where+  parseJSON =+    Core.withObject+      "QueryItem"+      (\o -> QueryItem Core.<$> (o Core..:? "isSynthetic"))++instance Core.ToJSON QueryItem where+  toJSON QueryItem {..} =+    Core.object+      (Core.catMaybes [("isSynthetic" Core..=) Core.<$> isSynthetic])++-- | The definition of a operator that can be used in a Search\/Suggest request.+--+-- /See:/ 'newQueryOperator' smart constructor.+data QueryOperator = QueryOperator+  { -- | Display name of the operator+    displayName :: (Core.Maybe Core.Text),+    -- | Potential list of values for the opeatror field. This field is only filled when we can safely enumerate all the possible values of this operator.+    enumValues :: (Core.Maybe [Core.Text]),+    -- | Indicates the operator name that can be used to isolate the property using the greater-than operator.+    greaterThanOperatorName :: (Core.Maybe Core.Text),+    -- | Can this operator be used to get facets.+    isFacetable :: (Core.Maybe Core.Bool),+    -- | Indicates if multiple values can be set for this property.+    isRepeatable :: (Core.Maybe Core.Bool),+    -- | Will the property associated with this facet be returned as part of search results.+    isReturnable :: (Core.Maybe Core.Bool),+    -- | Can this operator be used to sort results.+    isSortable :: (Core.Maybe Core.Bool),+    -- | Can get suggestions for this field.+    isSuggestable :: (Core.Maybe Core.Bool),+    -- | Indicates the operator name that can be used to isolate the property using the less-than operator.+    lessThanOperatorName :: (Core.Maybe Core.Text),+    -- | The name of the object corresponding to the operator. This field is only filled for schema-specific operators, and is unset for common operators.+    objectType :: (Core.Maybe Core.Text),+    -- | The name of the operator.+    operatorName :: (Core.Maybe Core.Text),+    -- | The type of the operator.+    type' :: (Core.Maybe QueryOperator_Type)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'QueryOperator' with the minimum fields required to make a request.+newQueryOperator ::+  QueryOperator+newQueryOperator =+  QueryOperator+    { displayName = Core.Nothing,+      enumValues = Core.Nothing,+      greaterThanOperatorName = Core.Nothing,+      isFacetable = Core.Nothing,+      isRepeatable = Core.Nothing,+      isReturnable = Core.Nothing,+      isSortable = Core.Nothing,+      isSuggestable = Core.Nothing,+      lessThanOperatorName = Core.Nothing,+      objectType = Core.Nothing,+      operatorName = Core.Nothing,+      type' = Core.Nothing+    }++instance Core.FromJSON QueryOperator where+  parseJSON =+    Core.withObject+      "QueryOperator"+      ( \o ->+          QueryOperator+            Core.<$> (o Core..:? "displayName")+            Core.<*> (o Core..:? "enumValues")+            Core.<*> (o Core..:? "greaterThanOperatorName")+            Core.<*> (o Core..:? "isFacetable")+            Core.<*> (o Core..:? "isRepeatable")+            Core.<*> (o Core..:? "isReturnable")+            Core.<*> (o Core..:? "isSortable")+            Core.<*> (o Core..:? "isSuggestable")+            Core.<*> (o Core..:? "lessThanOperatorName")+            Core.<*> (o Core..:? "objectType")+            Core.<*> (o Core..:? "operatorName")+            Core.<*> (o Core..:? "type")+      )++instance Core.ToJSON QueryOperator where+  toJSON QueryOperator {..} =+    Core.object+      ( Core.catMaybes+          [ ("displayName" Core..=) Core.<$> displayName,+            ("enumValues" Core..=) Core.<$> enumValues,+            ("greaterThanOperatorName" Core..=)+              Core.<$> greaterThanOperatorName,+            ("isFacetable" Core..=) Core.<$> isFacetable,+            ("isRepeatable" Core..=) Core.<$> isRepeatable,+            ("isReturnable" Core..=) Core.<$> isReturnable,+            ("isSortable" Core..=) Core.<$> isSortable,+            ("isSuggestable" Core..=) Core.<$> isSuggestable,+            ("lessThanOperatorName" Core..=) Core.<$> lessThanOperatorName,+            ("objectType" Core..=) Core.<$> objectType,+            ("operatorName" Core..=) Core.<$> operatorName,+            ("type" Core..=) Core.<$> type'+          ]+      )++-- | List of sources that the user can search using the query API.+--+-- /See:/ 'newQuerySource' smart constructor.+data QuerySource = QuerySource+  { -- | Display name of the data source.+    displayName :: (Core.Maybe Core.Text),+    -- | List of all operators applicable for this source.+    operators :: (Core.Maybe [QueryOperator]),+    -- | A short name or alias for the source. This value can be used with the \'source\' operator.+    shortName :: (Core.Maybe Core.Text),+    -- | The name of the source+    source :: (Core.Maybe Source)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'QuerySource' with the minimum fields required to make a request.+newQuerySource ::+  QuerySource+newQuerySource =+  QuerySource+    { displayName = Core.Nothing,+      operators = Core.Nothing,+      shortName = Core.Nothing,+      source = Core.Nothing+    }++instance Core.FromJSON QuerySource where+  parseJSON =+    Core.withObject+      "QuerySource"+      ( \o ->+          QuerySource+            Core.<$> (o Core..:? "displayName")+            Core.<*> (o Core..:? "operators")+            Core.<*> (o Core..:? "shortName")+            Core.<*> (o Core..:? "source")+      )++instance Core.ToJSON QuerySource where+  toJSON QuerySource {..} =+    Core.object+      ( Core.catMaybes+          [ ("displayName" Core..=) Core.<$> displayName,+            ("operators" Core..=) Core.<$> operators,+            ("shortName" Core..=) Core.<$> shortName,+            ("source" Core..=) Core.<$> source+          ]+      )++-- | This field does not contain anything as of now and is just used as an indicator that the suggest result was a phrase completion.+--+-- /See:/ 'newQuerySuggestion' smart constructor.+data QuerySuggestion = QuerySuggestion+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'QuerySuggestion' with the minimum fields required to make a request.+newQuerySuggestion ::+  QuerySuggestion+newQuerySuggestion = QuerySuggestion++instance Core.FromJSON QuerySuggestion where+  parseJSON =+    Core.withObject+      "QuerySuggestion"+      (\o -> Core.pure QuerySuggestion)++instance Core.ToJSON QuerySuggestion where+  toJSON = Core.const Core.emptyObject++-- | Remove Logged Activity Request.+--+-- /See:/ 'newRemoveActivityRequest' smart constructor.+data RemoveActivityRequest = RemoveActivityRequest+  { -- | Request options, such as the search application and clientId.+    requestOptions :: (Core.Maybe RequestOptions),+    -- | User Activity containing the data to be deleted.+    userActivity :: (Core.Maybe UserActivity)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RemoveActivityRequest' with the minimum fields required to make a request.+newRemoveActivityRequest ::+  RemoveActivityRequest+newRemoveActivityRequest =+  RemoveActivityRequest+    { requestOptions = Core.Nothing,+      userActivity = Core.Nothing+    }++instance Core.FromJSON RemoveActivityRequest where+  parseJSON =+    Core.withObject+      "RemoveActivityRequest"+      ( \o ->+          RemoveActivityRequest+            Core.<$> (o Core..:? "requestOptions")+            Core.<*> (o Core..:? "userActivity")+      )++instance Core.ToJSON RemoveActivityRequest where+  toJSON RemoveActivityRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("requestOptions" Core..=) Core.<$> requestOptions,+            ("userActivity" Core..=) Core.<$> userActivity+          ]+      )++-- | Remove Logged Activity Response. will return an empty response for now. Will be revisited in later phases.+--+-- /See:/ 'newRemoveActivityResponse' smart constructor.+data RemoveActivityResponse = RemoveActivityResponse+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RemoveActivityResponse' with the minimum fields required to make a request.+newRemoveActivityResponse ::+  RemoveActivityResponse+newRemoveActivityResponse = RemoveActivityResponse++instance Core.FromJSON RemoveActivityResponse where+  parseJSON =+    Core.withObject+      "RemoveActivityResponse"+      (\o -> Core.pure RemoveActivityResponse)++instance Core.ToJSON RemoveActivityResponse where+  toJSON = Core.const Core.emptyObject++-- | Errors when the connector is communicating to the source repository.+--+-- /See:/ 'newRepositoryError' smart constructor.+data RepositoryError = RepositoryError+  { -- | Message that describes the error. The maximum allowable length of the message is 8192 characters.+    errorMessage :: (Core.Maybe Core.Text),+    -- | Error codes. Matches the definition of HTTP status codes.+    httpStatusCode :: (Core.Maybe Core.Int32),+    -- | The type of error.+    type' :: (Core.Maybe RepositoryError_Type)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RepositoryError' with the minimum fields required to make a request.+newRepositoryError ::+  RepositoryError+newRepositoryError =+  RepositoryError+    { errorMessage = Core.Nothing,+      httpStatusCode = Core.Nothing,+      type' = Core.Nothing+    }++instance Core.FromJSON RepositoryError where+  parseJSON =+    Core.withObject+      "RepositoryError"+      ( \o ->+          RepositoryError+            Core.<$> (o Core..:? "errorMessage")+            Core.<*> (o Core..:? "httpStatusCode")+            Core.<*> (o Core..:? "type")+      )++instance Core.ToJSON RepositoryError where+  toJSON RepositoryError {..} =+    Core.object+      ( Core.catMaybes+          [ ("errorMessage" Core..=) Core.<$> errorMessage,+            ("httpStatusCode" Core..=) Core.<$> httpStatusCode,+            ("type" Core..=) Core.<$> type'+          ]+      )++-- | Shared request options for all RPC methods.+--+-- /See:/ 'newRequestOptions' smart constructor.+data RequestOptions = RequestOptions+  { -- | Debug options of the request+    debugOptions :: (Core.Maybe DebugOptions),+    -- | The BCP-47 language code, such as \"en-US\" or \"sr-Latn\". For more information, see http:\/\/www.unicode.org\/reports\/tr35\/#Unicode/locale/identifier. For translations. Set this field using the language set in browser or for the page. In the event that the user\'s language preference is known, set this field to the known user language. When specified, the documents in search results are biased towards the specified language. The Suggest API uses this field as a hint to make better third-party autocomplete predictions.+    languageCode :: (Core.Maybe Core.Text),+    -- | The ID generated when you create a search application using the <https://support.google.com/a/answer/9043922 admin console>.+    searchApplicationId :: (Core.Maybe Core.Text),+    -- | Current user\'s time zone id, such as \"America\/Los_Angeles\" or \"Australia\/Sydney\". These IDs are defined by <http://cldr.unicode.org/ Unicode Common Locale Data Repository (CLDR)> project, and currently available in the file <http://unicode.org/repos/cldr/trunk/common/bcp47/timezone.xml timezone.xml>. This field is used to correctly interpret date and time queries. If this field is not specified, the default time zone (UTC) is used.+    timeZone :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RequestOptions' with the minimum fields required to make a request.+newRequestOptions ::+  RequestOptions+newRequestOptions =+  RequestOptions+    { debugOptions = Core.Nothing,+      languageCode = Core.Nothing,+      searchApplicationId = Core.Nothing,+      timeZone = Core.Nothing+    }++instance Core.FromJSON RequestOptions where+  parseJSON =+    Core.withObject+      "RequestOptions"+      ( \o ->+          RequestOptions+            Core.<$> (o Core..:? "debugOptions")+            Core.<*> (o Core..:? "languageCode")+            Core.<*> (o Core..:? "searchApplicationId")+            Core.<*> (o Core..:? "timeZone")+      )++instance Core.ToJSON RequestOptions where+  toJSON RequestOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("debugOptions" Core..=) Core.<$> debugOptions,+            ("languageCode" Core..=) Core.<$> languageCode,+            ("searchApplicationId" Core..=) Core.<$> searchApplicationId,+            ("timeZone" Core..=) Core.<$> timeZone+          ]+      )++--+-- /See:/ 'newResetSearchApplicationRequest' smart constructor.+newtype ResetSearchApplicationRequest = ResetSearchApplicationRequest+  { -- | Common debug options.+    debugOptions :: (Core.Maybe DebugOptions)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResetSearchApplicationRequest' with the minimum fields required to make a request.+newResetSearchApplicationRequest ::+  ResetSearchApplicationRequest+newResetSearchApplicationRequest =+  ResetSearchApplicationRequest {debugOptions = Core.Nothing}++instance Core.FromJSON ResetSearchApplicationRequest where+  parseJSON =+    Core.withObject+      "ResetSearchApplicationRequest"+      ( \o ->+          ResetSearchApplicationRequest Core.<$> (o Core..:? "debugOptions")+      )++instance Core.ToJSON ResetSearchApplicationRequest where+  toJSON ResetSearchApplicationRequest {..} =+    Core.object+      (Core.catMaybes [("debugOptions" Core..=) Core.<$> debugOptions])++-- | Debugging information about the response.+--+-- /See:/ 'newResponseDebugInfo' smart constructor.+newtype ResponseDebugInfo = ResponseDebugInfo+  { -- | General debug info formatted for display.+    formattedDebugInfo :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResponseDebugInfo' with the minimum fields required to make a request.+newResponseDebugInfo ::+  ResponseDebugInfo+newResponseDebugInfo =+  ResponseDebugInfo {formattedDebugInfo = Core.Nothing}++instance Core.FromJSON ResponseDebugInfo where+  parseJSON =+    Core.withObject+      "ResponseDebugInfo"+      ( \o ->+          ResponseDebugInfo Core.<$> (o Core..:? "formattedDebugInfo")+      )++instance Core.ToJSON ResponseDebugInfo where+  toJSON ResponseDebugInfo {..} =+    Core.object+      ( Core.catMaybes+          [("formattedDebugInfo" Core..=) Core.<$> formattedDebugInfo]+      )++-- | Information relevant only to a restrict entry. NextId: 12+--+-- /See:/ 'newRestrictItem' smart constructor.+data RestrictItem = RestrictItem+  { driveFollowUpRestrict :: (Core.Maybe DriveFollowUpRestrict),+    driveLocationRestrict :: (Core.Maybe DriveLocationRestrict),+    -- | Drive Types.+    driveMimeTypeRestrict :: (Core.Maybe DriveMimeTypeRestrict),+    driveTimeSpanRestrict :: (Core.Maybe DriveTimeSpanRestrict),+    -- | The search restrict (e.g. \"after:2017-09-11 before:2017-09-12\").+    searchOperator :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RestrictItem' with the minimum fields required to make a request.+newRestrictItem ::+  RestrictItem+newRestrictItem =+  RestrictItem+    { driveFollowUpRestrict = Core.Nothing,+      driveLocationRestrict = Core.Nothing,+      driveMimeTypeRestrict = Core.Nothing,+      driveTimeSpanRestrict = Core.Nothing,+      searchOperator = Core.Nothing+    }++instance Core.FromJSON RestrictItem where+  parseJSON =+    Core.withObject+      "RestrictItem"+      ( \o ->+          RestrictItem+            Core.<$> (o Core..:? "driveFollowUpRestrict")+            Core.<*> (o Core..:? "driveLocationRestrict")+            Core.<*> (o Core..:? "driveMimeTypeRestrict")+            Core.<*> (o Core..:? "driveTimeSpanRestrict")+            Core.<*> (o Core..:? "searchOperator")+      )++instance Core.ToJSON RestrictItem where+  toJSON RestrictItem {..} =+    Core.object+      ( Core.catMaybes+          [ ("driveFollowUpRestrict" Core..=) Core.<$> driveFollowUpRestrict,+            ("driveLocationRestrict" Core..=) Core.<$> driveLocationRestrict,+            ("driveMimeTypeRestrict" Core..=) Core.<$> driveMimeTypeRestrict,+            ("driveTimeSpanRestrict" Core..=) Core.<$> driveTimeSpanRestrict,+            ("searchOperator" Core..=) Core.<$> searchOperator+          ]+      )++-- | Result count information+--+-- /See:/ 'newResultCounts' smart constructor.+newtype ResultCounts = ResultCounts+  { -- | Result count information for each source with results.+    sourceResultCounts :: (Core.Maybe [SourceResultCount])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResultCounts' with the minimum fields required to make a request.+newResultCounts ::+  ResultCounts+newResultCounts = ResultCounts {sourceResultCounts = Core.Nothing}++instance Core.FromJSON ResultCounts where+  parseJSON =+    Core.withObject+      "ResultCounts"+      (\o -> ResultCounts Core.<$> (o Core..:? "sourceResultCounts"))++instance Core.ToJSON ResultCounts where+  toJSON ResultCounts {..} =+    Core.object+      ( Core.catMaybes+          [("sourceResultCounts" Core..=) Core.<$> sourceResultCounts]+      )++-- | Debugging information about the result.+--+-- /See:/ 'newResultDebugInfo' smart constructor.+newtype ResultDebugInfo = ResultDebugInfo+  { -- | General debug info formatted for display.+    formattedDebugInfo :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResultDebugInfo' with the minimum fields required to make a request.+newResultDebugInfo ::+  ResultDebugInfo+newResultDebugInfo =+  ResultDebugInfo {formattedDebugInfo = Core.Nothing}++instance Core.FromJSON ResultDebugInfo where+  parseJSON =+    Core.withObject+      "ResultDebugInfo"+      (\o -> ResultDebugInfo Core.<$> (o Core..:? "formattedDebugInfo"))++instance Core.ToJSON ResultDebugInfo where+  toJSON ResultDebugInfo {..} =+    Core.object+      ( Core.catMaybes+          [("formattedDebugInfo" Core..=) Core.<$> formattedDebugInfo]+      )++-- | Display Fields for Search Results+--+-- /See:/ 'newResultDisplayField' smart constructor.+data ResultDisplayField = ResultDisplayField+  { -- | The display label for the property.+    label :: (Core.Maybe Core.Text),+    -- | The operator name of the property.+    operatorName :: (Core.Maybe Core.Text),+    -- | The name value pair for the property.+    property :: (Core.Maybe NamedProperty)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResultDisplayField' with the minimum fields required to make a request.+newResultDisplayField ::+  ResultDisplayField+newResultDisplayField =+  ResultDisplayField+    { label = Core.Nothing,+      operatorName = Core.Nothing,+      property = Core.Nothing+    }++instance Core.FromJSON ResultDisplayField where+  parseJSON =+    Core.withObject+      "ResultDisplayField"+      ( \o ->+          ResultDisplayField+            Core.<$> (o Core..:? "label")+            Core.<*> (o Core..:? "operatorName")+            Core.<*> (o Core..:? "property")+      )++instance Core.ToJSON ResultDisplayField where+  toJSON ResultDisplayField {..} =+    Core.object+      ( Core.catMaybes+          [ ("label" Core..=) Core.<$> label,+            ("operatorName" Core..=) Core.<$> operatorName,+            ("property" Core..=) Core.<$> property+          ]+      )++-- | The collection of fields that make up a displayed line+--+-- /See:/ 'newResultDisplayLine' smart constructor.+newtype ResultDisplayLine = ResultDisplayLine+  { fields :: (Core.Maybe [ResultDisplayField])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResultDisplayLine' with the minimum fields required to make a request.+newResultDisplayLine ::+  ResultDisplayLine+newResultDisplayLine = ResultDisplayLine {fields = Core.Nothing}++instance Core.FromJSON ResultDisplayLine where+  parseJSON =+    Core.withObject+      "ResultDisplayLine"+      (\o -> ResultDisplayLine Core.<$> (o Core..:? "fields"))++instance Core.ToJSON ResultDisplayLine where+  toJSON ResultDisplayLine {..} =+    Core.object (Core.catMaybes [("fields" Core..=) Core.<$> fields])++--+-- /See:/ 'newResultDisplayMetadata' smart constructor.+data ResultDisplayMetadata = ResultDisplayMetadata+  { -- | The metalines content to be displayed with the result.+    metalines :: (Core.Maybe [ResultDisplayLine]),+    -- | The display label for the object.+    objectTypeLabel :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ResultDisplayMetadata' with the minimum fields required to make a request.+newResultDisplayMetadata ::+  ResultDisplayMetadata+newResultDisplayMetadata =+  ResultDisplayMetadata+    { metalines = Core.Nothing,+      objectTypeLabel = Core.Nothing+    }++instance Core.FromJSON ResultDisplayMetadata where+  parseJSON =+    Core.withObject+      "ResultDisplayMetadata"+      ( \o ->+          ResultDisplayMetadata+            Core.<$> (o Core..:? "metalines")+            Core.<*> (o Core..:? "objectTypeLabel")+      )++instance Core.ToJSON ResultDisplayMetadata where+  toJSON ResultDisplayMetadata {..} =+    Core.object+      ( Core.catMaybes+          [ ("metalines" Core..=) Core.<$> metalines,+            ("objectTypeLabel" Core..=) Core.<$> objectTypeLabel+          ]+      )++--+-- /See:/ 'newRetrievalImportance' smart constructor.+newtype RetrievalImportance = RetrievalImportance+  { -- | Indicates the ranking importance given to property when it is matched during retrieval. Once set, the token importance of a property cannot be changed.+    importance :: (Core.Maybe RetrievalImportance_Importance)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'RetrievalImportance' with the minimum fields required to make a request.+newRetrievalImportance ::+  RetrievalImportance+newRetrievalImportance =+  RetrievalImportance {importance = Core.Nothing}++instance Core.FromJSON RetrievalImportance where+  parseJSON =+    Core.withObject+      "RetrievalImportance"+      (\o -> RetrievalImportance Core.<$> (o Core..:? "importance"))++instance Core.ToJSON RetrievalImportance where+  toJSON RetrievalImportance {..} =+    Core.object+      (Core.catMaybes [("importance" Core..=) Core.<$> importance])++-- | IMPORTANT: It is unsafe to accept this message from an untrusted source, since it\'s trivial for an attacker to forge serialized messages that don\'t fulfill the type\'s safety contract -- for example, it could contain attacker controlled script. A system which receives a SafeHtmlProto implicitly trusts the producer of the SafeHtmlProto. So, it\'s generally safe to return this message in RPC responses, but generally unsafe to accept it in RPC requests.+--+-- /See:/ 'newSafeHtmlProto' smart constructor.+newtype SafeHtmlProto = SafeHtmlProto+  { -- | IMPORTANT: Never set or read this field, even from tests, it is private. See documentation at the top of .proto file for programming language packages with which to create or read this message.+    privateDoNotAccessOrElseSafeHtmlWrappedValue :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SafeHtmlProto' with the minimum fields required to make a request.+newSafeHtmlProto ::+  SafeHtmlProto+newSafeHtmlProto =+  SafeHtmlProto+    { privateDoNotAccessOrElseSafeHtmlWrappedValue =+        Core.Nothing+    }++instance Core.FromJSON SafeHtmlProto where+  parseJSON =+    Core.withObject+      "SafeHtmlProto"+      ( \o ->+          SafeHtmlProto+            Core.<$> (o Core..:? "privateDoNotAccessOrElseSafeHtmlWrappedValue")+      )++instance Core.ToJSON SafeHtmlProto where+  toJSON SafeHtmlProto {..} =+    Core.object+      ( Core.catMaybes+          [ ("privateDoNotAccessOrElseSafeHtmlWrappedValue" Core..=)+              Core.<$> privateDoNotAccessOrElseSafeHtmlWrappedValue+          ]+      )++-- | Message containing a string that is safe to use in URL contexts in DOM APIs and HTML documents, where the URL context does not refer to a resource that loads code.+--+-- /See:/ 'newSafeUrlProto' smart constructor.+newtype SafeUrlProto = SafeUrlProto+  { -- | IMPORTANT: Never set or read this field, even from tests, it is private. See documentation at the top of .proto file for programming language packages with which to create or read this message.+    privateDoNotAccessOrElseSafeUrlWrappedValue :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SafeUrlProto' with the minimum fields required to make a request.+newSafeUrlProto ::+  SafeUrlProto+newSafeUrlProto =+  SafeUrlProto+    { privateDoNotAccessOrElseSafeUrlWrappedValue =+        Core.Nothing+    }++instance Core.FromJSON SafeUrlProto where+  parseJSON =+    Core.withObject+      "SafeUrlProto"+      ( \o ->+          SafeUrlProto+            Core.<$> (o Core..:? "privateDoNotAccessOrElseSafeUrlWrappedValue")+      )++instance Core.ToJSON SafeUrlProto where+  toJSON SafeUrlProto {..} =+    Core.object+      ( Core.catMaybes+          [ ("privateDoNotAccessOrElseSafeUrlWrappedValue" Core..=)+              Core.<$> privateDoNotAccessOrElseSafeUrlWrappedValue+          ]+      )++-- | The schema definition for a data source.+--+-- /See:/ 'newSchema' smart constructor.+data Schema = Schema+  { -- | The list of top-level objects for the data source. The maximum number of elements is 10.+    objectDefinitions :: (Core.Maybe [ObjectDefinition]),+    -- | IDs of the Long Running Operations (LROs) currently running for this schema. After modifying the schema, wait for operations to complete before indexing additional content.+    operationIds :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Schema' with the minimum fields required to make a request.+newSchema ::+  Schema+newSchema =+  Schema+    { objectDefinitions = Core.Nothing,+      operationIds = Core.Nothing+    }++instance Core.FromJSON Schema where+  parseJSON =+    Core.withObject+      "Schema"+      ( \o ->+          Schema+            Core.<$> (o Core..:? "objectDefinitions")+            Core.<*> (o Core..:? "operationIds")+      )++instance Core.ToJSON Schema where+  toJSON Schema {..} =+    Core.object+      ( Core.catMaybes+          [ ("objectDefinitions" Core..=) Core.<$> objectDefinitions,+            ("operationIds" Core..=) Core.<$> operationIds+          ]+      )++-- | Scoring configurations for a source while processing a Search or Suggest request.+--+-- /See:/ 'newScoringConfig' smart constructor.+data ScoringConfig = ScoringConfig+  { -- | Whether to use freshness as a ranking signal. By default, freshness is used as a ranking signal. Note that this setting is not available in the Admin UI.+    disableFreshness :: (Core.Maybe Core.Bool),+    -- | Whether to personalize the results. By default, personal signals will be used to boost results.+    disablePersonalization :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ScoringConfig' with the minimum fields required to make a request.+newScoringConfig ::+  ScoringConfig+newScoringConfig =+  ScoringConfig+    { disableFreshness = Core.Nothing,+      disablePersonalization = Core.Nothing+    }++instance Core.FromJSON ScoringConfig where+  parseJSON =+    Core.withObject+      "ScoringConfig"+      ( \o ->+          ScoringConfig+            Core.<$> (o Core..:? "disableFreshness")+            Core.<*> (o Core..:? "disablePersonalization")+      )++instance Core.ToJSON ScoringConfig where+  toJSON ScoringConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("disableFreshness" Core..=) Core.<$> disableFreshness,+            ("disablePersonalization" Core..=)+              Core.<$> disablePersonalization+          ]+      )++-- | SearchApplication+--+-- /See:/ 'newSearchApplication' smart constructor.+data SearchApplication = SearchApplication+  { -- | Retrictions applied to the configurations. The maximum number of elements is 10.+    dataSourceRestrictions :: (Core.Maybe [DataSourceRestriction]),+    -- | The default fields for returning facet results. The sources specified here also have been included in data/source/restrictions above.+    defaultFacetOptions :: (Core.Maybe [FacetOptions]),+    -- | The default options for sorting the search results+    defaultSortOptions :: (Core.Maybe SortOptions),+    -- | Display name of the Search Application. The maximum length is 300 characters.+    displayName :: (Core.Maybe Core.Text),+    -- | Indicates whether audit logging is on\/off for requests made for the search application in query APIs.+    enableAuditLog :: (Core.Maybe Core.Bool),+    -- | The name of the Search Application. Format: searchapplications\/{application_id}.+    name :: (Core.Maybe Core.Text),+    -- | Output only. IDs of the Long Running Operations (LROs) currently running for this schema. Output only field.+    operationIds :: (Core.Maybe [Core.Text]),+    -- | The default options for query interpretation+    queryInterpretationConfig :: (Core.Maybe QueryInterpretationConfig),+    -- | With each result we should return the URI for its thumbnail (when applicable)+    returnResultThumbnailUrls :: (Core.Maybe Core.Bool),+    -- | Configuration for ranking results.+    scoringConfig :: (Core.Maybe ScoringConfig),+    -- | Configuration for a sources specified in data/source/restrictions.+    sourceConfig :: (Core.Maybe [SourceConfig])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SearchApplication' with the minimum fields required to make a request.+newSearchApplication ::+  SearchApplication+newSearchApplication =+  SearchApplication+    { dataSourceRestrictions = Core.Nothing,+      defaultFacetOptions = Core.Nothing,+      defaultSortOptions = Core.Nothing,+      displayName = Core.Nothing,+      enableAuditLog = Core.Nothing,+      name = Core.Nothing,+      operationIds = Core.Nothing,+      queryInterpretationConfig = Core.Nothing,+      returnResultThumbnailUrls = Core.Nothing,+      scoringConfig = Core.Nothing,+      sourceConfig = Core.Nothing+    }++instance Core.FromJSON SearchApplication where+  parseJSON =+    Core.withObject+      "SearchApplication"+      ( \o ->+          SearchApplication+            Core.<$> (o Core..:? "dataSourceRestrictions")+            Core.<*> (o Core..:? "defaultFacetOptions")+            Core.<*> (o Core..:? "defaultSortOptions")+            Core.<*> (o Core..:? "displayName")+            Core.<*> (o Core..:? "enableAuditLog")+            Core.<*> (o Core..:? "name")+            Core.<*> (o Core..:? "operationIds")+            Core.<*> (o Core..:? "queryInterpretationConfig")+            Core.<*> (o Core..:? "returnResultThumbnailUrls")+            Core.<*> (o Core..:? "scoringConfig")+            Core.<*> (o Core..:? "sourceConfig")+      )++instance Core.ToJSON SearchApplication where+  toJSON SearchApplication {..} =+    Core.object+      ( Core.catMaybes+          [ ("dataSourceRestrictions" Core..=)+              Core.<$> dataSourceRestrictions,+            ("defaultFacetOptions" Core..=) Core.<$> defaultFacetOptions,+            ("defaultSortOptions" Core..=) Core.<$> defaultSortOptions,+            ("displayName" Core..=) Core.<$> displayName,+            ("enableAuditLog" Core..=) Core.<$> enableAuditLog,+            ("name" Core..=) Core.<$> name,+            ("operationIds" Core..=) Core.<$> operationIds,+            ("queryInterpretationConfig" Core..=)+              Core.<$> queryInterpretationConfig,+            ("returnResultThumbnailUrls" Core..=)+              Core.<$> returnResultThumbnailUrls,+            ("scoringConfig" Core..=) Core.<$> scoringConfig,+            ("sourceConfig" Core..=) Core.<$> sourceConfig+          ]+      )++-- | Search application level query stats per date+--+-- /See:/ 'newSearchApplicationQueryStats' smart constructor.+data SearchApplicationQueryStats = SearchApplicationQueryStats+  { -- | The date for which query stats were calculated. Stats calculated on the next day close to midnight are returned.+    date :: (Core.Maybe Date),+    queryCountByStatus :: (Core.Maybe [QueryCountByStatus])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SearchApplicationQueryStats' with the minimum fields required to make a request.+newSearchApplicationQueryStats ::+  SearchApplicationQueryStats+newSearchApplicationQueryStats =+  SearchApplicationQueryStats+    { date = Core.Nothing,+      queryCountByStatus = Core.Nothing+    }++instance Core.FromJSON SearchApplicationQueryStats where+  parseJSON =+    Core.withObject+      "SearchApplicationQueryStats"+      ( \o ->+          SearchApplicationQueryStats+            Core.<$> (o Core..:? "date")+            Core.<*> (o Core..:? "queryCountByStatus")+      )++instance Core.ToJSON SearchApplicationQueryStats where+  toJSON SearchApplicationQueryStats {..} =+    Core.object+      ( Core.catMaybes+          [ ("date" Core..=) Core.<$> date,+            ("queryCountByStatus" Core..=) Core.<$> queryCountByStatus+          ]+      )++--+-- /See:/ 'newSearchApplicationSessionStats' smart constructor.+data SearchApplicationSessionStats = SearchApplicationSessionStats+  { -- | The date for which session stats were calculated. Stats are calculated on the following day, close to midnight PST, and then returned.+    date :: (Core.Maybe Date),+    -- | The count of search sessions on the day+    searchSessionsCount :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SearchApplicationSessionStats' with the minimum fields required to make a request.+newSearchApplicationSessionStats ::+  SearchApplicationSessionStats+newSearchApplicationSessionStats =+  SearchApplicationSessionStats+    { date = Core.Nothing,+      searchSessionsCount = Core.Nothing+    }++instance Core.FromJSON SearchApplicationSessionStats where+  parseJSON =+    Core.withObject+      "SearchApplicationSessionStats"+      ( \o ->+          SearchApplicationSessionStats+            Core.<$> (o Core..:? "date")+            Core.<*> ( o+                         Core..:? "searchSessionsCount"+                         Core.<&> Core.fmap Core.fromAsText+                     )+      )++instance Core.ToJSON SearchApplicationSessionStats where+  toJSON SearchApplicationSessionStats {..} =+    Core.object+      ( Core.catMaybes+          [ ("date" Core..=) Core.<$> date,+            ("searchSessionsCount" Core..=)+              Core.. Core.AsText+              Core.<$> searchSessionsCount+          ]+      )++--+-- /See:/ 'newSearchApplicationUserStats' smart constructor.+data SearchApplicationUserStats = SearchApplicationUserStats+  { -- | The date for which session stats were calculated. Stats calculated on the next day close to midnight are returned.+    date :: (Core.Maybe Date),+    -- | The count of unique active users in the past one day+    oneDayActiveUsersCount :: (Core.Maybe Core.Int64),+    -- | The count of unique active users in the past seven days+    sevenDaysActiveUsersCount :: (Core.Maybe Core.Int64),+    -- | The count of unique active users in the past thirty days+    thirtyDaysActiveUsersCount :: (Core.Maybe Core.Int64)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SearchApplicationUserStats' with the minimum fields required to make a request.+newSearchApplicationUserStats ::+  SearchApplicationUserStats+newSearchApplicationUserStats =+  SearchApplicationUserStats+    { date = Core.Nothing,+      oneDayActiveUsersCount = Core.Nothing,+      sevenDaysActiveUsersCount = Core.Nothing,+      thirtyDaysActiveUsersCount = Core.Nothing+    }++instance Core.FromJSON SearchApplicationUserStats where+  parseJSON =+    Core.withObject+      "SearchApplicationUserStats"+      ( \o ->+          SearchApplicationUserStats+            Core.<$> (o Core..:? "date")+            Core.<*> ( o+                         Core..:? "oneDayActiveUsersCount"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> ( o+                         Core..:? "sevenDaysActiveUsersCount"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> ( o+                         Core..:? "thirtyDaysActiveUsersCount"+                         Core.<&> Core.fmap Core.fromAsText+                     )+      )++instance Core.ToJSON SearchApplicationUserStats where+  toJSON SearchApplicationUserStats {..} =+    Core.object+      ( Core.catMaybes+          [ ("date" Core..=) Core.<$> date,+            ("oneDayActiveUsersCount" Core..=)+              Core.. Core.AsText+              Core.<$> oneDayActiveUsersCount,+            ("sevenDaysActiveUsersCount" Core..=)+              Core.. Core.AsText+              Core.<$> sevenDaysActiveUsersCount,+            ("thirtyDaysActiveUsersCount" Core..=)+              Core.. Core.AsText+              Core.<$> thirtyDaysActiveUsersCount+          ]+      )++--+-- /See:/ 'newSearchItemsByViewUrlRequest' smart constructor.+data SearchItemsByViewUrlRequest = SearchItemsByViewUrlRequest+  { -- | Common debug options.+    debugOptions :: (Core.Maybe DebugOptions),+    -- | The next/page/token value returned from a previous request, if any.+    pageToken :: (Core.Maybe Core.Text),+    -- | Specify the full view URL to find the corresponding item. The maximum length is 2048 characters.+    viewUrl :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SearchItemsByViewUrlRequest' with the minimum fields required to make a request.+newSearchItemsByViewUrlRequest ::+  SearchItemsByViewUrlRequest+newSearchItemsByViewUrlRequest =+  SearchItemsByViewUrlRequest+    { debugOptions = Core.Nothing,+      pageToken = Core.Nothing,+      viewUrl = Core.Nothing+    }++instance Core.FromJSON SearchItemsByViewUrlRequest where+  parseJSON =+    Core.withObject+      "SearchItemsByViewUrlRequest"+      ( \o ->+          SearchItemsByViewUrlRequest+            Core.<$> (o Core..:? "debugOptions")+            Core.<*> (o Core..:? "pageToken")+            Core.<*> (o Core..:? "viewUrl")+      )++instance Core.ToJSON SearchItemsByViewUrlRequest where+  toJSON SearchItemsByViewUrlRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("debugOptions" Core..=) Core.<$> debugOptions,+            ("pageToken" Core..=) Core.<$> pageToken,+            ("viewUrl" Core..=) Core.<$> viewUrl+          ]+      )++--+-- /See:/ 'newSearchItemsByViewUrlResponse' smart constructor.+data SearchItemsByViewUrlResponse = SearchItemsByViewUrlResponse+  { items :: (Core.Maybe [Item]),+    -- | Token to retrieve the next page of results, or empty if there are no more results in the list.+    nextPageToken :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SearchItemsByViewUrlResponse' with the minimum fields required to make a request.+newSearchItemsByViewUrlResponse ::+  SearchItemsByViewUrlResponse+newSearchItemsByViewUrlResponse =+  SearchItemsByViewUrlResponse+    { items = Core.Nothing,+      nextPageToken = Core.Nothing+    }++instance Core.FromJSON SearchItemsByViewUrlResponse where+  parseJSON =+    Core.withObject+      "SearchItemsByViewUrlResponse"+      ( \o ->+          SearchItemsByViewUrlResponse+            Core.<$> (o Core..:? "items")+            Core.<*> (o Core..:? "nextPageToken")+      )++instance Core.ToJSON SearchItemsByViewUrlResponse where+  toJSON SearchItemsByViewUrlResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("items" Core..=) Core.<$> items,+            ("nextPageToken" Core..=) Core.<$> nextPageToken+          ]+      )++-- | Additional search quality metadata of the item.+--+-- /See:/ 'newSearchQualityMetadata' smart constructor.+newtype SearchQualityMetadata = SearchQualityMetadata+  { -- | An indication of the quality of the item, used to influence search quality. Value should be between 0.0 (lowest quality) and 1.0 (highest quality). The default value is 0.0.+    quality :: (Core.Maybe Core.Double)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SearchQualityMetadata' with the minimum fields required to make a request.+newSearchQualityMetadata ::+  SearchQualityMetadata+newSearchQualityMetadata =+  SearchQualityMetadata {quality = Core.Nothing}++instance Core.FromJSON SearchQualityMetadata where+  parseJSON =+    Core.withObject+      "SearchQualityMetadata"+      (\o -> SearchQualityMetadata Core.<$> (o Core..:? "quality"))++instance Core.ToJSON SearchQualityMetadata where+  toJSON SearchQualityMetadata {..} =+    Core.object+      (Core.catMaybes [("quality" Core..=) Core.<$> quality])++-- | The search API request. NEXT ID: 17+--+-- /See:/ 'newSearchRequest' smart constructor.+data SearchRequest = SearchRequest+  { -- | Context attributes for the request which will be used to adjust ranking of search results. The maximum number of elements is 10.+    contextAttributes :: (Core.Maybe [ContextAttribute]),+    -- | The sources to use for querying. If not specified, all data sources from the current search application are used.+    dataSourceRestrictions :: (Core.Maybe [DataSourceRestriction]),+    facetOptions :: (Core.Maybe [FacetOptions]),+    -- | Maximum number of search results to return in one page. Valid values are between 1 and 100, inclusive. Default value is 10. Minimum value is 50 when results beyond 2000 are requested.+    pageSize :: (Core.Maybe Core.Int32),+    -- | The raw query string. See supported search operators in the <https://support.google.com/cloudsearch/answer/6172299 Narrow your search with operators>+    query :: (Core.Maybe Core.Text),+    -- | Options to interpret the user query.+    queryInterpretationOptions :: (Core.Maybe QueryInterpretationOptions),+    -- | Request options, such as the search application and user timezone.+    requestOptions :: (Core.Maybe RequestOptions),+    -- | The options for sorting the search results+    sortOptions :: (Core.Maybe SortOptions),+    -- | Starting index of the results.+    start :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SearchRequest' with the minimum fields required to make a request.+newSearchRequest ::+  SearchRequest+newSearchRequest =+  SearchRequest+    { contextAttributes = Core.Nothing,+      dataSourceRestrictions = Core.Nothing,+      facetOptions = Core.Nothing,+      pageSize = Core.Nothing,+      query = Core.Nothing,+      queryInterpretationOptions = Core.Nothing,+      requestOptions = Core.Nothing,+      sortOptions = Core.Nothing,+      start = Core.Nothing+    }++instance Core.FromJSON SearchRequest where+  parseJSON =+    Core.withObject+      "SearchRequest"+      ( \o ->+          SearchRequest+            Core.<$> (o Core..:? "contextAttributes")+            Core.<*> (o Core..:? "dataSourceRestrictions")+            Core.<*> (o Core..:? "facetOptions")+            Core.<*> (o Core..:? "pageSize")+            Core.<*> (o Core..:? "query")+            Core.<*> (o Core..:? "queryInterpretationOptions")+            Core.<*> (o Core..:? "requestOptions")+            Core.<*> (o Core..:? "sortOptions")+            Core.<*> (o Core..:? "start")+      )++instance Core.ToJSON SearchRequest where+  toJSON SearchRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("contextAttributes" Core..=) Core.<$> contextAttributes,+            ("dataSourceRestrictions" Core..=) Core.<$> dataSourceRestrictions,+            ("facetOptions" Core..=) Core.<$> facetOptions,+            ("pageSize" Core..=) Core.<$> pageSize,+            ("query" Core..=) Core.<$> query,+            ("queryInterpretationOptions" Core..=)+              Core.<$> queryInterpretationOptions,+            ("requestOptions" Core..=) Core.<$> requestOptions,+            ("sortOptions" Core..=) Core.<$> sortOptions,+            ("start" Core..=) Core.<$> start+          ]+      )++-- | The search API response. NEXT ID: 17+--+-- /See:/ 'newSearchResponse' smart constructor.+data SearchResponse = SearchResponse+  { -- | Debugging information about the response.+    debugInfo :: (Core.Maybe ResponseDebugInfo),+    -- | Error information about the response.+    errorInfo :: (Core.Maybe ErrorInfo),+    -- | Repeated facet results.+    facetResults :: (Core.Maybe [FacetResult]),+    -- | Whether there are more search results matching the query.+    hasMoreResults :: (Core.Maybe Core.Bool),+    -- | Query interpretation result for user query. Empty if query interpretation is disabled.+    queryInterpretation :: (Core.Maybe QueryInterpretation),+    -- | The estimated result count for this query.+    resultCountEstimate :: (Core.Maybe Core.Int64),+    -- | The exact result count for this query.+    resultCountExact :: (Core.Maybe Core.Int64),+    -- | Expanded result count information.+    resultCounts :: (Core.Maybe ResultCounts),+    -- | Results from a search query.+    results :: (Core.Maybe [SearchResult]),+    -- | Suggested spelling for the query.+    spellResults :: (Core.Maybe [SpellResult]),+    -- | Structured results for the user query. These results are not counted against the page_size.+    structuredResults :: (Core.Maybe [StructuredResult])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SearchResponse' with the minimum fields required to make a request.+newSearchResponse ::+  SearchResponse+newSearchResponse =+  SearchResponse+    { debugInfo = Core.Nothing,+      errorInfo = Core.Nothing,+      facetResults = Core.Nothing,+      hasMoreResults = Core.Nothing,+      queryInterpretation = Core.Nothing,+      resultCountEstimate = Core.Nothing,+      resultCountExact = Core.Nothing,+      resultCounts = Core.Nothing,+      results = Core.Nothing,+      spellResults = Core.Nothing,+      structuredResults = Core.Nothing+    }++instance Core.FromJSON SearchResponse where+  parseJSON =+    Core.withObject+      "SearchResponse"+      ( \o ->+          SearchResponse+            Core.<$> (o Core..:? "debugInfo")+            Core.<*> (o Core..:? "errorInfo")+            Core.<*> (o Core..:? "facetResults")+            Core.<*> (o Core..:? "hasMoreResults")+            Core.<*> (o Core..:? "queryInterpretation")+            Core.<*> ( o+                         Core..:? "resultCountEstimate"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "resultCountExact" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "resultCounts")+            Core.<*> (o Core..:? "results")+            Core.<*> (o Core..:? "spellResults")+            Core.<*> (o Core..:? "structuredResults")+      )++instance Core.ToJSON SearchResponse where+  toJSON SearchResponse {..} =+    Core.object+      ( Core.catMaybes+          [ ("debugInfo" Core..=) Core.<$> debugInfo,+            ("errorInfo" Core..=) Core.<$> errorInfo,+            ("facetResults" Core..=) Core.<$> facetResults,+            ("hasMoreResults" Core..=) Core.<$> hasMoreResults,+            ("queryInterpretation" Core..=) Core.<$> queryInterpretation,+            ("resultCountEstimate" Core..=)+              Core.. Core.AsText+              Core.<$> resultCountEstimate,+            ("resultCountExact" Core..=)+              Core.. Core.AsText+              Core.<$> resultCountExact,+            ("resultCounts" Core..=) Core.<$> resultCounts,+            ("results" Core..=) Core.<$> results,+            ("spellResults" Core..=) Core.<$> spellResults,+            ("structuredResults" Core..=) Core.<$> structuredResults+          ]+      )++-- | Results containing indexed information for a document.+--+-- /See:/ 'newSearchResult' smart constructor.+data SearchResult = SearchResult+  { -- | If source is clustered, provide list of clustered results. There will only be one level of clustered results. If current source is not enabled for clustering, this field will be empty.+    clusteredResults :: (Core.Maybe [SearchResult]),+    -- | Debugging information about this search result.+    debugInfo :: (Core.Maybe ResultDebugInfo),+    -- | Metadata of the search result.+    metadata :: (Core.Maybe Metadata),+    -- | The concatenation of all snippets (summaries) available for this result.+    snippet :: (Core.Maybe Snippet),+    -- | Title of the search result.+    title :: (Core.Maybe Core.Text),+    -- | The URL of the search result. The URL contains a Google redirect to the actual item. This URL is signed and shouldn\'t be changed.+    url :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SearchResult' with the minimum fields required to make a request.+newSearchResult ::+  SearchResult+newSearchResult =+  SearchResult+    { clusteredResults = Core.Nothing,+      debugInfo = Core.Nothing,+      metadata = Core.Nothing,+      snippet = Core.Nothing,+      title = Core.Nothing,+      url = Core.Nothing+    }++instance Core.FromJSON SearchResult where+  parseJSON =+    Core.withObject+      "SearchResult"+      ( \o ->+          SearchResult+            Core.<$> (o Core..:? "clusteredResults")+            Core.<*> (o Core..:? "debugInfo")+            Core.<*> (o Core..:? "metadata")+            Core.<*> (o Core..:? "snippet")+            Core.<*> (o Core..:? "title")+            Core.<*> (o Core..:? "url")+      )++instance Core.ToJSON SearchResult where+  toJSON SearchResult {..} =+    Core.object+      ( Core.catMaybes+          [ ("clusteredResults" Core..=) Core.<$> clusteredResults,+            ("debugInfo" Core..=) Core.<$> debugInfo,+            ("metadata" Core..=) Core.<$> metadata,+            ("snippet" Core..=) Core.<$> snippet,+            ("title" Core..=) Core.<$> title,+            ("url" Core..=) Core.<$> url+          ]+      )++-- | Snippet of the search result, which summarizes the content of the resulting page.+--+-- /See:/ 'newSnippet' smart constructor.+data Snippet = Snippet+  { -- | The matched ranges in the snippet.+    matchRanges :: (Core.Maybe [MatchRange]),+    -- | The snippet of the document. May contain escaped HTML character that should be unescaped prior to rendering.+    snippet :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Snippet' with the minimum fields required to make a request.+newSnippet ::+  Snippet+newSnippet =+  Snippet {matchRanges = Core.Nothing, snippet = Core.Nothing}++instance Core.FromJSON Snippet where+  parseJSON =+    Core.withObject+      "Snippet"+      ( \o ->+          Snippet+            Core.<$> (o Core..:? "matchRanges")+            Core.<*> (o Core..:? "snippet")+      )++instance Core.ToJSON Snippet where+  toJSON Snippet {..} =+    Core.object+      ( Core.catMaybes+          [ ("matchRanges" Core..=) Core.<$> matchRanges,+            ("snippet" Core..=) Core.<$> snippet+          ]+      )++--+-- /See:/ 'newSortOptions' smart constructor.+data SortOptions = SortOptions+  { -- | The name of the operator corresponding to the field to sort on. The corresponding property must be marked as sortable.+    operatorName :: (Core.Maybe Core.Text),+    -- | Ascending is the default sort order+    sortOrder :: (Core.Maybe SortOptions_SortOrder)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SortOptions' with the minimum fields required to make a request.+newSortOptions ::+  SortOptions+newSortOptions =+  SortOptions+    { operatorName = Core.Nothing,+      sortOrder = Core.Nothing+    }++instance Core.FromJSON SortOptions where+  parseJSON =+    Core.withObject+      "SortOptions"+      ( \o ->+          SortOptions+            Core.<$> (o Core..:? "operatorName")+            Core.<*> (o Core..:? "sortOrder")+      )++instance Core.ToJSON SortOptions where+  toJSON SortOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("operatorName" Core..=) Core.<$> operatorName,+            ("sortOrder" Core..=) Core.<$> sortOrder+          ]+      )++-- | Defines sources for the suggest\/search APIs.+--+-- /See:/ 'newSource' smart constructor.+data Source = Source+  { -- | Source name for content indexed by the Indexing API.+    name :: (Core.Maybe Core.Text),+    -- | Predefined content source for Google Apps.+    predefinedSource :: (Core.Maybe Source_PredefinedSource)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Source' with the minimum fields required to make a request.+newSource ::+  Source+newSource =+  Source {name = Core.Nothing, predefinedSource = Core.Nothing}++instance Core.FromJSON Source where+  parseJSON =+    Core.withObject+      "Source"+      ( \o ->+          Source+            Core.<$> (o Core..:? "name")+            Core.<*> (o Core..:? "predefinedSource")+      )++instance Core.ToJSON Source where+  toJSON Source {..} =+    Core.object+      ( Core.catMaybes+          [ ("name" Core..=) Core.<$> name,+            ("predefinedSource" Core..=) Core.<$> predefinedSource+          ]+      )++-- | Configurations for a source while processing a Search or Suggest request.+--+-- /See:/ 'newSourceConfig' smart constructor.+data SourceConfig = SourceConfig+  { -- | The crowding configuration for the source.+    crowdingConfig :: (Core.Maybe SourceCrowdingConfig),+    -- | The scoring configuration for the source.+    scoringConfig :: (Core.Maybe SourceScoringConfig),+    -- | The source for which this configuration is to be used.+    source :: (Core.Maybe Source)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SourceConfig' with the minimum fields required to make a request.+newSourceConfig ::+  SourceConfig+newSourceConfig =+  SourceConfig+    { crowdingConfig = Core.Nothing,+      scoringConfig = Core.Nothing,+      source = Core.Nothing+    }++instance Core.FromJSON SourceConfig where+  parseJSON =+    Core.withObject+      "SourceConfig"+      ( \o ->+          SourceConfig+            Core.<$> (o Core..:? "crowdingConfig")+            Core.<*> (o Core..:? "scoringConfig")+            Core.<*> (o Core..:? "source")+      )++instance Core.ToJSON SourceConfig where+  toJSON SourceConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("crowdingConfig" Core..=) Core.<$> crowdingConfig,+            ("scoringConfig" Core..=) Core.<$> scoringConfig,+            ("source" Core..=) Core.<$> source+          ]+      )++-- | Set search results crowding limits. Crowding is a situation in which multiple results from the same source or host \"crowd out\" other results, diminishing the quality of search for users. To foster better search quality and source diversity in search results, you can set a condition to reduce repetitive results by source.+--+-- /See:/ 'newSourceCrowdingConfig' smart constructor.+data SourceCrowdingConfig = SourceCrowdingConfig+  { -- | Maximum number of results allowed from a datasource in a result page as long as results from other sources are not exhausted. Value specified must not be negative. A default value is used if this value is equal to 0. To disable crowding, set the value greater than 100.+    numResults :: (Core.Maybe Core.Int32),+    -- | Maximum number of suggestions allowed from a source. No limits will be set on results if this value is less than or equal to 0.+    numSuggestions :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SourceCrowdingConfig' with the minimum fields required to make a request.+newSourceCrowdingConfig ::+  SourceCrowdingConfig+newSourceCrowdingConfig =+  SourceCrowdingConfig+    { numResults = Core.Nothing,+      numSuggestions = Core.Nothing+    }++instance Core.FromJSON SourceCrowdingConfig where+  parseJSON =+    Core.withObject+      "SourceCrowdingConfig"+      ( \o ->+          SourceCrowdingConfig+            Core.<$> (o Core..:? "numResults")+            Core.<*> (o Core..:? "numSuggestions")+      )++instance Core.ToJSON SourceCrowdingConfig where+  toJSON SourceCrowdingConfig {..} =+    Core.object+      ( Core.catMaybes+          [ ("numResults" Core..=) Core.<$> numResults,+            ("numSuggestions" Core..=) Core.<$> numSuggestions+          ]+      )++-- | Per source result count information.+--+-- /See:/ 'newSourceResultCount' smart constructor.+data SourceResultCount = SourceResultCount+  { -- | Whether there are more search results for this source.+    hasMoreResults :: (Core.Maybe Core.Bool),+    -- | The estimated result count for this source.+    resultCountEstimate :: (Core.Maybe Core.Int64),+    -- | The exact result count for this source.+    resultCountExact :: (Core.Maybe Core.Int64),+    -- | The source the result count information is associated with.+    source :: (Core.Maybe Source)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SourceResultCount' with the minimum fields required to make a request.+newSourceResultCount ::+  SourceResultCount+newSourceResultCount =+  SourceResultCount+    { hasMoreResults = Core.Nothing,+      resultCountEstimate = Core.Nothing,+      resultCountExact = Core.Nothing,+      source = Core.Nothing+    }++instance Core.FromJSON SourceResultCount where+  parseJSON =+    Core.withObject+      "SourceResultCount"+      ( \o ->+          SourceResultCount+            Core.<$> (o Core..:? "hasMoreResults")+            Core.<*> ( o+                         Core..:? "resultCountEstimate"+                         Core.<&> Core.fmap Core.fromAsText+                     )+            Core.<*> (o Core..:? "resultCountExact" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "source")+      )++instance Core.ToJSON SourceResultCount where+  toJSON SourceResultCount {..} =+    Core.object+      ( Core.catMaybes+          [ ("hasMoreResults" Core..=) Core.<$> hasMoreResults,+            ("resultCountEstimate" Core..=)+              Core.. Core.AsText+              Core.<$> resultCountEstimate,+            ("resultCountExact" Core..=)+              Core.. Core.AsText+              Core.<$> resultCountExact,+            ("source" Core..=) Core.<$> source+          ]+      )++-- | Set the scoring configuration. This allows modifying the ranking of results for a source.+--+-- /See:/ 'newSourceScoringConfig' smart constructor.+newtype SourceScoringConfig = SourceScoringConfig+  { -- | Importance of the source.+    sourceImportance :: (Core.Maybe SourceScoringConfig_SourceImportance)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SourceScoringConfig' with the minimum fields required to make a request.+newSourceScoringConfig ::+  SourceScoringConfig+newSourceScoringConfig =+  SourceScoringConfig {sourceImportance = Core.Nothing}++instance Core.FromJSON SourceScoringConfig where+  parseJSON =+    Core.withObject+      "SourceScoringConfig"+      ( \o ->+          SourceScoringConfig Core.<$> (o Core..:? "sourceImportance")+      )++instance Core.ToJSON SourceScoringConfig where+  toJSON SourceScoringConfig {..} =+    Core.object+      ( Core.catMaybes+          [("sourceImportance" Core..=) Core.<$> sourceImportance]+      )++--+-- /See:/ 'newSpellResult' smart constructor.+data SpellResult = SpellResult+  { -- | The suggested spelling of the query.+    suggestedQuery :: (Core.Maybe Core.Text),+    -- | The sanitized HTML representing the spell corrected query that can be used in the UI. This usually has language-specific tags to mark up parts of the query that are spell checked.+    suggestedQueryHtml :: (Core.Maybe SafeHtmlProto),+    -- | Suggestion triggered for the current query.+    suggestionType :: (Core.Maybe SpellResult_SuggestionType)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SpellResult' with the minimum fields required to make a request.+newSpellResult ::+  SpellResult+newSpellResult =+  SpellResult+    { suggestedQuery = Core.Nothing,+      suggestedQueryHtml = Core.Nothing,+      suggestionType = Core.Nothing+    }++instance Core.FromJSON SpellResult where+  parseJSON =+    Core.withObject+      "SpellResult"+      ( \o ->+          SpellResult+            Core.<$> (o Core..:? "suggestedQuery")+            Core.<*> (o Core..:? "suggestedQueryHtml")+            Core.<*> (o Core..:? "suggestionType")+      )++instance Core.ToJSON SpellResult where+  toJSON SpellResult {..} =+    Core.object+      ( Core.catMaybes+          [ ("suggestedQuery" Core..=) Core.<$> suggestedQuery,+            ("suggestedQueryHtml" Core..=) Core.<$> suggestedQueryHtml,+            ("suggestionType" Core..=) Core.<$> suggestionType+          ]+      )++-- | Start upload file request.+--+-- /See:/ 'newStartUploadItemRequest' smart constructor.+data StartUploadItemRequest = StartUploadItemRequest+  { -- | The name of connector making this call. Format: datasources\/{source_id}\/connectors\/{ID}+    connectorName :: (Core.Maybe Core.Text),+    -- | Common debug options.+    debugOptions :: (Core.Maybe DebugOptions)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'StartUploadItemRequest' with the minimum fields required to make a request.+newStartUploadItemRequest ::+  StartUploadItemRequest+newStartUploadItemRequest =+  StartUploadItemRequest+    { connectorName = Core.Nothing,+      debugOptions = Core.Nothing+    }++instance Core.FromJSON StartUploadItemRequest where+  parseJSON =+    Core.withObject+      "StartUploadItemRequest"+      ( \o ->+          StartUploadItemRequest+            Core.<$> (o Core..:? "connectorName")+            Core.<*> (o Core..:? "debugOptions")+      )++instance Core.ToJSON StartUploadItemRequest where+  toJSON StartUploadItemRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("connectorName" Core..=) Core.<$> connectorName,+            ("debugOptions" Core..=) Core.<$> debugOptions+          ]+      )++-- | The @Status@ type defines a logical error model that is suitable for different programming environments, including REST APIs and RPC APIs. It is used by <https://github.com/grpc gRPC>. Each @Status@ message contains three pieces of data: error code, error message, and error details. You can find out more about this error model and how to work with it in the <https://cloud.google.com/apis/design/errors API Design Guide>.+--+-- /See:/ 'newStatus' smart constructor.+data Status = Status+  { -- | The status code, which should be an enum value of google.rpc.Code.+    code :: (Core.Maybe Core.Int32),+    -- | A list of messages that carry the error details. There is a common set of message types for APIs to use.+    details :: (Core.Maybe [Status_DetailsItem]),+    -- | A developer-facing error message, which should be in English. Any user-facing error message should be localized and sent in the google.rpc.Status.details field, or localized by the client.+    message :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Status' with the minimum fields required to make a request.+newStatus ::+  Status+newStatus =+  Status+    { code = Core.Nothing,+      details = Core.Nothing,+      message = Core.Nothing+    }++instance Core.FromJSON Status where+  parseJSON =+    Core.withObject+      "Status"+      ( \o ->+          Status+            Core.<$> (o Core..:? "code")+            Core.<*> (o Core..:? "details")+            Core.<*> (o Core..:? "message")+      )++instance Core.ToJSON Status where+  toJSON Status {..} =+    Core.object+      ( Core.catMaybes+          [ ("code" Core..=) Core.<$> code,+            ("details" Core..=) Core.<$> details,+            ("message" Core..=) Core.<$> message+          ]+      )++--+-- /See:/ 'newStatus_DetailsItem' smart constructor.+newtype Status_DetailsItem = Status_DetailsItem+  { -- | Properties of the object. Contains field \@type with type URL.+    additional :: (Core.HashMap Core.Text Core.Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Status_DetailsItem' with the minimum fields required to make a request.+newStatus_DetailsItem ::+  -- |  Properties of the object. Contains field \@type with type URL. See 'additional'.+  Core.HashMap Core.Text Core.Value ->+  Status_DetailsItem+newStatus_DetailsItem additional =+  Status_DetailsItem {additional = additional}++instance Core.FromJSON Status_DetailsItem where+  parseJSON =+    Core.withObject+      "Status_DetailsItem"+      (\o -> Status_DetailsItem Core.<$> (Core.parseJSONObject o))++instance Core.ToJSON Status_DetailsItem where+  toJSON Status_DetailsItem {..} = Core.toJSON additional++-- | A structured data object consisting of named properties.+--+-- /See:/ 'newStructuredDataObject' smart constructor.+newtype StructuredDataObject = StructuredDataObject+  { -- | The properties for the object. The maximum number of elements is 1000.+    properties :: (Core.Maybe [NamedProperty])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'StructuredDataObject' with the minimum fields required to make a request.+newStructuredDataObject ::+  StructuredDataObject+newStructuredDataObject =+  StructuredDataObject {properties = Core.Nothing}++instance Core.FromJSON StructuredDataObject where+  parseJSON =+    Core.withObject+      "StructuredDataObject"+      (\o -> StructuredDataObject Core.<$> (o Core..:? "properties"))++instance Core.ToJSON StructuredDataObject where+  toJSON StructuredDataObject {..} =+    Core.object+      (Core.catMaybes [("properties" Core..=) Core.<$> properties])++-- | Structured results that are returned as part of search request.+--+-- /See:/ 'newStructuredResult' smart constructor.+newtype StructuredResult = StructuredResult+  { -- | Representation of a person+    person :: (Core.Maybe Person)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'StructuredResult' with the minimum fields required to make a request.+newStructuredResult ::+  StructuredResult+newStructuredResult = StructuredResult {person = Core.Nothing}++instance Core.FromJSON StructuredResult where+  parseJSON =+    Core.withObject+      "StructuredResult"+      (\o -> StructuredResult Core.<$> (o Core..:? "person"))++instance Core.ToJSON StructuredResult where+  toJSON StructuredResult {..} =+    Core.object (Core.catMaybes [("person" Core..=) Core.<$> person])++-- | Request of suggest API.+--+-- /See:/ 'newSuggestRequest' smart constructor.+data SuggestRequest = SuggestRequest+  { -- | The sources to use for suggestions. If not specified, the data sources are taken from the current search application. NOTE: Suggestions are only supported for the following sources: * Third-party data sources * PredefinedSource.PERSON * PredefinedSource.GOOGLE_DRIVE+    dataSourceRestrictions :: (Core.Maybe [DataSourceRestriction]),+    -- | Partial query for which autocomplete suggestions will be shown. For example, if the query is \"sea\", then the server might return \"season\", \"search\", \"seagull\" and so on.+    query :: (Core.Maybe Core.Text),+    -- | Request options, such as the search application and user timezone.+    requestOptions :: (Core.Maybe RequestOptions)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SuggestRequest' with the minimum fields required to make a request.+newSuggestRequest ::+  SuggestRequest+newSuggestRequest =+  SuggestRequest+    { dataSourceRestrictions = Core.Nothing,+      query = Core.Nothing,+      requestOptions = Core.Nothing+    }++instance Core.FromJSON SuggestRequest where+  parseJSON =+    Core.withObject+      "SuggestRequest"+      ( \o ->+          SuggestRequest+            Core.<$> (o Core..:? "dataSourceRestrictions")+            Core.<*> (o Core..:? "query")+            Core.<*> (o Core..:? "requestOptions")+      )++instance Core.ToJSON SuggestRequest where+  toJSON SuggestRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("dataSourceRestrictions" Core..=)+              Core.<$> dataSourceRestrictions,+            ("query" Core..=) Core.<$> query,+            ("requestOptions" Core..=) Core.<$> requestOptions+          ]+      )++-- | Response of the suggest API.+--+-- /See:/ 'newSuggestResponse' smart constructor.+newtype SuggestResponse = SuggestResponse+  { -- | List of suggestions.+    suggestResults :: (Core.Maybe [SuggestResult])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SuggestResponse' with the minimum fields required to make a request.+newSuggestResponse ::+  SuggestResponse+newSuggestResponse = SuggestResponse {suggestResults = Core.Nothing}++instance Core.FromJSON SuggestResponse where+  parseJSON =+    Core.withObject+      "SuggestResponse"+      (\o -> SuggestResponse Core.<$> (o Core..:? "suggestResults"))++instance Core.ToJSON SuggestResponse where+  toJSON SuggestResponse {..} =+    Core.object+      ( Core.catMaybes+          [("suggestResults" Core..=) Core.<$> suggestResults]+      )++-- | One suggestion result.+--+-- /See:/ 'newSuggestResult' smart constructor.+data SuggestResult = SuggestResult+  { -- | This is present when the suggestion indicates a person. It contains more information about the person - like their email ID, name etc.+    peopleSuggestion :: (Core.Maybe PeopleSuggestion),+    -- | This field will be present if the suggested query is a word\/phrase completion.+    querySuggestion :: (Core.Maybe QuerySuggestion),+    -- | The source of the suggestion.+    source :: (Core.Maybe Source),+    -- | The suggested query that will be used for search, when the user clicks on the suggestion+    suggestedQuery :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'SuggestResult' with the minimum fields required to make a request.+newSuggestResult ::+  SuggestResult+newSuggestResult =+  SuggestResult+    { peopleSuggestion = Core.Nothing,+      querySuggestion = Core.Nothing,+      source = Core.Nothing,+      suggestedQuery = Core.Nothing+    }++instance Core.FromJSON SuggestResult where+  parseJSON =+    Core.withObject+      "SuggestResult"+      ( \o ->+          SuggestResult+            Core.<$> (o Core..:? "peopleSuggestion")+            Core.<*> (o Core..:? "querySuggestion")+            Core.<*> (o Core..:? "source")+            Core.<*> (o Core..:? "suggestedQuery")+      )++instance Core.ToJSON SuggestResult where+  toJSON SuggestResult {..} =+    Core.object+      ( Core.catMaybes+          [ ("peopleSuggestion" Core..=) Core.<$> peopleSuggestion,+            ("querySuggestion" Core..=) Core.<$> querySuggestion,+            ("source" Core..=) Core.<$> source,+            ("suggestedQuery" Core..=) Core.<$> suggestedQuery+          ]+      )++-- | Used to provide a search operator for text properties. This is optional. Search operators let users restrict the query to specific fields relevant to the type of item being searched.+--+-- /See:/ 'newTextOperatorOptions' smart constructor.+data TextOperatorOptions = TextOperatorOptions+  { -- | If true, the text value is tokenized as one atomic value in operator searches and facet matches. For example, if the operator name is \"genre\" and the value is \"science-fiction\" the query restrictions \"genre:science\" and \"genre:fiction\" doesn\'t match the item; \"genre:science-fiction\" does. Text value matching is case-sensitive and does not remove special characters. If false, the text is tokenized. For example, if the value is \"science-fiction\" the queries \"genre:science\" and \"genre:fiction\" matches the item.+    exactMatchWithOperator :: (Core.Maybe Core.Bool),+    -- | Indicates the operator name required in the query in order to isolate the text property. For example, if operatorName is /subject/ and the property\'s name is /subjectLine/, then queries like /subject:\<value>/ show results only where the value of the property named /subjectLine/ matches /\<value>/. By contrast, a search that uses the same /\<value>/ without an operator returns all items where /\<value>/ matches the value of any text properties or text within the content field for the item. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    operatorName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TextOperatorOptions' with the minimum fields required to make a request.+newTextOperatorOptions ::+  TextOperatorOptions+newTextOperatorOptions =+  TextOperatorOptions+    { exactMatchWithOperator = Core.Nothing,+      operatorName = Core.Nothing+    }++instance Core.FromJSON TextOperatorOptions where+  parseJSON =+    Core.withObject+      "TextOperatorOptions"+      ( \o ->+          TextOperatorOptions+            Core.<$> (o Core..:? "exactMatchWithOperator")+            Core.<*> (o Core..:? "operatorName")+      )++instance Core.ToJSON TextOperatorOptions where+  toJSON TextOperatorOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("exactMatchWithOperator" Core..=)+              Core.<$> exactMatchWithOperator,+            ("operatorName" Core..=) Core.<$> operatorName+          ]+      )++-- | The options for text properties.+--+-- /See:/ 'newTextPropertyOptions' smart constructor.+data TextPropertyOptions = TextPropertyOptions+  { -- | If set, describes how the property should be used as a search operator.+    operatorOptions :: (Core.Maybe TextOperatorOptions),+    -- | Indicates the search quality importance of the tokens within the field when used for retrieval.+    retrievalImportance :: (Core.Maybe RetrievalImportance)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TextPropertyOptions' with the minimum fields required to make a request.+newTextPropertyOptions ::+  TextPropertyOptions+newTextPropertyOptions =+  TextPropertyOptions+    { operatorOptions = Core.Nothing,+      retrievalImportance = Core.Nothing+    }++instance Core.FromJSON TextPropertyOptions where+  parseJSON =+    Core.withObject+      "TextPropertyOptions"+      ( \o ->+          TextPropertyOptions+            Core.<$> (o Core..:? "operatorOptions")+            Core.<*> (o Core..:? "retrievalImportance")+      )++instance Core.ToJSON TextPropertyOptions where+  toJSON TextPropertyOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("operatorOptions" Core..=) Core.<$> operatorOptions,+            ("retrievalImportance" Core..=) Core.<$> retrievalImportance+          ]+      )++-- | List of text values.+--+-- /See:/ 'newTextValues' smart constructor.+newtype TextValues = TextValues+  { -- | The maximum allowable length for text values is 2048 characters.+    values :: (Core.Maybe [Core.Text])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TextValues' with the minimum fields required to make a request.+newTextValues ::+  TextValues+newTextValues = TextValues {values = Core.Nothing}++instance Core.FromJSON TextValues where+  parseJSON =+    Core.withObject+      "TextValues"+      (\o -> TextValues Core.<$> (o Core..:? "values"))++instance Core.ToJSON TextValues where+  toJSON TextValues {..} =+    Core.object (Core.catMaybes [("values" Core..=) Core.<$> values])++--+-- /See:/ 'newThirdPartyGenericCard' smart constructor.+data ThirdPartyGenericCard = ThirdPartyGenericCard+  { -- | Unique identifier for the card.+    cardId :: (Core.Maybe Core.Text),+    -- | Category that the card belongs to.+    category :: (Core.Maybe Core.Text),+    -- | [Required] Card content.+    content :: (Core.Maybe Content),+    -- | [Required] Context where the card should be triggered.+    context :: (Core.Maybe Context),+    -- | Whether the card can be dismissed.+    isDismissible :: (Core.Maybe Core.Bool),+    -- | Priority of the card, where 0 is the highest priority.+    priority :: (Core.Maybe Core.Int32)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ThirdPartyGenericCard' with the minimum fields required to make a request.+newThirdPartyGenericCard ::+  ThirdPartyGenericCard+newThirdPartyGenericCard =+  ThirdPartyGenericCard+    { cardId = Core.Nothing,+      category = Core.Nothing,+      content = Core.Nothing,+      context = Core.Nothing,+      isDismissible = Core.Nothing,+      priority = Core.Nothing+    }++instance Core.FromJSON ThirdPartyGenericCard where+  parseJSON =+    Core.withObject+      "ThirdPartyGenericCard"+      ( \o ->+          ThirdPartyGenericCard+            Core.<$> (o Core..:? "cardId")+            Core.<*> (o Core..:? "category")+            Core.<*> (o Core..:? "content")+            Core.<*> (o Core..:? "context")+            Core.<*> (o Core..:? "isDismissible")+            Core.<*> (o Core..:? "priority")+      )++instance Core.ToJSON ThirdPartyGenericCard where+  toJSON ThirdPartyGenericCard {..} =+    Core.object+      ( Core.catMaybes+          [ ("cardId" Core..=) Core.<$> cardId,+            ("category" Core..=) Core.<$> category,+            ("content" Core..=) Core.<$> content,+            ("context" Core..=) Core.<$> context,+            ("isDismissible" Core..=) Core.<$> isDismissible,+            ("priority" Core..=) Core.<$> priority+          ]+      )++-- | Used to provide a search operator for timestamp properties. This is optional. Search operators let users restrict the query to specific fields relevant to the type of item being searched.+--+-- /See:/ 'newTimestampOperatorOptions' smart constructor.+data TimestampOperatorOptions = TimestampOperatorOptions+  { -- | Indicates the operator name required in the query in order to isolate the timestamp property using the greater-than operator. For example, if greaterThanOperatorName is /closedafter/ and the property\'s name is /closeDate/, then queries like /closedafter:\<value>/ show results only where the value of the property named /closeDate/ is later than /\<value>/. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    greaterThanOperatorName :: (Core.Maybe Core.Text),+    -- | Indicates the operator name required in the query in order to isolate the timestamp property using the less-than operator. For example, if lessThanOperatorName is /closedbefore/ and the property\'s name is /closeDate/, then queries like /closedbefore:\<value>/ show results only where the value of the property named /closeDate/ is earlier than /\<value>/. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    lessThanOperatorName :: (Core.Maybe Core.Text),+    -- | Indicates the operator name required in the query in order to isolate the timestamp property. For example, if operatorName is /closedon/ and the property\'s name is /closeDate/, then queries like /closedon:\<value>/ show results only where the value of the property named /closeDate/ matches /\<value>/. By contrast, a search that uses the same /\<value>/ without an operator returns all items where /\<value>/ matches the value of any String properties or text within the content field for the item. The operator name can only contain lowercase letters (a-z). The maximum length is 32 characters.+    operatorName :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TimestampOperatorOptions' with the minimum fields required to make a request.+newTimestampOperatorOptions ::+  TimestampOperatorOptions+newTimestampOperatorOptions =+  TimestampOperatorOptions+    { greaterThanOperatorName = Core.Nothing,+      lessThanOperatorName = Core.Nothing,+      operatorName = Core.Nothing+    }++instance Core.FromJSON TimestampOperatorOptions where+  parseJSON =+    Core.withObject+      "TimestampOperatorOptions"+      ( \o ->+          TimestampOperatorOptions+            Core.<$> (o Core..:? "greaterThanOperatorName")+            Core.<*> (o Core..:? "lessThanOperatorName")+            Core.<*> (o Core..:? "operatorName")+      )++instance Core.ToJSON TimestampOperatorOptions where+  toJSON TimestampOperatorOptions {..} =+    Core.object+      ( Core.catMaybes+          [ ("greaterThanOperatorName" Core..=)+              Core.<$> greaterThanOperatorName,+            ("lessThanOperatorName" Core..=) Core.<$> lessThanOperatorName,+            ("operatorName" Core..=) Core.<$> operatorName+          ]+      )++-- | The options for timestamp properties.+--+-- /See:/ 'newTimestampPropertyOptions' smart constructor.+newtype TimestampPropertyOptions = TimestampPropertyOptions+  { -- | If set, describes how the timestamp should be used as a search operator.+    operatorOptions :: (Core.Maybe TimestampOperatorOptions)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TimestampPropertyOptions' with the minimum fields required to make a request.+newTimestampPropertyOptions ::+  TimestampPropertyOptions+newTimestampPropertyOptions =+  TimestampPropertyOptions {operatorOptions = Core.Nothing}++instance Core.FromJSON TimestampPropertyOptions where+  parseJSON =+    Core.withObject+      "TimestampPropertyOptions"+      ( \o ->+          TimestampPropertyOptions Core.<$> (o Core..:? "operatorOptions")+      )++instance Core.ToJSON TimestampPropertyOptions where+  toJSON TimestampPropertyOptions {..} =+    Core.object+      ( Core.catMaybes+          [("operatorOptions" Core..=) Core.<$> operatorOptions]+      )++-- | List of timestamp values.+--+-- /See:/ 'newTimestampValues' smart constructor.+newtype TimestampValues = TimestampValues+  { values :: (Core.Maybe [Core.DateTime])+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'TimestampValues' with the minimum fields required to make a request.+newTimestampValues ::+  TimestampValues+newTimestampValues = TimestampValues {values = Core.Nothing}++instance Core.FromJSON TimestampValues where+  parseJSON =+    Core.withObject+      "TimestampValues"+      (\o -> TimestampValues Core.<$> (o Core..:? "values"))++instance Core.ToJSON TimestampValues where+  toJSON TimestampValues {..} =+    Core.object (Core.catMaybes [("values" Core..=) Core.<$> values])++--+-- /See:/ 'newUnmappedIdentity' smart constructor.+data UnmappedIdentity = UnmappedIdentity+  { -- | The resource name for an external user.+    externalIdentity :: (Core.Maybe Principal),+    -- | The resolution status for the external identity.+    resolutionStatusCode :: (Core.Maybe UnmappedIdentity_ResolutionStatusCode)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'UnmappedIdentity' with the minimum fields required to make a request.+newUnmappedIdentity ::+  UnmappedIdentity+newUnmappedIdentity =+  UnmappedIdentity+    { externalIdentity = Core.Nothing,+      resolutionStatusCode = Core.Nothing+    }++instance Core.FromJSON UnmappedIdentity where+  parseJSON =+    Core.withObject+      "UnmappedIdentity"+      ( \o ->+          UnmappedIdentity+            Core.<$> (o Core..:? "externalIdentity")+            Core.<*> (o Core..:? "resolutionStatusCode")+      )++instance Core.ToJSON UnmappedIdentity where+  toJSON UnmappedIdentity {..} =+    Core.object+      ( Core.catMaybes+          [ ("externalIdentity" Core..=) Core.<$> externalIdentity,+            ("resolutionStatusCode" Core..=) Core.<$> resolutionStatusCode+          ]+      )++--+-- /See:/ 'newUnreserveItemsRequest' smart constructor.+data UnreserveItemsRequest = UnreserveItemsRequest+  { -- | The name of connector making this call. Format: datasources\/{source_id}\/connectors\/{ID}+    connectorName :: (Core.Maybe Core.Text),+    -- | Common debug options.+    debugOptions :: (Core.Maybe DebugOptions),+    -- | The name of a queue to unreserve items from.+    queue :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'UnreserveItemsRequest' with the minimum fields required to make a request.+newUnreserveItemsRequest ::+  UnreserveItemsRequest+newUnreserveItemsRequest =+  UnreserveItemsRequest+    { connectorName = Core.Nothing,+      debugOptions = Core.Nothing,+      queue = Core.Nothing+    }++instance Core.FromJSON UnreserveItemsRequest where+  parseJSON =+    Core.withObject+      "UnreserveItemsRequest"+      ( \o ->+          UnreserveItemsRequest+            Core.<$> (o Core..:? "connectorName")+            Core.<*> (o Core..:? "debugOptions")+            Core.<*> (o Core..:? "queue")+      )++instance Core.ToJSON UnreserveItemsRequest where+  toJSON UnreserveItemsRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("connectorName" Core..=) Core.<$> connectorName,+            ("debugOptions" Core..=) Core.<$> debugOptions,+            ("queue" Core..=) Core.<$> queue+          ]+      )++--+-- /See:/ 'newUpdateDataSourceRequest' smart constructor.+data UpdateDataSourceRequest = UpdateDataSourceRequest+  { -- | Common debug options.+    debugOptions :: (Core.Maybe DebugOptions),+    source :: (Core.Maybe DataSource),+    -- | Only applies to <https://developers.google.com/cloud-search/docs/reference/rest/v1/settings.datasources/patch settings.datasources.patch>. Update mask to control which fields to update. Example field paths: @name@, @displayName@. * If @update_mask@ is non-empty, then only the fields specified in the @update_mask@ are updated. * If you specify a field in the @update_mask@, but don\'t specify its value in the source, that field is cleared. * If the @update_mask@ is not present or empty or has the value @*@, then all fields are updated.+    updateMask :: (Core.Maybe Core.FieldMask)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'UpdateDataSourceRequest' with the minimum fields required to make a request.+newUpdateDataSourceRequest ::+  UpdateDataSourceRequest+newUpdateDataSourceRequest =+  UpdateDataSourceRequest+    { debugOptions = Core.Nothing,+      source = Core.Nothing,+      updateMask = Core.Nothing+    }++instance Core.FromJSON UpdateDataSourceRequest where+  parseJSON =+    Core.withObject+      "UpdateDataSourceRequest"+      ( \o ->+          UpdateDataSourceRequest+            Core.<$> (o Core..:? "debugOptions")+            Core.<*> (o Core..:? "source")+            Core.<*> (o Core..:? "updateMask")+      )++instance Core.ToJSON UpdateDataSourceRequest where+  toJSON UpdateDataSourceRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("debugOptions" Core..=) Core.<$> debugOptions,+            ("source" Core..=) Core.<$> source,+            ("updateMask" Core..=) Core.<$> updateMask+          ]+      )++--+-- /See:/ 'newUpdateSchemaRequest' smart constructor.+data UpdateSchemaRequest = UpdateSchemaRequest+  { -- | Common debug options.+    debugOptions :: (Core.Maybe DebugOptions),+    -- | The new schema for the source.+    schema :: (Core.Maybe Schema),+    -- | If true, the schema will be checked for validity, but will not be registered with the data source, even if valid.+    validateOnly :: (Core.Maybe Core.Bool)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'UpdateSchemaRequest' with the minimum fields required to make a request.+newUpdateSchemaRequest ::+  UpdateSchemaRequest+newUpdateSchemaRequest =+  UpdateSchemaRequest+    { debugOptions = Core.Nothing,+      schema = Core.Nothing,+      validateOnly = Core.Nothing+    }++instance Core.FromJSON UpdateSchemaRequest where+  parseJSON =+    Core.withObject+      "UpdateSchemaRequest"+      ( \o ->+          UpdateSchemaRequest+            Core.<$> (o Core..:? "debugOptions")+            Core.<*> (o Core..:? "schema")+            Core.<*> (o Core..:? "validateOnly")+      )++instance Core.ToJSON UpdateSchemaRequest where+  toJSON UpdateSchemaRequest {..} =+    Core.object+      ( Core.catMaybes+          [ ("debugOptions" Core..=) Core.<$> debugOptions,+            ("schema" Core..=) Core.<$> schema,+            ("validateOnly" Core..=) Core.<$> validateOnly+          ]+      )++-- | Represents an upload session reference. This reference is created via upload method. This reference is valid for 30 days after its creation. Updating of item content may refer to this uploaded content via contentDataRef.+--+-- /See:/ 'newUploadItemRef' smart constructor.+newtype UploadItemRef = UploadItemRef+  { -- | The name of the content reference. The maximum length is 2048 characters.+    name :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'UploadItemRef' with the minimum fields required to make a request.+newUploadItemRef ::+  UploadItemRef+newUploadItemRef = UploadItemRef {name = Core.Nothing}++instance Core.FromJSON UploadItemRef where+  parseJSON =+    Core.withObject+      "UploadItemRef"+      (\o -> UploadItemRef Core.<$> (o Core..:? "name"))++instance Core.ToJSON UploadItemRef where+  toJSON UploadItemRef {..} =+    Core.object (Core.catMaybes [("name" Core..=) Core.<$> name])++-- | User\'s single or bulk query activity. This can be a logging query or deletion query.+--+-- /See:/ 'newUserActivity' smart constructor.+newtype UserActivity = UserActivity+  { -- | Contains data which needs to be logged\/removed.+    queryActivity :: (Core.Maybe QueryActivity)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'UserActivity' with the minimum fields required to make a request.+newUserActivity ::+  UserActivity+newUserActivity = UserActivity {queryActivity = Core.Nothing}++instance Core.FromJSON UserActivity where+  parseJSON =+    Core.withObject+      "UserActivity"+      (\o -> UserActivity Core.<$> (o Core..:? "queryActivity"))++instance Core.ToJSON UserActivity where+  toJSON UserActivity {..} =+    Core.object+      (Core.catMaybes [("queryActivity" Core..=) Core.<$> queryActivity])++--+-- /See:/ 'newVPCSettings' smart constructor.+newtype VPCSettings = VPCSettings+  { -- | The resource name of the GCP Project to be used for VPC SC policy check. VPC security settings on this project will be honored for Cloud Search APIs after project/name has been updated through CustomerService. Format: projects\/{project/id}+    project :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'VPCSettings' with the minimum fields required to make a request.+newVPCSettings ::+  VPCSettings+newVPCSettings = VPCSettings {project = Core.Nothing}++instance Core.FromJSON VPCSettings where+  parseJSON =+    Core.withObject+      "VPCSettings"+      (\o -> VPCSettings Core.<$> (o Core..:? "project"))++instance Core.ToJSON VPCSettings where+  toJSON VPCSettings {..} =+    Core.object+      (Core.catMaybes [("project" Core..=) Core.<$> project])++-- | Definition of a single value with generic type.+--+-- /See:/ 'newValue' smart constructor.+data Value = Value+  { booleanValue :: (Core.Maybe Core.Bool),+    dateValue :: (Core.Maybe Date),+    doubleValue :: (Core.Maybe Core.Double),+    integerValue :: (Core.Maybe Core.Int64),+    stringValue :: (Core.Maybe Core.Text),+    timestampValue :: (Core.Maybe Core.DateTime)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'Value' with the minimum fields required to make a request.+newValue ::+  Value+newValue =+  Value+    { booleanValue = Core.Nothing,+      dateValue = Core.Nothing,+      doubleValue = Core.Nothing,+      integerValue = Core.Nothing,+      stringValue = Core.Nothing,+      timestampValue = Core.Nothing+    }++instance Core.FromJSON Value where+  parseJSON =+    Core.withObject+      "Value"+      ( \o ->+          Value+            Core.<$> (o Core..:? "booleanValue")+            Core.<*> (o Core..:? "dateValue")+            Core.<*> (o Core..:? "doubleValue")+            Core.<*> (o Core..:? "integerValue" Core.<&> Core.fmap Core.fromAsText)+            Core.<*> (o Core..:? "stringValue")+            Core.<*> (o Core..:? "timestampValue")+      )++instance Core.ToJSON Value where+  toJSON Value {..} =+    Core.object+      ( Core.catMaybes+          [ ("booleanValue" Core..=) Core.<$> booleanValue,+            ("dateValue" Core..=) Core.<$> dateValue,+            ("doubleValue" Core..=) Core.<$> doubleValue,+            ("integerValue" Core..=) Core.. Core.AsText Core.<$> integerValue,+            ("stringValue" Core..=) Core.<$> stringValue,+            ("timestampValue" Core..=) Core.<$> timestampValue+          ]+      )++--+-- /See:/ 'newValueFilter' smart constructor.+data ValueFilter = ValueFilter+  { -- | The @operator_name@ applied to the query, such as /price/greater/than/. The filter can work against both types of filters defined in the schema for your data source: 1. @operator_name@, where the query filters results by the property that matches the value. 2. @greater_than_operator_name@ or @less_than_operator_name@ in your schema. The query filters the results for the property values that are greater than or less than the supplied value in the query.+    operatorName :: (Core.Maybe Core.Text),+    -- | The value to be compared with.+    value :: (Core.Maybe Value)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'ValueFilter' with the minimum fields required to make a request.+newValueFilter ::+  ValueFilter+newValueFilter =+  ValueFilter {operatorName = Core.Nothing, value = Core.Nothing}++instance Core.FromJSON ValueFilter where+  parseJSON =+    Core.withObject+      "ValueFilter"+      ( \o ->+          ValueFilter+            Core.<$> (o Core..:? "operatorName")+            Core.<*> (o Core..:? "value")+      )++instance Core.ToJSON ValueFilter where+  toJSON ValueFilter {..} =+    Core.object+      ( Core.catMaybes+          [ ("operatorName" Core..=) Core.<$> operatorName,+            ("value" Core..=) Core.<$> value+          ]+      )
+ gen/Gogol/CloudSearch/Internal/Sum.hs view
@@ -0,0 +1,3542 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Internal.Sum+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Gogol.CloudSearch.Internal.Sum+  ( -- * Xgafv+    Xgafv+      ( Xgafv_1,+        Xgafv_2,+        ..+      ),++    -- * BackgroundColoredText_BackgroundColor+    BackgroundColoredText_BackgroundColor+      ( BackgroundColoredText_BackgroundColor_UNKNOWNCOLOR,+        BackgroundColoredText_BackgroundColor_White,+        BackgroundColoredText_BackgroundColor_Yellow,+        BackgroundColoredText_BackgroundColor_Orange,+        BackgroundColoredText_BackgroundColor_Green,+        BackgroundColoredText_BackgroundColor_Blue,+        BackgroundColoredText_BackgroundColor_Grey,+        ..+      ),++    -- * CompositeFilter_LogicOperator+    CompositeFilter_LogicOperator+      ( CompositeFilter_LogicOperator_And,+        CompositeFilter_LogicOperator_OR,+        CompositeFilter_LogicOperator_Not,+        ..+      ),++    -- * Context_AppItem+    Context_AppItem+      ( Context_AppItem_UNKNOWNAPP,+        Context_AppItem_Topaz,+        Context_AppItem_Moma,+        ..+      ),++    -- * Context_SurfaceItem+    Context_SurfaceItem+      ( Context_SurfaceItem_UNKNOWNSURFACE,+        Context_SurfaceItem_Desktop,+        Context_SurfaceItem_Android,+        Context_SurfaceItem_Ios,+        Context_SurfaceItem_Mobile,+        Context_SurfaceItem_Any,+        ..+      ),++    -- * Context_TypeItem+    Context_TypeItem+      ( Context_TypeItem_UNKNOWNCARDTYPE,+        Context_TypeItem_HOMEPAGECARD,+        Context_TypeItem_ANSWERCARD,+        Context_TypeItem_RHSCARD,+        ..+      ),++    -- * DriveFollowUpRestrict_Type+    DriveFollowUpRestrict_Type+      ( DriveFollowUpRestrict_Type_Unspecified,+        DriveFollowUpRestrict_Type_FOLLOWUPSUGGESTIONS,+        DriveFollowUpRestrict_Type_FOLLOWUPACTIONITEMS,+        ..+      ),++    -- * DriveLocationRestrict_Type+    DriveLocationRestrict_Type+      ( DriveLocationRestrict_Type_Unspecified,+        DriveLocationRestrict_Type_Trashed,+        DriveLocationRestrict_Type_Starred,+        ..+      ),++    -- * DriveMimeTypeRestrict_Type+    DriveMimeTypeRestrict_Type+      ( DriveMimeTypeRestrict_Type_Unspecified,+        DriveMimeTypeRestrict_Type_Pdf,+        DriveMimeTypeRestrict_Type_Document,+        DriveMimeTypeRestrict_Type_Presentation,+        DriveMimeTypeRestrict_Type_Spreadsheet,+        DriveMimeTypeRestrict_Type_Form,+        DriveMimeTypeRestrict_Type_Drawing,+        DriveMimeTypeRestrict_Type_Script,+        DriveMimeTypeRestrict_Type_Map,+        DriveMimeTypeRestrict_Type_Image,+        DriveMimeTypeRestrict_Type_Audio,+        DriveMimeTypeRestrict_Type_Video,+        DriveMimeTypeRestrict_Type_Folder,+        DriveMimeTypeRestrict_Type_Archive,+        DriveMimeTypeRestrict_Type_Site,+        ..+      ),++    -- * DriveTimeSpanRestrict_Type+    DriveTimeSpanRestrict_Type+      ( DriveTimeSpanRestrict_Type_Unspecified,+        DriveTimeSpanRestrict_Type_Today,+        DriveTimeSpanRestrict_Type_Yesterday,+        DriveTimeSpanRestrict_Type_LAST7DAYS,+        DriveTimeSpanRestrict_Type_LAST30DAYS,+        DriveTimeSpanRestrict_Type_LAST90DAYS,+        ..+      ),++    -- * EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type+    EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type+      ( EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Unknown,+        EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Mobile,+        EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Office,+        EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Other,+        ..+      ),++    -- * EnterpriseTopazSidekickAgendaEntry_Chronology+    EnterpriseTopazSidekickAgendaEntry_Chronology+      ( EnterpriseTopazSidekickAgendaEntry_Chronology_Stale,+        EnterpriseTopazSidekickAgendaEntry_Chronology_ALLDAY,+        EnterpriseTopazSidekickAgendaEntry_Chronology_Past,+        EnterpriseTopazSidekickAgendaEntry_Chronology_RECENTLYPAST,+        EnterpriseTopazSidekickAgendaEntry_Chronology_Present,+        EnterpriseTopazSidekickAgendaEntry_Chronology_NEARFUTURE,+        EnterpriseTopazSidekickAgendaEntry_Chronology_Future,+        ..+      ),++    -- * EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus+    EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus+      ( EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_Awaiting,+        EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_Yes,+        EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_NO,+        EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_Maybe,+        ..+      ),++    -- * EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict+    EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict+      ( EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict_None,+        EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict_NEXTMEETING,+        ..+      ),++    -- * EnterpriseTopazSidekickAnswerAnswerList_Type+    EnterpriseTopazSidekickAnswerAnswerList_Type+      ( EnterpriseTopazSidekickAnswerAnswerList_Type_Unknown,+        EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONADDRESS,+        EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONBIRTHDAY,+        EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONDEPARTMENT,+        EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONDESKLOCATION,+        EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONEMAIL,+        EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONJOBTITLE,+        EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONPHONE,+        ..+      ),++    -- * EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category+    EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category+      ( EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_Unknown,+        EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_Calendar,+        EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_Document,+        EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_People,+        ..+      ),++    -- * EnterpriseTopazSidekickAssistCardProto_CardType+    EnterpriseTopazSidekickAssistCardProto_CardType+      ( EnterpriseTopazSidekickAssistCardProto_CardType_UNKNOWNTYPE,+        EnterpriseTopazSidekickAssistCardProto_CardType_Agenda,+        EnterpriseTopazSidekickAssistCardProto_CardType_Changelists,+        EnterpriseTopazSidekickAssistCardProto_CardType_CONFLICTINGMEETINGS,+        EnterpriseTopazSidekickAssistCardProto_CardType_CREATENOTESFORMEETING,+        EnterpriseTopazSidekickAssistCardProto_CardType_CREATENOTESFORMEETINGREQUEST,+        EnterpriseTopazSidekickAssistCardProto_CardType_CUSTOMERNEWS,+        EnterpriseTopazSidekickAssistCardProto_CardType_FINDMEETINGTIME,+        EnterpriseTopazSidekickAssistCardProto_CardType_NEXTMEETING,+        EnterpriseTopazSidekickAssistCardProto_CardType_PERSONALIZEDDOCS,+        EnterpriseTopazSidekickAssistCardProto_CardType_TRENDINGDOCS,+        EnterpriseTopazSidekickAssistCardProto_CardType_UPCOMINGTRIP,+        EnterpriseTopazSidekickAssistCardProto_CardType_Summary,+        EnterpriseTopazSidekickAssistCardProto_CardType_Meetings,+        EnterpriseTopazSidekickAssistCardProto_CardType_Homepage,+        EnterpriseTopazSidekickAssistCardProto_CardType_SHAREMEETINGDOCS,+        EnterpriseTopazSidekickAssistCardProto_CardType_DISCOVERPEOPLE,+        EnterpriseTopazSidekickAssistCardProto_CardType_HOMEPAGE_V3,+        EnterpriseTopazSidekickAssistCardProto_CardType_AGENDAGROUP,+        EnterpriseTopazSidekickAssistCardProto_CardType_WORKINPROGRESS,+        EnterpriseTopazSidekickAssistCardProto_CardType_GETANDKEEPAHEAD,+        EnterpriseTopazSidekickAssistCardProto_CardType_GENERICANSWERCARD,+        EnterpriseTopazSidekickAssistCardProto_CardType_THIRDPARTYANSWERCARD,+        EnterpriseTopazSidekickAssistCardProto_CardType_DOMAINTRENDINGDOCS,+        EnterpriseTopazSidekickAssistCardProto_CardType_TEAMTRENDINGDOCS,+        EnterpriseTopazSidekickAssistCardProto_CardType_DOCUMENTLISTANSWERCARD,+        EnterpriseTopazSidekickAssistCardProto_CardType_SUGGESTEDQUERYANSWERCARD,+        EnterpriseTopazSidekickAssistCardProto_CardType_PERSONANSWERCARD,+        EnterpriseTopazSidekickAssistCardProto_CardType_RELATEDPEOPLEANSWERCARD,+        EnterpriseTopazSidekickAssistCardProto_CardType_PERSONKNOWLEDGECARD,+        EnterpriseTopazSidekickAssistCardProto_CardType_PEOPLESEARCHPROMOTIONCARD,+        ..+      ),++    -- * EnterpriseTopazSidekickCardMetadata_CardCategory+    EnterpriseTopazSidekickCardMetadata_CardCategory+      ( EnterpriseTopazSidekickCardMetadata_CardCategory_Default,+        EnterpriseTopazSidekickCardMetadata_CardCategory_Answer,+        EnterpriseTopazSidekickCardMetadata_CardCategory_Knowledge,+        EnterpriseTopazSidekickCardMetadata_CardCategory_Homepage,+        ..+      ),++    -- * EnterpriseTopazSidekickCardMetadata_Chronology+    EnterpriseTopazSidekickCardMetadata_Chronology+      ( EnterpriseTopazSidekickCardMetadata_Chronology_Unknown,+        EnterpriseTopazSidekickCardMetadata_Chronology_Past,+        EnterpriseTopazSidekickCardMetadata_Chronology_RECENTLYPAST,+        EnterpriseTopazSidekickCardMetadata_Chronology_Present,+        EnterpriseTopazSidekickCardMetadata_Chronology_NEARFUTURE,+        EnterpriseTopazSidekickCardMetadata_Chronology_Future,+        ..+      ),++    -- * EnterpriseTopazSidekickCardMetadata_RenderMode+    EnterpriseTopazSidekickCardMetadata_RenderMode+      ( EnterpriseTopazSidekickCardMetadata_RenderMode_UNKNOWNRENDER,+        EnterpriseTopazSidekickCardMetadata_RenderMode_Collapsed,+        EnterpriseTopazSidekickCardMetadata_RenderMode_Expanded,+        ..+      ),++    -- * EnterpriseTopazSidekickCommonDocument_AccessType+    EnterpriseTopazSidekickCommonDocument_AccessType+      ( EnterpriseTopazSidekickCommonDocument_AccessType_UNKNOWNACCESS,+        EnterpriseTopazSidekickCommonDocument_AccessType_Allowed,+        EnterpriseTopazSidekickCommonDocument_AccessType_NOTALLOWED,+        ..+      ),++    -- * EnterpriseTopazSidekickCommonDocument_Provenance+    EnterpriseTopazSidekickCommonDocument_Provenance+      ( EnterpriseTopazSidekickCommonDocument_Provenance_UNKNOWNPROVENANCE,+        EnterpriseTopazSidekickCommonDocument_Provenance_CALENDARDESCRIPTION,+        EnterpriseTopazSidekickCommonDocument_Provenance_CALENDARATTACHMENT,+        EnterpriseTopazSidekickCommonDocument_Provenance_Mined,+        EnterpriseTopazSidekickCommonDocument_Provenance_CALENDARASSISTATTACHMENT,+        ..+      ),++    -- * EnterpriseTopazSidekickCommonDocument_Reason+    EnterpriseTopazSidekickCommonDocument_Reason+      ( EnterpriseTopazSidekickCommonDocument_Reason_Unknown,+        EnterpriseTopazSidekickCommonDocument_Reason_TRENDINGINCOLLABORATORS,+        EnterpriseTopazSidekickCommonDocument_Reason_TRENDINGINDOMAIN,+        EnterpriseTopazSidekickCommonDocument_Reason_FREQUENTLYVIEWED,+        EnterpriseTopazSidekickCommonDocument_Reason_FREQUENTLYEDITED,+        EnterpriseTopazSidekickCommonDocument_Reason_NEWUPDATES,+        EnterpriseTopazSidekickCommonDocument_Reason_NEWCOMMENTS,+        EnterpriseTopazSidekickCommonDocument_Reason_EVENTDESCRIPTION,+        EnterpriseTopazSidekickCommonDocument_Reason_EVENTATTACHMENT,+        EnterpriseTopazSidekickCommonDocument_Reason_EVENTMETADATAATTACHMENT,+        EnterpriseTopazSidekickCommonDocument_Reason_MINEDDOCUMENT,+        EnterpriseTopazSidekickCommonDocument_Reason_NEWMENTIONS,+        EnterpriseTopazSidekickCommonDocument_Reason_NEWSHARES,+        ..+      ),++    -- * EnterpriseTopazSidekickCommonDocument_Type+    EnterpriseTopazSidekickCommonDocument_Type+      ( EnterpriseTopazSidekickCommonDocument_Type_Unknown,+        EnterpriseTopazSidekickCommonDocument_Type_Document,+        EnterpriseTopazSidekickCommonDocument_Type_Presentation,+        EnterpriseTopazSidekickCommonDocument_Type_Spreadsheet,+        EnterpriseTopazSidekickCommonDocument_Type_Pdf,+        EnterpriseTopazSidekickCommonDocument_Type_Image,+        EnterpriseTopazSidekickCommonDocument_Type_BINARYBLOB,+        EnterpriseTopazSidekickCommonDocument_Type_FUSIONTABLE,+        EnterpriseTopazSidekickCommonDocument_Type_Folder,+        EnterpriseTopazSidekickCommonDocument_Type_Drawing,+        EnterpriseTopazSidekickCommonDocument_Type_Video,+        EnterpriseTopazSidekickCommonDocument_Type_Form,+        EnterpriseTopazSidekickCommonDocument_Type_LINKURL,+        EnterpriseTopazSidekickCommonDocument_Type_LINKGO,+        EnterpriseTopazSidekickCommonDocument_Type_LINKGOOGL,+        EnterpriseTopazSidekickCommonDocument_Type_LINKBITLY,+        EnterpriseTopazSidekickCommonDocument_Type_LINKGMAIL,+        EnterpriseTopazSidekickCommonDocument_Type_LINKMAILTO,+        EnterpriseTopazSidekickCommonDocument_Type_VIDEOYOUTUBE,+        EnterpriseTopazSidekickCommonDocument_Type_VIDEOLIVE,+        EnterpriseTopazSidekickCommonDocument_Type_Groups,+        EnterpriseTopazSidekickCommonDocument_Type_News,+        EnterpriseTopazSidekickCommonDocument_Type_Sites,+        EnterpriseTopazSidekickCommonDocument_Type_Hangout,+        EnterpriseTopazSidekickCommonDocument_Type_Audio,+        EnterpriseTopazSidekickCommonDocument_Type_MSWORD,+        EnterpriseTopazSidekickCommonDocument_Type_MSPOWERPOINT,+        EnterpriseTopazSidekickCommonDocument_Type_MSEXCEL,+        EnterpriseTopazSidekickCommonDocument_Type_MSOUTLOOK,+        ..+      ),++    -- * EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope+    EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope+      ( EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_UNKNOWNDOCUMENTSCOPE,+        EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_Limited,+        EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_DASHERDOMAINWITHLINK,+        EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_DASHERDOMAIN,+        EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_PUBLICWITHLINK,+        EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_Public,+        EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_TEAMDRIVE,+        ..+      ),++    -- * EnterpriseTopazSidekickCommonDocumentJustification_Reason+    EnterpriseTopazSidekickCommonDocumentJustification_Reason+      ( EnterpriseTopazSidekickCommonDocumentJustification_Reason_Unknown,+        EnterpriseTopazSidekickCommonDocumentJustification_Reason_TRENDINGINCOLLABORATORS,+        EnterpriseTopazSidekickCommonDocumentJustification_Reason_TRENDINGINDOMAIN,+        EnterpriseTopazSidekickCommonDocumentJustification_Reason_FREQUENTLYVIEWED,+        EnterpriseTopazSidekickCommonDocumentJustification_Reason_FREQUENTLYEDITED,+        EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWUPDATES,+        EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWCOMMENTS,+        EnterpriseTopazSidekickCommonDocumentJustification_Reason_EVENTDESCRIPTION,+        EnterpriseTopazSidekickCommonDocumentJustification_Reason_EVENTATTACHMENT,+        EnterpriseTopazSidekickCommonDocumentJustification_Reason_EVENTMETADATAATTACHMENT,+        EnterpriseTopazSidekickCommonDocumentJustification_Reason_MINEDDOCUMENT,+        EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWMENTIONS,+        EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWSHARES,+        ..+      ),++    -- * EnterpriseTopazSidekickDocumentGroup_GroupType+    EnterpriseTopazSidekickDocumentGroup_GroupType+      ( EnterpriseTopazSidekickDocumentGroup_GroupType_UNKNOWNTYPE,+        EnterpriseTopazSidekickDocumentGroup_GroupType_All,+        ..+      ),++    -- * EnterpriseTopazSidekickDocumentPerCategoryList_ListType+    EnterpriseTopazSidekickDocumentPerCategoryList_ListType+      ( EnterpriseTopazSidekickDocumentPerCategoryList_ListType_UNKNOWNLISTTYPE,+        EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Mentions,+        EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Shares,+        EnterpriseTopazSidekickDocumentPerCategoryList_ListType_NEEDSATTENTION,+        EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Views,+        EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Edits,+        ..+      ),++    -- * EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+    EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+      ( EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_UNKNOWNDOCUMENT,+        EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Actionable,+        EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Viewed,+        EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Replied,+        EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_MENTIONVIEWED,+        EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_MENTIONREPLIED,+        EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_MENTIONNOTVIEWED,+        EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_SHAREDANDVIEWED,+        EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_SHAREDNOTVIEWED,+        EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Edited,+        ..+      ),++    -- * EnterpriseTopazSidekickMeetingNotesCardError_Reason+    EnterpriseTopazSidekickMeetingNotesCardError_Reason+      ( EnterpriseTopazSidekickMeetingNotesCardError_Reason_None,+        EnterpriseTopazSidekickMeetingNotesCardError_Reason_NOTOWNER,+        EnterpriseTopazSidekickMeetingNotesCardError_Reason_Unknown,+        ..+      ),++    -- * EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem+    EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem+      ( EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem_Unknown,+        EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem_Myself,+        EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem_ALLATTENDEES,+        ..+      ),++    -- * EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus+    EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus+      ( EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_Unknown,+        EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_Success,+        EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_MISSINGPERSON,+        EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_MISSINGDATA,+        ..+      ),++    -- * EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType+    EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType+      ( EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_Unknown,+        EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_DIRECTREPORTS,+        EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_Manager,+        EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_Peers,+        ..+      ),++    -- * EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus+    EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus+      ( EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_Unknown,+        EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_Success,+        EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_MISSINGPERSON,+        EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_MISSINGDATA,+        ..+      ),++    -- * EnterpriseTopazSidekickPerson_AffinityLevel+    EnterpriseTopazSidekickPerson_AffinityLevel+      ( EnterpriseTopazSidekickPerson_AffinityLevel_Unknown,+        EnterpriseTopazSidekickPerson_AffinityLevel_Low,+        EnterpriseTopazSidekickPerson_AffinityLevel_Medium,+        EnterpriseTopazSidekickPerson_AffinityLevel_High,+        ..+      ),++    -- * EnterpriseTopazSidekickPerson_AttendingStatus+    EnterpriseTopazSidekickPerson_AttendingStatus+      ( EnterpriseTopazSidekickPerson_AttendingStatus_Awaiting,+        EnterpriseTopazSidekickPerson_AttendingStatus_Yes,+        EnterpriseTopazSidekickPerson_AttendingStatus_NO,+        EnterpriseTopazSidekickPerson_AttendingStatus_Maybe,+        ..+      ),++    -- * EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation+    EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation+      ( EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation_Unknown,+        EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation_Manager,+        EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation_DIRECTREPORT,+        ..+      ),++    -- * EnterpriseTopazSidekickRankingParams_Priority+    EnterpriseTopazSidekickRankingParams_Priority+      ( EnterpriseTopazSidekickRankingParams_Priority_Unknown,+        EnterpriseTopazSidekickRankingParams_Priority_Critical,+        EnterpriseTopazSidekickRankingParams_Priority_Important,+        EnterpriseTopazSidekickRankingParams_Priority_High,+        EnterpriseTopazSidekickRankingParams_Priority_Normal,+        EnterpriseTopazSidekickRankingParams_Priority_BESTEFFORT,+        ..+      ),++    -- * EnterpriseTopazSidekickRankingParams_Type+    EnterpriseTopazSidekickRankingParams_Type+      ( EnterpriseTopazSidekickRankingParams_Type_Fixed,+        EnterpriseTopazSidekickRankingParams_Type_Flexible,+        ..+      ),++    -- * EnumPropertyOptions_OrderedRanking+    EnumPropertyOptions_OrderedRanking+      ( EnumPropertyOptions_OrderedRanking_NOORDER,+        EnumPropertyOptions_OrderedRanking_Ascending,+        EnumPropertyOptions_OrderedRanking_Descending,+        ..+      ),++    -- * IndexItemRequest_Mode+    IndexItemRequest_Mode+      ( IndexItemRequest_Mode_Unspecified,+        IndexItemRequest_Mode_Synchronous,+        IndexItemRequest_Mode_Asynchronous,+        ..+      ),++    -- * IntegerPropertyOptions_OrderedRanking+    IntegerPropertyOptions_OrderedRanking+      ( IntegerPropertyOptions_OrderedRanking_NOORDER,+        IntegerPropertyOptions_OrderedRanking_Ascending,+        IntegerPropertyOptions_OrderedRanking_Descending,+        ..+      ),++    -- * Interaction_Type+    Interaction_Type+      ( Interaction_Type_Unspecified,+        Interaction_Type_View,+        Interaction_Type_Edit,+        ..+      ),++    -- * Item_ItemType+    Item_ItemType+      ( Item_ItemType_Unspecified,+        Item_ItemType_CONTENTITEM,+        Item_ItemType_CONTAINERITEM,+        Item_ItemType_VIRTUALCONTAINERITEM,+        ..+      ),++    -- * ItemAcl_AclInheritanceType+    ItemAcl_AclInheritanceType+      ( ItemAcl_AclInheritanceType_NOTAPPLICABLE,+        ItemAcl_AclInheritanceType_CHILDOVERRIDE,+        ItemAcl_AclInheritanceType_PARENTOVERRIDE,+        ItemAcl_AclInheritanceType_BOTHPERMIT,+        ..+      ),++    -- * ItemContent_ContentFormat+    ItemContent_ContentFormat+      ( ItemContent_ContentFormat_Unspecified,+        ItemContent_ContentFormat_Html,+        ItemContent_ContentFormat_Text,+        ItemContent_ContentFormat_Raw,+        ..+      ),++    -- * ItemCountByStatus_StatusCode+    ItemCountByStatus_StatusCode+      ( ItemCountByStatus_StatusCode_CODEUNSPECIFIED,+        ItemCountByStatus_StatusCode_Error',+        ItemCountByStatus_StatusCode_Modified,+        ItemCountByStatus_StatusCode_NEWITEM,+        ItemCountByStatus_StatusCode_Accepted,+        ..+      ),++    -- * ItemStatus_Code+    ItemStatus_Code+      ( ItemStatus_Code_CODEUNSPECIFIED,+        ItemStatus_Code_Error',+        ItemStatus_Code_Modified,+        ItemStatus_Code_NEWITEM,+        ItemStatus_Code_Accepted,+        ..+      ),++    -- * PersonCore_AvailabilityStatus+    PersonCore_AvailabilityStatus+      ( PersonCore_AvailabilityStatus_Unknown,+        PersonCore_AvailabilityStatus_OUTOFOFFICE,+        PersonCore_AvailabilityStatus_OUTSIDEWORKINGHOURS,+        PersonCore_AvailabilityStatus_Available,+        ..+      ),++    -- * PhoneNumber_Type+    PhoneNumber_Type+      ( PhoneNumber_Type_Other,+        PhoneNumber_Type_Mobile,+        PhoneNumber_Type_Office,+        ..+      ),++    -- * PollItemsRequest_StatusCodesItem+    PollItemsRequest_StatusCodesItem+      ( PollItemsRequest_StatusCodesItem_CODEUNSPECIFIED,+        PollItemsRequest_StatusCodesItem_Error',+        PollItemsRequest_StatusCodesItem_Modified,+        PollItemsRequest_StatusCodesItem_NEWITEM,+        PollItemsRequest_StatusCodesItem_Accepted,+        ..+      ),++    -- * ProcessingError_Code+    ProcessingError_Code+      ( ProcessingError_Code_PROCESSINGERRORCODEUNSPECIFIED,+        ProcessingError_Code_MALFORMEDREQUEST,+        ProcessingError_Code_UNSUPPORTEDCONTENTFORMAT,+        ProcessingError_Code_INDIRECTBROKENACL,+        ProcessingError_Code_ACLCYCLE,+        ..+      ),++    -- * PushItem_Type+    PushItem_Type+      ( PushItem_Type_Unspecified,+        PushItem_Type_Modified,+        PushItem_Type_NOTMODIFIED,+        PushItem_Type_REPOSITORYERROR,+        PushItem_Type_Requeue,+        ..+      ),++    -- * QueryInterpretation_InterpretationType+    QueryInterpretation_InterpretationType+      ( QueryInterpretation_InterpretationType_None,+        QueryInterpretation_InterpretationType_Blend,+        QueryInterpretation_InterpretationType_Replace,+        ..+      ),++    -- * QueryInterpretation_Reason+    QueryInterpretation_Reason+      ( QueryInterpretation_Reason_Unspecified,+        QueryInterpretation_Reason_QUERYHASNATURALLANGUAGEINTENT,+        QueryInterpretation_Reason_NOTENOUGHRESULTSFOUNDFORUSERQUERY,+        ..+      ),++    -- * QueryOperator_Type+    QueryOperator_Type+      ( QueryOperator_Type_Unknown,+        QueryOperator_Type_Integer,+        QueryOperator_Type_Double,+        QueryOperator_Type_Timestamp,+        QueryOperator_Type_Boolean,+        QueryOperator_Type_Enum',+        QueryOperator_Type_Date,+        QueryOperator_Type_Text,+        QueryOperator_Type_Html,+        ..+      ),++    -- * RepositoryError_Type+    RepositoryError_Type+      ( RepositoryError_Type_Unknown,+        RepositoryError_Type_NETWORKERROR,+        RepositoryError_Type_DNSERROR,+        RepositoryError_Type_CONNECTIONERROR,+        RepositoryError_Type_AUTHENTICATIONERROR,+        RepositoryError_Type_AUTHORIZATIONERROR,+        RepositoryError_Type_SERVERERROR,+        RepositoryError_Type_QUOTAEXCEEDED,+        RepositoryError_Type_SERVICEUNAVAILABLE,+        RepositoryError_Type_CLIENTERROR,+        ..+      ),++    -- * RetrievalImportance_Importance+    RetrievalImportance_Importance+      ( RetrievalImportance_Importance_Default,+        RetrievalImportance_Importance_Highest,+        RetrievalImportance_Importance_High,+        RetrievalImportance_Importance_Low,+        RetrievalImportance_Importance_None,+        ..+      ),++    -- * SortOptions_SortOrder+    SortOptions_SortOrder+      ( SortOptions_SortOrder_Ascending,+        SortOptions_SortOrder_Descending,+        ..+      ),++    -- * Source_PredefinedSource+    Source_PredefinedSource+      ( Source_PredefinedSource_None,+        Source_PredefinedSource_QUERYHISTORY,+        Source_PredefinedSource_Person,+        Source_PredefinedSource_GOOGLEDRIVE,+        Source_PredefinedSource_GOOGLEGMAIL,+        Source_PredefinedSource_GOOGLESITES,+        Source_PredefinedSource_GOOGLEGROUPS,+        Source_PredefinedSource_GOOGLECALENDAR,+        Source_PredefinedSource_GOOGLEKEEP,+        ..+      ),++    -- * SourceScoringConfig_SourceImportance+    SourceScoringConfig_SourceImportance+      ( SourceScoringConfig_SourceImportance_Default,+        SourceScoringConfig_SourceImportance_Low,+        SourceScoringConfig_SourceImportance_High,+        ..+      ),++    -- * SpellResult_SuggestionType+    SpellResult_SuggestionType+      ( SpellResult_SuggestionType_SUGGESTIONTYPEUNSPECIFIED,+        SpellResult_SuggestionType_NONEMPTYRESULTSSPELLSUGGESTION,+        SpellResult_SuggestionType_ZERORESULTSFULLPAGEREPLACEMENT,+        ..+      ),++    -- * UnmappedIdentity_ResolutionStatusCode+    UnmappedIdentity_ResolutionStatusCode+      ( UnmappedIdentity_ResolutionStatusCode_CODEUNSPECIFIED,+        UnmappedIdentity_ResolutionStatusCode_NOTFOUND,+        UnmappedIdentity_ResolutionStatusCode_IDENTITYSOURCENOTFOUND,+        UnmappedIdentity_ResolutionStatusCode_IDENTITYSOURCEMISCONFIGURED,+        UnmappedIdentity_ResolutionStatusCode_TOOMANYMAPPINGSFOUND,+        UnmappedIdentity_ResolutionStatusCode_INTERNALERROR,+        ..+      ),++    -- * DebugIdentitysourcesUnmappedidsListResolutionStatusCode+    DebugIdentitysourcesUnmappedidsListResolutionStatusCode+      ( DebugIdentitysourcesUnmappedidsListResolutionStatusCode_CODEUNSPECIFIED,+        DebugIdentitysourcesUnmappedidsListResolutionStatusCode_NOTFOUND,+        DebugIdentitysourcesUnmappedidsListResolutionStatusCode_IDENTITYSOURCENOTFOUND,+        DebugIdentitysourcesUnmappedidsListResolutionStatusCode_IDENTITYSOURCEMISCONFIGURED,+        DebugIdentitysourcesUnmappedidsListResolutionStatusCode_TOOMANYMAPPINGSFOUND,+        DebugIdentitysourcesUnmappedidsListResolutionStatusCode_INTERNALERROR,+        ..+      ),++    -- * IndexingDatasourcesItemsDeleteMode+    IndexingDatasourcesItemsDeleteMode+      ( IndexingDatasourcesItemsDeleteMode_Unspecified,+        IndexingDatasourcesItemsDeleteMode_Synchronous,+        IndexingDatasourcesItemsDeleteMode_Asynchronous,+        ..+      ),+  )+where++import Gogol.Prelude qualified as Core++-- | V1 error format.+newtype Xgafv = Xgafv {fromXgafv :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | v1 error format+pattern Xgafv_1 :: Xgafv+pattern Xgafv_1 = Xgafv "1"++-- | v2 error format+pattern Xgafv_2 :: Xgafv+pattern Xgafv_2 = Xgafv "2"++{-# COMPLETE+  Xgafv_1,+  Xgafv_2,+  Xgafv+  #-}++-- | [Optional] Color of the background. The text color can change depending on the selected background color, and the client does not have control over this. If missing, the background will be WHITE.+newtype BackgroundColoredText_BackgroundColor = BackgroundColoredText_BackgroundColor {fromBackgroundColoredText_BackgroundColor :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern BackgroundColoredText_BackgroundColor_UNKNOWNCOLOR :: BackgroundColoredText_BackgroundColor+pattern BackgroundColoredText_BackgroundColor_UNKNOWNCOLOR = BackgroundColoredText_BackgroundColor "UNKNOWN_COLOR"++pattern BackgroundColoredText_BackgroundColor_White :: BackgroundColoredText_BackgroundColor+pattern BackgroundColoredText_BackgroundColor_White = BackgroundColoredText_BackgroundColor "WHITE"++pattern BackgroundColoredText_BackgroundColor_Yellow :: BackgroundColoredText_BackgroundColor+pattern BackgroundColoredText_BackgroundColor_Yellow = BackgroundColoredText_BackgroundColor "YELLOW"++pattern BackgroundColoredText_BackgroundColor_Orange :: BackgroundColoredText_BackgroundColor+pattern BackgroundColoredText_BackgroundColor_Orange = BackgroundColoredText_BackgroundColor "ORANGE"++pattern BackgroundColoredText_BackgroundColor_Green :: BackgroundColoredText_BackgroundColor+pattern BackgroundColoredText_BackgroundColor_Green = BackgroundColoredText_BackgroundColor "GREEN"++pattern BackgroundColoredText_BackgroundColor_Blue :: BackgroundColoredText_BackgroundColor+pattern BackgroundColoredText_BackgroundColor_Blue = BackgroundColoredText_BackgroundColor "BLUE"++pattern BackgroundColoredText_BackgroundColor_Grey :: BackgroundColoredText_BackgroundColor+pattern BackgroundColoredText_BackgroundColor_Grey = BackgroundColoredText_BackgroundColor "GREY"++{-# COMPLETE+  BackgroundColoredText_BackgroundColor_UNKNOWNCOLOR,+  BackgroundColoredText_BackgroundColor_White,+  BackgroundColoredText_BackgroundColor_Yellow,+  BackgroundColoredText_BackgroundColor_Orange,+  BackgroundColoredText_BackgroundColor_Green,+  BackgroundColoredText_BackgroundColor_Blue,+  BackgroundColoredText_BackgroundColor_Grey,+  BackgroundColoredText_BackgroundColor+  #-}++-- | The logic operator of the sub filter.+newtype CompositeFilter_LogicOperator = CompositeFilter_LogicOperator {fromCompositeFilter_LogicOperator :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Logical operators, which can only be applied to sub filters.+pattern CompositeFilter_LogicOperator_And :: CompositeFilter_LogicOperator+pattern CompositeFilter_LogicOperator_And = CompositeFilter_LogicOperator "AND"++pattern CompositeFilter_LogicOperator_OR :: CompositeFilter_LogicOperator+pattern CompositeFilter_LogicOperator_OR = CompositeFilter_LogicOperator "OR"++-- | NOT can only be applied on a single sub filter.+pattern CompositeFilter_LogicOperator_Not :: CompositeFilter_LogicOperator+pattern CompositeFilter_LogicOperator_Not = CompositeFilter_LogicOperator "NOT"++{-# COMPLETE+  CompositeFilter_LogicOperator_And,+  CompositeFilter_LogicOperator_OR,+  CompositeFilter_LogicOperator_Not,+  CompositeFilter_LogicOperator+  #-}++newtype Context_AppItem = Context_AppItem {fromContext_AppItem :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern Context_AppItem_UNKNOWNAPP :: Context_AppItem+pattern Context_AppItem_UNKNOWNAPP = Context_AppItem "UNKNOWN_APP"++pattern Context_AppItem_Topaz :: Context_AppItem+pattern Context_AppItem_Topaz = Context_AppItem "TOPAZ"++pattern Context_AppItem_Moma :: Context_AppItem+pattern Context_AppItem_Moma = Context_AppItem "MOMA"++{-# COMPLETE+  Context_AppItem_UNKNOWNAPP,+  Context_AppItem_Topaz,+  Context_AppItem_Moma,+  Context_AppItem+  #-}++newtype Context_SurfaceItem = Context_SurfaceItem {fromContext_SurfaceItem :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern Context_SurfaceItem_UNKNOWNSURFACE :: Context_SurfaceItem+pattern Context_SurfaceItem_UNKNOWNSURFACE = Context_SurfaceItem "UNKNOWN_SURFACE"++pattern Context_SurfaceItem_Desktop :: Context_SurfaceItem+pattern Context_SurfaceItem_Desktop = Context_SurfaceItem "DESKTOP"++pattern Context_SurfaceItem_Android :: Context_SurfaceItem+pattern Context_SurfaceItem_Android = Context_SurfaceItem "ANDROID"++pattern Context_SurfaceItem_Ios :: Context_SurfaceItem+pattern Context_SurfaceItem_Ios = Context_SurfaceItem "IOS"++-- | Any mobile device.+pattern Context_SurfaceItem_Mobile :: Context_SurfaceItem+pattern Context_SurfaceItem_Mobile = Context_SurfaceItem "MOBILE"++pattern Context_SurfaceItem_Any :: Context_SurfaceItem+pattern Context_SurfaceItem_Any = Context_SurfaceItem "ANY"++{-# COMPLETE+  Context_SurfaceItem_UNKNOWNSURFACE,+  Context_SurfaceItem_Desktop,+  Context_SurfaceItem_Android,+  Context_SurfaceItem_Ios,+  Context_SurfaceItem_Mobile,+  Context_SurfaceItem_Any,+  Context_SurfaceItem+  #-}++newtype Context_TypeItem = Context_TypeItem {fromContext_TypeItem :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern Context_TypeItem_UNKNOWNCARDTYPE :: Context_TypeItem+pattern Context_TypeItem_UNKNOWNCARDTYPE = Context_TypeItem "UNKNOWN_CARD_TYPE"++pattern Context_TypeItem_HOMEPAGECARD :: Context_TypeItem+pattern Context_TypeItem_HOMEPAGECARD = Context_TypeItem "HOMEPAGE_CARD"++pattern Context_TypeItem_ANSWERCARD :: Context_TypeItem+pattern Context_TypeItem_ANSWERCARD = Context_TypeItem "ANSWER_CARD"++pattern Context_TypeItem_RHSCARD :: Context_TypeItem+pattern Context_TypeItem_RHSCARD = Context_TypeItem "RHS_CARD"++{-# COMPLETE+  Context_TypeItem_UNKNOWNCARDTYPE,+  Context_TypeItem_HOMEPAGECARD,+  Context_TypeItem_ANSWERCARD,+  Context_TypeItem_RHSCARD,+  Context_TypeItem+  #-}++newtype DriveFollowUpRestrict_Type = DriveFollowUpRestrict_Type {fromDriveFollowUpRestrict_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern DriveFollowUpRestrict_Type_Unspecified :: DriveFollowUpRestrict_Type+pattern DriveFollowUpRestrict_Type_Unspecified = DriveFollowUpRestrict_Type "UNSPECIFIED"++pattern DriveFollowUpRestrict_Type_FOLLOWUPSUGGESTIONS :: DriveFollowUpRestrict_Type+pattern DriveFollowUpRestrict_Type_FOLLOWUPSUGGESTIONS = DriveFollowUpRestrict_Type "FOLLOWUP_SUGGESTIONS"++pattern DriveFollowUpRestrict_Type_FOLLOWUPACTIONITEMS :: DriveFollowUpRestrict_Type+pattern DriveFollowUpRestrict_Type_FOLLOWUPACTIONITEMS = DriveFollowUpRestrict_Type "FOLLOWUP_ACTION_ITEMS"++{-# COMPLETE+  DriveFollowUpRestrict_Type_Unspecified,+  DriveFollowUpRestrict_Type_FOLLOWUPSUGGESTIONS,+  DriveFollowUpRestrict_Type_FOLLOWUPACTIONITEMS,+  DriveFollowUpRestrict_Type+  #-}++newtype DriveLocationRestrict_Type = DriveLocationRestrict_Type {fromDriveLocationRestrict_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern DriveLocationRestrict_Type_Unspecified :: DriveLocationRestrict_Type+pattern DriveLocationRestrict_Type_Unspecified = DriveLocationRestrict_Type "UNSPECIFIED"++pattern DriveLocationRestrict_Type_Trashed :: DriveLocationRestrict_Type+pattern DriveLocationRestrict_Type_Trashed = DriveLocationRestrict_Type "TRASHED"++pattern DriveLocationRestrict_Type_Starred :: DriveLocationRestrict_Type+pattern DriveLocationRestrict_Type_Starred = DriveLocationRestrict_Type "STARRED"++{-# COMPLETE+  DriveLocationRestrict_Type_Unspecified,+  DriveLocationRestrict_Type_Trashed,+  DriveLocationRestrict_Type_Starred,+  DriveLocationRestrict_Type+  #-}++newtype DriveMimeTypeRestrict_Type = DriveMimeTypeRestrict_Type {fromDriveMimeTypeRestrict_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern DriveMimeTypeRestrict_Type_Unspecified :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Unspecified = DriveMimeTypeRestrict_Type "UNSPECIFIED"++pattern DriveMimeTypeRestrict_Type_Pdf :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Pdf = DriveMimeTypeRestrict_Type "PDF"++pattern DriveMimeTypeRestrict_Type_Document :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Document = DriveMimeTypeRestrict_Type "DOCUMENT"++pattern DriveMimeTypeRestrict_Type_Presentation :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Presentation = DriveMimeTypeRestrict_Type "PRESENTATION"++pattern DriveMimeTypeRestrict_Type_Spreadsheet :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Spreadsheet = DriveMimeTypeRestrict_Type "SPREADSHEET"++pattern DriveMimeTypeRestrict_Type_Form :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Form = DriveMimeTypeRestrict_Type "FORM"++pattern DriveMimeTypeRestrict_Type_Drawing :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Drawing = DriveMimeTypeRestrict_Type "DRAWING"++pattern DriveMimeTypeRestrict_Type_Script :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Script = DriveMimeTypeRestrict_Type "SCRIPT"++pattern DriveMimeTypeRestrict_Type_Map :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Map = DriveMimeTypeRestrict_Type "MAP"++pattern DriveMimeTypeRestrict_Type_Image :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Image = DriveMimeTypeRestrict_Type "IMAGE"++pattern DriveMimeTypeRestrict_Type_Audio :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Audio = DriveMimeTypeRestrict_Type "AUDIO"++pattern DriveMimeTypeRestrict_Type_Video :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Video = DriveMimeTypeRestrict_Type "VIDEO"++pattern DriveMimeTypeRestrict_Type_Folder :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Folder = DriveMimeTypeRestrict_Type "FOLDER"++pattern DriveMimeTypeRestrict_Type_Archive :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Archive = DriveMimeTypeRestrict_Type "ARCHIVE"++pattern DriveMimeTypeRestrict_Type_Site :: DriveMimeTypeRestrict_Type+pattern DriveMimeTypeRestrict_Type_Site = DriveMimeTypeRestrict_Type "SITE"++{-# COMPLETE+  DriveMimeTypeRestrict_Type_Unspecified,+  DriveMimeTypeRestrict_Type_Pdf,+  DriveMimeTypeRestrict_Type_Document,+  DriveMimeTypeRestrict_Type_Presentation,+  DriveMimeTypeRestrict_Type_Spreadsheet,+  DriveMimeTypeRestrict_Type_Form,+  DriveMimeTypeRestrict_Type_Drawing,+  DriveMimeTypeRestrict_Type_Script,+  DriveMimeTypeRestrict_Type_Map,+  DriveMimeTypeRestrict_Type_Image,+  DriveMimeTypeRestrict_Type_Audio,+  DriveMimeTypeRestrict_Type_Video,+  DriveMimeTypeRestrict_Type_Folder,+  DriveMimeTypeRestrict_Type_Archive,+  DriveMimeTypeRestrict_Type_Site,+  DriveMimeTypeRestrict_Type+  #-}++newtype DriveTimeSpanRestrict_Type = DriveTimeSpanRestrict_Type {fromDriveTimeSpanRestrict_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern DriveTimeSpanRestrict_Type_Unspecified :: DriveTimeSpanRestrict_Type+pattern DriveTimeSpanRestrict_Type_Unspecified = DriveTimeSpanRestrict_Type "UNSPECIFIED"++pattern DriveTimeSpanRestrict_Type_Today :: DriveTimeSpanRestrict_Type+pattern DriveTimeSpanRestrict_Type_Today = DriveTimeSpanRestrict_Type "TODAY"++pattern DriveTimeSpanRestrict_Type_Yesterday :: DriveTimeSpanRestrict_Type+pattern DriveTimeSpanRestrict_Type_Yesterday = DriveTimeSpanRestrict_Type "YESTERDAY"++pattern DriveTimeSpanRestrict_Type_LAST7DAYS :: DriveTimeSpanRestrict_Type+pattern DriveTimeSpanRestrict_Type_LAST7DAYS = DriveTimeSpanRestrict_Type "LAST_7_DAYS"++-- | Not Enabled+pattern DriveTimeSpanRestrict_Type_LAST30DAYS :: DriveTimeSpanRestrict_Type+pattern DriveTimeSpanRestrict_Type_LAST30DAYS = DriveTimeSpanRestrict_Type "LAST_30_DAYS"++-- | Not Enabled+pattern DriveTimeSpanRestrict_Type_LAST90DAYS :: DriveTimeSpanRestrict_Type+pattern DriveTimeSpanRestrict_Type_LAST90DAYS = DriveTimeSpanRestrict_Type "LAST_90_DAYS"++{-# COMPLETE+  DriveTimeSpanRestrict_Type_Unspecified,+  DriveTimeSpanRestrict_Type_Today,+  DriveTimeSpanRestrict_Type_Yesterday,+  DriveTimeSpanRestrict_Type_LAST7DAYS,+  DriveTimeSpanRestrict_Type_LAST30DAYS,+  DriveTimeSpanRestrict_Type_LAST90DAYS,+  DriveTimeSpanRestrict_Type+  #-}++newtype EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type = EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type {fromEnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Unknown :: EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type+pattern EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Unknown = EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type "UNKNOWN"++pattern EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Mobile :: EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type+pattern EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Mobile = EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type "MOBILE"++pattern EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Office :: EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type+pattern EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Office = EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type "OFFICE"++pattern EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Other :: EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type+pattern EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Other = EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type "OTHER"++{-# COMPLETE+  EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Unknown,+  EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Mobile,+  EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Office,+  EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type_Other,+  EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type+  #-}++-- | The chronology from the present.+newtype EnterpriseTopazSidekickAgendaEntry_Chronology = EnterpriseTopazSidekickAgendaEntry_Chronology {fromEnterpriseTopazSidekickAgendaEntry_Chronology :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Stale.+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_Stale :: EnterpriseTopazSidekickAgendaEntry_Chronology+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_Stale = EnterpriseTopazSidekickAgendaEntry_Chronology "STALE"++-- | All day.+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_ALLDAY :: EnterpriseTopazSidekickAgendaEntry_Chronology+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_ALLDAY = EnterpriseTopazSidekickAgendaEntry_Chronology "ALL_DAY"++-- | Past.+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_Past :: EnterpriseTopazSidekickAgendaEntry_Chronology+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_Past = EnterpriseTopazSidekickAgendaEntry_Chronology "PAST"++-- | Recently past.+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_RECENTLYPAST :: EnterpriseTopazSidekickAgendaEntry_Chronology+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_RECENTLYPAST = EnterpriseTopazSidekickAgendaEntry_Chronology "RECENTLY_PAST"++-- | Present.+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_Present :: EnterpriseTopazSidekickAgendaEntry_Chronology+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_Present = EnterpriseTopazSidekickAgendaEntry_Chronology "PRESENT"++-- | Near future.+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_NEARFUTURE :: EnterpriseTopazSidekickAgendaEntry_Chronology+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_NEARFUTURE = EnterpriseTopazSidekickAgendaEntry_Chronology "NEAR_FUTURE"++-- | Future.+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_Future :: EnterpriseTopazSidekickAgendaEntry_Chronology+pattern EnterpriseTopazSidekickAgendaEntry_Chronology_Future = EnterpriseTopazSidekickAgendaEntry_Chronology "FUTURE"++{-# COMPLETE+  EnterpriseTopazSidekickAgendaEntry_Chronology_Stale,+  EnterpriseTopazSidekickAgendaEntry_Chronology_ALLDAY,+  EnterpriseTopazSidekickAgendaEntry_Chronology_Past,+  EnterpriseTopazSidekickAgendaEntry_Chronology_RECENTLYPAST,+  EnterpriseTopazSidekickAgendaEntry_Chronology_Present,+  EnterpriseTopazSidekickAgendaEntry_Chronology_NEARFUTURE,+  EnterpriseTopazSidekickAgendaEntry_Chronology_Future,+  EnterpriseTopazSidekickAgendaEntry_Chronology+  #-}++-- | Attendance status for the current user making the request. This is a convenience data member in order to avoid figuring out the same by iterating the invitee list above on the caller side.+newtype EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus = EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus {fromEnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Awaiting for the user to set the status.+pattern EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_Awaiting :: EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus+pattern EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_Awaiting = EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus "AWAITING"++-- | Attending.+pattern EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_Yes :: EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus+pattern EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_Yes = EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus "YES"++-- | Not attending.+pattern EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_NO :: EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus+pattern EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_NO = EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus "NO"++-- | Tentatively attending.+pattern EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_Maybe :: EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus+pattern EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_Maybe = EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus "MAYBE"++{-# COMPLETE+  EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_Awaiting,+  EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_Yes,+  EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_NO,+  EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus_Maybe,+  EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus+  #-}++-- | Represents restrictions applied to the events requested in the user\'s query.+newtype EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict = EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict {fromEnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | No specific event was requested.+pattern EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict_None :: EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict+pattern EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict_None = EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict "NONE"++-- | The next meeting was requested.+pattern EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict_NEXTMEETING :: EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict+pattern EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict_NEXTMEETING = EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict "NEXT_MEETING"++{-# COMPLETE+  EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict_None,+  EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict_NEXTMEETING,+  EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict+  #-}++-- | Answer type.+newtype EnterpriseTopazSidekickAnswerAnswerList_Type = EnterpriseTopazSidekickAnswerAnswerList_Type {fromEnterpriseTopazSidekickAnswerAnswerList_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern EnterpriseTopazSidekickAnswerAnswerList_Type_Unknown :: EnterpriseTopazSidekickAnswerAnswerList_Type+pattern EnterpriseTopazSidekickAnswerAnswerList_Type_Unknown = EnterpriseTopazSidekickAnswerAnswerList_Type "UNKNOWN"++pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONADDRESS :: EnterpriseTopazSidekickAnswerAnswerList_Type+pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONADDRESS = EnterpriseTopazSidekickAnswerAnswerList_Type "PERSON_ADDRESS"++pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONBIRTHDAY :: EnterpriseTopazSidekickAnswerAnswerList_Type+pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONBIRTHDAY = EnterpriseTopazSidekickAnswerAnswerList_Type "PERSON_BIRTHDAY"++pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONDEPARTMENT :: EnterpriseTopazSidekickAnswerAnswerList_Type+pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONDEPARTMENT = EnterpriseTopazSidekickAnswerAnswerList_Type "PERSON_DEPARTMENT"++pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONDESKLOCATION :: EnterpriseTopazSidekickAnswerAnswerList_Type+pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONDESKLOCATION = EnterpriseTopazSidekickAnswerAnswerList_Type "PERSON_DESK_LOCATION"++pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONEMAIL :: EnterpriseTopazSidekickAnswerAnswerList_Type+pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONEMAIL = EnterpriseTopazSidekickAnswerAnswerList_Type "PERSON_EMAIL"++pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONJOBTITLE :: EnterpriseTopazSidekickAnswerAnswerList_Type+pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONJOBTITLE = EnterpriseTopazSidekickAnswerAnswerList_Type "PERSON_JOB_TITLE"++pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONPHONE :: EnterpriseTopazSidekickAnswerAnswerList_Type+pattern EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONPHONE = EnterpriseTopazSidekickAnswerAnswerList_Type "PERSON_PHONE"++{-# COMPLETE+  EnterpriseTopazSidekickAnswerAnswerList_Type_Unknown,+  EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONADDRESS,+  EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONBIRTHDAY,+  EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONDEPARTMENT,+  EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONDESKLOCATION,+  EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONEMAIL,+  EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONJOBTITLE,+  EnterpriseTopazSidekickAnswerAnswerList_Type_PERSONPHONE,+  EnterpriseTopazSidekickAnswerAnswerList_Type+  #-}++-- | The query list category.+newtype EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category = EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category {fromEnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown.+pattern EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_Unknown :: EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category+pattern EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_Unknown = EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category "UNKNOWN"++-- | Calendar based queries (e.g. \"my agenda for tomorrow\").+pattern EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_Calendar :: EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category+pattern EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_Calendar = EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category "CALENDAR"++-- | Document based queries (e.g. \"files shared with me\").+pattern EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_Document :: EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category+pattern EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_Document = EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category "DOCUMENT"++-- | People based queries (e.g. \"what is x\'s email address?\").+pattern EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_People :: EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category+pattern EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_People = EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category "PEOPLE"++{-# COMPLETE+  EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_Unknown,+  EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_Calendar,+  EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_Document,+  EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category_People,+  EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category+  #-}++-- | Card type.+newtype EnterpriseTopazSidekickAssistCardProto_CardType = EnterpriseTopazSidekickAssistCardProto_CardType {fromEnterpriseTopazSidekickAssistCardProto_CardType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | The default type, an unknown card type.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_UNKNOWNTYPE :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_UNKNOWNTYPE = EnterpriseTopazSidekickAssistCardProto_CardType "UNKNOWN_TYPE"++-- | The user\'s agenda for the day.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_Agenda :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_Agenda = EnterpriseTopazSidekickAssistCardProto_CardType "AGENDA"++-- | Changelists.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_Changelists :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_Changelists = EnterpriseTopazSidekickAssistCardProto_CardType "CHANGELISTS"++-- | Any group of meetings for the day that are overlapping.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_CONFLICTINGMEETINGS :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_CONFLICTINGMEETINGS = EnterpriseTopazSidekickAssistCardProto_CardType "CONFLICTING_MEETINGS"++-- | Create notes for a meeting specified in the request.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_CREATENOTESFORMEETING :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_CREATENOTESFORMEETING = EnterpriseTopazSidekickAssistCardProto_CardType "CREATE_NOTES_FOR_MEETING"++-- | Create notes for meeting query.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_CREATENOTESFORMEETINGREQUEST :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_CREATENOTESFORMEETINGREQUEST = EnterpriseTopazSidekickAssistCardProto_CardType "CREATE_NOTES_FOR_MEETING_REQUEST"++-- | News about your SFDC customers.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_CUSTOMERNEWS :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_CUSTOMERNEWS = EnterpriseTopazSidekickAssistCardProto_CardType "CUSTOMER_NEWS"++-- | Find a time for two people to meet.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_FINDMEETINGTIME :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_FINDMEETINGTIME = EnterpriseTopazSidekickAssistCardProto_CardType "FIND_MEETING_TIME"++-- | The user\'s next non-declined meeting.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_NEXTMEETING :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_NEXTMEETING = EnterpriseTopazSidekickAssistCardProto_CardType "NEXT_MEETING"++-- | Important documents for you since you have viewed them in the last month and there\'s some action going on.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_PERSONALIZEDDOCS :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_PERSONALIZEDDOCS = EnterpriseTopazSidekickAssistCardProto_CardType "PERSONALIZED_DOCS"++-- | Documents that are trending in your company. A TRENDING/DOCS card can be of two types: TRENDING/IN/COLLABORATORS (i.e., Stay in the Loop) and TRENDING/IN/DOMAIN (i.e., Popular Content). Use DOMAIN/TRENDING/DOCS\/TEAM/TRENDING_DOCS instead.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_TRENDINGDOCS :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_TRENDINGDOCS = EnterpriseTopazSidekickAssistCardProto_CardType "TRENDING_DOCS"++-- | An upcoming trip with all trip information along with calendar events in the destination timezone.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_UPCOMINGTRIP :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_UPCOMINGTRIP = EnterpriseTopazSidekickAssistCardProto_CardType "UPCOMING_TRIP"++-- | The Morning\/Evening Summary Card for the next working day.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_Summary :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_Summary = EnterpriseTopazSidekickAssistCardProto_CardType "SUMMARY"++-- | A meeting. When requesting meetings, the service will return a MEETING card for each meeting the user has in his agenda.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_Meetings :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_Meetings = EnterpriseTopazSidekickAssistCardProto_CardType "MEETINGS"++-- | All cards related to the homepage (agenda, conflicting-meetings, summary, etc...). This type should no longer be used. Use HOMEPAGE_V3 instead.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_Homepage :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_Homepage = EnterpriseTopazSidekickAssistCardProto_CardType "HOMEPAGE"++-- | A card to with specifics to share meeting documents with all attendees.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_SHAREMEETINGDOCS :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_SHAREMEETINGDOCS = EnterpriseTopazSidekickAssistCardProto_CardType "SHARE_MEETING_DOCS"++-- | Represents a set of users that the requesting user has low affinity with.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_DISCOVERPEOPLE :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_DISCOVERPEOPLE = EnterpriseTopazSidekickAssistCardProto_CardType "DISCOVER_PEOPLE"++-- | All cards related to the homepage-v3 (agenda-group, WIP, etc...)+pattern EnterpriseTopazSidekickAssistCardProto_CardType_HOMEPAGE_V3 :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_HOMEPAGE_V3 = EnterpriseTopazSidekickAssistCardProto_CardType "HOMEPAGE_V3"++-- | A group of agenda-events (meeting, conflicts)+pattern EnterpriseTopazSidekickAssistCardProto_CardType_AGENDAGROUP :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_AGENDAGROUP = EnterpriseTopazSidekickAssistCardProto_CardType "AGENDA_GROUP"++-- | The documents that you were recently working on.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_WORKINPROGRESS :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_WORKINPROGRESS = EnterpriseTopazSidekickAssistCardProto_CardType "WORK_IN_PROGRESS"++-- | (v3) The \"get and keep ahead\" card for today and tomorrow+pattern EnterpriseTopazSidekickAssistCardProto_CardType_GETANDKEEPAHEAD :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_GETANDKEEPAHEAD = EnterpriseTopazSidekickAssistCardProto_CardType "GET_AND_KEEP_AHEAD"++-- | Generic answer card.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_GENERICANSWERCARD :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_GENERICANSWERCARD = EnterpriseTopazSidekickAssistCardProto_CardType "GENERIC_ANSWER_CARD"++-- | Third party answer card.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_THIRDPARTYANSWERCARD :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_THIRDPARTYANSWERCARD = EnterpriseTopazSidekickAssistCardProto_CardType "THIRD_PARTY_ANSWER_CARD"++-- | Documents that are trending in your company\/domain (i.e., Popular Content).+pattern EnterpriseTopazSidekickAssistCardProto_CardType_DOMAINTRENDINGDOCS :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_DOMAINTRENDINGDOCS = EnterpriseTopazSidekickAssistCardProto_CardType "DOMAIN_TRENDING_DOCS"++-- | Documents that are trending in your team (i.e., Stay in the Loop).+pattern EnterpriseTopazSidekickAssistCardProto_CardType_TEAMTRENDINGDOCS :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_TEAMTRENDINGDOCS = EnterpriseTopazSidekickAssistCardProto_CardType "TEAM_TRENDING_DOCS"++-- | Documents that match the user\'s query (e.g. sheets shared with me).+pattern EnterpriseTopazSidekickAssistCardProto_CardType_DOCUMENTLISTANSWERCARD :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_DOCUMENTLISTANSWERCARD = EnterpriseTopazSidekickAssistCardProto_CardType "DOCUMENT_LIST_ANSWER_CARD"++-- | A help card that provides examples of queries the user can ask.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_SUGGESTEDQUERYANSWERCARD :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_SUGGESTEDQUERYANSWERCARD = EnterpriseTopazSidekickAssistCardProto_CardType "SUGGESTED_QUERY_ANSWER_CARD"++-- | Answer card for a single person (e.g. what is x\'s phone number).+pattern EnterpriseTopazSidekickAssistCardProto_CardType_PERSONANSWERCARD :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_PERSONANSWERCARD = EnterpriseTopazSidekickAssistCardProto_CardType "PERSON_ANSWER_CARD"++-- | Answer card for a list of people related to the person that is the subject of the query (e.g. who reports to x).+pattern EnterpriseTopazSidekickAssistCardProto_CardType_RELATEDPEOPLEANSWERCARD :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_RELATEDPEOPLEANSWERCARD = EnterpriseTopazSidekickAssistCardProto_CardType "RELATED_PEOPLE_ANSWER_CARD"++-- | Knowledge card for a single person and their related people.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_PERSONKNOWLEDGECARD :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_PERSONKNOWLEDGECARD = EnterpriseTopazSidekickAssistCardProto_CardType "PERSON_KNOWLEDGE_CARD"++-- | People Search promotion card.+pattern EnterpriseTopazSidekickAssistCardProto_CardType_PEOPLESEARCHPROMOTIONCARD :: EnterpriseTopazSidekickAssistCardProto_CardType+pattern EnterpriseTopazSidekickAssistCardProto_CardType_PEOPLESEARCHPROMOTIONCARD = EnterpriseTopazSidekickAssistCardProto_CardType "PEOPLE_SEARCH_PROMOTION_CARD"++{-# COMPLETE+  EnterpriseTopazSidekickAssistCardProto_CardType_UNKNOWNTYPE,+  EnterpriseTopazSidekickAssistCardProto_CardType_Agenda,+  EnterpriseTopazSidekickAssistCardProto_CardType_Changelists,+  EnterpriseTopazSidekickAssistCardProto_CardType_CONFLICTINGMEETINGS,+  EnterpriseTopazSidekickAssistCardProto_CardType_CREATENOTESFORMEETING,+  EnterpriseTopazSidekickAssistCardProto_CardType_CREATENOTESFORMEETINGREQUEST,+  EnterpriseTopazSidekickAssistCardProto_CardType_CUSTOMERNEWS,+  EnterpriseTopazSidekickAssistCardProto_CardType_FINDMEETINGTIME,+  EnterpriseTopazSidekickAssistCardProto_CardType_NEXTMEETING,+  EnterpriseTopazSidekickAssistCardProto_CardType_PERSONALIZEDDOCS,+  EnterpriseTopazSidekickAssistCardProto_CardType_TRENDINGDOCS,+  EnterpriseTopazSidekickAssistCardProto_CardType_UPCOMINGTRIP,+  EnterpriseTopazSidekickAssistCardProto_CardType_Summary,+  EnterpriseTopazSidekickAssistCardProto_CardType_Meetings,+  EnterpriseTopazSidekickAssistCardProto_CardType_Homepage,+  EnterpriseTopazSidekickAssistCardProto_CardType_SHAREMEETINGDOCS,+  EnterpriseTopazSidekickAssistCardProto_CardType_DISCOVERPEOPLE,+  EnterpriseTopazSidekickAssistCardProto_CardType_HOMEPAGE_V3,+  EnterpriseTopazSidekickAssistCardProto_CardType_AGENDAGROUP,+  EnterpriseTopazSidekickAssistCardProto_CardType_WORKINPROGRESS,+  EnterpriseTopazSidekickAssistCardProto_CardType_GETANDKEEPAHEAD,+  EnterpriseTopazSidekickAssistCardProto_CardType_GENERICANSWERCARD,+  EnterpriseTopazSidekickAssistCardProto_CardType_THIRDPARTYANSWERCARD,+  EnterpriseTopazSidekickAssistCardProto_CardType_DOMAINTRENDINGDOCS,+  EnterpriseTopazSidekickAssistCardProto_CardType_TEAMTRENDINGDOCS,+  EnterpriseTopazSidekickAssistCardProto_CardType_DOCUMENTLISTANSWERCARD,+  EnterpriseTopazSidekickAssistCardProto_CardType_SUGGESTEDQUERYANSWERCARD,+  EnterpriseTopazSidekickAssistCardProto_CardType_PERSONANSWERCARD,+  EnterpriseTopazSidekickAssistCardProto_CardType_RELATEDPEOPLEANSWERCARD,+  EnterpriseTopazSidekickAssistCardProto_CardType_PERSONKNOWLEDGECARD,+  EnterpriseTopazSidekickAssistCardProto_CardType_PEOPLESEARCHPROMOTIONCARD,+  EnterpriseTopazSidekickAssistCardProto_CardType+  #-}++-- | Declares a preference for how this card should be packed in MSCR. All cards in a response must correspond to a single category. As a result, cards may be dropped from the response if this field is set. Any card that does not match the category of the card with the highest priority in the response will be dropped.+newtype EnterpriseTopazSidekickCardMetadata_CardCategory = EnterpriseTopazSidekickCardMetadata_CardCategory {fromEnterpriseTopazSidekickCardMetadata_CardCategory :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Let MSCR decide how this card should be packed. Most cards should choose this type. This type should largely be considered equivalent to ANSWER. However, this is not guaranteed to be the case as the request to MSCR may override the static configuration.+pattern EnterpriseTopazSidekickCardMetadata_CardCategory_Default :: EnterpriseTopazSidekickCardMetadata_CardCategory+pattern EnterpriseTopazSidekickCardMetadata_CardCategory_Default = EnterpriseTopazSidekickCardMetadata_CardCategory "DEFAULT"++-- | This card should be rendered as an answer card.+pattern EnterpriseTopazSidekickCardMetadata_CardCategory_Answer :: EnterpriseTopazSidekickCardMetadata_CardCategory+pattern EnterpriseTopazSidekickCardMetadata_CardCategory_Answer = EnterpriseTopazSidekickCardMetadata_CardCategory "ANSWER"++-- | This card should be rendered as a knowledge card (a non-organic result).+pattern EnterpriseTopazSidekickCardMetadata_CardCategory_Knowledge :: EnterpriseTopazSidekickCardMetadata_CardCategory+pattern EnterpriseTopazSidekickCardMetadata_CardCategory_Knowledge = EnterpriseTopazSidekickCardMetadata_CardCategory "KNOWLEDGE"++-- | This card should be rendered in the Homepage.+pattern EnterpriseTopazSidekickCardMetadata_CardCategory_Homepage :: EnterpriseTopazSidekickCardMetadata_CardCategory+pattern EnterpriseTopazSidekickCardMetadata_CardCategory_Homepage = EnterpriseTopazSidekickCardMetadata_CardCategory "HOMEPAGE"++{-# COMPLETE+  EnterpriseTopazSidekickCardMetadata_CardCategory_Default,+  EnterpriseTopazSidekickCardMetadata_CardCategory_Answer,+  EnterpriseTopazSidekickCardMetadata_CardCategory_Knowledge,+  EnterpriseTopazSidekickCardMetadata_CardCategory_Homepage,+  EnterpriseTopazSidekickCardMetadata_CardCategory+  #-}++-- | Chronology.+newtype EnterpriseTopazSidekickCardMetadata_Chronology = EnterpriseTopazSidekickCardMetadata_Chronology {fromEnterpriseTopazSidekickCardMetadata_Chronology :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown chronology (default).+pattern EnterpriseTopazSidekickCardMetadata_Chronology_Unknown :: EnterpriseTopazSidekickCardMetadata_Chronology+pattern EnterpriseTopazSidekickCardMetadata_Chronology_Unknown = EnterpriseTopazSidekickCardMetadata_Chronology "UNKNOWN"++-- | Past.+pattern EnterpriseTopazSidekickCardMetadata_Chronology_Past :: EnterpriseTopazSidekickCardMetadata_Chronology+pattern EnterpriseTopazSidekickCardMetadata_Chronology_Past = EnterpriseTopazSidekickCardMetadata_Chronology "PAST"++-- | Recently past.+pattern EnterpriseTopazSidekickCardMetadata_Chronology_RECENTLYPAST :: EnterpriseTopazSidekickCardMetadata_Chronology+pattern EnterpriseTopazSidekickCardMetadata_Chronology_RECENTLYPAST = EnterpriseTopazSidekickCardMetadata_Chronology "RECENTLY_PAST"++-- | Present.+pattern EnterpriseTopazSidekickCardMetadata_Chronology_Present :: EnterpriseTopazSidekickCardMetadata_Chronology+pattern EnterpriseTopazSidekickCardMetadata_Chronology_Present = EnterpriseTopazSidekickCardMetadata_Chronology "PRESENT"++-- | Near future.+pattern EnterpriseTopazSidekickCardMetadata_Chronology_NEARFUTURE :: EnterpriseTopazSidekickCardMetadata_Chronology+pattern EnterpriseTopazSidekickCardMetadata_Chronology_NEARFUTURE = EnterpriseTopazSidekickCardMetadata_Chronology "NEAR_FUTURE"++-- | Future.+pattern EnterpriseTopazSidekickCardMetadata_Chronology_Future :: EnterpriseTopazSidekickCardMetadata_Chronology+pattern EnterpriseTopazSidekickCardMetadata_Chronology_Future = EnterpriseTopazSidekickCardMetadata_Chronology "FUTURE"++{-# COMPLETE+  EnterpriseTopazSidekickCardMetadata_Chronology_Unknown,+  EnterpriseTopazSidekickCardMetadata_Chronology_Past,+  EnterpriseTopazSidekickCardMetadata_Chronology_RECENTLYPAST,+  EnterpriseTopazSidekickCardMetadata_Chronology_Present,+  EnterpriseTopazSidekickCardMetadata_Chronology_NEARFUTURE,+  EnterpriseTopazSidekickCardMetadata_Chronology_Future,+  EnterpriseTopazSidekickCardMetadata_Chronology+  #-}++-- | Render mode.+newtype EnterpriseTopazSidekickCardMetadata_RenderMode = EnterpriseTopazSidekickCardMetadata_RenderMode {fromEnterpriseTopazSidekickCardMetadata_RenderMode :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown mode (default).+pattern EnterpriseTopazSidekickCardMetadata_RenderMode_UNKNOWNRENDER :: EnterpriseTopazSidekickCardMetadata_RenderMode+pattern EnterpriseTopazSidekickCardMetadata_RenderMode_UNKNOWNRENDER = EnterpriseTopazSidekickCardMetadata_RenderMode "UNKNOWN_RENDER"++-- | Collapsed.+pattern EnterpriseTopazSidekickCardMetadata_RenderMode_Collapsed :: EnterpriseTopazSidekickCardMetadata_RenderMode+pattern EnterpriseTopazSidekickCardMetadata_RenderMode_Collapsed = EnterpriseTopazSidekickCardMetadata_RenderMode "COLLAPSED"++-- | Expanded.+pattern EnterpriseTopazSidekickCardMetadata_RenderMode_Expanded :: EnterpriseTopazSidekickCardMetadata_RenderMode+pattern EnterpriseTopazSidekickCardMetadata_RenderMode_Expanded = EnterpriseTopazSidekickCardMetadata_RenderMode "EXPANDED"++{-# COMPLETE+  EnterpriseTopazSidekickCardMetadata_RenderMode_UNKNOWNRENDER,+  EnterpriseTopazSidekickCardMetadata_RenderMode_Collapsed,+  EnterpriseTopazSidekickCardMetadata_RenderMode_Expanded,+  EnterpriseTopazSidekickCardMetadata_RenderMode+  #-}++-- | Access type, i.e., whether the user has access to the document or not.+newtype EnterpriseTopazSidekickCommonDocument_AccessType = EnterpriseTopazSidekickCommonDocument_AccessType {fromEnterpriseTopazSidekickCommonDocument_AccessType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown access type.+pattern EnterpriseTopazSidekickCommonDocument_AccessType_UNKNOWNACCESS :: EnterpriseTopazSidekickCommonDocument_AccessType+pattern EnterpriseTopazSidekickCommonDocument_AccessType_UNKNOWNACCESS = EnterpriseTopazSidekickCommonDocument_AccessType "UNKNOWN_ACCESS"++-- | Access allowed.+pattern EnterpriseTopazSidekickCommonDocument_AccessType_Allowed :: EnterpriseTopazSidekickCommonDocument_AccessType+pattern EnterpriseTopazSidekickCommonDocument_AccessType_Allowed = EnterpriseTopazSidekickCommonDocument_AccessType "ALLOWED"++-- | Access not allowed.+pattern EnterpriseTopazSidekickCommonDocument_AccessType_NOTALLOWED :: EnterpriseTopazSidekickCommonDocument_AccessType+pattern EnterpriseTopazSidekickCommonDocument_AccessType_NOTALLOWED = EnterpriseTopazSidekickCommonDocument_AccessType "NOT_ALLOWED"++{-# COMPLETE+  EnterpriseTopazSidekickCommonDocument_AccessType_UNKNOWNACCESS,+  EnterpriseTopazSidekickCommonDocument_AccessType_Allowed,+  EnterpriseTopazSidekickCommonDocument_AccessType_NOTALLOWED,+  EnterpriseTopazSidekickCommonDocument_AccessType+  #-}++-- | Document provenance.+newtype EnterpriseTopazSidekickCommonDocument_Provenance = EnterpriseTopazSidekickCommonDocument_Provenance {fromEnterpriseTopazSidekickCommonDocument_Provenance :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown provenance.+pattern EnterpriseTopazSidekickCommonDocument_Provenance_UNKNOWNPROVENANCE :: EnterpriseTopazSidekickCommonDocument_Provenance+pattern EnterpriseTopazSidekickCommonDocument_Provenance_UNKNOWNPROVENANCE = EnterpriseTopazSidekickCommonDocument_Provenance "UNKNOWN_PROVENANCE"++-- | Calendar event description.+pattern EnterpriseTopazSidekickCommonDocument_Provenance_CALENDARDESCRIPTION :: EnterpriseTopazSidekickCommonDocument_Provenance+pattern EnterpriseTopazSidekickCommonDocument_Provenance_CALENDARDESCRIPTION = EnterpriseTopazSidekickCommonDocument_Provenance "CALENDAR_DESCRIPTION"++-- | Calendar event attachment.+pattern EnterpriseTopazSidekickCommonDocument_Provenance_CALENDARATTACHMENT :: EnterpriseTopazSidekickCommonDocument_Provenance+pattern EnterpriseTopazSidekickCommonDocument_Provenance_CALENDARATTACHMENT = EnterpriseTopazSidekickCommonDocument_Provenance "CALENDAR_ATTACHMENT"++-- | Mined (extracted by some offline\/online analysis).+pattern EnterpriseTopazSidekickCommonDocument_Provenance_Mined :: EnterpriseTopazSidekickCommonDocument_Provenance+pattern EnterpriseTopazSidekickCommonDocument_Provenance_Mined = EnterpriseTopazSidekickCommonDocument_Provenance "MINED"++-- | Attachment created by enterprise assist.+pattern EnterpriseTopazSidekickCommonDocument_Provenance_CALENDARASSISTATTACHMENT :: EnterpriseTopazSidekickCommonDocument_Provenance+pattern EnterpriseTopazSidekickCommonDocument_Provenance_CALENDARASSISTATTACHMENT = EnterpriseTopazSidekickCommonDocument_Provenance "CALENDAR_ASSIST_ATTACHMENT"++{-# COMPLETE+  EnterpriseTopazSidekickCommonDocument_Provenance_UNKNOWNPROVENANCE,+  EnterpriseTopazSidekickCommonDocument_Provenance_CALENDARDESCRIPTION,+  EnterpriseTopazSidekickCommonDocument_Provenance_CALENDARATTACHMENT,+  EnterpriseTopazSidekickCommonDocument_Provenance_Mined,+  EnterpriseTopazSidekickCommonDocument_Provenance_CALENDARASSISTATTACHMENT,+  EnterpriseTopazSidekickCommonDocument_Provenance+  #-}++-- | Justification of why this document is being returned.+newtype EnterpriseTopazSidekickCommonDocument_Reason = EnterpriseTopazSidekickCommonDocument_Reason {fromEnterpriseTopazSidekickCommonDocument_Reason :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown justification.+pattern EnterpriseTopazSidekickCommonDocument_Reason_Unknown :: EnterpriseTopazSidekickCommonDocument_Reason+pattern EnterpriseTopazSidekickCommonDocument_Reason_Unknown = EnterpriseTopazSidekickCommonDocument_Reason "UNKNOWN"++-- | Popular documents within collaborators.+pattern EnterpriseTopazSidekickCommonDocument_Reason_TRENDINGINCOLLABORATORS :: EnterpriseTopazSidekickCommonDocument_Reason+pattern EnterpriseTopazSidekickCommonDocument_Reason_TRENDINGINCOLLABORATORS = EnterpriseTopazSidekickCommonDocument_Reason "TRENDING_IN_COLLABORATORS"++-- | Popular documents within the domain.+pattern EnterpriseTopazSidekickCommonDocument_Reason_TRENDINGINDOMAIN :: EnterpriseTopazSidekickCommonDocument_Reason+pattern EnterpriseTopazSidekickCommonDocument_Reason_TRENDINGINDOMAIN = EnterpriseTopazSidekickCommonDocument_Reason "TRENDING_IN_DOMAIN"++-- | Documents being reviewed frequently by the current user .+pattern EnterpriseTopazSidekickCommonDocument_Reason_FREQUENTLYVIEWED :: EnterpriseTopazSidekickCommonDocument_Reason+pattern EnterpriseTopazSidekickCommonDocument_Reason_FREQUENTLYVIEWED = EnterpriseTopazSidekickCommonDocument_Reason "FREQUENTLY_VIEWED"++-- | Documents being edited frequently by the current user .+pattern EnterpriseTopazSidekickCommonDocument_Reason_FREQUENTLYEDITED :: EnterpriseTopazSidekickCommonDocument_Reason+pattern EnterpriseTopazSidekickCommonDocument_Reason_FREQUENTLYEDITED = EnterpriseTopazSidekickCommonDocument_Reason "FREQUENTLY_EDITED"++-- | Documents updated since user\'s last visit.+pattern EnterpriseTopazSidekickCommonDocument_Reason_NEWUPDATES :: EnterpriseTopazSidekickCommonDocument_Reason+pattern EnterpriseTopazSidekickCommonDocument_Reason_NEWUPDATES = EnterpriseTopazSidekickCommonDocument_Reason "NEW_UPDATES"++-- | Documents that receive comments since user\'s last visit.+pattern EnterpriseTopazSidekickCommonDocument_Reason_NEWCOMMENTS :: EnterpriseTopazSidekickCommonDocument_Reason+pattern EnterpriseTopazSidekickCommonDocument_Reason_NEWCOMMENTS = EnterpriseTopazSidekickCommonDocument_Reason "NEW_COMMENTS"++-- | Documents in the calendar event description.+pattern EnterpriseTopazSidekickCommonDocument_Reason_EVENTDESCRIPTION :: EnterpriseTopazSidekickCommonDocument_Reason+pattern EnterpriseTopazSidekickCommonDocument_Reason_EVENTDESCRIPTION = EnterpriseTopazSidekickCommonDocument_Reason "EVENT_DESCRIPTION"++-- | Documents in the calendar event attachments section.+pattern EnterpriseTopazSidekickCommonDocument_Reason_EVENTATTACHMENT :: EnterpriseTopazSidekickCommonDocument_Reason+pattern EnterpriseTopazSidekickCommonDocument_Reason_EVENTATTACHMENT = EnterpriseTopazSidekickCommonDocument_Reason "EVENT_ATTACHMENT"++-- | Documents attached in calendar event metadata instead of the attachment section. Event metadata is not visible to the final user. Enterprise assist uses this metadata to store auto-generated documents such as meeting notes.+pattern EnterpriseTopazSidekickCommonDocument_Reason_EVENTMETADATAATTACHMENT :: EnterpriseTopazSidekickCommonDocument_Reason+pattern EnterpriseTopazSidekickCommonDocument_Reason_EVENTMETADATAATTACHMENT = EnterpriseTopazSidekickCommonDocument_Reason "EVENT_METADATA_ATTACHMENT"++-- | Documents mined, and so, probably related to the request context. For example, this category includes documents related to a meeting.+pattern EnterpriseTopazSidekickCommonDocument_Reason_MINEDDOCUMENT :: EnterpriseTopazSidekickCommonDocument_Reason+pattern EnterpriseTopazSidekickCommonDocument_Reason_MINEDDOCUMENT = EnterpriseTopazSidekickCommonDocument_Reason "MINED_DOCUMENT"++-- | Documents that contains mentions of the user.+pattern EnterpriseTopazSidekickCommonDocument_Reason_NEWMENTIONS :: EnterpriseTopazSidekickCommonDocument_Reason+pattern EnterpriseTopazSidekickCommonDocument_Reason_NEWMENTIONS = EnterpriseTopazSidekickCommonDocument_Reason "NEW_MENTIONS"++-- | Documents that are shared with the user.+pattern EnterpriseTopazSidekickCommonDocument_Reason_NEWSHARES :: EnterpriseTopazSidekickCommonDocument_Reason+pattern EnterpriseTopazSidekickCommonDocument_Reason_NEWSHARES = EnterpriseTopazSidekickCommonDocument_Reason "NEW_SHARES"++{-# COMPLETE+  EnterpriseTopazSidekickCommonDocument_Reason_Unknown,+  EnterpriseTopazSidekickCommonDocument_Reason_TRENDINGINCOLLABORATORS,+  EnterpriseTopazSidekickCommonDocument_Reason_TRENDINGINDOMAIN,+  EnterpriseTopazSidekickCommonDocument_Reason_FREQUENTLYVIEWED,+  EnterpriseTopazSidekickCommonDocument_Reason_FREQUENTLYEDITED,+  EnterpriseTopazSidekickCommonDocument_Reason_NEWUPDATES,+  EnterpriseTopazSidekickCommonDocument_Reason_NEWCOMMENTS,+  EnterpriseTopazSidekickCommonDocument_Reason_EVENTDESCRIPTION,+  EnterpriseTopazSidekickCommonDocument_Reason_EVENTATTACHMENT,+  EnterpriseTopazSidekickCommonDocument_Reason_EVENTMETADATAATTACHMENT,+  EnterpriseTopazSidekickCommonDocument_Reason_MINEDDOCUMENT,+  EnterpriseTopazSidekickCommonDocument_Reason_NEWMENTIONS,+  EnterpriseTopazSidekickCommonDocument_Reason_NEWSHARES,+  EnterpriseTopazSidekickCommonDocument_Reason+  #-}++-- | Type of the document.+newtype EnterpriseTopazSidekickCommonDocument_Type = EnterpriseTopazSidekickCommonDocument_Type {fromEnterpriseTopazSidekickCommonDocument_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | If the type is unknown or not represented in this enum.+pattern EnterpriseTopazSidekickCommonDocument_Type_Unknown :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Unknown = EnterpriseTopazSidekickCommonDocument_Type "UNKNOWN"++-- | Drive document types Writely, Word, etc.+pattern EnterpriseTopazSidekickCommonDocument_Type_Document :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Document = EnterpriseTopazSidekickCommonDocument_Type "DOCUMENT"++-- | Presently, PowerPoint, etc.+pattern EnterpriseTopazSidekickCommonDocument_Type_Presentation :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Presentation = EnterpriseTopazSidekickCommonDocument_Type "PRESENTATION"++-- | Trix, Excel, etc.+pattern EnterpriseTopazSidekickCommonDocument_Type_Spreadsheet :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Spreadsheet = EnterpriseTopazSidekickCommonDocument_Type "SPREADSHEET"++-- | File types for Gdrive objects are below. PDF.+pattern EnterpriseTopazSidekickCommonDocument_Type_Pdf :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Pdf = EnterpriseTopazSidekickCommonDocument_Type "PDF"++-- | Image.+pattern EnterpriseTopazSidekickCommonDocument_Type_Image :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Image = EnterpriseTopazSidekickCommonDocument_Type "IMAGE"++-- | Fall-back for unknown Gdrive types.+pattern EnterpriseTopazSidekickCommonDocument_Type_BINARYBLOB :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_BINARYBLOB = EnterpriseTopazSidekickCommonDocument_Type "BINARY_BLOB"++-- | Fusion table.+pattern EnterpriseTopazSidekickCommonDocument_Type_FUSIONTABLE :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_FUSIONTABLE = EnterpriseTopazSidekickCommonDocument_Type "FUSION_TABLE"++-- | Folder.+pattern EnterpriseTopazSidekickCommonDocument_Type_Folder :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Folder = EnterpriseTopazSidekickCommonDocument_Type "FOLDER"++-- | Drawing.+pattern EnterpriseTopazSidekickCommonDocument_Type_Drawing :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Drawing = EnterpriseTopazSidekickCommonDocument_Type "DRAWING"++-- | Video.+pattern EnterpriseTopazSidekickCommonDocument_Type_Video :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Video = EnterpriseTopazSidekickCommonDocument_Type "VIDEO"++-- | Form.+pattern EnterpriseTopazSidekickCommonDocument_Type_Form :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Form = EnterpriseTopazSidekickCommonDocument_Type "FORM"++-- | Link formats uncategorized URL links+pattern EnterpriseTopazSidekickCommonDocument_Type_LINKURL :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_LINKURL = EnterpriseTopazSidekickCommonDocument_Type "LINK_URL"++-- | meaningful links that should be renderred specifically+pattern EnterpriseTopazSidekickCommonDocument_Type_LINKGO :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_LINKGO = EnterpriseTopazSidekickCommonDocument_Type "LINK_GO"++-- | Link to goo.gl.+pattern EnterpriseTopazSidekickCommonDocument_Type_LINKGOOGL :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_LINKGOOGL = EnterpriseTopazSidekickCommonDocument_Type "LINK_GOO_GL"++-- | Link to bit_ly.+pattern EnterpriseTopazSidekickCommonDocument_Type_LINKBITLY :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_LINKBITLY = EnterpriseTopazSidekickCommonDocument_Type "LINK_BIT_LY"++-- | Link to Gmail.+pattern EnterpriseTopazSidekickCommonDocument_Type_LINKGMAIL :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_LINKGMAIL = EnterpriseTopazSidekickCommonDocument_Type "LINK_GMAIL"++-- | Mailto link.+pattern EnterpriseTopazSidekickCommonDocument_Type_LINKMAILTO :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_LINKMAILTO = EnterpriseTopazSidekickCommonDocument_Type "LINK_MAILTO"++-- | Videos Youtube videos.+pattern EnterpriseTopazSidekickCommonDocument_Type_VIDEOYOUTUBE :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_VIDEOYOUTUBE = EnterpriseTopazSidekickCommonDocument_Type "VIDEO_YOUTUBE"++-- | Live streams (e.g., liveplayer.googleplex.com)+pattern EnterpriseTopazSidekickCommonDocument_Type_VIDEOLIVE :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_VIDEOLIVE = EnterpriseTopazSidekickCommonDocument_Type "VIDEO_LIVE"++-- | Other types. Google Groups.+pattern EnterpriseTopazSidekickCommonDocument_Type_Groups :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Groups = EnterpriseTopazSidekickCommonDocument_Type "GROUPS"++-- | Google News.+pattern EnterpriseTopazSidekickCommonDocument_Type_News :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_News = EnterpriseTopazSidekickCommonDocument_Type "NEWS"++-- | Google Sites.+pattern EnterpriseTopazSidekickCommonDocument_Type_Sites :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Sites = EnterpriseTopazSidekickCommonDocument_Type "SITES"++-- | Google Hangout.+pattern EnterpriseTopazSidekickCommonDocument_Type_Hangout :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Hangout = EnterpriseTopazSidekickCommonDocument_Type "HANGOUT"++-- | Audio files.+pattern EnterpriseTopazSidekickCommonDocument_Type_Audio :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_Audio = EnterpriseTopazSidekickCommonDocument_Type "AUDIO"++-- | Microsoft-specific file types.+pattern EnterpriseTopazSidekickCommonDocument_Type_MSWORD :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_MSWORD = EnterpriseTopazSidekickCommonDocument_Type "MS_WORD"++pattern EnterpriseTopazSidekickCommonDocument_Type_MSPOWERPOINT :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_MSPOWERPOINT = EnterpriseTopazSidekickCommonDocument_Type "MS_POWERPOINT"++pattern EnterpriseTopazSidekickCommonDocument_Type_MSEXCEL :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_MSEXCEL = EnterpriseTopazSidekickCommonDocument_Type "MS_EXCEL"++pattern EnterpriseTopazSidekickCommonDocument_Type_MSOUTLOOK :: EnterpriseTopazSidekickCommonDocument_Type+pattern EnterpriseTopazSidekickCommonDocument_Type_MSOUTLOOK = EnterpriseTopazSidekickCommonDocument_Type "MS_OUTLOOK"++{-# COMPLETE+  EnterpriseTopazSidekickCommonDocument_Type_Unknown,+  EnterpriseTopazSidekickCommonDocument_Type_Document,+  EnterpriseTopazSidekickCommonDocument_Type_Presentation,+  EnterpriseTopazSidekickCommonDocument_Type_Spreadsheet,+  EnterpriseTopazSidekickCommonDocument_Type_Pdf,+  EnterpriseTopazSidekickCommonDocument_Type_Image,+  EnterpriseTopazSidekickCommonDocument_Type_BINARYBLOB,+  EnterpriseTopazSidekickCommonDocument_Type_FUSIONTABLE,+  EnterpriseTopazSidekickCommonDocument_Type_Folder,+  EnterpriseTopazSidekickCommonDocument_Type_Drawing,+  EnterpriseTopazSidekickCommonDocument_Type_Video,+  EnterpriseTopazSidekickCommonDocument_Type_Form,+  EnterpriseTopazSidekickCommonDocument_Type_LINKURL,+  EnterpriseTopazSidekickCommonDocument_Type_LINKGO,+  EnterpriseTopazSidekickCommonDocument_Type_LINKGOOGL,+  EnterpriseTopazSidekickCommonDocument_Type_LINKBITLY,+  EnterpriseTopazSidekickCommonDocument_Type_LINKGMAIL,+  EnterpriseTopazSidekickCommonDocument_Type_LINKMAILTO,+  EnterpriseTopazSidekickCommonDocument_Type_VIDEOYOUTUBE,+  EnterpriseTopazSidekickCommonDocument_Type_VIDEOLIVE,+  EnterpriseTopazSidekickCommonDocument_Type_Groups,+  EnterpriseTopazSidekickCommonDocument_Type_News,+  EnterpriseTopazSidekickCommonDocument_Type_Sites,+  EnterpriseTopazSidekickCommonDocument_Type_Hangout,+  EnterpriseTopazSidekickCommonDocument_Type_Audio,+  EnterpriseTopazSidekickCommonDocument_Type_MSWORD,+  EnterpriseTopazSidekickCommonDocument_Type_MSPOWERPOINT,+  EnterpriseTopazSidekickCommonDocument_Type_MSEXCEL,+  EnterpriseTopazSidekickCommonDocument_Type_MSOUTLOOK,+  EnterpriseTopazSidekickCommonDocument_Type+  #-}++-- | ACL scope of the document which identifies the sharing status of the doc (e.g., limited, shared with link, team drive, ...).+newtype EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope = EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope {fromEnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_UNKNOWNDOCUMENTSCOPE :: EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope+pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_UNKNOWNDOCUMENTSCOPE = EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope "UNKNOWN_DOCUMENT_SCOPE"++pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_Limited :: EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope+pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_Limited = EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope "LIMITED"++pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_DASHERDOMAINWITHLINK :: EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope+pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_DASHERDOMAINWITHLINK = EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope "DASHER_DOMAIN_WITH_LINK"++pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_DASHERDOMAIN :: EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope+pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_DASHERDOMAIN = EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope "DASHER_DOMAIN"++pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_PUBLICWITHLINK :: EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope+pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_PUBLICWITHLINK = EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope "PUBLIC_WITH_LINK"++pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_Public :: EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope+pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_Public = EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope "PUBLIC"++pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_TEAMDRIVE :: EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope+pattern EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_TEAMDRIVE = EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope "TEAM_DRIVE"++{-# COMPLETE+  EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_UNKNOWNDOCUMENTSCOPE,+  EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_Limited,+  EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_DASHERDOMAINWITHLINK,+  EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_DASHERDOMAIN,+  EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_PUBLICWITHLINK,+  EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_Public,+  EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope_TEAMDRIVE,+  EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope+  #-}++-- | Reason on why the document is selected. Populate for trending documents.+newtype EnterpriseTopazSidekickCommonDocumentJustification_Reason = EnterpriseTopazSidekickCommonDocumentJustification_Reason {fromEnterpriseTopazSidekickCommonDocumentJustification_Reason :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown justification.+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_Unknown :: EnterpriseTopazSidekickCommonDocumentJustification_Reason+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_Unknown = EnterpriseTopazSidekickCommonDocumentJustification_Reason "UNKNOWN"++-- | Popular documents within collaborators.+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_TRENDINGINCOLLABORATORS :: EnterpriseTopazSidekickCommonDocumentJustification_Reason+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_TRENDINGINCOLLABORATORS = EnterpriseTopazSidekickCommonDocumentJustification_Reason "TRENDING_IN_COLLABORATORS"++-- | Popular documents within the domain.+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_TRENDINGINDOMAIN :: EnterpriseTopazSidekickCommonDocumentJustification_Reason+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_TRENDINGINDOMAIN = EnterpriseTopazSidekickCommonDocumentJustification_Reason "TRENDING_IN_DOMAIN"++-- | Documents being reviewed frequently by the current user .+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_FREQUENTLYVIEWED :: EnterpriseTopazSidekickCommonDocumentJustification_Reason+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_FREQUENTLYVIEWED = EnterpriseTopazSidekickCommonDocumentJustification_Reason "FREQUENTLY_VIEWED"++-- | Documents being edited frequently by the current user .+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_FREQUENTLYEDITED :: EnterpriseTopazSidekickCommonDocumentJustification_Reason+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_FREQUENTLYEDITED = EnterpriseTopazSidekickCommonDocumentJustification_Reason "FREQUENTLY_EDITED"++-- | Documents updated since user\'s last visit.+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWUPDATES :: EnterpriseTopazSidekickCommonDocumentJustification_Reason+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWUPDATES = EnterpriseTopazSidekickCommonDocumentJustification_Reason "NEW_UPDATES"++-- | Documents that receive comments since user\'s last visit.+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWCOMMENTS :: EnterpriseTopazSidekickCommonDocumentJustification_Reason+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWCOMMENTS = EnterpriseTopazSidekickCommonDocumentJustification_Reason "NEW_COMMENTS"++-- | Documents in the calendar event description.+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_EVENTDESCRIPTION :: EnterpriseTopazSidekickCommonDocumentJustification_Reason+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_EVENTDESCRIPTION = EnterpriseTopazSidekickCommonDocumentJustification_Reason "EVENT_DESCRIPTION"++-- | Documents in the calendar event attachments section.+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_EVENTATTACHMENT :: EnterpriseTopazSidekickCommonDocumentJustification_Reason+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_EVENTATTACHMENT = EnterpriseTopazSidekickCommonDocumentJustification_Reason "EVENT_ATTACHMENT"++-- | Documents attached in calendar event metadata instead of the attachment section. Event metadata is not visible to the final user. Enterprise assist uses this metadata to store auto-generated documents such as meeting notes.+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_EVENTMETADATAATTACHMENT :: EnterpriseTopazSidekickCommonDocumentJustification_Reason+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_EVENTMETADATAATTACHMENT = EnterpriseTopazSidekickCommonDocumentJustification_Reason "EVENT_METADATA_ATTACHMENT"++-- | Documents mined, and so, probably related to the request context. For example, this category includes documents related to a meeting.+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_MINEDDOCUMENT :: EnterpriseTopazSidekickCommonDocumentJustification_Reason+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_MINEDDOCUMENT = EnterpriseTopazSidekickCommonDocumentJustification_Reason "MINED_DOCUMENT"++-- | Documents that contains mentions of the user.+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWMENTIONS :: EnterpriseTopazSidekickCommonDocumentJustification_Reason+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWMENTIONS = EnterpriseTopazSidekickCommonDocumentJustification_Reason "NEW_MENTIONS"++-- | Documents that are shared with the user.+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWSHARES :: EnterpriseTopazSidekickCommonDocumentJustification_Reason+pattern EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWSHARES = EnterpriseTopazSidekickCommonDocumentJustification_Reason "NEW_SHARES"++{-# COMPLETE+  EnterpriseTopazSidekickCommonDocumentJustification_Reason_Unknown,+  EnterpriseTopazSidekickCommonDocumentJustification_Reason_TRENDINGINCOLLABORATORS,+  EnterpriseTopazSidekickCommonDocumentJustification_Reason_TRENDINGINDOMAIN,+  EnterpriseTopazSidekickCommonDocumentJustification_Reason_FREQUENTLYVIEWED,+  EnterpriseTopazSidekickCommonDocumentJustification_Reason_FREQUENTLYEDITED,+  EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWUPDATES,+  EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWCOMMENTS,+  EnterpriseTopazSidekickCommonDocumentJustification_Reason_EVENTDESCRIPTION,+  EnterpriseTopazSidekickCommonDocumentJustification_Reason_EVENTATTACHMENT,+  EnterpriseTopazSidekickCommonDocumentJustification_Reason_EVENTMETADATAATTACHMENT,+  EnterpriseTopazSidekickCommonDocumentJustification_Reason_MINEDDOCUMENT,+  EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWMENTIONS,+  EnterpriseTopazSidekickCommonDocumentJustification_Reason_NEWSHARES,+  EnterpriseTopazSidekickCommonDocumentJustification_Reason+  #-}++-- | Document group type+newtype EnterpriseTopazSidekickDocumentGroup_GroupType = EnterpriseTopazSidekickDocumentGroup_GroupType {fromEnterpriseTopazSidekickDocumentGroup_GroupType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown type.+pattern EnterpriseTopazSidekickDocumentGroup_GroupType_UNKNOWNTYPE :: EnterpriseTopazSidekickDocumentGroup_GroupType+pattern EnterpriseTopazSidekickDocumentGroup_GroupType_UNKNOWNTYPE = EnterpriseTopazSidekickDocumentGroup_GroupType "UNKNOWN_TYPE"++-- | A mix of all the document types.+pattern EnterpriseTopazSidekickDocumentGroup_GroupType_All :: EnterpriseTopazSidekickDocumentGroup_GroupType+pattern EnterpriseTopazSidekickDocumentGroup_GroupType_All = EnterpriseTopazSidekickDocumentGroup_GroupType "ALL"++{-# COMPLETE+  EnterpriseTopazSidekickDocumentGroup_GroupType_UNKNOWNTYPE,+  EnterpriseTopazSidekickDocumentGroup_GroupType_All,+  EnterpriseTopazSidekickDocumentGroup_GroupType+  #-}++newtype EnterpriseTopazSidekickDocumentPerCategoryList_ListType = EnterpriseTopazSidekickDocumentPerCategoryList_ListType {fromEnterpriseTopazSidekickDocumentPerCategoryList_ListType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern EnterpriseTopazSidekickDocumentPerCategoryList_ListType_UNKNOWNLISTTYPE :: EnterpriseTopazSidekickDocumentPerCategoryList_ListType+pattern EnterpriseTopazSidekickDocumentPerCategoryList_ListType_UNKNOWNLISTTYPE = EnterpriseTopazSidekickDocumentPerCategoryList_ListType "UNKNOWN_LIST_TYPE"++-- | All documents in the list correspond to one of the mention categories.+pattern EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Mentions :: EnterpriseTopazSidekickDocumentPerCategoryList_ListType+pattern EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Mentions = EnterpriseTopazSidekickDocumentPerCategoryList_ListType "MENTIONS"++-- | All documents in the list correspond to one of the share categories.+pattern EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Shares :: EnterpriseTopazSidekickDocumentPerCategoryList_ListType+pattern EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Shares = EnterpriseTopazSidekickDocumentPerCategoryList_ListType "SHARES"++-- | A mixture of document categories that correspond to documents that need the users attention (e.g. documents that have been explicitly shared with the user but have not been viewed and documents where the user was mentioned but has not replied).+pattern EnterpriseTopazSidekickDocumentPerCategoryList_ListType_NEEDSATTENTION :: EnterpriseTopazSidekickDocumentPerCategoryList_ListType+pattern EnterpriseTopazSidekickDocumentPerCategoryList_ListType_NEEDSATTENTION = EnterpriseTopazSidekickDocumentPerCategoryList_ListType "NEEDS_ATTENTION"++-- | All documents in the list correspond to one of the view categories.+pattern EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Views :: EnterpriseTopazSidekickDocumentPerCategoryList_ListType+pattern EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Views = EnterpriseTopazSidekickDocumentPerCategoryList_ListType "VIEWS"++-- | All documents in the list correspond to one of the edit categories.+pattern EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Edits :: EnterpriseTopazSidekickDocumentPerCategoryList_ListType+pattern EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Edits = EnterpriseTopazSidekickDocumentPerCategoryList_ListType "EDITS"++{-# COMPLETE+  EnterpriseTopazSidekickDocumentPerCategoryList_ListType_UNKNOWNLISTTYPE,+  EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Mentions,+  EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Shares,+  EnterpriseTopazSidekickDocumentPerCategoryList_ListType_NEEDSATTENTION,+  EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Views,+  EnterpriseTopazSidekickDocumentPerCategoryList_ListType_Edits,+  EnterpriseTopazSidekickDocumentPerCategoryList_ListType+  #-}++newtype EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category = EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category {fromEnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_UNKNOWNDOCUMENT :: EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_UNKNOWNDOCUMENT = EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category "UNKNOWN_DOCUMENT"++pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Actionable :: EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Actionable = EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category "ACTIONABLE"++pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Viewed :: EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Viewed = EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category "VIEWED"++pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Replied :: EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Replied = EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category "REPLIED"++-- | Mention categories. The mention has been viewed by the user, but the user has not replied.+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_MENTIONVIEWED :: EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_MENTIONVIEWED = EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category "MENTION_VIEWED"++-- | The user has replied to the mention.+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_MENTIONREPLIED :: EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_MENTIONREPLIED = EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category "MENTION_REPLIED"++-- | The mention has not been viewed by the user.+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_MENTIONNOTVIEWED :: EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_MENTIONNOTVIEWED = EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category "MENTION_NOT_VIEWED"++-- | Share categories. Consists of documents that have been explicitly shared with the user. Document has been viewed.+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_SHAREDANDVIEWED :: EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_SHAREDANDVIEWED = EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category "SHARED_AND_VIEWED"++-- | Document has not been viewed.+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_SHAREDNOTVIEWED :: EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_SHAREDNOTVIEWED = EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category "SHARED_NOT_VIEWED"++-- | Document has been edited.+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Edited :: EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+pattern EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Edited = EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category "EDITED"++{-# COMPLETE+  EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_UNKNOWNDOCUMENT,+  EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Actionable,+  EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Viewed,+  EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Replied,+  EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_MENTIONVIEWED,+  EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_MENTIONREPLIED,+  EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_MENTIONNOTVIEWED,+  EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_SHAREDANDVIEWED,+  EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_SHAREDNOTVIEWED,+  EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category_Edited,+  EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+  #-}++-- | The reason why create-meeting-notes failed.+newtype EnterpriseTopazSidekickMeetingNotesCardError_Reason = EnterpriseTopazSidekickMeetingNotesCardError_Reason {fromEnterpriseTopazSidekickMeetingNotesCardError_Reason :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | No reason (default value).+pattern EnterpriseTopazSidekickMeetingNotesCardError_Reason_None :: EnterpriseTopazSidekickMeetingNotesCardError_Reason+pattern EnterpriseTopazSidekickMeetingNotesCardError_Reason_None = EnterpriseTopazSidekickMeetingNotesCardError_Reason "NONE"++-- | The user is not an owner.+pattern EnterpriseTopazSidekickMeetingNotesCardError_Reason_NOTOWNER :: EnterpriseTopazSidekickMeetingNotesCardError_Reason+pattern EnterpriseTopazSidekickMeetingNotesCardError_Reason_NOTOWNER = EnterpriseTopazSidekickMeetingNotesCardError_Reason "NOT_OWNER"++-- | Unknown reason.+pattern EnterpriseTopazSidekickMeetingNotesCardError_Reason_Unknown :: EnterpriseTopazSidekickMeetingNotesCardError_Reason+pattern EnterpriseTopazSidekickMeetingNotesCardError_Reason_Unknown = EnterpriseTopazSidekickMeetingNotesCardError_Reason "UNKNOWN"++{-# COMPLETE+  EnterpriseTopazSidekickMeetingNotesCardError_Reason_None,+  EnterpriseTopazSidekickMeetingNotesCardError_Reason_NOTOWNER,+  EnterpriseTopazSidekickMeetingNotesCardError_Reason_Unknown,+  EnterpriseTopazSidekickMeetingNotesCardError_Reason+  #-}++newtype EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem = EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem {fromEnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown (default).+pattern EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem_Unknown :: EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem+pattern EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem_Unknown = EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem "UNKNOWN"++-- | For the requester.+pattern EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem_Myself :: EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem+pattern EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem_Myself = EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem "MYSELF"++-- | For all the meeting attendees.+pattern EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem_ALLATTENDEES :: EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem+pattern EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem_ALLATTENDEES = EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem "ALL_ATTENDEES"++{-# COMPLETE+  EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem_Unknown,+  EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem_Myself,+  EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem_ALLATTENDEES,+  EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem+  #-}++-- | The response status.+newtype EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus = EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus {fromEnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown.+pattern EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_Unknown :: EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus+pattern EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_Unknown = EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus "UNKNOWN"++-- | Success.+pattern EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_Success :: EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus+pattern EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_Success = EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus "SUCCESS"++-- | No such person was found in the user\'s domain.+pattern EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_MISSINGPERSON :: EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus+pattern EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_MISSINGPERSON = EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus "MISSING_PERSON"++-- | A person was found to match the query, but an answer could not be obtained.+pattern EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_MISSINGDATA :: EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus+pattern EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_MISSINGDATA = EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus "MISSING_DATA"++{-# COMPLETE+  EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_Unknown,+  EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_Success,+  EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_MISSINGPERSON,+  EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus_MISSINGDATA,+  EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus+  #-}++-- | Defines the type of relation the list of people have with the subject of the card.+newtype EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType = EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType {fromEnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown.+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_Unknown :: EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_Unknown = EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType "UNKNOWN"++-- | Direct reports.+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_DIRECTREPORTS :: EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_DIRECTREPORTS = EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType "DIRECT_REPORTS"++-- | The manager.+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_Manager :: EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_Manager = EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType "MANAGER"++-- | The teammates\/peers of the subject.+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_Peers :: EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_Peers = EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType "PEERS"++{-# COMPLETE+  EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_Unknown,+  EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_DIRECTREPORTS,+  EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_Manager,+  EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType_Peers,+  EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType+  #-}++-- | The response status.+newtype EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus = EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus {fromEnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown.+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_Unknown :: EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_Unknown = EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus "UNKNOWN"++-- | Success.+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_Success :: EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_Success = EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus "SUCCESS"++-- | No such person was found in the user\'s domain.+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_MISSINGPERSON :: EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_MISSINGPERSON = EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus "MISSING_PERSON"++-- | A person was found to match the query, but an answer could not be obtained.+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_MISSINGDATA :: EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus+pattern EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_MISSINGDATA = EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus "MISSING_DATA"++{-# COMPLETE+  EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_Unknown,+  EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_Success,+  EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_MISSINGPERSON,+  EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus_MISSINGDATA,+  EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus+  #-}++-- | The level of affinity this person has with the requesting user.+newtype EnterpriseTopazSidekickPerson_AffinityLevel = EnterpriseTopazSidekickPerson_AffinityLevel {fromEnterpriseTopazSidekickPerson_AffinityLevel :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern EnterpriseTopazSidekickPerson_AffinityLevel_Unknown :: EnterpriseTopazSidekickPerson_AffinityLevel+pattern EnterpriseTopazSidekickPerson_AffinityLevel_Unknown = EnterpriseTopazSidekickPerson_AffinityLevel "UNKNOWN"++pattern EnterpriseTopazSidekickPerson_AffinityLevel_Low :: EnterpriseTopazSidekickPerson_AffinityLevel+pattern EnterpriseTopazSidekickPerson_AffinityLevel_Low = EnterpriseTopazSidekickPerson_AffinityLevel "LOW"++pattern EnterpriseTopazSidekickPerson_AffinityLevel_Medium :: EnterpriseTopazSidekickPerson_AffinityLevel+pattern EnterpriseTopazSidekickPerson_AffinityLevel_Medium = EnterpriseTopazSidekickPerson_AffinityLevel "MEDIUM"++pattern EnterpriseTopazSidekickPerson_AffinityLevel_High :: EnterpriseTopazSidekickPerson_AffinityLevel+pattern EnterpriseTopazSidekickPerson_AffinityLevel_High = EnterpriseTopazSidekickPerson_AffinityLevel "HIGH"++{-# COMPLETE+  EnterpriseTopazSidekickPerson_AffinityLevel_Unknown,+  EnterpriseTopazSidekickPerson_AffinityLevel_Low,+  EnterpriseTopazSidekickPerson_AffinityLevel_Medium,+  EnterpriseTopazSidekickPerson_AffinityLevel_High,+  EnterpriseTopazSidekickPerson_AffinityLevel+  #-}++-- | Attendance status of the person when included in a meeting event.+newtype EnterpriseTopazSidekickPerson_AttendingStatus = EnterpriseTopazSidekickPerson_AttendingStatus {fromEnterpriseTopazSidekickPerson_AttendingStatus :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Awaiting for the user to set the status.+pattern EnterpriseTopazSidekickPerson_AttendingStatus_Awaiting :: EnterpriseTopazSidekickPerson_AttendingStatus+pattern EnterpriseTopazSidekickPerson_AttendingStatus_Awaiting = EnterpriseTopazSidekickPerson_AttendingStatus "AWAITING"++-- | Attending.+pattern EnterpriseTopazSidekickPerson_AttendingStatus_Yes :: EnterpriseTopazSidekickPerson_AttendingStatus+pattern EnterpriseTopazSidekickPerson_AttendingStatus_Yes = EnterpriseTopazSidekickPerson_AttendingStatus "YES"++-- | Not attending.+pattern EnterpriseTopazSidekickPerson_AttendingStatus_NO :: EnterpriseTopazSidekickPerson_AttendingStatus+pattern EnterpriseTopazSidekickPerson_AttendingStatus_NO = EnterpriseTopazSidekickPerson_AttendingStatus "NO"++-- | Tentatively attending.+pattern EnterpriseTopazSidekickPerson_AttendingStatus_Maybe :: EnterpriseTopazSidekickPerson_AttendingStatus+pattern EnterpriseTopazSidekickPerson_AttendingStatus_Maybe = EnterpriseTopazSidekickPerson_AttendingStatus "MAYBE"++{-# COMPLETE+  EnterpriseTopazSidekickPerson_AttendingStatus_Awaiting,+  EnterpriseTopazSidekickPerson_AttendingStatus_Yes,+  EnterpriseTopazSidekickPerson_AttendingStatus_NO,+  EnterpriseTopazSidekickPerson_AttendingStatus_Maybe,+  EnterpriseTopazSidekickPerson_AttendingStatus+  #-}++-- | Relation type.+newtype EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation = EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation {fromEnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation_Unknown :: EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation+pattern EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation_Unknown = EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation "UNKNOWN"++pattern EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation_Manager :: EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation+pattern EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation_Manager = EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation "MANAGER"++pattern EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation_DIRECTREPORT :: EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation+pattern EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation_DIRECTREPORT = EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation "DIRECT_REPORT"++{-# COMPLETE+  EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation_Unknown,+  EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation_Manager,+  EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation_DIRECTREPORT,+  EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation+  #-}++-- | The priority to determine between objects that have the same start/time/ms The lower-value of priority == ranked higher. Max-priority = 0. Expected to be set for all types.+newtype EnterpriseTopazSidekickRankingParams_Priority = EnterpriseTopazSidekickRankingParams_Priority {fromEnterpriseTopazSidekickRankingParams_Priority :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown (default).+pattern EnterpriseTopazSidekickRankingParams_Priority_Unknown :: EnterpriseTopazSidekickRankingParams_Priority+pattern EnterpriseTopazSidekickRankingParams_Priority_Unknown = EnterpriseTopazSidekickRankingParams_Priority "UNKNOWN"++-- | Critical.+pattern EnterpriseTopazSidekickRankingParams_Priority_Critical :: EnterpriseTopazSidekickRankingParams_Priority+pattern EnterpriseTopazSidekickRankingParams_Priority_Critical = EnterpriseTopazSidekickRankingParams_Priority "CRITICAL"++-- | Important.+pattern EnterpriseTopazSidekickRankingParams_Priority_Important :: EnterpriseTopazSidekickRankingParams_Priority+pattern EnterpriseTopazSidekickRankingParams_Priority_Important = EnterpriseTopazSidekickRankingParams_Priority "IMPORTANT"++-- | High.+pattern EnterpriseTopazSidekickRankingParams_Priority_High :: EnterpriseTopazSidekickRankingParams_Priority+pattern EnterpriseTopazSidekickRankingParams_Priority_High = EnterpriseTopazSidekickRankingParams_Priority "HIGH"++-- | Normal.+pattern EnterpriseTopazSidekickRankingParams_Priority_Normal :: EnterpriseTopazSidekickRankingParams_Priority+pattern EnterpriseTopazSidekickRankingParams_Priority_Normal = EnterpriseTopazSidekickRankingParams_Priority "NORMAL"++-- | Best effort.+pattern EnterpriseTopazSidekickRankingParams_Priority_BESTEFFORT :: EnterpriseTopazSidekickRankingParams_Priority+pattern EnterpriseTopazSidekickRankingParams_Priority_BESTEFFORT = EnterpriseTopazSidekickRankingParams_Priority "BEST_EFFORT"++{-# COMPLETE+  EnterpriseTopazSidekickRankingParams_Priority_Unknown,+  EnterpriseTopazSidekickRankingParams_Priority_Critical,+  EnterpriseTopazSidekickRankingParams_Priority_Important,+  EnterpriseTopazSidekickRankingParams_Priority_High,+  EnterpriseTopazSidekickRankingParams_Priority_Normal,+  EnterpriseTopazSidekickRankingParams_Priority_BESTEFFORT,+  EnterpriseTopazSidekickRankingParams_Priority+  #-}++-- | The packing type of this object.+newtype EnterpriseTopazSidekickRankingParams_Type = EnterpriseTopazSidekickRankingParams_Type {fromEnterpriseTopazSidekickRankingParams_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Fixed, i.e., the card is time sensitive.+pattern EnterpriseTopazSidekickRankingParams_Type_Fixed :: EnterpriseTopazSidekickRankingParams_Type+pattern EnterpriseTopazSidekickRankingParams_Type_Fixed = EnterpriseTopazSidekickRankingParams_Type "FIXED"++-- | Flexible, i.e., the card is not time sensitive.+pattern EnterpriseTopazSidekickRankingParams_Type_Flexible :: EnterpriseTopazSidekickRankingParams_Type+pattern EnterpriseTopazSidekickRankingParams_Type_Flexible = EnterpriseTopazSidekickRankingParams_Type "FLEXIBLE"++{-# COMPLETE+  EnterpriseTopazSidekickRankingParams_Type_Fixed,+  EnterpriseTopazSidekickRankingParams_Type_Flexible,+  EnterpriseTopazSidekickRankingParams_Type+  #-}++-- | Used to specify the ordered ranking for the enumeration that determines how the integer values provided in the possible EnumValuePairs are used to rank results. If specified, integer values must be provided for all possible EnumValuePair values given for this property. Can only be used if isRepeatable is false.+newtype EnumPropertyOptions_OrderedRanking = EnumPropertyOptions_OrderedRanking {fromEnumPropertyOptions_OrderedRanking :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | There is no ranking order for the property. Results aren\'t adjusted by this property\'s value.+pattern EnumPropertyOptions_OrderedRanking_NOORDER :: EnumPropertyOptions_OrderedRanking+pattern EnumPropertyOptions_OrderedRanking_NOORDER = EnumPropertyOptions_OrderedRanking "NO_ORDER"++-- | This property is ranked in ascending order. Lower values indicate lower ranking.+pattern EnumPropertyOptions_OrderedRanking_Ascending :: EnumPropertyOptions_OrderedRanking+pattern EnumPropertyOptions_OrderedRanking_Ascending = EnumPropertyOptions_OrderedRanking "ASCENDING"++-- | This property is ranked in descending order. Lower values indicate higher ranking.+pattern EnumPropertyOptions_OrderedRanking_Descending :: EnumPropertyOptions_OrderedRanking+pattern EnumPropertyOptions_OrderedRanking_Descending = EnumPropertyOptions_OrderedRanking "DESCENDING"++{-# COMPLETE+  EnumPropertyOptions_OrderedRanking_NOORDER,+  EnumPropertyOptions_OrderedRanking_Ascending,+  EnumPropertyOptions_OrderedRanking_Descending,+  EnumPropertyOptions_OrderedRanking+  #-}++-- | Required. The RequestMode for this request.+newtype IndexItemRequest_Mode = IndexItemRequest_Mode {fromIndexItemRequest_Mode :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | The priority is not specified in the update request. Leaving priority unspecified results in an update failure.+pattern IndexItemRequest_Mode_Unspecified :: IndexItemRequest_Mode+pattern IndexItemRequest_Mode_Unspecified = IndexItemRequest_Mode "UNSPECIFIED"++-- | For real-time updates.+pattern IndexItemRequest_Mode_Synchronous :: IndexItemRequest_Mode+pattern IndexItemRequest_Mode_Synchronous = IndexItemRequest_Mode "SYNCHRONOUS"++-- | For changes that are executed after the response is sent back to the caller.+pattern IndexItemRequest_Mode_Asynchronous :: IndexItemRequest_Mode+pattern IndexItemRequest_Mode_Asynchronous = IndexItemRequest_Mode "ASYNCHRONOUS"++{-# COMPLETE+  IndexItemRequest_Mode_Unspecified,+  IndexItemRequest_Mode_Synchronous,+  IndexItemRequest_Mode_Asynchronous,+  IndexItemRequest_Mode+  #-}++-- | Used to specify the ordered ranking for the integer. Can only be used if isRepeatable is false.+newtype IntegerPropertyOptions_OrderedRanking = IntegerPropertyOptions_OrderedRanking {fromIntegerPropertyOptions_OrderedRanking :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | There is no ranking order for the property. Results are not adjusted by this property\'s value.+pattern IntegerPropertyOptions_OrderedRanking_NOORDER :: IntegerPropertyOptions_OrderedRanking+pattern IntegerPropertyOptions_OrderedRanking_NOORDER = IntegerPropertyOptions_OrderedRanking "NO_ORDER"++-- | This property is ranked in ascending order. Lower values indicate lower ranking.+pattern IntegerPropertyOptions_OrderedRanking_Ascending :: IntegerPropertyOptions_OrderedRanking+pattern IntegerPropertyOptions_OrderedRanking_Ascending = IntegerPropertyOptions_OrderedRanking "ASCENDING"++-- | This property is ranked in descending order. Lower values indicate higher ranking.+pattern IntegerPropertyOptions_OrderedRanking_Descending :: IntegerPropertyOptions_OrderedRanking+pattern IntegerPropertyOptions_OrderedRanking_Descending = IntegerPropertyOptions_OrderedRanking "DESCENDING"++{-# COMPLETE+  IntegerPropertyOptions_OrderedRanking_NOORDER,+  IntegerPropertyOptions_OrderedRanking_Ascending,+  IntegerPropertyOptions_OrderedRanking_Descending,+  IntegerPropertyOptions_OrderedRanking+  #-}++newtype Interaction_Type = Interaction_Type {fromInteraction_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Invalid value.+pattern Interaction_Type_Unspecified :: Interaction_Type+pattern Interaction_Type_Unspecified = Interaction_Type "UNSPECIFIED"++-- | This interaction indicates the user viewed the item.+pattern Interaction_Type_View :: Interaction_Type+pattern Interaction_Type_View = Interaction_Type "VIEW"++-- | This interaction indicates the user edited the item.+pattern Interaction_Type_Edit :: Interaction_Type+pattern Interaction_Type_Edit = Interaction_Type "EDIT"++{-# COMPLETE+  Interaction_Type_Unspecified,+  Interaction_Type_View,+  Interaction_Type_Edit,+  Interaction_Type+  #-}++-- | The type for this item.+newtype Item_ItemType = Item_ItemType {fromItem_ItemType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern Item_ItemType_Unspecified :: Item_ItemType+pattern Item_ItemType_Unspecified = Item_ItemType "UNSPECIFIED"++-- | An item that is indexed for the only purpose of serving information. These items cannot be referred in containerName or inheritAclFrom fields.+pattern Item_ItemType_CONTENTITEM :: Item_ItemType+pattern Item_ItemType_CONTENTITEM = Item_ItemType "CONTENT_ITEM"++-- | An item that gets indexed and whose purpose is to supply other items with ACLs and\/or contain other items.+pattern Item_ItemType_CONTAINERITEM :: Item_ItemType+pattern Item_ItemType_CONTAINERITEM = Item_ItemType "CONTAINER_ITEM"++-- | An item that does not get indexed, but otherwise has the same purpose as CONTAINER_ITEM.+pattern Item_ItemType_VIRTUALCONTAINERITEM :: Item_ItemType+pattern Item_ItemType_VIRTUALCONTAINERITEM = Item_ItemType "VIRTUAL_CONTAINER_ITEM"++{-# COMPLETE+  Item_ItemType_Unspecified,+  Item_ItemType_CONTENTITEM,+  Item_ItemType_CONTAINERITEM,+  Item_ItemType_VIRTUALCONTAINERITEM,+  Item_ItemType+  #-}++-- | Sets the type of access rules to apply when an item inherits its ACL from a parent. This should always be set in tandem with the inheritAclFrom field. Also, when the inheritAclFrom field is set, this field should be set to a valid AclInheritanceType.+newtype ItemAcl_AclInheritanceType = ItemAcl_AclInheritanceType {fromItemAcl_AclInheritanceType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | The default value when this item does not inherit an ACL. Use NOT_APPLICABLE when inheritAclFrom is empty. An item without ACL inheritance can still have ACLs supplied by its own readers and deniedReaders fields.+pattern ItemAcl_AclInheritanceType_NOTAPPLICABLE :: ItemAcl_AclInheritanceType+pattern ItemAcl_AclInheritanceType_NOTAPPLICABLE = ItemAcl_AclInheritanceType "NOT_APPLICABLE"++-- | During an authorization conflict, the ACL of the child item determines its read access.+pattern ItemAcl_AclInheritanceType_CHILDOVERRIDE :: ItemAcl_AclInheritanceType+pattern ItemAcl_AclInheritanceType_CHILDOVERRIDE = ItemAcl_AclInheritanceType "CHILD_OVERRIDE"++-- | During an authorization conflict, the ACL of the parent item specified in the inheritAclFrom field determines read access.+pattern ItemAcl_AclInheritanceType_PARENTOVERRIDE :: ItemAcl_AclInheritanceType+pattern ItemAcl_AclInheritanceType_PARENTOVERRIDE = ItemAcl_AclInheritanceType "PARENT_OVERRIDE"++-- | Access is granted only if this item and the parent item specified in the inheritAclFrom field both permit read access.+pattern ItemAcl_AclInheritanceType_BOTHPERMIT :: ItemAcl_AclInheritanceType+pattern ItemAcl_AclInheritanceType_BOTHPERMIT = ItemAcl_AclInheritanceType "BOTH_PERMIT"++{-# COMPLETE+  ItemAcl_AclInheritanceType_NOTAPPLICABLE,+  ItemAcl_AclInheritanceType_CHILDOVERRIDE,+  ItemAcl_AclInheritanceType_PARENTOVERRIDE,+  ItemAcl_AclInheritanceType_BOTHPERMIT,+  ItemAcl_AclInheritanceType+  #-}++newtype ItemContent_ContentFormat = ItemContent_ContentFormat {fromItemContent_ContentFormat :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Invalid value.+pattern ItemContent_ContentFormat_Unspecified :: ItemContent_ContentFormat+pattern ItemContent_ContentFormat_Unspecified = ItemContent_ContentFormat "UNSPECIFIED"++-- | contentFormat is HTML.+pattern ItemContent_ContentFormat_Html :: ItemContent_ContentFormat+pattern ItemContent_ContentFormat_Html = ItemContent_ContentFormat "HTML"++-- | contentFormat is free text.+pattern ItemContent_ContentFormat_Text :: ItemContent_ContentFormat+pattern ItemContent_ContentFormat_Text = ItemContent_ContentFormat "TEXT"++-- | contentFormat is raw bytes.+pattern ItemContent_ContentFormat_Raw :: ItemContent_ContentFormat+pattern ItemContent_ContentFormat_Raw = ItemContent_ContentFormat "RAW"++{-# COMPLETE+  ItemContent_ContentFormat_Unspecified,+  ItemContent_ContentFormat_Html,+  ItemContent_ContentFormat_Text,+  ItemContent_ContentFormat_Raw,+  ItemContent_ContentFormat+  #-}++-- | Status of the items.+newtype ItemCountByStatus_StatusCode = ItemCountByStatus_StatusCode {fromItemCountByStatus_StatusCode :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Input-only value. Used with Items.list to list all items in the queue, regardless of status.+pattern ItemCountByStatus_StatusCode_CODEUNSPECIFIED :: ItemCountByStatus_StatusCode+pattern ItemCountByStatus_StatusCode_CODEUNSPECIFIED = ItemCountByStatus_StatusCode "CODE_UNSPECIFIED"++-- | Error encountered by Cloud Search while processing this item. Details of the error are in repositoryError.+pattern ItemCountByStatus_StatusCode_Error' :: ItemCountByStatus_StatusCode+pattern ItemCountByStatus_StatusCode_Error' = ItemCountByStatus_StatusCode "ERROR"++-- | Item has been modified in the repository, and is out of date with the version previously accepted into Cloud Search.+pattern ItemCountByStatus_StatusCode_Modified :: ItemCountByStatus_StatusCode+pattern ItemCountByStatus_StatusCode_Modified = ItemCountByStatus_StatusCode "MODIFIED"++-- | Item is known to exist in the repository, but is not yet accepted by Cloud Search. An item can be in this state when Items.push has been called for an item of this name that did not exist previously.+pattern ItemCountByStatus_StatusCode_NEWITEM :: ItemCountByStatus_StatusCode+pattern ItemCountByStatus_StatusCode_NEWITEM = ItemCountByStatus_StatusCode "NEW_ITEM"++-- | API has accepted the up-to-date data of this item.+pattern ItemCountByStatus_StatusCode_Accepted :: ItemCountByStatus_StatusCode+pattern ItemCountByStatus_StatusCode_Accepted = ItemCountByStatus_StatusCode "ACCEPTED"++{-# COMPLETE+  ItemCountByStatus_StatusCode_CODEUNSPECIFIED,+  ItemCountByStatus_StatusCode_Error',+  ItemCountByStatus_StatusCode_Modified,+  ItemCountByStatus_StatusCode_NEWITEM,+  ItemCountByStatus_StatusCode_Accepted,+  ItemCountByStatus_StatusCode+  #-}++-- | Status code.+newtype ItemStatus_Code = ItemStatus_Code {fromItemStatus_Code :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Input-only value. Used with Items.list to list all items in the queue, regardless of status.+pattern ItemStatus_Code_CODEUNSPECIFIED :: ItemStatus_Code+pattern ItemStatus_Code_CODEUNSPECIFIED = ItemStatus_Code "CODE_UNSPECIFIED"++-- | Error encountered by Cloud Search while processing this item. Details of the error are in repositoryError.+pattern ItemStatus_Code_Error' :: ItemStatus_Code+pattern ItemStatus_Code_Error' = ItemStatus_Code "ERROR"++-- | Item has been modified in the repository, and is out of date with the version previously accepted into Cloud Search.+pattern ItemStatus_Code_Modified :: ItemStatus_Code+pattern ItemStatus_Code_Modified = ItemStatus_Code "MODIFIED"++-- | Item is known to exist in the repository, but is not yet accepted by Cloud Search. An item can be in this state when Items.push has been called for an item of this name that did not exist previously.+pattern ItemStatus_Code_NEWITEM :: ItemStatus_Code+pattern ItemStatus_Code_NEWITEM = ItemStatus_Code "NEW_ITEM"++-- | API has accepted the up-to-date data of this item.+pattern ItemStatus_Code_Accepted :: ItemStatus_Code+pattern ItemStatus_Code_Accepted = ItemStatus_Code "ACCEPTED"++{-# COMPLETE+  ItemStatus_Code_CODEUNSPECIFIED,+  ItemStatus_Code_Error',+  ItemStatus_Code_Modified,+  ItemStatus_Code_NEWITEM,+  ItemStatus_Code_Accepted,+  ItemStatus_Code+  #-}++newtype PersonCore_AvailabilityStatus = PersonCore_AvailabilityStatus {fromPersonCore_AvailabilityStatus :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern PersonCore_AvailabilityStatus_Unknown :: PersonCore_AvailabilityStatus+pattern PersonCore_AvailabilityStatus_Unknown = PersonCore_AvailabilityStatus "UNKNOWN"++pattern PersonCore_AvailabilityStatus_OUTOFOFFICE :: PersonCore_AvailabilityStatus+pattern PersonCore_AvailabilityStatus_OUTOFOFFICE = PersonCore_AvailabilityStatus "OUT_OF_OFFICE"++pattern PersonCore_AvailabilityStatus_OUTSIDEWORKINGHOURS :: PersonCore_AvailabilityStatus+pattern PersonCore_AvailabilityStatus_OUTSIDEWORKINGHOURS = PersonCore_AvailabilityStatus "OUTSIDE_WORKING_HOURS"++pattern PersonCore_AvailabilityStatus_Available :: PersonCore_AvailabilityStatus+pattern PersonCore_AvailabilityStatus_Available = PersonCore_AvailabilityStatus "AVAILABLE"++{-# COMPLETE+  PersonCore_AvailabilityStatus_Unknown,+  PersonCore_AvailabilityStatus_OUTOFOFFICE,+  PersonCore_AvailabilityStatus_OUTSIDEWORKINGHOURS,+  PersonCore_AvailabilityStatus_Available,+  PersonCore_AvailabilityStatus+  #-}++newtype PhoneNumber_Type = PhoneNumber_Type {fromPhoneNumber_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern PhoneNumber_Type_Other :: PhoneNumber_Type+pattern PhoneNumber_Type_Other = PhoneNumber_Type "OTHER"++pattern PhoneNumber_Type_Mobile :: PhoneNumber_Type+pattern PhoneNumber_Type_Mobile = PhoneNumber_Type "MOBILE"++pattern PhoneNumber_Type_Office :: PhoneNumber_Type+pattern PhoneNumber_Type_Office = PhoneNumber_Type "OFFICE"++{-# COMPLETE+  PhoneNumber_Type_Other,+  PhoneNumber_Type_Mobile,+  PhoneNumber_Type_Office,+  PhoneNumber_Type+  #-}++newtype PollItemsRequest_StatusCodesItem = PollItemsRequest_StatusCodesItem {fromPollItemsRequest_StatusCodesItem :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Input-only value. Used with Items.list to list all items in the queue, regardless of status.+pattern PollItemsRequest_StatusCodesItem_CODEUNSPECIFIED :: PollItemsRequest_StatusCodesItem+pattern PollItemsRequest_StatusCodesItem_CODEUNSPECIFIED = PollItemsRequest_StatusCodesItem "CODE_UNSPECIFIED"++-- | Error encountered by Cloud Search while processing this item. Details of the error are in repositoryError.+pattern PollItemsRequest_StatusCodesItem_Error' :: PollItemsRequest_StatusCodesItem+pattern PollItemsRequest_StatusCodesItem_Error' = PollItemsRequest_StatusCodesItem "ERROR"++-- | Item has been modified in the repository, and is out of date with the version previously accepted into Cloud Search.+pattern PollItemsRequest_StatusCodesItem_Modified :: PollItemsRequest_StatusCodesItem+pattern PollItemsRequest_StatusCodesItem_Modified = PollItemsRequest_StatusCodesItem "MODIFIED"++-- | Item is known to exist in the repository, but is not yet accepted by Cloud Search. An item can be in this state when Items.push has been called for an item of this name that did not exist previously.+pattern PollItemsRequest_StatusCodesItem_NEWITEM :: PollItemsRequest_StatusCodesItem+pattern PollItemsRequest_StatusCodesItem_NEWITEM = PollItemsRequest_StatusCodesItem "NEW_ITEM"++-- | API has accepted the up-to-date data of this item.+pattern PollItemsRequest_StatusCodesItem_Accepted :: PollItemsRequest_StatusCodesItem+pattern PollItemsRequest_StatusCodesItem_Accepted = PollItemsRequest_StatusCodesItem "ACCEPTED"++{-# COMPLETE+  PollItemsRequest_StatusCodesItem_CODEUNSPECIFIED,+  PollItemsRequest_StatusCodesItem_Error',+  PollItemsRequest_StatusCodesItem_Modified,+  PollItemsRequest_StatusCodesItem_NEWITEM,+  PollItemsRequest_StatusCodesItem_Accepted,+  PollItemsRequest_StatusCodesItem+  #-}++-- | Error code indicating the nature of the error.+newtype ProcessingError_Code = ProcessingError_Code {fromProcessingError_Code :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Input only value. Use this value in Items.+pattern ProcessingError_Code_PROCESSINGERRORCODEUNSPECIFIED :: ProcessingError_Code+pattern ProcessingError_Code_PROCESSINGERRORCODEUNSPECIFIED = ProcessingError_Code "PROCESSING_ERROR_CODE_UNSPECIFIED"++-- | Item\'s ACL, metadata, or content is malformed or in invalid state. FieldViolations contains more details on where the problem is.+pattern ProcessingError_Code_MALFORMEDREQUEST :: ProcessingError_Code+pattern ProcessingError_Code_MALFORMEDREQUEST = ProcessingError_Code "MALFORMED_REQUEST"++-- | Countent format is unsupported.+pattern ProcessingError_Code_UNSUPPORTEDCONTENTFORMAT :: ProcessingError_Code+pattern ProcessingError_Code_UNSUPPORTEDCONTENTFORMAT = ProcessingError_Code "UNSUPPORTED_CONTENT_FORMAT"++-- | Items with incomplete ACL information due to inheriting other items with broken ACL or having groups with unmapped descendants.+pattern ProcessingError_Code_INDIRECTBROKENACL :: ProcessingError_Code+pattern ProcessingError_Code_INDIRECTBROKENACL = ProcessingError_Code "INDIRECT_BROKEN_ACL"++-- | ACL inheritance graph formed a cycle.+pattern ProcessingError_Code_ACLCYCLE :: ProcessingError_Code+pattern ProcessingError_Code_ACLCYCLE = ProcessingError_Code "ACL_CYCLE"++{-# COMPLETE+  ProcessingError_Code_PROCESSINGERRORCODEUNSPECIFIED,+  ProcessingError_Code_MALFORMEDREQUEST,+  ProcessingError_Code_UNSUPPORTEDCONTENTFORMAT,+  ProcessingError_Code_INDIRECTBROKENACL,+  ProcessingError_Code_ACLCYCLE,+  ProcessingError_Code+  #-}++-- | The type of the push operation that defines the push behavior.+newtype PushItem_Type = PushItem_Type {fromPushItem_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Default UNSPECIFIED. Specifies that the push operation should not modify ItemStatus+pattern PushItem_Type_Unspecified :: PushItem_Type+pattern PushItem_Type_Unspecified = PushItem_Type "UNSPECIFIED"++-- | Indicates that the repository document has been modified or updated since the previous update call. This changes status to MODIFIED state for an existing item. If this is called on a non existing item, the status is changed to NEW_ITEM.+pattern PushItem_Type_Modified :: PushItem_Type+pattern PushItem_Type_Modified = PushItem_Type "MODIFIED"++-- | Item in the repository has not been modified since the last update call. This push operation will set status to ACCEPTED state.+pattern PushItem_Type_NOTMODIFIED :: PushItem_Type+pattern PushItem_Type_NOTMODIFIED = PushItem_Type "NOT_MODIFIED"++-- | Connector is facing a repository error regarding this item. Change status to REPOSITORY_ERROR state. Item is unreserved and rescheduled at a future time determined by exponential backoff.+pattern PushItem_Type_REPOSITORYERROR :: PushItem_Type+pattern PushItem_Type_REPOSITORYERROR = PushItem_Type "REPOSITORY_ERROR"++-- | Call push with REQUEUE only for items that have been reserved. This action unreserves the item and resets its available time to the wall clock time.+pattern PushItem_Type_Requeue :: PushItem_Type+pattern PushItem_Type_Requeue = PushItem_Type "REQUEUE"++{-# COMPLETE+  PushItem_Type_Unspecified,+  PushItem_Type_Modified,+  PushItem_Type_NOTMODIFIED,+  PushItem_Type_REPOSITORYERROR,+  PushItem_Type_Requeue,+  PushItem_Type+  #-}++newtype QueryInterpretation_InterpretationType = QueryInterpretation_InterpretationType {fromQueryInterpretation_InterpretationType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Neither the natural language interpretation, nor a broader version of the query is used to fetch the search results.+pattern QueryInterpretation_InterpretationType_None :: QueryInterpretation_InterpretationType+pattern QueryInterpretation_InterpretationType_None = QueryInterpretation_InterpretationType "NONE"++-- | The results from original query are blended with other results. The reason for blending these other results with the results from original query is populated in the \'Reason\' field below.+pattern QueryInterpretation_InterpretationType_Blend :: QueryInterpretation_InterpretationType+pattern QueryInterpretation_InterpretationType_Blend = QueryInterpretation_InterpretationType "BLEND"++-- | The results from original query are replaced. The reason for replacing the results from original query is populated in the \'Reason\' field below.+pattern QueryInterpretation_InterpretationType_Replace :: QueryInterpretation_InterpretationType+pattern QueryInterpretation_InterpretationType_Replace = QueryInterpretation_InterpretationType "REPLACE"++{-# COMPLETE+  QueryInterpretation_InterpretationType_None,+  QueryInterpretation_InterpretationType_Blend,+  QueryInterpretation_InterpretationType_Replace,+  QueryInterpretation_InterpretationType+  #-}++-- | The reason for interpretation of the query. This field will not be UNSPECIFIED if the interpretation type is not NONE.+newtype QueryInterpretation_Reason = QueryInterpretation_Reason {fromQueryInterpretation_Reason :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern QueryInterpretation_Reason_Unspecified :: QueryInterpretation_Reason+pattern QueryInterpretation_Reason_Unspecified = QueryInterpretation_Reason "UNSPECIFIED"++-- | Natural language interpretation of the query is used to fetch the search results.+pattern QueryInterpretation_Reason_QUERYHASNATURALLANGUAGEINTENT :: QueryInterpretation_Reason+pattern QueryInterpretation_Reason_QUERYHASNATURALLANGUAGEINTENT = QueryInterpretation_Reason "QUERY_HAS_NATURAL_LANGUAGE_INTENT"++-- | Query and document terms similarity is used to selectively broaden the query to retrieve additional search results since enough results were not found for the user query. Interpreted query will be empty for this case.+pattern QueryInterpretation_Reason_NOTENOUGHRESULTSFOUNDFORUSERQUERY :: QueryInterpretation_Reason+pattern QueryInterpretation_Reason_NOTENOUGHRESULTSFOUNDFORUSERQUERY = QueryInterpretation_Reason "NOT_ENOUGH_RESULTS_FOUND_FOR_USER_QUERY"++{-# COMPLETE+  QueryInterpretation_Reason_Unspecified,+  QueryInterpretation_Reason_QUERYHASNATURALLANGUAGEINTENT,+  QueryInterpretation_Reason_NOTENOUGHRESULTSFOUNDFORUSERQUERY,+  QueryInterpretation_Reason+  #-}++-- | The type of the operator.+newtype QueryOperator_Type = QueryOperator_Type {fromQueryOperator_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Invalid value.+pattern QueryOperator_Type_Unknown :: QueryOperator_Type+pattern QueryOperator_Type_Unknown = QueryOperator_Type "UNKNOWN"++pattern QueryOperator_Type_Integer :: QueryOperator_Type+pattern QueryOperator_Type_Integer = QueryOperator_Type "INTEGER"++pattern QueryOperator_Type_Double :: QueryOperator_Type+pattern QueryOperator_Type_Double = QueryOperator_Type "DOUBLE"++pattern QueryOperator_Type_Timestamp :: QueryOperator_Type+pattern QueryOperator_Type_Timestamp = QueryOperator_Type "TIMESTAMP"++pattern QueryOperator_Type_Boolean :: QueryOperator_Type+pattern QueryOperator_Type_Boolean = QueryOperator_Type "BOOLEAN"++pattern QueryOperator_Type_Enum' :: QueryOperator_Type+pattern QueryOperator_Type_Enum' = QueryOperator_Type "ENUM"++pattern QueryOperator_Type_Date :: QueryOperator_Type+pattern QueryOperator_Type_Date = QueryOperator_Type "DATE"++pattern QueryOperator_Type_Text :: QueryOperator_Type+pattern QueryOperator_Type_Text = QueryOperator_Type "TEXT"++pattern QueryOperator_Type_Html :: QueryOperator_Type+pattern QueryOperator_Type_Html = QueryOperator_Type "HTML"++{-# COMPLETE+  QueryOperator_Type_Unknown,+  QueryOperator_Type_Integer,+  QueryOperator_Type_Double,+  QueryOperator_Type_Timestamp,+  QueryOperator_Type_Boolean,+  QueryOperator_Type_Enum',+  QueryOperator_Type_Date,+  QueryOperator_Type_Text,+  QueryOperator_Type_Html,+  QueryOperator_Type+  #-}++-- | The type of error.+newtype RepositoryError_Type = RepositoryError_Type {fromRepositoryError_Type :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Unknown error.+pattern RepositoryError_Type_Unknown :: RepositoryError_Type+pattern RepositoryError_Type_Unknown = RepositoryError_Type "UNKNOWN"++-- | Unknown or unreachable host.+pattern RepositoryError_Type_NETWORKERROR :: RepositoryError_Type+pattern RepositoryError_Type_NETWORKERROR = RepositoryError_Type "NETWORK_ERROR"++-- | DNS problem, such as the DNS server is not responding.+pattern RepositoryError_Type_DNSERROR :: RepositoryError_Type+pattern RepositoryError_Type_DNSERROR = RepositoryError_Type "DNS_ERROR"++-- | Cannot connect to the repository server.+pattern RepositoryError_Type_CONNECTIONERROR :: RepositoryError_Type+pattern RepositoryError_Type_CONNECTIONERROR = RepositoryError_Type "CONNECTION_ERROR"++-- | Failed authentication due to incorrect credentials.+pattern RepositoryError_Type_AUTHENTICATIONERROR :: RepositoryError_Type+pattern RepositoryError_Type_AUTHENTICATIONERROR = RepositoryError_Type "AUTHENTICATION_ERROR"++-- | Service account is not authorized for the repository.+pattern RepositoryError_Type_AUTHORIZATIONERROR :: RepositoryError_Type+pattern RepositoryError_Type_AUTHORIZATIONERROR = RepositoryError_Type "AUTHORIZATION_ERROR"++-- | Repository server error.+pattern RepositoryError_Type_SERVERERROR :: RepositoryError_Type+pattern RepositoryError_Type_SERVERERROR = RepositoryError_Type "SERVER_ERROR"++-- | Quota exceeded.+pattern RepositoryError_Type_QUOTAEXCEEDED :: RepositoryError_Type+pattern RepositoryError_Type_QUOTAEXCEEDED = RepositoryError_Type "QUOTA_EXCEEDED"++-- | Server temporarily unavailable.+pattern RepositoryError_Type_SERVICEUNAVAILABLE :: RepositoryError_Type+pattern RepositoryError_Type_SERVICEUNAVAILABLE = RepositoryError_Type "SERVICE_UNAVAILABLE"++-- | Client-related error, such as an invalid request from the connector to the repository server.+pattern RepositoryError_Type_CLIENTERROR :: RepositoryError_Type+pattern RepositoryError_Type_CLIENTERROR = RepositoryError_Type "CLIENT_ERROR"++{-# COMPLETE+  RepositoryError_Type_Unknown,+  RepositoryError_Type_NETWORKERROR,+  RepositoryError_Type_DNSERROR,+  RepositoryError_Type_CONNECTIONERROR,+  RepositoryError_Type_AUTHENTICATIONERROR,+  RepositoryError_Type_AUTHORIZATIONERROR,+  RepositoryError_Type_SERVERERROR,+  RepositoryError_Type_QUOTAEXCEEDED,+  RepositoryError_Type_SERVICEUNAVAILABLE,+  RepositoryError_Type_CLIENTERROR,+  RepositoryError_Type+  #-}++-- | Indicates the ranking importance given to property when it is matched during retrieval. Once set, the token importance of a property cannot be changed.+newtype RetrievalImportance_Importance = RetrievalImportance_Importance {fromRetrievalImportance_Importance :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Treat the match like a body text match.+pattern RetrievalImportance_Importance_Default :: RetrievalImportance_Importance+pattern RetrievalImportance_Importance_Default = RetrievalImportance_Importance "DEFAULT"++-- | Treat the match like a match against title of the item.+pattern RetrievalImportance_Importance_Highest :: RetrievalImportance_Importance+pattern RetrievalImportance_Importance_Highest = RetrievalImportance_Importance "HIGHEST"++-- | Treat the match with higher importance than body text.+pattern RetrievalImportance_Importance_High :: RetrievalImportance_Importance+pattern RetrievalImportance_Importance_High = RetrievalImportance_Importance "HIGH"++-- | Treat the match with lower importance than body text.+pattern RetrievalImportance_Importance_Low :: RetrievalImportance_Importance+pattern RetrievalImportance_Importance_Low = RetrievalImportance_Importance "LOW"++-- | Do not match against this field during retrieval. The property can still be used for operator matching, faceting, and suggest if desired.+pattern RetrievalImportance_Importance_None :: RetrievalImportance_Importance+pattern RetrievalImportance_Importance_None = RetrievalImportance_Importance "NONE"++{-# COMPLETE+  RetrievalImportance_Importance_Default,+  RetrievalImportance_Importance_Highest,+  RetrievalImportance_Importance_High,+  RetrievalImportance_Importance_Low,+  RetrievalImportance_Importance_None,+  RetrievalImportance_Importance+  #-}++-- | Ascending is the default sort order+newtype SortOptions_SortOrder = SortOptions_SortOrder {fromSortOptions_SortOrder :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern SortOptions_SortOrder_Ascending :: SortOptions_SortOrder+pattern SortOptions_SortOrder_Ascending = SortOptions_SortOrder "ASCENDING"++pattern SortOptions_SortOrder_Descending :: SortOptions_SortOrder+pattern SortOptions_SortOrder_Descending = SortOptions_SortOrder "DESCENDING"++{-# COMPLETE+  SortOptions_SortOrder_Ascending,+  SortOptions_SortOrder_Descending,+  SortOptions_SortOrder+  #-}++-- | Predefined content source for Google Apps.+newtype Source_PredefinedSource = Source_PredefinedSource {fromSource_PredefinedSource :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern Source_PredefinedSource_None :: Source_PredefinedSource+pattern Source_PredefinedSource_None = Source_PredefinedSource "NONE"++-- | Suggests queries issued by the user in the past. Only valid when used with the suggest API. Ignored when used in the query API.+pattern Source_PredefinedSource_QUERYHISTORY :: Source_PredefinedSource+pattern Source_PredefinedSource_QUERYHISTORY = Source_PredefinedSource "QUERY_HISTORY"++-- | Suggests people in the organization. Only valid when used with the suggest API. Results in an error when used in the query API.+pattern Source_PredefinedSource_Person :: Source_PredefinedSource+pattern Source_PredefinedSource_Person = Source_PredefinedSource "PERSON"++pattern Source_PredefinedSource_GOOGLEDRIVE :: Source_PredefinedSource+pattern Source_PredefinedSource_GOOGLEDRIVE = Source_PredefinedSource "GOOGLE_DRIVE"++pattern Source_PredefinedSource_GOOGLEGMAIL :: Source_PredefinedSource+pattern Source_PredefinedSource_GOOGLEGMAIL = Source_PredefinedSource "GOOGLE_GMAIL"++pattern Source_PredefinedSource_GOOGLESITES :: Source_PredefinedSource+pattern Source_PredefinedSource_GOOGLESITES = Source_PredefinedSource "GOOGLE_SITES"++pattern Source_PredefinedSource_GOOGLEGROUPS :: Source_PredefinedSource+pattern Source_PredefinedSource_GOOGLEGROUPS = Source_PredefinedSource "GOOGLE_GROUPS"++pattern Source_PredefinedSource_GOOGLECALENDAR :: Source_PredefinedSource+pattern Source_PredefinedSource_GOOGLECALENDAR = Source_PredefinedSource "GOOGLE_CALENDAR"++pattern Source_PredefinedSource_GOOGLEKEEP :: Source_PredefinedSource+pattern Source_PredefinedSource_GOOGLEKEEP = Source_PredefinedSource "GOOGLE_KEEP"++{-# COMPLETE+  Source_PredefinedSource_None,+  Source_PredefinedSource_QUERYHISTORY,+  Source_PredefinedSource_Person,+  Source_PredefinedSource_GOOGLEDRIVE,+  Source_PredefinedSource_GOOGLEGMAIL,+  Source_PredefinedSource_GOOGLESITES,+  Source_PredefinedSource_GOOGLEGROUPS,+  Source_PredefinedSource_GOOGLECALENDAR,+  Source_PredefinedSource_GOOGLEKEEP,+  Source_PredefinedSource+  #-}++-- | Importance of the source.+newtype SourceScoringConfig_SourceImportance = SourceScoringConfig_SourceImportance {fromSourceScoringConfig_SourceImportance :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++pattern SourceScoringConfig_SourceImportance_Default :: SourceScoringConfig_SourceImportance+pattern SourceScoringConfig_SourceImportance_Default = SourceScoringConfig_SourceImportance "DEFAULT"++pattern SourceScoringConfig_SourceImportance_Low :: SourceScoringConfig_SourceImportance+pattern SourceScoringConfig_SourceImportance_Low = SourceScoringConfig_SourceImportance "LOW"++pattern SourceScoringConfig_SourceImportance_High :: SourceScoringConfig_SourceImportance+pattern SourceScoringConfig_SourceImportance_High = SourceScoringConfig_SourceImportance "HIGH"++{-# COMPLETE+  SourceScoringConfig_SourceImportance_Default,+  SourceScoringConfig_SourceImportance_Low,+  SourceScoringConfig_SourceImportance_High,+  SourceScoringConfig_SourceImportance+  #-}++-- | Suggestion triggered for the current query.+newtype SpellResult_SuggestionType = SpellResult_SuggestionType {fromSpellResult_SuggestionType :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Default spell check type+pattern SpellResult_SuggestionType_SUGGESTIONTYPEUNSPECIFIED :: SpellResult_SuggestionType+pattern SpellResult_SuggestionType_SUGGESTIONTYPEUNSPECIFIED = SpellResult_SuggestionType "SUGGESTION_TYPE_UNSPECIFIED"++-- | Spell suggestion without any results changed. The results are still shown for the original query (which has non zero \/ results) with a suggestion for spelling that would have results.+pattern SpellResult_SuggestionType_NONEMPTYRESULTSSPELLSUGGESTION :: SpellResult_SuggestionType+pattern SpellResult_SuggestionType_NONEMPTYRESULTSSPELLSUGGESTION = SpellResult_SuggestionType "NON_EMPTY_RESULTS_SPELL_SUGGESTION"++-- | Spell suggestion triggered when original query has no results. When the original query has no results, and spell suggestion has results we trigger results for the spell corrected query.+pattern SpellResult_SuggestionType_ZERORESULTSFULLPAGEREPLACEMENT :: SpellResult_SuggestionType+pattern SpellResult_SuggestionType_ZERORESULTSFULLPAGEREPLACEMENT = SpellResult_SuggestionType "ZERO_RESULTS_FULL_PAGE_REPLACEMENT"++{-# COMPLETE+  SpellResult_SuggestionType_SUGGESTIONTYPEUNSPECIFIED,+  SpellResult_SuggestionType_NONEMPTYRESULTSSPELLSUGGESTION,+  SpellResult_SuggestionType_ZERORESULTSFULLPAGEREPLACEMENT,+  SpellResult_SuggestionType+  #-}++-- | The resolution status for the external identity.+newtype UnmappedIdentity_ResolutionStatusCode = UnmappedIdentity_ResolutionStatusCode {fromUnmappedIdentity_ResolutionStatusCode :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Input-only value. Used to list all unmapped identities regardless of status.+pattern UnmappedIdentity_ResolutionStatusCode_CODEUNSPECIFIED :: UnmappedIdentity_ResolutionStatusCode+pattern UnmappedIdentity_ResolutionStatusCode_CODEUNSPECIFIED = UnmappedIdentity_ResolutionStatusCode "CODE_UNSPECIFIED"++-- | The unmapped identity was not found in IDaaS, and needs to be provided by the user.+pattern UnmappedIdentity_ResolutionStatusCode_NOTFOUND :: UnmappedIdentity_ResolutionStatusCode+pattern UnmappedIdentity_ResolutionStatusCode_NOTFOUND = UnmappedIdentity_ResolutionStatusCode "NOT_FOUND"++-- | The identity source associated with the identity was either not found or deleted.+pattern UnmappedIdentity_ResolutionStatusCode_IDENTITYSOURCENOTFOUND :: UnmappedIdentity_ResolutionStatusCode+pattern UnmappedIdentity_ResolutionStatusCode_IDENTITYSOURCENOTFOUND = UnmappedIdentity_ResolutionStatusCode "IDENTITY_SOURCE_NOT_FOUND"++-- | IDaaS does not understand the identity source, probably because the schema was modified in a non compatible way.+pattern UnmappedIdentity_ResolutionStatusCode_IDENTITYSOURCEMISCONFIGURED :: UnmappedIdentity_ResolutionStatusCode+pattern UnmappedIdentity_ResolutionStatusCode_IDENTITYSOURCEMISCONFIGURED = UnmappedIdentity_ResolutionStatusCode "IDENTITY_SOURCE_MISCONFIGURED"++-- | The number of users associated with the external identity is too large.+pattern UnmappedIdentity_ResolutionStatusCode_TOOMANYMAPPINGSFOUND :: UnmappedIdentity_ResolutionStatusCode+pattern UnmappedIdentity_ResolutionStatusCode_TOOMANYMAPPINGSFOUND = UnmappedIdentity_ResolutionStatusCode "TOO_MANY_MAPPINGS_FOUND"++-- | Internal error.+pattern UnmappedIdentity_ResolutionStatusCode_INTERNALERROR :: UnmappedIdentity_ResolutionStatusCode+pattern UnmappedIdentity_ResolutionStatusCode_INTERNALERROR = UnmappedIdentity_ResolutionStatusCode "INTERNAL_ERROR"++{-# COMPLETE+  UnmappedIdentity_ResolutionStatusCode_CODEUNSPECIFIED,+  UnmappedIdentity_ResolutionStatusCode_NOTFOUND,+  UnmappedIdentity_ResolutionStatusCode_IDENTITYSOURCENOTFOUND,+  UnmappedIdentity_ResolutionStatusCode_IDENTITYSOURCEMISCONFIGURED,+  UnmappedIdentity_ResolutionStatusCode_TOOMANYMAPPINGSFOUND,+  UnmappedIdentity_ResolutionStatusCode_INTERNALERROR,+  UnmappedIdentity_ResolutionStatusCode+  #-}++-- | Limit users selection to this status.+newtype DebugIdentitysourcesUnmappedidsListResolutionStatusCode = DebugIdentitysourcesUnmappedidsListResolutionStatusCode {fromDebugIdentitysourcesUnmappedidsListResolutionStatusCode :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | Input-only value. Used to list all unmapped identities regardless of status.+pattern DebugIdentitysourcesUnmappedidsListResolutionStatusCode_CODEUNSPECIFIED :: DebugIdentitysourcesUnmappedidsListResolutionStatusCode+pattern DebugIdentitysourcesUnmappedidsListResolutionStatusCode_CODEUNSPECIFIED = DebugIdentitysourcesUnmappedidsListResolutionStatusCode "CODE_UNSPECIFIED"++-- | The unmapped identity was not found in IDaaS, and needs to be provided by the user.+pattern DebugIdentitysourcesUnmappedidsListResolutionStatusCode_NOTFOUND :: DebugIdentitysourcesUnmappedidsListResolutionStatusCode+pattern DebugIdentitysourcesUnmappedidsListResolutionStatusCode_NOTFOUND = DebugIdentitysourcesUnmappedidsListResolutionStatusCode "NOT_FOUND"++-- | The identity source associated with the identity was either not found or deleted.+pattern DebugIdentitysourcesUnmappedidsListResolutionStatusCode_IDENTITYSOURCENOTFOUND :: DebugIdentitysourcesUnmappedidsListResolutionStatusCode+pattern DebugIdentitysourcesUnmappedidsListResolutionStatusCode_IDENTITYSOURCENOTFOUND = DebugIdentitysourcesUnmappedidsListResolutionStatusCode "IDENTITY_SOURCE_NOT_FOUND"++-- | IDaaS does not understand the identity source, probably because the schema was modified in a non compatible way.+pattern DebugIdentitysourcesUnmappedidsListResolutionStatusCode_IDENTITYSOURCEMISCONFIGURED :: DebugIdentitysourcesUnmappedidsListResolutionStatusCode+pattern DebugIdentitysourcesUnmappedidsListResolutionStatusCode_IDENTITYSOURCEMISCONFIGURED = DebugIdentitysourcesUnmappedidsListResolutionStatusCode "IDENTITY_SOURCE_MISCONFIGURED"++-- | The number of users associated with the external identity is too large.+pattern DebugIdentitysourcesUnmappedidsListResolutionStatusCode_TOOMANYMAPPINGSFOUND :: DebugIdentitysourcesUnmappedidsListResolutionStatusCode+pattern DebugIdentitysourcesUnmappedidsListResolutionStatusCode_TOOMANYMAPPINGSFOUND = DebugIdentitysourcesUnmappedidsListResolutionStatusCode "TOO_MANY_MAPPINGS_FOUND"++-- | Internal error.+pattern DebugIdentitysourcesUnmappedidsListResolutionStatusCode_INTERNALERROR :: DebugIdentitysourcesUnmappedidsListResolutionStatusCode+pattern DebugIdentitysourcesUnmappedidsListResolutionStatusCode_INTERNALERROR = DebugIdentitysourcesUnmappedidsListResolutionStatusCode "INTERNAL_ERROR"++{-# COMPLETE+  DebugIdentitysourcesUnmappedidsListResolutionStatusCode_CODEUNSPECIFIED,+  DebugIdentitysourcesUnmappedidsListResolutionStatusCode_NOTFOUND,+  DebugIdentitysourcesUnmappedidsListResolutionStatusCode_IDENTITYSOURCENOTFOUND,+  DebugIdentitysourcesUnmappedidsListResolutionStatusCode_IDENTITYSOURCEMISCONFIGURED,+  DebugIdentitysourcesUnmappedidsListResolutionStatusCode_TOOMANYMAPPINGSFOUND,+  DebugIdentitysourcesUnmappedidsListResolutionStatusCode_INTERNALERROR,+  DebugIdentitysourcesUnmappedidsListResolutionStatusCode+  #-}++-- | Required. The RequestMode for this request.+newtype IndexingDatasourcesItemsDeleteMode = IndexingDatasourcesItemsDeleteMode {fromIndexingDatasourcesItemsDeleteMode :: Core.Text}+  deriving stock (Core.Show, Core.Read, Core.Eq, Core.Ord, Core.Generic)+  deriving newtype+    ( Core.Hashable,+      Core.ToHttpApiData,+      Core.FromHttpApiData,+      Core.ToJSON,+      Core.ToJSONKey,+      Core.FromJSON,+      Core.FromJSONKey+    )++-- | The priority is not specified in the update request. Leaving priority unspecified results in an update failure.+pattern IndexingDatasourcesItemsDeleteMode_Unspecified :: IndexingDatasourcesItemsDeleteMode+pattern IndexingDatasourcesItemsDeleteMode_Unspecified = IndexingDatasourcesItemsDeleteMode "UNSPECIFIED"++-- | For real-time updates.+pattern IndexingDatasourcesItemsDeleteMode_Synchronous :: IndexingDatasourcesItemsDeleteMode+pattern IndexingDatasourcesItemsDeleteMode_Synchronous = IndexingDatasourcesItemsDeleteMode "SYNCHRONOUS"++-- | For changes that are executed after the response is sent back to the caller.+pattern IndexingDatasourcesItemsDeleteMode_Asynchronous :: IndexingDatasourcesItemsDeleteMode+pattern IndexingDatasourcesItemsDeleteMode_Asynchronous = IndexingDatasourcesItemsDeleteMode "ASYNCHRONOUS"++{-# COMPLETE+  IndexingDatasourcesItemsDeleteMode_Unspecified,+  IndexingDatasourcesItemsDeleteMode_Synchronous,+  IndexingDatasourcesItemsDeleteMode_Asynchronous,+  IndexingDatasourcesItemsDeleteMode+  #-}
+ gen/Gogol/CloudSearch/Media/Upload.hs view
@@ -0,0 +1,157 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Media.Upload+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Uploads media for indexing. The upload endpoint supports direct and resumable upload protocols and is intended for large items that can not be <https://developers.google.com/cloud-search/docs/reference/rest/v1/indexing.datasources.items#itemcontent inlined during index requests>. To index large content: 1. Call indexing.datasources.items.upload with the item name to begin an upload session and retrieve the UploadItemRef. 1. Call media.upload to upload the content, as a streaming request, using the same resource name from the UploadItemRef from step 1. 1. Call indexing.datasources.items.index to index the item. Populate the </cloud-search/docs/reference/rest/v1/indexing.datasources.items#ItemContent ItemContent> with the UploadItemRef from step 1. For additional information, see <https://developers.google.com/cloud-search/docs/guides/content-connector#rest Create a content connector using the REST API>. __Note:__ This API requires a service account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.media.upload@.+module Gogol.CloudSearch.Media.Upload+  ( -- * Resource+    CloudSearchMediaUploadResource,++    -- ** Constructing a Request+    CloudSearchMediaUpload (..),+    newCloudSearchMediaUpload,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.media.upload@ method which the+-- 'CloudSearchMediaUpload' request conforms to.+type CloudSearchMediaUploadResource =+  "v1"+    Core.:> "media"+    Core.:> Core.Capture "resourceName" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] Media+    Core.:> Core.Post '[Core.JSON] Media+    Core.:<|> "upload"+    Core.:> "v1"+    Core.:> "media"+    Core.:> Core.Capture "resourceName" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.QueryParam "uploadType" Core.Multipart+    Core.:> Core.MultipartRelated '[Core.JSON] Media+    Core.:> Core.Post '[Core.JSON] Media++-- | Uploads media for indexing. The upload endpoint supports direct and resumable upload protocols and is intended for large items that can not be <https://developers.google.com/cloud-search/docs/reference/rest/v1/indexing.datasources.items#itemcontent inlined during index requests>. To index large content: 1. Call indexing.datasources.items.upload with the item name to begin an upload session and retrieve the UploadItemRef. 1. Call media.upload to upload the content, as a streaming request, using the same resource name from the UploadItemRef from step 1. 1. Call indexing.datasources.items.index to index the item. Populate the </cloud-search/docs/reference/rest/v1/indexing.datasources.items#ItemContent ItemContent> with the UploadItemRef from step 1. For additional information, see <https://developers.google.com/cloud-search/docs/guides/content-connector#rest Create a content connector using the REST API>. __Note:__ This API requires a service account to execute.+--+-- /See:/ 'newCloudSearchMediaUpload' smart constructor.+data CloudSearchMediaUpload = CloudSearchMediaUpload+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: Media,+    -- | Name of the media that is being downloaded. See ReadRequest.resource_name.+    resourceName :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchMediaUpload' with the minimum fields required to make a request.+newCloudSearchMediaUpload ::+  -- |  Multipart request metadata. See 'payload'.+  Media ->+  -- |  Name of the media that is being downloaded. See ReadRequest.resource_name. See 'resourceName'.+  Core.Text ->+  CloudSearchMediaUpload+newCloudSearchMediaUpload payload resourceName =+  CloudSearchMediaUpload+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      resourceName = resourceName,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchMediaUpload where+  type Rs CloudSearchMediaUpload = Media+  type+    Scopes CloudSearchMediaUpload =+      '[CloudSearch'FullControl, CloudSearch'Indexing]+  requestClient CloudSearchMediaUpload {..} =+    go+      resourceName+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go Core.:<|> _ =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchMediaUploadResource)+          Core.mempty++instance+  Core.GoogleRequest+    (Core.MediaUpload CloudSearchMediaUpload)+  where+  type Rs (Core.MediaUpload CloudSearchMediaUpload) = Media+  type+    Scopes (Core.MediaUpload CloudSearchMediaUpload) =+      Core.Scopes CloudSearchMediaUpload+  requestClient (Core.MediaUpload CloudSearchMediaUpload {..} body) =+    go+      resourceName+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      (Core.Just Core.Multipart)+      payload+      body+      cloudSearchService+    where+      _ Core.:<|> go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchMediaUploadResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Operations/Get.hs view
@@ -0,0 +1,115 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Operations.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets the latest state of a long-running operation. Clients can use this method to poll the operation result at intervals as recommended by the API service.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.operations.get@.+module Gogol.CloudSearch.Operations.Get+  ( -- * Resource+    CloudSearchOperationsGetResource,++    -- ** Constructing a Request+    CloudSearchOperationsGet (..),+    newCloudSearchOperationsGet,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.operations.get@ method which the+-- 'CloudSearchOperationsGet' request conforms to.+type CloudSearchOperationsGetResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] Operation++-- | Gets the latest state of a long-running operation. Clients can use this method to poll the operation result at intervals as recommended by the API service.+--+-- /See:/ 'newCloudSearchOperationsGet' smart constructor.+data CloudSearchOperationsGet = CloudSearchOperationsGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the operation resource.+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchOperationsGet' with the minimum fields required to make a request.+newCloudSearchOperationsGet ::+  -- |  The name of the operation resource. See 'name'.+  Core.Text ->+  CloudSearchOperationsGet+newCloudSearchOperationsGet name =+  CloudSearchOperationsGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchOperationsGet where+  type Rs CloudSearchOperationsGet = Operation+  type+    Scopes CloudSearchOperationsGet =+      '[ CloudSearch'FullControl,+         CloudSearch'Debug,+         CloudSearch'Indexing,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing,+         CloudSearch'Settings'Query+       ]+  requestClient CloudSearchOperationsGet {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchOperationsGetResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Operations/Lro/List.hs view
@@ -0,0 +1,131 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Operations.Lro.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists operations that match the specified filter in the request. If the server doesn\'t support this method, it returns @UNIMPLEMENTED@.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.operations.lro.list@.+module Gogol.CloudSearch.Operations.Lro.List+  ( -- * Resource+    CloudSearchOperationsLroListResource,++    -- ** Constructing a Request+    CloudSearchOperationsLroList (..),+    newCloudSearchOperationsLroList,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.operations.lro.list@ method which the+-- 'CloudSearchOperationsLroList' request conforms to.+type CloudSearchOperationsLroListResource =+  "v1"+    Core.:> Core.Capture "name" Core.Text+    Core.:> "lro"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "filter" Core.Text+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListOperationsResponse++-- | Lists operations that match the specified filter in the request. If the server doesn\'t support this method, it returns @UNIMPLEMENTED@.+--+-- /See:/ 'newCloudSearchOperationsLroList' smart constructor.+data CloudSearchOperationsLroList = CloudSearchOperationsLroList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The standard list filter.+    filter :: (Core.Maybe Core.Text),+    -- | The name of the operation\'s parent resource.+    name :: Core.Text,+    -- | The standard list page size.+    pageSize :: (Core.Maybe Core.Int32),+    -- | The standard list page token.+    pageToken :: (Core.Maybe Core.Text),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchOperationsLroList' with the minimum fields required to make a request.+newCloudSearchOperationsLroList ::+  -- |  The name of the operation\'s parent resource. See 'name'.+  Core.Text ->+  CloudSearchOperationsLroList+newCloudSearchOperationsLroList name =+  CloudSearchOperationsLroList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      filter = Core.Nothing,+      name = name,+      pageSize = Core.Nothing,+      pageToken = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchOperationsLroList where+  type Rs CloudSearchOperationsLroList = ListOperationsResponse+  type+    Scopes CloudSearchOperationsLroList =+      '[ CloudSearch'FullControl,+         CloudSearch'Debug,+         CloudSearch'Indexing,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing,+         CloudSearch'Settings'Query+       ]+  requestClient CloudSearchOperationsLroList {..} =+    go+      name+      xgafv+      accessToken+      callback+      filter+      pageSize+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchOperationsLroListResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Query/DebugSearch.hs view
@@ -0,0 +1,110 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Query.DebugSearch+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns Debug information for Cloud Search Query API provides the search method. __Note:__ This API requires a standard end user account to execute. A service account can\'t perform Query API requests directly; to use a service account to perform queries, set up <https://developers.google.com/cloud-search/docs/guides/delegation/ Google Workspace domain-wide delegation of authority>.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.query.debugSearch@.+module Gogol.CloudSearch.Query.DebugSearch+  ( -- * Resource+    CloudSearchQueryDebugSearchResource,++    -- ** Constructing a Request+    CloudSearchQueryDebugSearch (..),+    newCloudSearchQueryDebugSearch,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.query.debugSearch@ method which the+-- 'CloudSearchQueryDebugSearch' request conforms to.+type CloudSearchQueryDebugSearchResource =+  "v1"+    Core.:> "query:debugSearch"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] SearchRequest+    Core.:> Core.Post '[Core.JSON] DebugResponse++-- | Returns Debug information for Cloud Search Query API provides the search method. __Note:__ This API requires a standard end user account to execute. A service account can\'t perform Query API requests directly; to use a service account to perform queries, set up <https://developers.google.com/cloud-search/docs/guides/delegation/ Google Workspace domain-wide delegation of authority>.+--+-- /See:/ 'newCloudSearchQueryDebugSearch' smart constructor.+data CloudSearchQueryDebugSearch = CloudSearchQueryDebugSearch+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: SearchRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchQueryDebugSearch' with the minimum fields required to make a request.+newCloudSearchQueryDebugSearch ::+  -- |  Multipart request metadata. See 'payload'.+  SearchRequest ->+  CloudSearchQueryDebugSearch+newCloudSearchQueryDebugSearch payload =+  CloudSearchQueryDebugSearch+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchQueryDebugSearch where+  type Rs CloudSearchQueryDebugSearch = DebugResponse+  type+    Scopes CloudSearchQueryDebugSearch =+      '[CloudSearch'FullControl, CloudSearch'Query]+  requestClient CloudSearchQueryDebugSearch {..} =+    go+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchQueryDebugSearchResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Query/RemoveActivity.hs view
@@ -0,0 +1,110 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Query.RemoveActivity+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Provides functionality to remove logged activity for a user. Currently to be used only for Chat 1p clients __Note:__ This API requires a standard end user account to execute. A service account can\'t perform Remove Activity requests directly; to use a service account to perform queries, set up <https://developers.google.com/cloud-search/docs/guides/delegation/ Google Workspace domain-wide delegation of authority>.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.query.removeActivity@.+module Gogol.CloudSearch.Query.RemoveActivity+  ( -- * Resource+    CloudSearchQueryRemoveActivityResource,++    -- ** Constructing a Request+    CloudSearchQueryRemoveActivity (..),+    newCloudSearchQueryRemoveActivity,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.query.removeActivity@ method which the+-- 'CloudSearchQueryRemoveActivity' request conforms to.+type CloudSearchQueryRemoveActivityResource =+  "v1"+    Core.:> "query:removeActivity"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] RemoveActivityRequest+    Core.:> Core.Post '[Core.JSON] RemoveActivityResponse++-- | Provides functionality to remove logged activity for a user. Currently to be used only for Chat 1p clients __Note:__ This API requires a standard end user account to execute. A service account can\'t perform Remove Activity requests directly; to use a service account to perform queries, set up <https://developers.google.com/cloud-search/docs/guides/delegation/ Google Workspace domain-wide delegation of authority>.+--+-- /See:/ 'newCloudSearchQueryRemoveActivity' smart constructor.+data CloudSearchQueryRemoveActivity = CloudSearchQueryRemoveActivity+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: RemoveActivityRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchQueryRemoveActivity' with the minimum fields required to make a request.+newCloudSearchQueryRemoveActivity ::+  -- |  Multipart request metadata. See 'payload'.+  RemoveActivityRequest ->+  CloudSearchQueryRemoveActivity+newCloudSearchQueryRemoveActivity payload =+  CloudSearchQueryRemoveActivity+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchQueryRemoveActivity where+  type Rs CloudSearchQueryRemoveActivity = RemoveActivityResponse+  type+    Scopes CloudSearchQueryRemoveActivity =+      '[CloudSearch'FullControl, CloudSearch'Query]+  requestClient CloudSearchQueryRemoveActivity {..} =+    go+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchQueryRemoveActivityResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Query/Search.hs view
@@ -0,0 +1,111 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Query.Search+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- The Cloud Search Query API provides the search method, which returns the most relevant results from a user query. The results can come from Google Workspace apps, such as Gmail or Google Drive, or they can come from data that you have indexed from a third party. __Note:__ This API requires a standard end user account to execute. A service account can\'t perform Query API requests directly; to use a service account to perform queries, set up <https://developers.google.com/cloud-search/docs/guides/delegation/ Google Workspace domain-wide delegation of authority>.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.query.search@.+module Gogol.CloudSearch.Query.Search+  ( -- * Resource+    CloudSearchQuerySearchResource,++    -- ** Constructing a Request+    CloudSearchQuerySearch (..),+    newCloudSearchQuerySearch,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.query.search@ method which the+-- 'CloudSearchQuerySearch' request conforms to.+type CloudSearchQuerySearchResource =+  "v1"+    Core.:> "query"+    Core.:> "search"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] SearchRequest+    Core.:> Core.Post '[Core.JSON] SearchResponse++-- | The Cloud Search Query API provides the search method, which returns the most relevant results from a user query. The results can come from Google Workspace apps, such as Gmail or Google Drive, or they can come from data that you have indexed from a third party. __Note:__ This API requires a standard end user account to execute. A service account can\'t perform Query API requests directly; to use a service account to perform queries, set up <https://developers.google.com/cloud-search/docs/guides/delegation/ Google Workspace domain-wide delegation of authority>.+--+-- /See:/ 'newCloudSearchQuerySearch' smart constructor.+data CloudSearchQuerySearch = CloudSearchQuerySearch+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: SearchRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchQuerySearch' with the minimum fields required to make a request.+newCloudSearchQuerySearch ::+  -- |  Multipart request metadata. See 'payload'.+  SearchRequest ->+  CloudSearchQuerySearch+newCloudSearchQuerySearch payload =+  CloudSearchQuerySearch+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchQuerySearch where+  type Rs CloudSearchQuerySearch = SearchResponse+  type+    Scopes CloudSearchQuerySearch =+      '[CloudSearch'FullControl, CloudSearch'Query]+  requestClient CloudSearchQuerySearch {..} =+    go+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchQuerySearchResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Query/Sources/List.hs view
@@ -0,0 +1,131 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Query.Sources.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Returns list of sources that user can use for Search and Suggest APIs. __Note:__ This API requires a standard end user account to execute. A service account can\'t perform Query API requests directly; to use a service account to perform queries, set up <https://developers.google.com/cloud-search/docs/guides/delegation/ Google Workspace domain-wide delegation of authority>.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.query.sources.list@.+module Gogol.CloudSearch.Query.Sources.List+  ( -- * Resource+    CloudSearchQuerySourcesListResource,++    -- ** Constructing a Request+    CloudSearchQuerySourcesList (..),+    newCloudSearchQuerySourcesList,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.query.sources.list@ method which the+-- 'CloudSearchQuerySourcesList' request conforms to.+type CloudSearchQuerySourcesListResource =+  "v1"+    Core.:> "query"+    Core.:> "sources"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam+              "requestOptions.debugOptions.enableDebugging"+              Core.Bool+    Core.:> Core.QueryParam "requestOptions.languageCode" Core.Text+    Core.:> Core.QueryParam "requestOptions.searchApplicationId" Core.Text+    Core.:> Core.QueryParam "requestOptions.timeZone" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListQuerySourcesResponse++-- | Returns list of sources that user can use for Search and Suggest APIs. __Note:__ This API requires a standard end user account to execute. A service account can\'t perform Query API requests directly; to use a service account to perform queries, set up <https://developers.google.com/cloud-search/docs/guides/delegation/ Google Workspace domain-wide delegation of authority>.+--+-- /See:/ 'newCloudSearchQuerySourcesList' smart constructor.+data CloudSearchQuerySourcesList = CloudSearchQuerySourcesList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Number of sources to return in the response.+    pageToken :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    requestOptionsDebugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | The BCP-47 language code, such as \"en-US\" or \"sr-Latn\". For more information, see http:\/\/www.unicode.org\/reports\/tr35\/#Unicode/locale/identifier. For translations. Set this field using the language set in browser or for the page. In the event that the user\'s language preference is known, set this field to the known user language. When specified, the documents in search results are biased towards the specified language. The Suggest API uses this field as a hint to make better third-party autocomplete predictions.+    requestOptionsLanguageCode :: (Core.Maybe Core.Text),+    -- | The ID generated when you create a search application using the <https://support.google.com/a/answer/9043922 admin console>.+    requestOptionsSearchApplicationId :: (Core.Maybe Core.Text),+    -- | Current user\'s time zone id, such as \"America\/Los_Angeles\" or \"Australia\/Sydney\". These IDs are defined by <http://cldr.unicode.org/ Unicode Common Locale Data Repository (CLDR)> project, and currently available in the file <http://unicode.org/repos/cldr/trunk/common/bcp47/timezone.xml timezone.xml>. This field is used to correctly interpret date and time queries. If this field is not specified, the default time zone (UTC) is used.+    requestOptionsTimeZone :: (Core.Maybe Core.Text),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchQuerySourcesList' with the minimum fields required to make a request.+newCloudSearchQuerySourcesList ::+  CloudSearchQuerySourcesList+newCloudSearchQuerySourcesList =+  CloudSearchQuerySourcesList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      pageToken = Core.Nothing,+      requestOptionsDebugOptionsEnableDebugging = Core.Nothing,+      requestOptionsLanguageCode = Core.Nothing,+      requestOptionsSearchApplicationId = Core.Nothing,+      requestOptionsTimeZone = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchQuerySourcesList where+  type Rs CloudSearchQuerySourcesList = ListQuerySourcesResponse+  type+    Scopes CloudSearchQuerySourcesList =+      '[CloudSearch'FullControl, CloudSearch'Query]+  requestClient CloudSearchQuerySourcesList {..} =+    go+      xgafv+      accessToken+      callback+      pageToken+      requestOptionsDebugOptionsEnableDebugging+      requestOptionsLanguageCode+      requestOptionsSearchApplicationId+      requestOptionsTimeZone+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchQuerySourcesListResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Query/Suggest.hs view
@@ -0,0 +1,111 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Query.Suggest+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Provides suggestions for autocompleting the query. __Note:__ This API requires a standard end user account to execute. A service account can\'t perform Query API requests directly; to use a service account to perform queries, set up <https://developers.google.com/cloud-search/docs/guides/delegation/ Google Workspace domain-wide delegation of authority>.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.query.suggest@.+module Gogol.CloudSearch.Query.Suggest+  ( -- * Resource+    CloudSearchQuerySuggestResource,++    -- ** Constructing a Request+    CloudSearchQuerySuggest (..),+    newCloudSearchQuerySuggest,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.query.suggest@ method which the+-- 'CloudSearchQuerySuggest' request conforms to.+type CloudSearchQuerySuggestResource =+  "v1"+    Core.:> "query"+    Core.:> "suggest"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] SuggestRequest+    Core.:> Core.Post '[Core.JSON] SuggestResponse++-- | Provides suggestions for autocompleting the query. __Note:__ This API requires a standard end user account to execute. A service account can\'t perform Query API requests directly; to use a service account to perform queries, set up <https://developers.google.com/cloud-search/docs/guides/delegation/ Google Workspace domain-wide delegation of authority>.+--+-- /See:/ 'newCloudSearchQuerySuggest' smart constructor.+data CloudSearchQuerySuggest = CloudSearchQuerySuggest+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: SuggestRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchQuerySuggest' with the minimum fields required to make a request.+newCloudSearchQuerySuggest ::+  -- |  Multipart request metadata. See 'payload'.+  SuggestRequest ->+  CloudSearchQuerySuggest+newCloudSearchQuerySuggest payload =+  CloudSearchQuerySuggest+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchQuerySuggest where+  type Rs CloudSearchQuerySuggest = SuggestResponse+  type+    Scopes CloudSearchQuerySuggest =+      '[CloudSearch'FullControl, CloudSearch'Query]+  requestClient CloudSearchQuerySuggest {..} =+    go+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchQuerySuggestResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/Datasources/Create.hs view
@@ -0,0 +1,116 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.Datasources.Create+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a datasource. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.datasources.create@.+module Gogol.CloudSearch.Settings.Datasources.Create+  ( -- * Resource+    CloudSearchSettingsDatasourcesCreateResource,++    -- ** Constructing a Request+    CloudSearchSettingsDatasourcesCreate (..),+    newCloudSearchSettingsDatasourcesCreate,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.datasources.create@ method which the+-- 'CloudSearchSettingsDatasourcesCreate' request conforms to.+type CloudSearchSettingsDatasourcesCreateResource =+  "v1"+    Core.:> "settings"+    Core.:> "datasources"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] DataSource+    Core.:> Core.Post '[Core.JSON] Operation++-- | Creates a datasource. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsDatasourcesCreate' smart constructor.+data CloudSearchSettingsDatasourcesCreate = CloudSearchSettingsDatasourcesCreate+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: DataSource,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsDatasourcesCreate' with the minimum fields required to make a request.+newCloudSearchSettingsDatasourcesCreate ::+  -- |  Multipart request metadata. See 'payload'.+  DataSource ->+  CloudSearchSettingsDatasourcesCreate+newCloudSearchSettingsDatasourcesCreate payload =+  CloudSearchSettingsDatasourcesCreate+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchSettingsDatasourcesCreate where+  type Rs CloudSearchSettingsDatasourcesCreate = Operation+  type+    Scopes CloudSearchSettingsDatasourcesCreate =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing+       ]+  requestClient CloudSearchSettingsDatasourcesCreate {..} =+    go+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsDatasourcesCreateResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/Datasources/Delete.hs view
@@ -0,0 +1,120 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.Datasources.Delete+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes a datasource. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.datasources.delete@.+module Gogol.CloudSearch.Settings.Datasources.Delete+  ( -- * Resource+    CloudSearchSettingsDatasourcesDeleteResource,++    -- ** Constructing a Request+    CloudSearchSettingsDatasourcesDelete (..),+    newCloudSearchSettingsDatasourcesDelete,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.datasources.delete@ method which the+-- 'CloudSearchSettingsDatasourcesDelete' request conforms to.+type CloudSearchSettingsDatasourcesDeleteResource =+  "v1"+    Core.:> "settings"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Delete '[Core.JSON] Operation++-- | Deletes a datasource. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsDatasourcesDelete' smart constructor.+data CloudSearchSettingsDatasourcesDelete = CloudSearchSettingsDatasourcesDelete+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | The name of the datasource. Format: datasources\/{source_id}.+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsDatasourcesDelete' with the minimum fields required to make a request.+newCloudSearchSettingsDatasourcesDelete ::+  -- |  The name of the datasource. Format: datasources\/{source_id}. See 'name'.+  Core.Text ->+  CloudSearchSettingsDatasourcesDelete+newCloudSearchSettingsDatasourcesDelete name =+  CloudSearchSettingsDatasourcesDelete+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchSettingsDatasourcesDelete where+  type Rs CloudSearchSettingsDatasourcesDelete = Operation+  type+    Scopes CloudSearchSettingsDatasourcesDelete =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing+       ]+  requestClient CloudSearchSettingsDatasourcesDelete {..} =+    go+      name+      xgafv+      accessToken+      callback+      debugOptionsEnableDebugging+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsDatasourcesDeleteResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/Datasources/Get.hs view
@@ -0,0 +1,120 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.Datasources.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets a datasource. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.datasources.get@.+module Gogol.CloudSearch.Settings.Datasources.Get+  ( -- * Resource+    CloudSearchSettingsDatasourcesGetResource,++    -- ** Constructing a Request+    CloudSearchSettingsDatasourcesGet (..),+    newCloudSearchSettingsDatasourcesGet,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.datasources.get@ method which the+-- 'CloudSearchSettingsDatasourcesGet' request conforms to.+type CloudSearchSettingsDatasourcesGetResource =+  "v1"+    Core.:> "settings"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] DataSource++-- | Gets a datasource. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsDatasourcesGet' smart constructor.+data CloudSearchSettingsDatasourcesGet = CloudSearchSettingsDatasourcesGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | The name of the datasource resource. Format: datasources\/{source_id}.+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsDatasourcesGet' with the minimum fields required to make a request.+newCloudSearchSettingsDatasourcesGet ::+  -- |  The name of the datasource resource. Format: datasources\/{source_id}. See 'name'.+  Core.Text ->+  CloudSearchSettingsDatasourcesGet+newCloudSearchSettingsDatasourcesGet name =+  CloudSearchSettingsDatasourcesGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchSettingsDatasourcesGet where+  type Rs CloudSearchSettingsDatasourcesGet = DataSource+  type+    Scopes CloudSearchSettingsDatasourcesGet =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing+       ]+  requestClient CloudSearchSettingsDatasourcesGet {..} =+    go+      name+      xgafv+      accessToken+      callback+      debugOptionsEnableDebugging+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsDatasourcesGetResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/Datasources/List.hs view
@@ -0,0 +1,124 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.Datasources.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists datasources. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.datasources.list@.+module Gogol.CloudSearch.Settings.Datasources.List+  ( -- * Resource+    CloudSearchSettingsDatasourcesListResource,++    -- ** Constructing a Request+    CloudSearchSettingsDatasourcesList (..),+    newCloudSearchSettingsDatasourcesList,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.datasources.list@ method which the+-- 'CloudSearchSettingsDatasourcesList' request conforms to.+type CloudSearchSettingsDatasourcesListResource =+  "v1"+    Core.:> "settings"+    Core.:> "datasources"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListDataSourceResponse++-- | Lists datasources. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsDatasourcesList' smart constructor.+data CloudSearchSettingsDatasourcesList = CloudSearchSettingsDatasourcesList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | Maximum number of datasources to fetch in a request. The max value is 1000. The default value is 1000.+    pageSize :: (Core.Maybe Core.Int32),+    -- | Starting index of the results.+    pageToken :: (Core.Maybe Core.Text),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsDatasourcesList' with the minimum fields required to make a request.+newCloudSearchSettingsDatasourcesList ::+  CloudSearchSettingsDatasourcesList+newCloudSearchSettingsDatasourcesList =+  CloudSearchSettingsDatasourcesList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      pageSize = Core.Nothing,+      pageToken = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchSettingsDatasourcesList where+  type Rs CloudSearchSettingsDatasourcesList = ListDataSourceResponse+  type+    Scopes CloudSearchSettingsDatasourcesList =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing+       ]+  requestClient CloudSearchSettingsDatasourcesList {..} =+    go+      xgafv+      accessToken+      callback+      debugOptionsEnableDebugging+      pageSize+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsDatasourcesListResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/Datasources/Patch.hs view
@@ -0,0 +1,132 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.Datasources.Patch+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates a datasource. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.datasources.patch@.+module Gogol.CloudSearch.Settings.Datasources.Patch+  ( -- * Resource+    CloudSearchSettingsDatasourcesPatchResource,++    -- ** Constructing a Request+    CloudSearchSettingsDatasourcesPatch (..),+    newCloudSearchSettingsDatasourcesPatch,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.datasources.patch@ method which the+-- 'CloudSearchSettingsDatasourcesPatch' request conforms to.+type CloudSearchSettingsDatasourcesPatchResource =+  "v1"+    Core.:> "settings"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "updateMask" Core.FieldMask+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] DataSource+    Core.:> Core.Patch '[Core.JSON] Operation++-- | Updates a datasource. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsDatasourcesPatch' smart constructor.+data CloudSearchSettingsDatasourcesPatch = CloudSearchSettingsDatasourcesPatch+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | The name of the datasource resource. Format: datasources\/{source_id}. The name is ignored when creating a datasource.+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: DataSource,+    -- | Only applies to <https://developers.google.com/cloud-search/docs/reference/rest/v1/settings.datasources/patch settings.datasources.patch>. Update mask to control which fields to update. Example field paths: @name@, @displayName@. * If @update_mask@ is non-empty, then only the fields specified in the @update_mask@ are updated. * If you specify a field in the @update_mask@, but don\'t specify its value in the source, that field is cleared. * If the @update_mask@ is not present or empty or has the value @*@, then all fields are updated.+    updateMask :: (Core.Maybe Core.FieldMask),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsDatasourcesPatch' with the minimum fields required to make a request.+newCloudSearchSettingsDatasourcesPatch ::+  -- |  The name of the datasource resource. Format: datasources\/{source_id}. The name is ignored when creating a datasource. See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  DataSource ->+  CloudSearchSettingsDatasourcesPatch+newCloudSearchSettingsDatasourcesPatch name payload =+  CloudSearchSettingsDatasourcesPatch+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      name = name,+      payload = payload,+      updateMask = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchSettingsDatasourcesPatch where+  type Rs CloudSearchSettingsDatasourcesPatch = Operation+  type+    Scopes CloudSearchSettingsDatasourcesPatch =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing+       ]+  requestClient CloudSearchSettingsDatasourcesPatch {..} =+    go+      name+      xgafv+      accessToken+      callback+      debugOptionsEnableDebugging+      updateMask+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsDatasourcesPatchResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/Datasources/Update.hs view
@@ -0,0 +1,122 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.Datasources.Update+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates a datasource. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.datasources.update@.+module Gogol.CloudSearch.Settings.Datasources.Update+  ( -- * Resource+    CloudSearchSettingsDatasourcesUpdateResource,++    -- ** Constructing a Request+    CloudSearchSettingsDatasourcesUpdate (..),+    newCloudSearchSettingsDatasourcesUpdate,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.datasources.update@ method which the+-- 'CloudSearchSettingsDatasourcesUpdate' request conforms to.+type CloudSearchSettingsDatasourcesUpdateResource =+  "v1"+    Core.:> "settings"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] UpdateDataSourceRequest+    Core.:> Core.Put '[Core.JSON] Operation++-- | Updates a datasource. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsDatasourcesUpdate' smart constructor.+data CloudSearchSettingsDatasourcesUpdate = CloudSearchSettingsDatasourcesUpdate+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the datasource resource. Format: datasources\/{source_id}. The name is ignored when creating a datasource.+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: UpdateDataSourceRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsDatasourcesUpdate' with the minimum fields required to make a request.+newCloudSearchSettingsDatasourcesUpdate ::+  -- |  The name of the datasource resource. Format: datasources\/{source_id}. The name is ignored when creating a datasource. See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  UpdateDataSourceRequest ->+  CloudSearchSettingsDatasourcesUpdate+newCloudSearchSettingsDatasourcesUpdate name payload =+  CloudSearchSettingsDatasourcesUpdate+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchSettingsDatasourcesUpdate where+  type Rs CloudSearchSettingsDatasourcesUpdate = Operation+  type+    Scopes CloudSearchSettingsDatasourcesUpdate =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing+       ]+  requestClient CloudSearchSettingsDatasourcesUpdate {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsDatasourcesUpdateResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/GetCustomer.hs view
@@ -0,0 +1,107 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.GetCustomer+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Get customer settings. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.getCustomer@.+module Gogol.CloudSearch.Settings.GetCustomer+  ( -- * Resource+    CloudSearchSettingsGetCustomerResource,++    -- ** Constructing a Request+    CloudSearchSettingsGetCustomer (..),+    newCloudSearchSettingsGetCustomer,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.getCustomer@ method which the+-- 'CloudSearchSettingsGetCustomer' request conforms to.+type CloudSearchSettingsGetCustomerResource =+  "v1"+    Core.:> "settings"+    Core.:> "customer"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] CustomerSettings++-- | Get customer settings. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsGetCustomer' smart constructor.+data CloudSearchSettingsGetCustomer = CloudSearchSettingsGetCustomer+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsGetCustomer' with the minimum fields required to make a request.+newCloudSearchSettingsGetCustomer ::+  CloudSearchSettingsGetCustomer+newCloudSearchSettingsGetCustomer =+  CloudSearchSettingsGetCustomer+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchSettingsGetCustomer where+  type Rs CloudSearchSettingsGetCustomer = CustomerSettings+  type+    Scopes CloudSearchSettingsGetCustomer =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing+       ]+  requestClient CloudSearchSettingsGetCustomer {..} =+    go+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchSettingsGetCustomerResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/Searchapplications/Create.hs view
@@ -0,0 +1,119 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.Searchapplications.Create+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Creates a search application. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.searchapplications.create@.+module Gogol.CloudSearch.Settings.Searchapplications.Create+  ( -- * Resource+    CloudSearchSettingsSearchapplicationsCreateResource,++    -- ** Constructing a Request+    CloudSearchSettingsSearchapplicationsCreate (..),+    newCloudSearchSettingsSearchapplicationsCreate,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.searchapplications.create@ method which the+-- 'CloudSearchSettingsSearchapplicationsCreate' request conforms to.+type CloudSearchSettingsSearchapplicationsCreateResource =+  "v1"+    Core.:> "settings"+    Core.:> "searchapplications"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] SearchApplication+    Core.:> Core.Post '[Core.JSON] Operation++-- | Creates a search application. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsSearchapplicationsCreate' smart constructor.+data CloudSearchSettingsSearchapplicationsCreate = CloudSearchSettingsSearchapplicationsCreate+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: SearchApplication,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsSearchapplicationsCreate' with the minimum fields required to make a request.+newCloudSearchSettingsSearchapplicationsCreate ::+  -- |  Multipart request metadata. See 'payload'.+  SearchApplication ->+  CloudSearchSettingsSearchapplicationsCreate+newCloudSearchSettingsSearchapplicationsCreate payload =+  CloudSearchSettingsSearchapplicationsCreate+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchSettingsSearchapplicationsCreate+  where+  type Rs CloudSearchSettingsSearchapplicationsCreate = Operation+  type+    Scopes CloudSearchSettingsSearchapplicationsCreate =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Query+       ]+  requestClient CloudSearchSettingsSearchapplicationsCreate {..} =+    go+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsSearchapplicationsCreateResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/Searchapplications/Delete.hs view
@@ -0,0 +1,123 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.Searchapplications.Delete+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Deletes a search application. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.searchapplications.delete@.+module Gogol.CloudSearch.Settings.Searchapplications.Delete+  ( -- * Resource+    CloudSearchSettingsSearchapplicationsDeleteResource,++    -- ** Constructing a Request+    CloudSearchSettingsSearchapplicationsDelete (..),+    newCloudSearchSettingsSearchapplicationsDelete,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.searchapplications.delete@ method which the+-- 'CloudSearchSettingsSearchapplicationsDelete' request conforms to.+type CloudSearchSettingsSearchapplicationsDeleteResource =+  "v1"+    Core.:> "settings"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Delete '[Core.JSON] Operation++-- | Deletes a search application. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsSearchapplicationsDelete' smart constructor.+data CloudSearchSettingsSearchapplicationsDelete = CloudSearchSettingsSearchapplicationsDelete+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | The name of the search application to be deleted. Format: applications\/{application_id}.+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsSearchapplicationsDelete' with the minimum fields required to make a request.+newCloudSearchSettingsSearchapplicationsDelete ::+  -- |  The name of the search application to be deleted. Format: applications\/{application_id}. See 'name'.+  Core.Text ->+  CloudSearchSettingsSearchapplicationsDelete+newCloudSearchSettingsSearchapplicationsDelete name =+  CloudSearchSettingsSearchapplicationsDelete+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchSettingsSearchapplicationsDelete+  where+  type Rs CloudSearchSettingsSearchapplicationsDelete = Operation+  type+    Scopes CloudSearchSettingsSearchapplicationsDelete =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Query+       ]+  requestClient CloudSearchSettingsSearchapplicationsDelete {..} =+    go+      name+      xgafv+      accessToken+      callback+      debugOptionsEnableDebugging+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsSearchapplicationsDeleteResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/Searchapplications/Get.hs view
@@ -0,0 +1,125 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.Searchapplications.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets the specified search application. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.searchapplications.get@.+module Gogol.CloudSearch.Settings.Searchapplications.Get+  ( -- * Resource+    CloudSearchSettingsSearchapplicationsGetResource,++    -- ** Constructing a Request+    CloudSearchSettingsSearchapplicationsGet (..),+    newCloudSearchSettingsSearchapplicationsGet,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.searchapplications.get@ method which the+-- 'CloudSearchSettingsSearchapplicationsGet' request conforms to.+type CloudSearchSettingsSearchapplicationsGetResource =+  "v1"+    Core.:> "settings"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] SearchApplication++-- | Gets the specified search application. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsSearchapplicationsGet' smart constructor.+data CloudSearchSettingsSearchapplicationsGet = CloudSearchSettingsSearchapplicationsGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | The name of the search application. Format: searchapplications\/{application_id}.+    name :: Core.Text,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsSearchapplicationsGet' with the minimum fields required to make a request.+newCloudSearchSettingsSearchapplicationsGet ::+  -- |  The name of the search application. Format: searchapplications\/{application_id}. See 'name'.+  Core.Text ->+  CloudSearchSettingsSearchapplicationsGet+newCloudSearchSettingsSearchapplicationsGet name =+  CloudSearchSettingsSearchapplicationsGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      name = name,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchSettingsSearchapplicationsGet+  where+  type+    Rs CloudSearchSettingsSearchapplicationsGet =+      SearchApplication+  type+    Scopes CloudSearchSettingsSearchapplicationsGet =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Query+       ]+  requestClient CloudSearchSettingsSearchapplicationsGet {..} =+    go+      name+      xgafv+      accessToken+      callback+      debugOptionsEnableDebugging+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsSearchapplicationsGetResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/Searchapplications/List.hs view
@@ -0,0 +1,129 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.Searchapplications.List+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Lists all search applications. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.searchapplications.list@.+module Gogol.CloudSearch.Settings.Searchapplications.List+  ( -- * Resource+    CloudSearchSettingsSearchapplicationsListResource,++    -- ** Constructing a Request+    CloudSearchSettingsSearchapplicationsList (..),+    newCloudSearchSettingsSearchapplicationsList,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.searchapplications.list@ method which the+-- 'CloudSearchSettingsSearchapplicationsList' request conforms to.+type CloudSearchSettingsSearchapplicationsListResource =+  "v1"+    Core.:> "settings"+    Core.:> "searchapplications"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "debugOptions.enableDebugging" Core.Bool+    Core.:> Core.QueryParam "pageSize" Core.Int32+    Core.:> Core.QueryParam "pageToken" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] ListSearchApplicationsResponse++-- | Lists all search applications. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsSearchapplicationsList' smart constructor.+data CloudSearchSettingsSearchapplicationsList = CloudSearchSettingsSearchapplicationsList+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | If you are asked by Google to help with debugging, set this field. Otherwise, ignore this field.+    debugOptionsEnableDebugging :: (Core.Maybe Core.Bool),+    -- | The maximum number of items to return.+    pageSize :: (Core.Maybe Core.Int32),+    -- | The next/page/token value returned from a previous List request, if any. The default value is 10+    pageToken :: (Core.Maybe Core.Text),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsSearchapplicationsList' with the minimum fields required to make a request.+newCloudSearchSettingsSearchapplicationsList ::+  CloudSearchSettingsSearchapplicationsList+newCloudSearchSettingsSearchapplicationsList =+  CloudSearchSettingsSearchapplicationsList+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      debugOptionsEnableDebugging = Core.Nothing,+      pageSize = Core.Nothing,+      pageToken = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchSettingsSearchapplicationsList+  where+  type+    Rs CloudSearchSettingsSearchapplicationsList =+      ListSearchApplicationsResponse+  type+    Scopes CloudSearchSettingsSearchapplicationsList =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Query+       ]+  requestClient CloudSearchSettingsSearchapplicationsList {..} =+    go+      xgafv+      accessToken+      callback+      debugOptionsEnableDebugging+      pageSize+      pageToken+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsSearchapplicationsListResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/Searchapplications/Patch.hs view
@@ -0,0 +1,130 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.Searchapplications.Patch+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates a search application. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.searchapplications.patch@.+module Gogol.CloudSearch.Settings.Searchapplications.Patch+  ( -- * Resource+    CloudSearchSettingsSearchapplicationsPatchResource,++    -- ** Constructing a Request+    CloudSearchSettingsSearchapplicationsPatch (..),+    newCloudSearchSettingsSearchapplicationsPatch,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.searchapplications.patch@ method which the+-- 'CloudSearchSettingsSearchapplicationsPatch' request conforms to.+type CloudSearchSettingsSearchapplicationsPatchResource =+  "v1"+    Core.:> "settings"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "updateMask" Core.FieldMask+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] SearchApplication+    Core.:> Core.Patch '[Core.JSON] Operation++-- | Updates a search application. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsSearchapplicationsPatch' smart constructor.+data CloudSearchSettingsSearchapplicationsPatch = CloudSearchSettingsSearchapplicationsPatch+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the Search Application. Format: searchapplications\/{application_id}.+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: SearchApplication,+    -- | Only applies to <https://developers.google.com/cloud-search/docs/reference/rest/v1/settings.searchapplications/patch settings.searchapplications.patch>. Update mask to control which fields to update. Example field paths: @search_application.name@, @search_application.displayName@. * If @update_mask@ is non-empty, then only the fields specified in the @update_mask@ are updated. * If you specify a field in the @update_mask@, but don\'t specify its value in the @search_application@, then that field is cleared. * If the @update_mask@ is not present or empty or has the value @*@, then all fields are updated.+    updateMask :: (Core.Maybe Core.FieldMask),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsSearchapplicationsPatch' with the minimum fields required to make a request.+newCloudSearchSettingsSearchapplicationsPatch ::+  -- |  The name of the Search Application. Format: searchapplications\/{application_id}. See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  SearchApplication ->+  CloudSearchSettingsSearchapplicationsPatch+newCloudSearchSettingsSearchapplicationsPatch name payload =+  CloudSearchSettingsSearchapplicationsPatch+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      payload = payload,+      updateMask = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchSettingsSearchapplicationsPatch+  where+  type Rs CloudSearchSettingsSearchapplicationsPatch = Operation+  type+    Scopes CloudSearchSettingsSearchapplicationsPatch =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Query+       ]+  requestClient CloudSearchSettingsSearchapplicationsPatch {..} =+    go+      name+      xgafv+      accessToken+      callback+      updateMask+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsSearchapplicationsPatchResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/Searchapplications/Reset.hs view
@@ -0,0 +1,125 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.Searchapplications.Reset+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Resets a search application to default settings. This will return an empty response. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.searchapplications.reset@.+module Gogol.CloudSearch.Settings.Searchapplications.Reset+  ( -- * Resource+    CloudSearchSettingsSearchapplicationsResetResource,++    -- ** Constructing a Request+    CloudSearchSettingsSearchapplicationsReset (..),+    newCloudSearchSettingsSearchapplicationsReset,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.searchapplications.reset@ method which the+-- 'CloudSearchSettingsSearchapplicationsReset' request conforms to.+type CloudSearchSettingsSearchapplicationsResetResource =+  "v1"+    Core.:> "settings"+    Core.:> Core.CaptureMode "name" "reset" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] ResetSearchApplicationRequest+    Core.:> Core.Post '[Core.JSON] Operation++-- | Resets a search application to default settings. This will return an empty response. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsSearchapplicationsReset' smart constructor.+data CloudSearchSettingsSearchapplicationsReset = CloudSearchSettingsSearchapplicationsReset+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the search application to be reset. Format: applications\/{application_id}.+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: ResetSearchApplicationRequest,+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsSearchapplicationsReset' with the minimum fields required to make a request.+newCloudSearchSettingsSearchapplicationsReset ::+  -- |  The name of the search application to be reset. Format: applications\/{application_id}. See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  ResetSearchApplicationRequest ->+  CloudSearchSettingsSearchapplicationsReset+newCloudSearchSettingsSearchapplicationsReset name payload =+  CloudSearchSettingsSearchapplicationsReset+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      payload = payload,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchSettingsSearchapplicationsReset+  where+  type Rs CloudSearchSettingsSearchapplicationsReset = Operation+  type+    Scopes CloudSearchSettingsSearchapplicationsReset =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Query+       ]+  requestClient CloudSearchSettingsSearchapplicationsReset {..} =+    go+      name+      xgafv+      accessToken+      callback+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsSearchapplicationsResetResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/Searchapplications/Update.hs view
@@ -0,0 +1,130 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.Searchapplications.Update+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Updates a search application. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.searchapplications.update@.+module Gogol.CloudSearch.Settings.Searchapplications.Update+  ( -- * Resource+    CloudSearchSettingsSearchapplicationsUpdateResource,++    -- ** Constructing a Request+    CloudSearchSettingsSearchapplicationsUpdate (..),+    newCloudSearchSettingsSearchapplicationsUpdate,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.searchapplications.update@ method which the+-- 'CloudSearchSettingsSearchapplicationsUpdate' request conforms to.+type CloudSearchSettingsSearchapplicationsUpdateResource =+  "v1"+    Core.:> "settings"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "updateMask" Core.FieldMask+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] SearchApplication+    Core.:> Core.Put '[Core.JSON] Operation++-- | Updates a search application. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsSearchapplicationsUpdate' smart constructor.+data CloudSearchSettingsSearchapplicationsUpdate = CloudSearchSettingsSearchapplicationsUpdate+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | The name of the Search Application. Format: searchapplications\/{application_id}.+    name :: Core.Text,+    -- | Multipart request metadata.+    payload :: SearchApplication,+    -- | Only applies to <https://developers.google.com/cloud-search/docs/reference/rest/v1/settings.searchapplications/patch settings.searchapplications.patch>. Update mask to control which fields to update. Example field paths: @search_application.name@, @search_application.displayName@. * If @update_mask@ is non-empty, then only the fields specified in the @update_mask@ are updated. * If you specify a field in the @update_mask@, but don\'t specify its value in the @search_application@, then that field is cleared. * If the @update_mask@ is not present or empty or has the value @*@, then all fields are updated.+    updateMask :: (Core.Maybe Core.FieldMask),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsSearchapplicationsUpdate' with the minimum fields required to make a request.+newCloudSearchSettingsSearchapplicationsUpdate ::+  -- |  The name of the Search Application. Format: searchapplications\/{application_id}. See 'name'.+  Core.Text ->+  -- |  Multipart request metadata. See 'payload'.+  SearchApplication ->+  CloudSearchSettingsSearchapplicationsUpdate+newCloudSearchSettingsSearchapplicationsUpdate name payload =+  CloudSearchSettingsSearchapplicationsUpdate+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      name = name,+      payload = payload,+      updateMask = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchSettingsSearchapplicationsUpdate+  where+  type Rs CloudSearchSettingsSearchapplicationsUpdate = Operation+  type+    Scopes CloudSearchSettingsSearchapplicationsUpdate =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Query+       ]+  requestClient CloudSearchSettingsSearchapplicationsUpdate {..} =+    go+      name+      xgafv+      accessToken+      callback+      updateMask+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsSearchapplicationsUpdateResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Settings/UpdateCustomer.hs view
@@ -0,0 +1,121 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Settings.UpdateCustomer+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Update customer settings. __Note:__ This API requires an admin account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.settings.updateCustomer@.+module Gogol.CloudSearch.Settings.UpdateCustomer+  ( -- * Resource+    CloudSearchSettingsUpdateCustomerResource,++    -- ** Constructing a Request+    CloudSearchSettingsUpdateCustomer (..),+    newCloudSearchSettingsUpdateCustomer,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.settings.updateCustomer@ method which the+-- 'CloudSearchSettingsUpdateCustomer' request conforms to.+type CloudSearchSettingsUpdateCustomerResource =+  "v1"+    Core.:> "settings"+    Core.:> "customer"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "updateMask" Core.FieldMask+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.ReqBody '[Core.JSON] CustomerSettings+    Core.:> Core.Patch '[Core.JSON] Operation++-- | Update customer settings. __Note:__ This API requires an admin account to execute.+--+-- /See:/ 'newCloudSearchSettingsUpdateCustomer' smart constructor.+data CloudSearchSettingsUpdateCustomer = CloudSearchSettingsUpdateCustomer+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Multipart request metadata.+    payload :: CustomerSettings,+    -- | Update mask to control which fields get updated. If you specify a field in the update/mask but don\'t specify its value here, that field will be cleared. If the mask is not present or empty, all fields will be updated. Currently supported field paths: vpc/settings and audit/logging/settings+    updateMask :: (Core.Maybe Core.FieldMask),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchSettingsUpdateCustomer' with the minimum fields required to make a request.+newCloudSearchSettingsUpdateCustomer ::+  -- |  Multipart request metadata. See 'payload'.+  CustomerSettings ->+  CloudSearchSettingsUpdateCustomer+newCloudSearchSettingsUpdateCustomer payload =+  CloudSearchSettingsUpdateCustomer+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      payload = payload,+      updateMask = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchSettingsUpdateCustomer where+  type Rs CloudSearchSettingsUpdateCustomer = Operation+  type+    Scopes CloudSearchSettingsUpdateCustomer =+      '[ CloudSearch'FullControl,+         CloudSearch'Settings,+         CloudSearch'Settings'Indexing+       ]+  requestClient CloudSearchSettingsUpdateCustomer {..} =+    go+      xgafv+      accessToken+      callback+      updateMask+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      payload+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchSettingsUpdateCustomerResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Stats/GetIndex.hs view
@@ -0,0 +1,137 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Stats.GetIndex+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets indexed item statistics aggreggated across all data sources. This API only returns statistics for previous dates; it doesn\'t return statistics for the current day. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.stats.getIndex@.+module Gogol.CloudSearch.Stats.GetIndex+  ( -- * Resource+    CloudSearchStatsGetIndexResource,++    -- ** Constructing a Request+    CloudSearchStatsGetIndex (..),+    newCloudSearchStatsGetIndex,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.stats.getIndex@ method which the+-- 'CloudSearchStatsGetIndex' request conforms to.+type CloudSearchStatsGetIndexResource =+  "v1"+    Core.:> "stats"+    Core.:> "index"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "fromDate.day" Core.Int32+    Core.:> Core.QueryParam "fromDate.month" Core.Int32+    Core.:> Core.QueryParam "fromDate.year" Core.Int32+    Core.:> Core.QueryParam "toDate.day" Core.Int32+    Core.:> Core.QueryParam "toDate.month" Core.Int32+    Core.:> Core.QueryParam "toDate.year" Core.Int32+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetCustomerIndexStatsResponse++-- | Gets indexed item statistics aggreggated across all data sources. This API only returns statistics for previous dates; it doesn\'t return statistics for the current day. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ 'newCloudSearchStatsGetIndex' smart constructor.+data CloudSearchStatsGetIndex = CloudSearchStatsGetIndex+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    fromDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    fromDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    fromDateYear :: (Core.Maybe Core.Int32),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    toDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    toDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    toDateYear :: (Core.Maybe Core.Int32),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchStatsGetIndex' with the minimum fields required to make a request.+newCloudSearchStatsGetIndex ::+  CloudSearchStatsGetIndex+newCloudSearchStatsGetIndex =+  CloudSearchStatsGetIndex+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      fromDateDay = Core.Nothing,+      fromDateMonth = Core.Nothing,+      fromDateYear = Core.Nothing,+      toDateDay = Core.Nothing,+      toDateMonth = Core.Nothing,+      toDateYear = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchStatsGetIndex where+  type Rs CloudSearchStatsGetIndex = GetCustomerIndexStatsResponse+  type+    Scopes CloudSearchStatsGetIndex =+      '[ CloudSearch'FullControl,+         CloudSearch'Stats,+         CloudSearch'Stats'Indexing+       ]+  requestClient CloudSearchStatsGetIndex {..} =+    go+      xgafv+      accessToken+      callback+      fromDateDay+      fromDateMonth+      fromDateYear+      toDateDay+      toDateMonth+      toDateYear+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchStatsGetIndexResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Stats/GetQuery.hs view
@@ -0,0 +1,137 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Stats.GetQuery+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Get the query statistics for customer. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.stats.getQuery@.+module Gogol.CloudSearch.Stats.GetQuery+  ( -- * Resource+    CloudSearchStatsGetQueryResource,++    -- ** Constructing a Request+    CloudSearchStatsGetQuery (..),+    newCloudSearchStatsGetQuery,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.stats.getQuery@ method which the+-- 'CloudSearchStatsGetQuery' request conforms to.+type CloudSearchStatsGetQueryResource =+  "v1"+    Core.:> "stats"+    Core.:> "query"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "fromDate.day" Core.Int32+    Core.:> Core.QueryParam "fromDate.month" Core.Int32+    Core.:> Core.QueryParam "fromDate.year" Core.Int32+    Core.:> Core.QueryParam "toDate.day" Core.Int32+    Core.:> Core.QueryParam "toDate.month" Core.Int32+    Core.:> Core.QueryParam "toDate.year" Core.Int32+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetCustomerQueryStatsResponse++-- | Get the query statistics for customer. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ 'newCloudSearchStatsGetQuery' smart constructor.+data CloudSearchStatsGetQuery = CloudSearchStatsGetQuery+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    fromDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    fromDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    fromDateYear :: (Core.Maybe Core.Int32),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    toDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    toDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    toDateYear :: (Core.Maybe Core.Int32),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchStatsGetQuery' with the minimum fields required to make a request.+newCloudSearchStatsGetQuery ::+  CloudSearchStatsGetQuery+newCloudSearchStatsGetQuery =+  CloudSearchStatsGetQuery+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      fromDateDay = Core.Nothing,+      fromDateMonth = Core.Nothing,+      fromDateYear = Core.Nothing,+      toDateDay = Core.Nothing,+      toDateMonth = Core.Nothing,+      toDateYear = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchStatsGetQuery where+  type Rs CloudSearchStatsGetQuery = GetCustomerQueryStatsResponse+  type+    Scopes CloudSearchStatsGetQuery =+      '[ CloudSearch'FullControl,+         CloudSearch'Stats,+         CloudSearch'Stats'Indexing+       ]+  requestClient CloudSearchStatsGetQuery {..} =+    go+      xgafv+      accessToken+      callback+      fromDateDay+      fromDateMonth+      fromDateYear+      toDateDay+      toDateMonth+      toDateYear+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchStatsGetQueryResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Stats/GetSearchapplication.hs view
@@ -0,0 +1,141 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Stats.GetSearchapplication+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Get search application stats for customer. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.stats.getSearchapplication@.+module Gogol.CloudSearch.Stats.GetSearchapplication+  ( -- * Resource+    CloudSearchStatsGetSearchapplicationResource,++    -- ** Constructing a Request+    CloudSearchStatsGetSearchapplication (..),+    newCloudSearchStatsGetSearchapplication,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.stats.getSearchapplication@ method which the+-- 'CloudSearchStatsGetSearchapplication' request conforms to.+type CloudSearchStatsGetSearchapplicationResource =+  "v1"+    Core.:> "stats"+    Core.:> "searchapplication"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "endDate.day" Core.Int32+    Core.:> Core.QueryParam "endDate.month" Core.Int32+    Core.:> Core.QueryParam "endDate.year" Core.Int32+    Core.:> Core.QueryParam "startDate.day" Core.Int32+    Core.:> Core.QueryParam "startDate.month" Core.Int32+    Core.:> Core.QueryParam "startDate.year" Core.Int32+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetCustomerSearchApplicationStatsResponse++-- | Get search application stats for customer. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ 'newCloudSearchStatsGetSearchapplication' smart constructor.+data CloudSearchStatsGetSearchapplication = CloudSearchStatsGetSearchapplication+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    endDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    endDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    endDateYear :: (Core.Maybe Core.Int32),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    startDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    startDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    startDateYear :: (Core.Maybe Core.Int32),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchStatsGetSearchapplication' with the minimum fields required to make a request.+newCloudSearchStatsGetSearchapplication ::+  CloudSearchStatsGetSearchapplication+newCloudSearchStatsGetSearchapplication =+  CloudSearchStatsGetSearchapplication+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      endDateDay = Core.Nothing,+      endDateMonth = Core.Nothing,+      endDateYear = Core.Nothing,+      startDateDay = Core.Nothing,+      startDateMonth = Core.Nothing,+      startDateYear = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchStatsGetSearchapplication where+  type+    Rs CloudSearchStatsGetSearchapplication =+      GetCustomerSearchApplicationStatsResponse+  type+    Scopes CloudSearchStatsGetSearchapplication =+      '[ CloudSearch'FullControl,+         CloudSearch'Stats,+         CloudSearch'Stats'Indexing+       ]+  requestClient CloudSearchStatsGetSearchapplication {..} =+    go+      xgafv+      accessToken+      callback+      endDateDay+      endDateMonth+      endDateYear+      startDateDay+      startDateMonth+      startDateYear+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchStatsGetSearchapplicationResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Stats/GetSession.hs view
@@ -0,0 +1,139 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Stats.GetSession+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Get the # of search sessions, % of successful sessions with a click query statistics for customer. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.stats.getSession@.+module Gogol.CloudSearch.Stats.GetSession+  ( -- * Resource+    CloudSearchStatsGetSessionResource,++    -- ** Constructing a Request+    CloudSearchStatsGetSession (..),+    newCloudSearchStatsGetSession,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.stats.getSession@ method which the+-- 'CloudSearchStatsGetSession' request conforms to.+type CloudSearchStatsGetSessionResource =+  "v1"+    Core.:> "stats"+    Core.:> "session"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "fromDate.day" Core.Int32+    Core.:> Core.QueryParam "fromDate.month" Core.Int32+    Core.:> Core.QueryParam "fromDate.year" Core.Int32+    Core.:> Core.QueryParam "toDate.day" Core.Int32+    Core.:> Core.QueryParam "toDate.month" Core.Int32+    Core.:> Core.QueryParam "toDate.year" Core.Int32+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetCustomerSessionStatsResponse++-- | Get the # of search sessions, % of successful sessions with a click query statistics for customer. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ 'newCloudSearchStatsGetSession' smart constructor.+data CloudSearchStatsGetSession = CloudSearchStatsGetSession+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    fromDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    fromDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    fromDateYear :: (Core.Maybe Core.Int32),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    toDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    toDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    toDateYear :: (Core.Maybe Core.Int32),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchStatsGetSession' with the minimum fields required to make a request.+newCloudSearchStatsGetSession ::+  CloudSearchStatsGetSession+newCloudSearchStatsGetSession =+  CloudSearchStatsGetSession+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      fromDateDay = Core.Nothing,+      fromDateMonth = Core.Nothing,+      fromDateYear = Core.Nothing,+      toDateDay = Core.Nothing,+      toDateMonth = Core.Nothing,+      toDateYear = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchStatsGetSession where+  type+    Rs CloudSearchStatsGetSession =+      GetCustomerSessionStatsResponse+  type+    Scopes CloudSearchStatsGetSession =+      '[ CloudSearch'FullControl,+         CloudSearch'Stats,+         CloudSearch'Stats'Indexing+       ]+  requestClient CloudSearchStatsGetSession {..} =+    go+      xgafv+      accessToken+      callback+      fromDateDay+      fromDateMonth+      fromDateYear+      toDateDay+      toDateMonth+      toDateYear+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchStatsGetSessionResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Stats/GetUser.hs view
@@ -0,0 +1,137 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Stats.GetUser+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Get the users statistics for customer. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.stats.getUser@.+module Gogol.CloudSearch.Stats.GetUser+  ( -- * Resource+    CloudSearchStatsGetUserResource,++    -- ** Constructing a Request+    CloudSearchStatsGetUser (..),+    newCloudSearchStatsGetUser,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.stats.getUser@ method which the+-- 'CloudSearchStatsGetUser' request conforms to.+type CloudSearchStatsGetUserResource =+  "v1"+    Core.:> "stats"+    Core.:> "user"+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "fromDate.day" Core.Int32+    Core.:> Core.QueryParam "fromDate.month" Core.Int32+    Core.:> Core.QueryParam "fromDate.year" Core.Int32+    Core.:> Core.QueryParam "toDate.day" Core.Int32+    Core.:> Core.QueryParam "toDate.month" Core.Int32+    Core.:> Core.QueryParam "toDate.year" Core.Int32+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetCustomerUserStatsResponse++-- | Get the users statistics for customer. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ 'newCloudSearchStatsGetUser' smart constructor.+data CloudSearchStatsGetUser = CloudSearchStatsGetUser+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    fromDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    fromDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    fromDateYear :: (Core.Maybe Core.Int32),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    toDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    toDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    toDateYear :: (Core.Maybe Core.Int32),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchStatsGetUser' with the minimum fields required to make a request.+newCloudSearchStatsGetUser ::+  CloudSearchStatsGetUser+newCloudSearchStatsGetUser =+  CloudSearchStatsGetUser+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      fromDateDay = Core.Nothing,+      fromDateMonth = Core.Nothing,+      fromDateYear = Core.Nothing,+      toDateDay = Core.Nothing,+      toDateMonth = Core.Nothing,+      toDateYear = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchStatsGetUser where+  type Rs CloudSearchStatsGetUser = GetCustomerUserStatsResponse+  type+    Scopes CloudSearchStatsGetUser =+      '[ CloudSearch'FullControl,+         CloudSearch'Stats,+         CloudSearch'Stats'Indexing+       ]+  requestClient CloudSearchStatsGetUser {..} =+    go+      xgafv+      accessToken+      callback+      fromDateDay+      fromDateMonth+      fromDateYear+      toDateDay+      toDateMonth+      toDateYear+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          (Core.Proxy :: Core.Proxy CloudSearchStatsGetUserResource)+          Core.mempty
+ gen/Gogol/CloudSearch/Stats/Index/Datasources/Get.hs view
@@ -0,0 +1,148 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Stats.Index.Datasources.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Gets indexed item statistics for a single data source. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.stats.index.datasources.get@.+module Gogol.CloudSearch.Stats.Index.Datasources.Get+  ( -- * Resource+    CloudSearchStatsIndexDatasourcesGetResource,++    -- ** Constructing a Request+    CloudSearchStatsIndexDatasourcesGet (..),+    newCloudSearchStatsIndexDatasourcesGet,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.stats.index.datasources.get@ method which the+-- 'CloudSearchStatsIndexDatasourcesGet' request conforms to.+type CloudSearchStatsIndexDatasourcesGetResource =+  "v1"+    Core.:> "stats"+    Core.:> "index"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "fromDate.day" Core.Int32+    Core.:> Core.QueryParam "fromDate.month" Core.Int32+    Core.:> Core.QueryParam "fromDate.year" Core.Int32+    Core.:> Core.QueryParam "toDate.day" Core.Int32+    Core.:> Core.QueryParam "toDate.month" Core.Int32+    Core.:> Core.QueryParam "toDate.year" Core.Int32+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetDataSourceIndexStatsResponse++-- | Gets indexed item statistics for a single data source. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ 'newCloudSearchStatsIndexDatasourcesGet' smart constructor.+data CloudSearchStatsIndexDatasourcesGet = CloudSearchStatsIndexDatasourcesGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    fromDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    fromDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    fromDateYear :: (Core.Maybe Core.Int32),+    -- | The resource id of the data source to retrieve statistics for, in the following format: \"datasources\/{source_id}\"+    name :: Core.Text,+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    toDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    toDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    toDateYear :: (Core.Maybe Core.Int32),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchStatsIndexDatasourcesGet' with the minimum fields required to make a request.+newCloudSearchStatsIndexDatasourcesGet ::+  -- |  The resource id of the data source to retrieve statistics for, in the following format: \"datasources\/{source_id}\" See 'name'.+  Core.Text ->+  CloudSearchStatsIndexDatasourcesGet+newCloudSearchStatsIndexDatasourcesGet name =+  CloudSearchStatsIndexDatasourcesGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      fromDateDay = Core.Nothing,+      fromDateMonth = Core.Nothing,+      fromDateYear = Core.Nothing,+      name = name,+      toDateDay = Core.Nothing,+      toDateMonth = Core.Nothing,+      toDateYear = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance Core.GoogleRequest CloudSearchStatsIndexDatasourcesGet where+  type+    Rs CloudSearchStatsIndexDatasourcesGet =+      GetDataSourceIndexStatsResponse+  type+    Scopes CloudSearchStatsIndexDatasourcesGet =+      '[ CloudSearch'FullControl,+         CloudSearch'Stats,+         CloudSearch'Stats'Indexing+       ]+  requestClient CloudSearchStatsIndexDatasourcesGet {..} =+    go+      name+      xgafv+      accessToken+      callback+      fromDateDay+      fromDateMonth+      fromDateYear+      toDateDay+      toDateMonth+      toDateYear+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchStatsIndexDatasourcesGetResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Stats/Query/Searchapplications/Get.hs view
@@ -0,0 +1,151 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Stats.Query.Searchapplications.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Get the query statistics for search application. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.stats.query.searchapplications.get@.+module Gogol.CloudSearch.Stats.Query.Searchapplications.Get+  ( -- * Resource+    CloudSearchStatsQuerySearchapplicationsGetResource,++    -- ** Constructing a Request+    CloudSearchStatsQuerySearchapplicationsGet (..),+    newCloudSearchStatsQuerySearchapplicationsGet,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.stats.query.searchapplications.get@ method which the+-- 'CloudSearchStatsQuerySearchapplicationsGet' request conforms to.+type CloudSearchStatsQuerySearchapplicationsGetResource =+  "v1"+    Core.:> "stats"+    Core.:> "query"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "fromDate.day" Core.Int32+    Core.:> Core.QueryParam "fromDate.month" Core.Int32+    Core.:> Core.QueryParam "fromDate.year" Core.Int32+    Core.:> Core.QueryParam "toDate.day" Core.Int32+    Core.:> Core.QueryParam "toDate.month" Core.Int32+    Core.:> Core.QueryParam "toDate.year" Core.Int32+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetSearchApplicationQueryStatsResponse++-- | Get the query statistics for search application. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ 'newCloudSearchStatsQuerySearchapplicationsGet' smart constructor.+data CloudSearchStatsQuerySearchapplicationsGet = CloudSearchStatsQuerySearchapplicationsGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    fromDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    fromDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    fromDateYear :: (Core.Maybe Core.Int32),+    -- | The resource id of the search application query stats, in the following format: searchapplications\/{application_id}+    name :: Core.Text,+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    toDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    toDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    toDateYear :: (Core.Maybe Core.Int32),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchStatsQuerySearchapplicationsGet' with the minimum fields required to make a request.+newCloudSearchStatsQuerySearchapplicationsGet ::+  -- |  The resource id of the search application query stats, in the following format: searchapplications\/{application_id} See 'name'.+  Core.Text ->+  CloudSearchStatsQuerySearchapplicationsGet+newCloudSearchStatsQuerySearchapplicationsGet name =+  CloudSearchStatsQuerySearchapplicationsGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      fromDateDay = Core.Nothing,+      fromDateMonth = Core.Nothing,+      fromDateYear = Core.Nothing,+      name = name,+      toDateDay = Core.Nothing,+      toDateMonth = Core.Nothing,+      toDateYear = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchStatsQuerySearchapplicationsGet+  where+  type+    Rs CloudSearchStatsQuerySearchapplicationsGet =+      GetSearchApplicationQueryStatsResponse+  type+    Scopes CloudSearchStatsQuerySearchapplicationsGet =+      '[ CloudSearch'FullControl,+         CloudSearch'Stats,+         CloudSearch'Stats'Indexing+       ]+  requestClient CloudSearchStatsQuerySearchapplicationsGet {..} =+    go+      name+      xgafv+      accessToken+      callback+      fromDateDay+      fromDateMonth+      fromDateYear+      toDateDay+      toDateMonth+      toDateYear+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchStatsQuerySearchapplicationsGetResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Stats/Session/Searchapplications/Get.hs view
@@ -0,0 +1,152 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Stats.Session.Searchapplications.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Get the # of search sessions, % of successful sessions with a click query statistics for search application. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.stats.session.searchapplications.get@.+module Gogol.CloudSearch.Stats.Session.Searchapplications.Get+  ( -- * Resource+    CloudSearchStatsSessionSearchapplicationsGetResource,++    -- ** Constructing a Request+    CloudSearchStatsSessionSearchapplicationsGet (..),+    newCloudSearchStatsSessionSearchapplicationsGet,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.stats.session.searchapplications.get@ method which the+-- 'CloudSearchStatsSessionSearchapplicationsGet' request conforms to.+type CloudSearchStatsSessionSearchapplicationsGetResource =+  "v1"+    Core.:> "stats"+    Core.:> "session"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "fromDate.day" Core.Int32+    Core.:> Core.QueryParam "fromDate.month" Core.Int32+    Core.:> Core.QueryParam "fromDate.year" Core.Int32+    Core.:> Core.QueryParam "toDate.day" Core.Int32+    Core.:> Core.QueryParam "toDate.month" Core.Int32+    Core.:> Core.QueryParam "toDate.year" Core.Int32+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetSearchApplicationSessionStatsResponse++-- | Get the # of search sessions, % of successful sessions with a click query statistics for search application. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ 'newCloudSearchStatsSessionSearchapplicationsGet' smart constructor.+data CloudSearchStatsSessionSearchapplicationsGet = CloudSearchStatsSessionSearchapplicationsGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    fromDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    fromDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    fromDateYear :: (Core.Maybe Core.Int32),+    -- | The resource id of the search application session stats, in the following format: searchapplications\/{application_id}+    name :: Core.Text,+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    toDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    toDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    toDateYear :: (Core.Maybe Core.Int32),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchStatsSessionSearchapplicationsGet' with the minimum fields required to make a request.+newCloudSearchStatsSessionSearchapplicationsGet ::+  -- |  The resource id of the search application session stats, in the following format: searchapplications\/{application_id} See 'name'.+  Core.Text ->+  CloudSearchStatsSessionSearchapplicationsGet+newCloudSearchStatsSessionSearchapplicationsGet name =+  CloudSearchStatsSessionSearchapplicationsGet+    { xgafv =+        Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      fromDateDay = Core.Nothing,+      fromDateMonth = Core.Nothing,+      fromDateYear = Core.Nothing,+      name = name,+      toDateDay = Core.Nothing,+      toDateMonth = Core.Nothing,+      toDateYear = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchStatsSessionSearchapplicationsGet+  where+  type+    Rs CloudSearchStatsSessionSearchapplicationsGet =+      GetSearchApplicationSessionStatsResponse+  type+    Scopes CloudSearchStatsSessionSearchapplicationsGet =+      '[ CloudSearch'FullControl,+         CloudSearch'Stats,+         CloudSearch'Stats'Indexing+       ]+  requestClient CloudSearchStatsSessionSearchapplicationsGet {..} =+    go+      name+      xgafv+      accessToken+      callback+      fromDateDay+      fromDateMonth+      fromDateYear+      toDateDay+      toDateMonth+      toDateYear+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchStatsSessionSearchapplicationsGetResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Stats/User/Searchapplications/Get.hs view
@@ -0,0 +1,151 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Stats.User.Searchapplications.Get+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+--+-- Get the users statistics for search application. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ <https://developers.google.com/cloud-search/docs/guides/ Cloud Search API Reference> for @cloudsearch.stats.user.searchapplications.get@.+module Gogol.CloudSearch.Stats.User.Searchapplications.Get+  ( -- * Resource+    CloudSearchStatsUserSearchapplicationsGetResource,++    -- ** Constructing a Request+    CloudSearchStatsUserSearchapplicationsGet (..),+    newCloudSearchStatsUserSearchapplicationsGet,+  )+where++import Gogol.CloudSearch.Types+import Gogol.Prelude qualified as Core++-- | A resource alias for @cloudsearch.stats.user.searchapplications.get@ method which the+-- 'CloudSearchStatsUserSearchapplicationsGet' request conforms to.+type CloudSearchStatsUserSearchapplicationsGetResource =+  "v1"+    Core.:> "stats"+    Core.:> "user"+    Core.:> Core.Capture "name" Core.Text+    Core.:> Core.QueryParam "$.xgafv" Xgafv+    Core.:> Core.QueryParam "access_token" Core.Text+    Core.:> Core.QueryParam "callback" Core.Text+    Core.:> Core.QueryParam "fromDate.day" Core.Int32+    Core.:> Core.QueryParam "fromDate.month" Core.Int32+    Core.:> Core.QueryParam "fromDate.year" Core.Int32+    Core.:> Core.QueryParam "toDate.day" Core.Int32+    Core.:> Core.QueryParam "toDate.month" Core.Int32+    Core.:> Core.QueryParam "toDate.year" Core.Int32+    Core.:> Core.QueryParam "uploadType" Core.Text+    Core.:> Core.QueryParam "upload_protocol" Core.Text+    Core.:> Core.QueryParam "alt" Core.AltJSON+    Core.:> Core.Get '[Core.JSON] GetSearchApplicationUserStatsResponse++-- | Get the users statistics for search application. __Note:__ This API requires a standard end user account to execute.+--+-- /See:/ 'newCloudSearchStatsUserSearchapplicationsGet' smart constructor.+data CloudSearchStatsUserSearchapplicationsGet = CloudSearchStatsUserSearchapplicationsGet+  { -- | V1 error format.+    xgafv :: (Core.Maybe Xgafv),+    -- | OAuth access token.+    accessToken :: (Core.Maybe Core.Text),+    -- | JSONP+    callback :: (Core.Maybe Core.Text),+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    fromDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    fromDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    fromDateYear :: (Core.Maybe Core.Int32),+    -- | The resource id of the search application session stats, in the following format: searchapplications\/{application_id}+    name :: Core.Text,+    -- | Day of month. Must be from 1 to 31 and valid for the year and month.+    toDateDay :: (Core.Maybe Core.Int32),+    -- | Month of date. Must be from 1 to 12.+    toDateMonth :: (Core.Maybe Core.Int32),+    -- | Year of date. Must be from 1 to 9999.+    toDateYear :: (Core.Maybe Core.Int32),+    -- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").+    uploadType :: (Core.Maybe Core.Text),+    -- | Upload protocol for media (e.g. \"raw\", \"multipart\").+    uploadProtocol :: (Core.Maybe Core.Text)+  }+  deriving (Core.Eq, Core.Show, Core.Generic)++-- | Creates a value of 'CloudSearchStatsUserSearchapplicationsGet' with the minimum fields required to make a request.+newCloudSearchStatsUserSearchapplicationsGet ::+  -- |  The resource id of the search application session stats, in the following format: searchapplications\/{application_id} See 'name'.+  Core.Text ->+  CloudSearchStatsUserSearchapplicationsGet+newCloudSearchStatsUserSearchapplicationsGet name =+  CloudSearchStatsUserSearchapplicationsGet+    { xgafv = Core.Nothing,+      accessToken = Core.Nothing,+      callback = Core.Nothing,+      fromDateDay = Core.Nothing,+      fromDateMonth = Core.Nothing,+      fromDateYear = Core.Nothing,+      name = name,+      toDateDay = Core.Nothing,+      toDateMonth = Core.Nothing,+      toDateYear = Core.Nothing,+      uploadType = Core.Nothing,+      uploadProtocol = Core.Nothing+    }++instance+  Core.GoogleRequest+    CloudSearchStatsUserSearchapplicationsGet+  where+  type+    Rs CloudSearchStatsUserSearchapplicationsGet =+      GetSearchApplicationUserStatsResponse+  type+    Scopes CloudSearchStatsUserSearchapplicationsGet =+      '[ CloudSearch'FullControl,+         CloudSearch'Stats,+         CloudSearch'Stats'Indexing+       ]+  requestClient CloudSearchStatsUserSearchapplicationsGet {..} =+    go+      name+      xgafv+      accessToken+      callback+      fromDateDay+      fromDateMonth+      fromDateYear+      toDateDay+      toDateMonth+      toDateYear+      uploadType+      uploadProtocol+      (Core.Just Core.AltJSON)+      cloudSearchService+    where+      go =+        Core.buildClient+          ( Core.Proxy ::+              Core.Proxy CloudSearchStatsUserSearchapplicationsGetResource+          )+          Core.mempty
+ gen/Gogol/CloudSearch/Types.hs view
@@ -0,0 +1,1197 @@+{-# LANGUAGE DataKinds #-}+{-# LANGUAGE DerivingStrategies #-}+{-# LANGUAGE DuplicateRecordFields #-}+{-# LANGUAGE ImportQualifiedPost #-}+{-# LANGUAGE LambdaCase #-}+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE PatternSynonyms #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TypeFamilies #-}+{-# LANGUAGE NoImplicitPrelude #-}+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}+{-# OPTIONS_GHC -fno-warn-name-shadowing #-}+{-# OPTIONS_GHC -fno-warn-unused-binds #-}+{-# OPTIONS_GHC -fno-warn-unused-imports #-}+{-# OPTIONS_GHC -fno-warn-unused-matches #-}++-- |+-- Module      : Gogol.CloudSearch.Types+-- Copyright   : (c) 2015-2025 Brendan Hay+-- License     : Mozilla Public License, v. 2.0.+-- Maintainer  : Brendan Hay <brendan.g.hay+gogol@gmail.com>+--               Toni Cebrián <toni@tonicebrian.com>+-- Stability   : auto-generated+-- Portability : non-portable (GHC extensions)+module Gogol.CloudSearch.Types+  ( -- * Configuration+    cloudSearchService,++    -- * OAuth Scopes+    CloudSearch'FullControl,+    CloudSearch'Debug,+    CloudSearch'Indexing,+    CloudSearch'Query,+    CloudSearch'Settings,+    CloudSearch'Settings'Indexing,+    CloudSearch'Settings'Query,+    CloudSearch'Stats,+    CloudSearch'Stats'Indexing,++    -- * Types++    -- ** Xgafv+    Xgafv (..),++    -- ** Action+    Action (..),+    newAction,++    -- ** AuditLoggingSettings+    AuditLoggingSettings (..),+    newAuditLoggingSettings,++    -- ** BackgroundColoredText+    BackgroundColoredText (..),+    newBackgroundColoredText,++    -- ** BackgroundColoredText_BackgroundColor+    BackgroundColoredText_BackgroundColor (..),++    -- ** BooleanOperatorOptions+    BooleanOperatorOptions (..),+    newBooleanOperatorOptions,++    -- ** BooleanPropertyOptions+    BooleanPropertyOptions (..),+    newBooleanPropertyOptions,++    -- ** CheckAccessResponse+    CheckAccessResponse (..),+    newCheckAccessResponse,++    -- ** CompositeFilter+    CompositeFilter (..),+    newCompositeFilter,++    -- ** CompositeFilter_LogicOperator+    CompositeFilter_LogicOperator (..),++    -- ** Content+    Content (..),+    newContent,++    -- ** Context+    Context (..),+    newContext,++    -- ** Context_AppItem+    Context_AppItem (..),++    -- ** Context_SurfaceItem+    Context_SurfaceItem (..),++    -- ** Context_TypeItem+    Context_TypeItem (..),++    -- ** ContextAttribute+    ContextAttribute (..),+    newContextAttribute,++    -- ** CustomerIndexStats+    CustomerIndexStats (..),+    newCustomerIndexStats,++    -- ** CustomerQueryStats+    CustomerQueryStats (..),+    newCustomerQueryStats,++    -- ** CustomerSearchApplicationStats+    CustomerSearchApplicationStats (..),+    newCustomerSearchApplicationStats,++    -- ** CustomerSessionStats+    CustomerSessionStats (..),+    newCustomerSessionStats,++    -- ** CustomerSettings+    CustomerSettings (..),+    newCustomerSettings,++    -- ** CustomerUserStats+    CustomerUserStats (..),+    newCustomerUserStats,++    -- ** DataSource+    DataSource (..),+    newDataSource,++    -- ** DataSourceIndexStats+    DataSourceIndexStats (..),+    newDataSourceIndexStats,++    -- ** DataSourceRestriction+    DataSourceRestriction (..),+    newDataSourceRestriction,++    -- ** Date+    Date (..),+    newDate,++    -- ** DateOperatorOptions+    DateOperatorOptions (..),+    newDateOperatorOptions,++    -- ** DatePropertyOptions+    DatePropertyOptions (..),+    newDatePropertyOptions,++    -- ** DateValues+    DateValues (..),+    newDateValues,++    -- ** DebugOptions+    DebugOptions (..),+    newDebugOptions,++    -- ** DebugResponse+    DebugResponse (..),+    newDebugResponse,++    -- ** DeleteQueueItemsRequest+    DeleteQueueItemsRequest (..),+    newDeleteQueueItemsRequest,++    -- ** DisplayedProperty+    DisplayedProperty (..),+    newDisplayedProperty,++    -- ** DoubleOperatorOptions+    DoubleOperatorOptions (..),+    newDoubleOperatorOptions,++    -- ** DoublePropertyOptions+    DoublePropertyOptions (..),+    newDoublePropertyOptions,++    -- ** DoubleValues+    DoubleValues (..),+    newDoubleValues,++    -- ** DriveFollowUpRestrict+    DriveFollowUpRestrict (..),+    newDriveFollowUpRestrict,++    -- ** DriveFollowUpRestrict_Type+    DriveFollowUpRestrict_Type (..),++    -- ** DriveLocationRestrict+    DriveLocationRestrict (..),+    newDriveLocationRestrict,++    -- ** DriveLocationRestrict_Type+    DriveLocationRestrict_Type (..),++    -- ** DriveMimeTypeRestrict+    DriveMimeTypeRestrict (..),+    newDriveMimeTypeRestrict,++    -- ** DriveMimeTypeRestrict_Type+    DriveMimeTypeRestrict_Type (..),++    -- ** DriveTimeSpanRestrict+    DriveTimeSpanRestrict (..),+    newDriveTimeSpanRestrict,++    -- ** DriveTimeSpanRestrict_Type+    DriveTimeSpanRestrict_Type (..),++    -- ** EmailAddress+    EmailAddress (..),+    newEmailAddress,++    -- ** EnterpriseTopazFrontendTeamsLink+    EnterpriseTopazFrontendTeamsLink (..),+    newEnterpriseTopazFrontendTeamsLink,++    -- ** EnterpriseTopazFrontendTeamsPersonCorePhoneNumber+    EnterpriseTopazFrontendTeamsPersonCorePhoneNumber (..),+    newEnterpriseTopazFrontendTeamsPersonCorePhoneNumber,++    -- ** EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type+    EnterpriseTopazFrontendTeamsPersonCorePhoneNumber_Type (..),++    -- ** EnterpriseTopazSidekickAgendaEntry+    EnterpriseTopazSidekickAgendaEntry (..),+    newEnterpriseTopazSidekickAgendaEntry,++    -- ** EnterpriseTopazSidekickAgendaEntry_Chronology+    EnterpriseTopazSidekickAgendaEntry_Chronology (..),++    -- ** EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus+    EnterpriseTopazSidekickAgendaEntry_CurrentUserAttendingStatus (..),++    -- ** EnterpriseTopazSidekickAgendaGroupCardProto+    EnterpriseTopazSidekickAgendaGroupCardProto (..),+    newEnterpriseTopazSidekickAgendaGroupCardProto,++    -- ** EnterpriseTopazSidekickAgendaGroupCardProtoContext+    EnterpriseTopazSidekickAgendaGroupCardProtoContext (..),+    newEnterpriseTopazSidekickAgendaGroupCardProtoContext,++    -- ** EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict+    EnterpriseTopazSidekickAgendaGroupCardProtoContext_EventsRestrict (..),++    -- ** EnterpriseTopazSidekickAgendaItem+    EnterpriseTopazSidekickAgendaItem (..),+    newEnterpriseTopazSidekickAgendaItem,++    -- ** EnterpriseTopazSidekickAnswerAnswerList+    EnterpriseTopazSidekickAnswerAnswerList (..),+    newEnterpriseTopazSidekickAnswerAnswerList,++    -- ** EnterpriseTopazSidekickAnswerAnswerList_Type+    EnterpriseTopazSidekickAnswerAnswerList_Type (..),++    -- ** EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer+    EnterpriseTopazSidekickAnswerAnswerListLabeledAnswer (..),+    newEnterpriseTopazSidekickAnswerAnswerListLabeledAnswer,++    -- ** EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard+    EnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard (..),+    newEnterpriseTopazSidekickAnswerSuggestedQueryAnswerCard,++    -- ** EnterpriseTopazSidekickAnswerSuggestedQueryCategory+    EnterpriseTopazSidekickAnswerSuggestedQueryCategory (..),+    newEnterpriseTopazSidekickAnswerSuggestedQueryCategory,++    -- ** EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category+    EnterpriseTopazSidekickAnswerSuggestedQueryCategory_Category (..),++    -- ** EnterpriseTopazSidekickAssistCardProto+    EnterpriseTopazSidekickAssistCardProto (..),+    newEnterpriseTopazSidekickAssistCardProto,++    -- ** EnterpriseTopazSidekickAssistCardProto_CardType+    EnterpriseTopazSidekickAssistCardProto_CardType (..),++    -- ** EnterpriseTopazSidekickCardMetadata+    EnterpriseTopazSidekickCardMetadata (..),+    newEnterpriseTopazSidekickCardMetadata,++    -- ** EnterpriseTopazSidekickCardMetadata_CardCategory+    EnterpriseTopazSidekickCardMetadata_CardCategory (..),++    -- ** EnterpriseTopazSidekickCardMetadata_Chronology+    EnterpriseTopazSidekickCardMetadata_Chronology (..),++    -- ** EnterpriseTopazSidekickCardMetadata_RenderMode+    EnterpriseTopazSidekickCardMetadata_RenderMode (..),++    -- ** EnterpriseTopazSidekickCommonDebugInfo+    EnterpriseTopazSidekickCommonDebugInfo (..),+    newEnterpriseTopazSidekickCommonDebugInfo,++    -- ** EnterpriseTopazSidekickCommonDocument+    EnterpriseTopazSidekickCommonDocument (..),+    newEnterpriseTopazSidekickCommonDocument,++    -- ** EnterpriseTopazSidekickCommonDocument_AccessType+    EnterpriseTopazSidekickCommonDocument_AccessType (..),++    -- ** EnterpriseTopazSidekickCommonDocument_Provenance+    EnterpriseTopazSidekickCommonDocument_Provenance (..),++    -- ** EnterpriseTopazSidekickCommonDocument_Reason+    EnterpriseTopazSidekickCommonDocument_Reason (..),++    -- ** EnterpriseTopazSidekickCommonDocument_Type+    EnterpriseTopazSidekickCommonDocument_Type (..),++    -- ** EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata+    EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata (..),+    newEnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata,++    -- ** EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope+    EnterpriseTopazSidekickCommonDocumentDriveDocumentMetadata_Scope (..),++    -- ** EnterpriseTopazSidekickCommonDocumentJustification+    EnterpriseTopazSidekickCommonDocumentJustification (..),+    newEnterpriseTopazSidekickCommonDocumentJustification,++    -- ** EnterpriseTopazSidekickCommonDocumentJustification_Reason+    EnterpriseTopazSidekickCommonDocumentJustification_Reason (..),++    -- ** EnterpriseTopazSidekickCommonPerson+    EnterpriseTopazSidekickCommonPerson (..),+    newEnterpriseTopazSidekickCommonPerson,++    -- ** EnterpriseTopazSidekickCommonPersonBirthday+    EnterpriseTopazSidekickCommonPersonBirthday (..),+    newEnterpriseTopazSidekickCommonPersonBirthday,++    -- ** EnterpriseTopazSidekickConflictingEventsCardProto+    EnterpriseTopazSidekickConflictingEventsCardProto (..),+    newEnterpriseTopazSidekickConflictingEventsCardProto,++    -- ** EnterpriseTopazSidekickDocumentGroup+    EnterpriseTopazSidekickDocumentGroup (..),+    newEnterpriseTopazSidekickDocumentGroup,++    -- ** EnterpriseTopazSidekickDocumentGroup_GroupType+    EnterpriseTopazSidekickDocumentGroup_GroupType (..),++    -- ** EnterpriseTopazSidekickDocumentPerCategoryList+    EnterpriseTopazSidekickDocumentPerCategoryList (..),+    newEnterpriseTopazSidekickDocumentPerCategoryList,++    -- ** EnterpriseTopazSidekickDocumentPerCategoryList_ListType+    EnterpriseTopazSidekickDocumentPerCategoryList_ListType (..),++    -- ** EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry+    EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry (..),+    newEnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry,++    -- ** EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category+    EnterpriseTopazSidekickDocumentPerCategoryListDocumentPerCategoryListEntry_Category (..),++    -- ** EnterpriseTopazSidekickFindMeetingTimeCardProto+    EnterpriseTopazSidekickFindMeetingTimeCardProto (..),+    newEnterpriseTopazSidekickFindMeetingTimeCardProto,++    -- ** EnterpriseTopazSidekickGap+    EnterpriseTopazSidekickGap (..),+    newEnterpriseTopazSidekickGap,++    -- ** EnterpriseTopazSidekickGenericAnswerCard+    EnterpriseTopazSidekickGenericAnswerCard (..),+    newEnterpriseTopazSidekickGenericAnswerCard,++    -- ** EnterpriseTopazSidekickGetAndKeepAheadCardProto+    EnterpriseTopazSidekickGetAndKeepAheadCardProto (..),+    newEnterpriseTopazSidekickGetAndKeepAheadCardProto,++    -- ** EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents+    EnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents (..),+    newEnterpriseTopazSidekickGetAndKeepAheadCardProtoDeclinedEvents,++    -- ** EnterpriseTopazSidekickMeetingNotesCardError+    EnterpriseTopazSidekickMeetingNotesCardError (..),+    newEnterpriseTopazSidekickMeetingNotesCardError,++    -- ** EnterpriseTopazSidekickMeetingNotesCardError_Reason+    EnterpriseTopazSidekickMeetingNotesCardError_Reason (..),++    -- ** EnterpriseTopazSidekickMeetingNotesCardProto+    EnterpriseTopazSidekickMeetingNotesCardProto (..),+    newEnterpriseTopazSidekickMeetingNotesCardProto,++    -- ** EnterpriseTopazSidekickMeetingNotesCardRequest+    EnterpriseTopazSidekickMeetingNotesCardRequest (..),+    newEnterpriseTopazSidekickMeetingNotesCardRequest,++    -- ** EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem+    EnterpriseTopazSidekickMeetingNotesCardRequest_CanCreateForItem (..),++    -- ** EnterpriseTopazSidekickNlpMetadata+    EnterpriseTopazSidekickNlpMetadata (..),+    newEnterpriseTopazSidekickNlpMetadata,++    -- ** EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo+    EnterpriseTopazSidekickPeopleAnswerDisambiguationInfo (..),+    newEnterpriseTopazSidekickPeopleAnswerDisambiguationInfo,++    -- ** EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson+    EnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson (..),+    newEnterpriseTopazSidekickPeopleAnswerDisambiguationInfoDisambiguationPerson,++    -- ** EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader+    EnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader (..),+    newEnterpriseTopazSidekickPeopleAnswerPeopleAnswerCardHeader,++    -- ** EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard+    EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard (..),+    newEnterpriseTopazSidekickPeopleAnswerPersonAnswerCard,++    -- ** EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus+    EnterpriseTopazSidekickPeopleAnswerPersonAnswerCard_ResponseStatus (..),++    -- ** EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard+    EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard (..),+    newEnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard,++    -- ** EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType+    EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_RelationType (..),++    -- ** EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus+    EnterpriseTopazSidekickPeopleAnswerRelatedPeopleAnswerCard_ResponseStatus (..),++    -- ** EnterpriseTopazSidekickPeopleDisambiguationCard+    EnterpriseTopazSidekickPeopleDisambiguationCard (..),+    newEnterpriseTopazSidekickPeopleDisambiguationCard,++    -- ** EnterpriseTopazSidekickPerson+    EnterpriseTopazSidekickPerson (..),+    newEnterpriseTopazSidekickPerson,++    -- ** EnterpriseTopazSidekickPerson_AffinityLevel+    EnterpriseTopazSidekickPerson_AffinityLevel (..),++    -- ** EnterpriseTopazSidekickPerson_AttendingStatus+    EnterpriseTopazSidekickPerson_AttendingStatus (..),++    -- ** EnterpriseTopazSidekickPersonProfileCard+    EnterpriseTopazSidekickPersonProfileCard (..),+    newEnterpriseTopazSidekickPersonProfileCard,++    -- ** EnterpriseTopazSidekickPersonProfileCardRelatedPeople+    EnterpriseTopazSidekickPersonProfileCardRelatedPeople (..),+    newEnterpriseTopazSidekickPersonProfileCardRelatedPeople,++    -- ** EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation+    EnterpriseTopazSidekickPersonProfileCardRelatedPeople_Relation (..),++    -- ** EnterpriseTopazSidekickPersonalizedDocsCardProto+    EnterpriseTopazSidekickPersonalizedDocsCardProto (..),+    newEnterpriseTopazSidekickPersonalizedDocsCardProto,++    -- ** EnterpriseTopazSidekickRankingParams+    EnterpriseTopazSidekickRankingParams (..),+    newEnterpriseTopazSidekickRankingParams,++    -- ** EnterpriseTopazSidekickRankingParams_Priority+    EnterpriseTopazSidekickRankingParams_Priority (..),++    -- ** EnterpriseTopazSidekickRankingParams_Type+    EnterpriseTopazSidekickRankingParams_Type (..),++    -- ** EnterpriseTopazSidekickRecentDocumentsCardProto+    EnterpriseTopazSidekickRecentDocumentsCardProto (..),+    newEnterpriseTopazSidekickRecentDocumentsCardProto,++    -- ** EnterpriseTopazSidekickScheduledMeeting+    EnterpriseTopazSidekickScheduledMeeting (..),+    newEnterpriseTopazSidekickScheduledMeeting,++    -- ** EnterpriseTopazSidekickShareMeetingDocsCardProto+    EnterpriseTopazSidekickShareMeetingDocsCardProto (..),+    newEnterpriseTopazSidekickShareMeetingDocsCardProto,++    -- ** EnterpriseTopazSidekickTimeSlot+    EnterpriseTopazSidekickTimeSlot (..),+    newEnterpriseTopazSidekickTimeSlot,++    -- ** EnumOperatorOptions+    EnumOperatorOptions (..),+    newEnumOperatorOptions,++    -- ** EnumPropertyOptions+    EnumPropertyOptions (..),+    newEnumPropertyOptions,++    -- ** EnumPropertyOptions_OrderedRanking+    EnumPropertyOptions_OrderedRanking (..),++    -- ** EnumValuePair+    EnumValuePair (..),+    newEnumValuePair,++    -- ** EnumValues+    EnumValues (..),+    newEnumValues,++    -- ** ErrorInfo+    ErrorInfo (..),+    newErrorInfo,++    -- ** ErrorMessage+    ErrorMessage (..),+    newErrorMessage,++    -- ** FacetBucket+    FacetBucket (..),+    newFacetBucket,++    -- ** FacetOptions+    FacetOptions (..),+    newFacetOptions,++    -- ** FacetResult+    FacetResult (..),+    newFacetResult,++    -- ** FieldViolation+    FieldViolation (..),+    newFieldViolation,++    -- ** Filter+    Filter (..),+    newFilter,++    -- ** FilterOptions+    FilterOptions (..),+    newFilterOptions,++    -- ** FreshnessOptions+    FreshnessOptions (..),+    newFreshnessOptions,++    -- ** GSuitePrincipal+    GSuitePrincipal (..),+    newGSuitePrincipal,++    -- ** GetCustomerIndexStatsResponse+    GetCustomerIndexStatsResponse (..),+    newGetCustomerIndexStatsResponse,++    -- ** GetCustomerQueryStatsResponse+    GetCustomerQueryStatsResponse (..),+    newGetCustomerQueryStatsResponse,++    -- ** GetCustomerSearchApplicationStatsResponse+    GetCustomerSearchApplicationStatsResponse (..),+    newGetCustomerSearchApplicationStatsResponse,++    -- ** GetCustomerSessionStatsResponse+    GetCustomerSessionStatsResponse (..),+    newGetCustomerSessionStatsResponse,++    -- ** GetCustomerUserStatsResponse+    GetCustomerUserStatsResponse (..),+    newGetCustomerUserStatsResponse,++    -- ** GetDataSourceIndexStatsResponse+    GetDataSourceIndexStatsResponse (..),+    newGetDataSourceIndexStatsResponse,++    -- ** GetSearchApplicationQueryStatsResponse+    GetSearchApplicationQueryStatsResponse (..),+    newGetSearchApplicationQueryStatsResponse,++    -- ** GetSearchApplicationSessionStatsResponse+    GetSearchApplicationSessionStatsResponse (..),+    newGetSearchApplicationSessionStatsResponse,++    -- ** GetSearchApplicationUserStatsResponse+    GetSearchApplicationUserStatsResponse (..),+    newGetSearchApplicationUserStatsResponse,++    -- ** HtmlOperatorOptions+    HtmlOperatorOptions (..),+    newHtmlOperatorOptions,++    -- ** HtmlPropertyOptions+    HtmlPropertyOptions (..),+    newHtmlPropertyOptions,++    -- ** HtmlValues+    HtmlValues (..),+    newHtmlValues,++    -- ** IndexItemOptions+    IndexItemOptions (..),+    newIndexItemOptions,++    -- ** IndexItemRequest+    IndexItemRequest (..),+    newIndexItemRequest,++    -- ** IndexItemRequest_Mode+    IndexItemRequest_Mode (..),++    -- ** InitializeCustomerRequest+    InitializeCustomerRequest (..),+    newInitializeCustomerRequest,++    -- ** IntegerFacetingOptions+    IntegerFacetingOptions (..),+    newIntegerFacetingOptions,++    -- ** IntegerOperatorOptions+    IntegerOperatorOptions (..),+    newIntegerOperatorOptions,++    -- ** IntegerPropertyOptions+    IntegerPropertyOptions (..),+    newIntegerPropertyOptions,++    -- ** IntegerPropertyOptions_OrderedRanking+    IntegerPropertyOptions_OrderedRanking (..),++    -- ** IntegerValues+    IntegerValues (..),+    newIntegerValues,++    -- ** Interaction+    Interaction (..),+    newInteraction,++    -- ** Interaction_Type+    Interaction_Type (..),++    -- ** Item+    Item (..),+    newItem,++    -- ** Item_ItemType+    Item_ItemType (..),++    -- ** ItemAcl+    ItemAcl (..),+    newItemAcl,++    -- ** ItemAcl_AclInheritanceType+    ItemAcl_AclInheritanceType (..),++    -- ** ItemContent+    ItemContent (..),+    newItemContent,++    -- ** ItemContent_ContentFormat+    ItemContent_ContentFormat (..),++    -- ** ItemCountByStatus+    ItemCountByStatus (..),+    newItemCountByStatus,++    -- ** ItemCountByStatus_StatusCode+    ItemCountByStatus_StatusCode (..),++    -- ** ItemMetadata+    ItemMetadata (..),+    newItemMetadata,++    -- ** ItemStatus+    ItemStatus (..),+    newItemStatus,++    -- ** ItemStatus_Code+    ItemStatus_Code (..),++    -- ** ItemStructuredData+    ItemStructuredData (..),+    newItemStructuredData,++    -- ** ListDataSourceResponse+    ListDataSourceResponse (..),+    newListDataSourceResponse,++    -- ** ListItemNamesForUnmappedIdentityResponse+    ListItemNamesForUnmappedIdentityResponse (..),+    newListItemNamesForUnmappedIdentityResponse,++    -- ** ListItemsResponse+    ListItemsResponse (..),+    newListItemsResponse,++    -- ** ListOperationsResponse+    ListOperationsResponse (..),+    newListOperationsResponse,++    -- ** ListQuerySourcesResponse+    ListQuerySourcesResponse (..),+    newListQuerySourcesResponse,++    -- ** ListSearchApplicationsResponse+    ListSearchApplicationsResponse (..),+    newListSearchApplicationsResponse,++    -- ** ListUnmappedIdentitiesResponse+    ListUnmappedIdentitiesResponse (..),+    newListUnmappedIdentitiesResponse,++    -- ** MapInfo+    MapInfo (..),+    newMapInfo,++    -- ** MapTile+    MapTile (..),+    newMapTile,++    -- ** MatchRange+    MatchRange (..),+    newMatchRange,++    -- ** Media+    Media (..),+    newMedia,++    -- ** Metadata+    Metadata (..),+    newMetadata,++    -- ** Metaline+    Metaline (..),+    newMetaline,++    -- ** Name+    Name (..),+    newName,++    -- ** NamedProperty+    NamedProperty (..),+    newNamedProperty,++    -- ** ObjectDefinition+    ObjectDefinition (..),+    newObjectDefinition,++    -- ** ObjectDisplayOptions+    ObjectDisplayOptions (..),+    newObjectDisplayOptions,++    -- ** ObjectOptions+    ObjectOptions (..),+    newObjectOptions,++    -- ** ObjectPropertyOptions+    ObjectPropertyOptions (..),+    newObjectPropertyOptions,++    -- ** ObjectValues+    ObjectValues (..),+    newObjectValues,++    -- ** Operation+    Operation (..),+    newOperation,++    -- ** Operation_Metadata+    Operation_Metadata (..),+    newOperation_Metadata,++    -- ** Operation_Response+    Operation_Response (..),+    newOperation_Response,++    -- ** PeoplePromotionCard+    PeoplePromotionCard (..),+    newPeoplePromotionCard,++    -- ** PeopleSuggestion+    PeopleSuggestion (..),+    newPeopleSuggestion,++    -- ** Person+    Person (..),+    newPerson,++    -- ** PersonCore+    PersonCore (..),+    newPersonCore,++    -- ** PersonCore_AvailabilityStatus+    PersonCore_AvailabilityStatus (..),++    -- ** PersonCore_Keywords+    PersonCore_Keywords (..),+    newPersonCore_Keywords,++    -- ** PhoneNumber+    PhoneNumber (..),+    newPhoneNumber,++    -- ** PhoneNumber_Type+    PhoneNumber_Type (..),++    -- ** Photo+    Photo (..),+    newPhoto,++    -- ** PollItemsRequest+    PollItemsRequest (..),+    newPollItemsRequest,++    -- ** PollItemsRequest_StatusCodesItem+    PollItemsRequest_StatusCodesItem (..),++    -- ** PollItemsResponse+    PollItemsResponse (..),+    newPollItemsResponse,++    -- ** Principal+    Principal (..),+    newPrincipal,++    -- ** ProcessingError+    ProcessingError (..),+    newProcessingError,++    -- ** ProcessingError_Code+    ProcessingError_Code (..),++    -- ** PropertyDefinition+    PropertyDefinition (..),+    newPropertyDefinition,++    -- ** PropertyDisplayOptions+    PropertyDisplayOptions (..),+    newPropertyDisplayOptions,++    -- ** PushItem+    PushItem (..),+    newPushItem,++    -- ** PushItem_Type+    PushItem_Type (..),++    -- ** PushItemRequest+    PushItemRequest (..),+    newPushItemRequest,++    -- ** QueryActivity+    QueryActivity (..),+    newQueryActivity,++    -- ** QueryCountByStatus+    QueryCountByStatus (..),+    newQueryCountByStatus,++    -- ** QueryInterpretation+    QueryInterpretation (..),+    newQueryInterpretation,++    -- ** QueryInterpretation_InterpretationType+    QueryInterpretation_InterpretationType (..),++    -- ** QueryInterpretation_Reason+    QueryInterpretation_Reason (..),++    -- ** QueryInterpretationConfig+    QueryInterpretationConfig (..),+    newQueryInterpretationConfig,++    -- ** QueryInterpretationOptions+    QueryInterpretationOptions (..),+    newQueryInterpretationOptions,++    -- ** QueryItem+    QueryItem (..),+    newQueryItem,++    -- ** QueryOperator+    QueryOperator (..),+    newQueryOperator,++    -- ** QueryOperator_Type+    QueryOperator_Type (..),++    -- ** QuerySource+    QuerySource (..),+    newQuerySource,++    -- ** QuerySuggestion+    QuerySuggestion (..),+    newQuerySuggestion,++    -- ** RemoveActivityRequest+    RemoveActivityRequest (..),+    newRemoveActivityRequest,++    -- ** RemoveActivityResponse+    RemoveActivityResponse (..),+    newRemoveActivityResponse,++    -- ** RepositoryError+    RepositoryError (..),+    newRepositoryError,++    -- ** RepositoryError_Type+    RepositoryError_Type (..),++    -- ** RequestOptions+    RequestOptions (..),+    newRequestOptions,++    -- ** ResetSearchApplicationRequest+    ResetSearchApplicationRequest (..),+    newResetSearchApplicationRequest,++    -- ** ResponseDebugInfo+    ResponseDebugInfo (..),+    newResponseDebugInfo,++    -- ** RestrictItem+    RestrictItem (..),+    newRestrictItem,++    -- ** ResultCounts+    ResultCounts (..),+    newResultCounts,++    -- ** ResultDebugInfo+    ResultDebugInfo (..),+    newResultDebugInfo,++    -- ** ResultDisplayField+    ResultDisplayField (..),+    newResultDisplayField,++    -- ** ResultDisplayLine+    ResultDisplayLine (..),+    newResultDisplayLine,++    -- ** ResultDisplayMetadata+    ResultDisplayMetadata (..),+    newResultDisplayMetadata,++    -- ** RetrievalImportance+    RetrievalImportance (..),+    newRetrievalImportance,++    -- ** RetrievalImportance_Importance+    RetrievalImportance_Importance (..),++    -- ** SafeHtmlProto+    SafeHtmlProto (..),+    newSafeHtmlProto,++    -- ** SafeUrlProto+    SafeUrlProto (..),+    newSafeUrlProto,++    -- ** Schema+    Schema (..),+    newSchema,++    -- ** ScoringConfig+    ScoringConfig (..),+    newScoringConfig,++    -- ** SearchApplication+    SearchApplication (..),+    newSearchApplication,++    -- ** SearchApplicationQueryStats+    SearchApplicationQueryStats (..),+    newSearchApplicationQueryStats,++    -- ** SearchApplicationSessionStats+    SearchApplicationSessionStats (..),+    newSearchApplicationSessionStats,++    -- ** SearchApplicationUserStats+    SearchApplicationUserStats (..),+    newSearchApplicationUserStats,++    -- ** SearchItemsByViewUrlRequest+    SearchItemsByViewUrlRequest (..),+    newSearchItemsByViewUrlRequest,++    -- ** SearchItemsByViewUrlResponse+    SearchItemsByViewUrlResponse (..),+    newSearchItemsByViewUrlResponse,++    -- ** SearchQualityMetadata+    SearchQualityMetadata (..),+    newSearchQualityMetadata,++    -- ** SearchRequest+    SearchRequest (..),+    newSearchRequest,++    -- ** SearchResponse+    SearchResponse (..),+    newSearchResponse,++    -- ** SearchResult+    SearchResult (..),+    newSearchResult,++    -- ** Snippet+    Snippet (..),+    newSnippet,++    -- ** SortOptions+    SortOptions (..),+    newSortOptions,++    -- ** SortOptions_SortOrder+    SortOptions_SortOrder (..),++    -- ** Source+    Source (..),+    newSource,++    -- ** Source_PredefinedSource+    Source_PredefinedSource (..),++    -- ** SourceConfig+    SourceConfig (..),+    newSourceConfig,++    -- ** SourceCrowdingConfig+    SourceCrowdingConfig (..),+    newSourceCrowdingConfig,++    -- ** SourceResultCount+    SourceResultCount (..),+    newSourceResultCount,++    -- ** SourceScoringConfig+    SourceScoringConfig (..),+    newSourceScoringConfig,++    -- ** SourceScoringConfig_SourceImportance+    SourceScoringConfig_SourceImportance (..),++    -- ** SpellResult+    SpellResult (..),+    newSpellResult,++    -- ** SpellResult_SuggestionType+    SpellResult_SuggestionType (..),++    -- ** StartUploadItemRequest+    StartUploadItemRequest (..),+    newStartUploadItemRequest,++    -- ** Status+    Status (..),+    newStatus,++    -- ** Status_DetailsItem+    Status_DetailsItem (..),+    newStatus_DetailsItem,++    -- ** StructuredDataObject+    StructuredDataObject (..),+    newStructuredDataObject,++    -- ** StructuredResult+    StructuredResult (..),+    newStructuredResult,++    -- ** SuggestRequest+    SuggestRequest (..),+    newSuggestRequest,++    -- ** SuggestResponse+    SuggestResponse (..),+    newSuggestResponse,++    -- ** SuggestResult+    SuggestResult (..),+    newSuggestResult,++    -- ** TextOperatorOptions+    TextOperatorOptions (..),+    newTextOperatorOptions,++    -- ** TextPropertyOptions+    TextPropertyOptions (..),+    newTextPropertyOptions,++    -- ** TextValues+    TextValues (..),+    newTextValues,++    -- ** ThirdPartyGenericCard+    ThirdPartyGenericCard (..),+    newThirdPartyGenericCard,++    -- ** TimestampOperatorOptions+    TimestampOperatorOptions (..),+    newTimestampOperatorOptions,++    -- ** TimestampPropertyOptions+    TimestampPropertyOptions (..),+    newTimestampPropertyOptions,++    -- ** TimestampValues+    TimestampValues (..),+    newTimestampValues,++    -- ** UnmappedIdentity+    UnmappedIdentity (..),+    newUnmappedIdentity,++    -- ** UnmappedIdentity_ResolutionStatusCode+    UnmappedIdentity_ResolutionStatusCode (..),++    -- ** UnreserveItemsRequest+    UnreserveItemsRequest (..),+    newUnreserveItemsRequest,++    -- ** UpdateDataSourceRequest+    UpdateDataSourceRequest (..),+    newUpdateDataSourceRequest,++    -- ** UpdateSchemaRequest+    UpdateSchemaRequest (..),+    newUpdateSchemaRequest,++    -- ** UploadItemRef+    UploadItemRef (..),+    newUploadItemRef,++    -- ** UserActivity+    UserActivity (..),+    newUserActivity,++    -- ** VPCSettings+    VPCSettings (..),+    newVPCSettings,++    -- ** Value+    Value (..),+    newValue,++    -- ** ValueFilter+    ValueFilter (..),+    newValueFilter,++    -- ** DebugIdentitysourcesUnmappedidsListResolutionStatusCode+    DebugIdentitysourcesUnmappedidsListResolutionStatusCode (..),++    -- ** IndexingDatasourcesItemsDeleteMode+    IndexingDatasourcesItemsDeleteMode (..),+  )+where++import Gogol.CloudSearch.Internal.Product+import Gogol.CloudSearch.Internal.Sum+import Gogol.Prelude qualified as Core++-- | Default request referring to version @v1@ of the Cloud Search API. This contains the host and root path used as a starting point for constructing service requests.+cloudSearchService :: Core.ServiceConfig+cloudSearchService =+  Core.defaultService+    (Core.ServiceId "cloudsearch:v1")+    "cloudsearch.googleapis.com"++-- | Index and serve your organization\'s data with Cloud Search+type CloudSearch'FullControl =+  "https://www.googleapis.com/auth/cloud_search"++-- | Index and serve your organization\'s data with Cloud Search+type CloudSearch'Debug =+  "https://www.googleapis.com/auth/cloud_search.debug"++-- | Index and serve your organization\'s data with Cloud Search+type CloudSearch'Indexing =+  "https://www.googleapis.com/auth/cloud_search.indexing"++-- | Search your organization\'s data in the Cloud Search index+type CloudSearch'Query =+  "https://www.googleapis.com/auth/cloud_search.query"++-- | Index and serve your organization\'s data with Cloud Search+type CloudSearch'Settings =+  "https://www.googleapis.com/auth/cloud_search.settings"++-- | Index and serve your organization\'s data with Cloud Search+type CloudSearch'Settings'Indexing =+  "https://www.googleapis.com/auth/cloud_search.settings.indexing"++-- | Index and serve your organization\'s data with Cloud Search+type CloudSearch'Settings'Query =+  "https://www.googleapis.com/auth/cloud_search.settings.query"++-- | Index and serve your organization\'s data with Cloud Search+type CloudSearch'Stats =+  "https://www.googleapis.com/auth/cloud_search.stats"++-- | Index and serve your organization\'s data with Cloud Search+type CloudSearch'Stats'Indexing =+  "https://www.googleapis.com/auth/cloud_search.stats.indexing"
− gen/Network/Google/CloudSearch.hs 
@@ -1,1291 +0,0 @@-{-# LANGUAGE DataKinds         #-}-{-# LANGUAGE NoImplicitPrelude #-}-{-# LANGUAGE TypeOperators     #-}--{-# OPTIONS_GHC -fno-warn-unused-imports    #-}-{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}---- |--- Module      : Network.Google.CloudSearch--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Cloud Search provides cloud-based search capabilities over G Suite data.--- The Cloud Search API allows indexing of non-G Suite data into Cloud--- Search.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference>-module Network.Google.CloudSearch-    (-    -- * Service Configuration-      cloudSearchService--    -- * OAuth Scopes-    , cloudSearchSettingsQueryScope-    , cloudSearchStatsIndexingScope-    , cloudSearchIndexingScope-    , cloudSearchScope-    , cloudSearchSettingsIndexingScope-    , cloudSearchQueryScope-    , cloudSearchDebugScope-    , cloudSearchStatsScope-    , cloudSearchSettingsScope--    -- * API Declaration-    , CloudSearchAPI--    -- * Resources--    -- ** cloudsearch.debug.datasources.items.checkAccess-    , module Network.Google.Resource.CloudSearch.Debug.Datasources.Items.CheckAccess--    -- ** cloudsearch.debug.datasources.items.searchByViewUrl-    , module Network.Google.Resource.CloudSearch.Debug.Datasources.Items.SearchByViewURL--    -- ** cloudsearch.debug.datasources.items.unmappedids.list-    , module Network.Google.Resource.CloudSearch.Debug.Datasources.Items.UnmAppedids.List--    -- ** cloudsearch.debug.identitysources.items.listForunmappedidentity-    , module Network.Google.Resource.CloudSearch.Debug.Identitysources.Items.ListForunmAppedidentity--    -- ** cloudsearch.debug.identitysources.unmappedids.list-    , module Network.Google.Resource.CloudSearch.Debug.Identitysources.UnmAppedids.List--    -- ** cloudsearch.indexing.datasources.deleteSchema-    , module Network.Google.Resource.CloudSearch.Indexing.Datasources.DeleteSchema--    -- ** cloudsearch.indexing.datasources.getSchema-    , module Network.Google.Resource.CloudSearch.Indexing.Datasources.GetSchema--    -- ** cloudsearch.indexing.datasources.items.delete-    , module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Delete--    -- ** cloudsearch.indexing.datasources.items.deleteQueueItems-    , module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.DeleteQueueItems--    -- ** cloudsearch.indexing.datasources.items.get-    , module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Get--    -- ** cloudsearch.indexing.datasources.items.index-    , module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Index--    -- ** cloudsearch.indexing.datasources.items.list-    , module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.List--    -- ** cloudsearch.indexing.datasources.items.poll-    , module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Poll--    -- ** cloudsearch.indexing.datasources.items.push-    , module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Push--    -- ** cloudsearch.indexing.datasources.items.unreserve-    , module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Unreserve--    -- ** cloudsearch.indexing.datasources.items.upload-    , module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Upload--    -- ** cloudsearch.indexing.datasources.updateSchema-    , module Network.Google.Resource.CloudSearch.Indexing.Datasources.UpdateSchema--    -- ** cloudsearch.media.upload-    , module Network.Google.Resource.CloudSearch.Media.Upload--    -- ** cloudsearch.operations.get-    , module Network.Google.Resource.CloudSearch.Operations.Get--    -- ** cloudsearch.query.search-    , module Network.Google.Resource.CloudSearch.Query.Search--    -- ** cloudsearch.query.sources.list-    , module Network.Google.Resource.CloudSearch.Query.Sources.List--    -- ** cloudsearch.query.suggest-    , module Network.Google.Resource.CloudSearch.Query.Suggest--    -- ** cloudsearch.settings.datasources.create-    , module Network.Google.Resource.CloudSearch.Settings.Datasources.Create--    -- ** cloudsearch.settings.datasources.delete-    , module Network.Google.Resource.CloudSearch.Settings.Datasources.Delete--    -- ** cloudsearch.settings.datasources.get-    , module Network.Google.Resource.CloudSearch.Settings.Datasources.Get--    -- ** cloudsearch.settings.datasources.list-    , module Network.Google.Resource.CloudSearch.Settings.Datasources.List--    -- ** cloudsearch.settings.datasources.update-    , module Network.Google.Resource.CloudSearch.Settings.Datasources.Update--    -- ** cloudsearch.settings.searchapplications.create-    , module Network.Google.Resource.CloudSearch.Settings.SearchApplications.Create--    -- ** cloudsearch.settings.searchapplications.delete-    , module Network.Google.Resource.CloudSearch.Settings.SearchApplications.Delete--    -- ** cloudsearch.settings.searchapplications.get-    , module Network.Google.Resource.CloudSearch.Settings.SearchApplications.Get--    -- ** cloudsearch.settings.searchapplications.list-    , module Network.Google.Resource.CloudSearch.Settings.SearchApplications.List--    -- ** cloudsearch.settings.searchapplications.reset-    , module Network.Google.Resource.CloudSearch.Settings.SearchApplications.Reset--    -- ** cloudsearch.settings.searchapplications.update-    , module Network.Google.Resource.CloudSearch.Settings.SearchApplications.Update--    -- ** cloudsearch.stats.getIndex-    , module Network.Google.Resource.CloudSearch.Stats.GetIndex--    -- ** cloudsearch.stats.index.datasources.get-    , module Network.Google.Resource.CloudSearch.Stats.Index.Datasources.Get--    -- * Types--    -- ** DriveMimeTypeRestrictType-    , DriveMimeTypeRestrictType (..)--    -- ** DriveFollowUpRestrictType-    , DriveFollowUpRestrictType (..)--    -- ** GmailFolderRestrict-    , GmailFolderRestrict-    , gmailFolderRestrict-    , gfrType--    -- ** ItemContent-    , ItemContent-    , itemContent-    , icHash-    , icContentFormat-    , icContentDataRef-    , icInlineContent--    -- ** Photo-    , Photo-    , photo-    , pURL--    -- ** SearchItemsByViewURLRequest-    , SearchItemsByViewURLRequest-    , searchItemsByViewURLRequest-    , sibvurDebugOptions-    , sibvurPageToken-    , sibvurViewURL--    -- ** SearchApplication-    , SearchApplication-    , searchApplication-    , saDataSourceRestrictions-    , saOperationIds-    , saDefaultFacetOptions-    , saScoringConfig-    , saName-    , saSourceConfig-    , saDisplayName-    , saDefaultSortOptions--    -- ** BooleanOperatorOptions-    , BooleanOperatorOptions-    , booleanOperatorOptions-    , booOperatorName--    -- ** Status-    , Status-    , status-    , sDetails-    , sCode-    , sMessage--    -- ** EnumPropertyOptions-    , EnumPropertyOptions-    , enumPropertyOptions-    , epoPossibleValues-    , epoOrderedRanking-    , epoOperatorOptions--    -- ** ItemStatusCode-    , ItemStatusCode (..)--    -- ** GmailActionRestrict-    , GmailActionRestrict-    , gmailActionRestrict-    , garType--    -- ** UnreserveItemsRequest-    , UnreserveItemsRequest-    , unreserveItemsRequest-    , uirQueue-    , uirDebugOptions-    , uirConnectorName--    -- ** DateOperatorOptions-    , DateOperatorOptions-    , dateOperatorOptions-    , dooOperatorName-    , dooLessThanOperatorName-    , dooGreaterThanOperatorName--    -- ** GetDataSourceIndexStatsResponse-    , GetDataSourceIndexStatsResponse-    , getDataSourceIndexStatsResponse-    , gdsisrStats--    -- ** ObjectDisplayOptions-    , ObjectDisplayOptions-    , objectDisplayOptions-    , odoMetalines-    , odoObjectDisplayLabel--    -- ** QueryItem-    , QueryItem-    , queryItem-    , qiIsSynthetic--    -- ** ListUnmAppedIdentitiesResponse-    , ListUnmAppedIdentitiesResponse-    , listUnmAppedIdentitiesResponse-    , luairNextPageToken-    , luairUnmAppedIdentities--    -- ** DeleteQueueItemsRequest-    , DeleteQueueItemsRequest-    , deleteQueueItemsRequest-    , dqirQueue-    , dqirDebugOptions-    , dqirConnectorName--    -- ** SearchResult-    , SearchResult-    , searchResult-    , srDebugInfo-    , srSnippet-    , srURL-    , srClusteredResults-    , srMetadata-    , srTitle--    -- ** SpellResult-    , SpellResult-    , spellResult-    , srSuggestedQuery--    -- ** PeopleSuggestion-    , PeopleSuggestion-    , peopleSuggestion-    , psPerson--    -- ** QuerySource-    , QuerySource-    , querySource-    , qsShortName-    , qsDisplayName-    , qsSource-    , qsOperators--    -- ** GmailTimeRestrictType-    , GmailTimeRestrictType (..)--    -- ** SuggestResponse-    , SuggestResponse-    , suggestResponse-    , srSuggestResults--    -- ** RepositoryError-    , RepositoryError-    , repositoryError-    , reHTTPStatusCode-    , reType-    , reErrorMessage--    -- ** QueryInterpretationInterpretationType-    , QueryInterpretationInterpretationType (..)--    -- ** HTMLPropertyOptions-    , HTMLPropertyOptions-    , htmlPropertyOptions-    , hpoRetrievalImportance-    , hpoOperatorOptions--    -- ** PropertyDefinition-    , PropertyDefinition-    , propertyDefinition-    , pdEnumPropertyOptions-    , pdHTMLPropertyOptions-    , pdObjectPropertyOptions-    , pdIsReturnable-    , pdTimestampPropertyOptions-    , pdIntegerPropertyOptions-    , pdName-    , pdIsRepeatable-    , pdDoublePropertyOptions-    , pdDisplayOptions-    , pdTextPropertyOptions-    , pdIsSortable-    , pdIsFacetable-    , pdBooleanPropertyOptions-    , pdDatePropertyOptions--    -- ** SortOptions-    , SortOptions-    , sortOptions-    , soSortOrder-    , soOperatorName--    -- ** ObjectPropertyOptions-    , ObjectPropertyOptions-    , objectPropertyOptions-    , opoSubobjectProperties--    -- ** InteractionType-    , InteractionType (..)--    -- ** QueryOperatorType-    , QueryOperatorType (..)--    -- ** SearchResponse-    , SearchResponse-    , searchResponse-    , sSpellResults-    , sFacetResults-    , sDebugInfo-    , sResults-    , sHasMoreResults-    , sResultCounts-    , sResultCountExact-    , sResultCountEstimate-    , sQueryInterpretation-    , sStructuredResults-    , sErrorInfo--    -- ** SuggestResult-    , SuggestResult-    , suggestResult-    , sPeopleSuggestion-    , sQuerySuggestion-    , sSuggestedQuery-    , sSource--    -- ** TextValues-    , TextValues-    , textValues-    , tvValues--    -- ** DriveLocationRestrict-    , DriveLocationRestrict-    , driveLocationRestrict-    , dlrType--    -- ** ListQuerySourcesResponse-    , ListQuerySourcesResponse-    , listQuerySourcesResponse-    , lqsrNextPageToken-    , lqsrSources--    -- ** DoubleOperatorOptions-    , DoubleOperatorOptions-    , doubleOperatorOptions-    , dOperatorName--    -- ** GmailIntelligentRestrictType-    , GmailIntelligentRestrictType (..)--    -- ** Operation-    , Operation-    , operation-    , oDone-    , oError-    , oResponse-    , oName-    , oMetadata--    -- ** Person-    , Person-    , person-    , pEmailAddresses-    , pPersonNames-    , pPhotos-    , pName-    , pObfuscatedId--    -- ** CompositeFilter-    , CompositeFilter-    , compositeFilter-    , cfSubFilters-    , cfLogicOperator--    -- ** ResultDisplayLine-    , ResultDisplayLine-    , resultDisplayLine-    , rdlFields--    -- ** DoubleValues-    , DoubleValues-    , doubleValues-    , dvValues--    -- ** Snippet-    , Snippet-    , snippet-    , sMatchRanges-    , sSnippet--    -- ** TextOperatorOptions-    , TextOperatorOptions-    , textOperatorOptions-    , tooOperatorName-    , tooExactMatchWithOperator--    -- ** EnumPropertyOptionsOrderedRanking-    , EnumPropertyOptionsOrderedRanking (..)--    -- ** QueryInterpretationOptions-    , QueryInterpretationOptions-    , queryInterpretationOptions-    , qioDisableNlInterpretation--    -- ** ResetSearchApplicationRequest-    , ResetSearchApplicationRequest-    , resetSearchApplicationRequest-    , rsarDebugOptions--    -- ** IntegerPropertyOptionsOrderedRanking-    , IntegerPropertyOptionsOrderedRanking (..)--    -- ** ItemMetadata-    , ItemMetadata-    , itemMetadata-    , imSourceRepositoryURL-    , imHash-    , imObjectType-    , imContainerName-    , imInteractions-    , imMimeType-    , imUpdateTime-    , imKeywords-    , imTitle-    , imContentLanguage-    , imSearchQualityMetadata-    , imCreateTime--    -- ** FilterOptions-    , FilterOptions-    , filterOptions-    , foObjectType-    , foFilter--    -- ** StructuredResult-    , StructuredResult-    , structuredResult-    , srPerson--    -- ** ProcessingError-    , ProcessingError-    , processingError-    , peFieldViolations-    , peCode-    , peErrorMessage--    -- ** PushItemType-    , PushItemType (..)--    -- ** ListItemNamesForUnmAppedIdentityResponse-    , ListItemNamesForUnmAppedIdentityResponse-    , listItemNamesForUnmAppedIdentityResponse-    , linfuairNextPageToken-    , linfuairItemNames--    -- ** CompositeFilterLogicOperator-    , CompositeFilterLogicOperator (..)--    -- ** ItemACL-    , ItemACL-    , itemACL-    , iaOwners-    , iaReaders-    , iaACLInheritanceType-    , iaInheritACLFrom-    , iaDeniedReaders--    -- ** Value-    , Value-    , value-    , vIntegerValue-    , vTimestampValue-    , vDoubleValue-    , vStringValue-    , vDateValue-    , vBooleanValue--    -- ** FieldViolation-    , FieldViolation-    , fieldViolation-    , fvField-    , fvDescription--    -- ** SourceScoringConfigSourceImportance-    , SourceScoringConfigSourceImportance (..)--    -- ** GmailAttachmentRestrictType-    , GmailAttachmentRestrictType (..)--    -- ** Metaline-    , Metaline-    , metaline-    , mProperties--    -- ** FacetBucket-    , FacetBucket-    , facetBucket-    , fbValue-    , fbCount-    , fbPercentage--    -- ** StatusDetailsItem-    , StatusDetailsItem-    , statusDetailsItem-    , sdiAddtional--    -- ** RetrievalImportanceImportance-    , RetrievalImportanceImportance (..)--    -- ** TimestampOperatorOptions-    , TimestampOperatorOptions-    , timestampOperatorOptions-    , tOperatorName-    , tLessThanOperatorName-    , tGreaterThanOperatorName--    -- ** ProcessingErrorCode-    , ProcessingErrorCode (..)--    -- ** IntegerOperatorOptions-    , IntegerOperatorOptions-    , integerOperatorOptions-    , iooOperatorName-    , iooLessThanOperatorName-    , iooGreaterThanOperatorName--    -- ** SortOptionsSortOrder-    , SortOptionsSortOrder (..)--    -- ** QuerySuggestion-    , QuerySuggestion-    , querySuggestion--    -- ** ListSearchApplicationsResponse-    , ListSearchApplicationsResponse-    , listSearchApplicationsResponse-    , lsarNextPageToken-    , lsarSearchApplications--    -- ** ResultDebugInfo-    , ResultDebugInfo-    , resultDebugInfo-    , rdiFormattedDebugInfo--    -- ** ItemCountByStatus-    , ItemCountByStatus-    , itemCountByStatus-    , icbsCount-    , icbsStatusCode--    -- ** TimestampPropertyOptions-    , TimestampPropertyOptions-    , timestampPropertyOptions-    , tpoOperatorOptions--    -- ** ResultCounts-    , ResultCounts-    , resultCounts-    , rcSourceResultCounts--    -- ** FreshnessOptions-    , FreshnessOptions-    , freshnessOptions-    , foFreshnessDuration-    , foFreshnessProperty--    -- ** DebugOptions-    , DebugOptions-    , debugOptions-    , doEnableDebugging--    -- ** IntegerPropertyOptions-    , IntegerPropertyOptions-    , integerPropertyOptions-    , ipoMaximumValue-    , ipoOrderedRanking-    , ipoMinimumValue-    , ipoOperatorOptions--    -- ** DataSourceRestriction-    , DataSourceRestriction-    , dataSourceRestriction-    , dsrFilterOptions-    , dsrSource--    -- ** Schema-    , Schema-    , schema-    , sObjectDefinitions-    , sOperationIds--    -- ** DriveTimeSpanRestrict-    , DriveTimeSpanRestrict-    , driveTimeSpanRestrict-    , dtsrType--    -- ** ResultDisplayField-    , ResultDisplayField-    , resultDisplayField-    , rdfProperty-    , rdfOperatorName-    , rdfLabel--    -- ** UpdateSchemaRequest-    , UpdateSchemaRequest-    , updateSchemaRequest-    , usrValidateOnly-    , usrSchema-    , usrDebugOptions--    -- ** Date-    , Date-    , date-    , dDay-    , dYear-    , dMonth--    -- ** DisplayedProperty-    , DisplayedProperty-    , displayedProperty-    , dpPropertyName--    -- ** GmailActionRestrictType-    , GmailActionRestrictType (..)--    -- ** FacetResult-    , FacetResult-    , facetResult-    , frSourceName-    , frBuckets-    , frObjectType-    , frOperatorName--    -- ** DriveMimeTypeRestrict-    , DriveMimeTypeRestrict-    , driveMimeTypeRestrict-    , dmtrType--    -- ** StructuredDataObject-    , StructuredDataObject-    , structuredDataObject-    , sdoProperties--    -- ** Media-    , Media-    , media-    , mResourceName--    -- ** ItemStructuredData-    , ItemStructuredData-    , itemStructuredData-    , isdHash-    , isdObject--    -- ** DriveFollowUpRestrict-    , DriveFollowUpRestrict-    , driveFollowUpRestrict-    , dfurType--    -- ** DateValues-    , DateValues-    , dateValues-    , dValues--    -- ** GmailFolderRestrictType-    , GmailFolderRestrictType (..)--    -- ** NamedProperty-    , NamedProperty-    , namedProperty-    , npDoubleValues-    , npTextValues-    , npDateValues-    , npName-    , npBooleanValue-    , npObjectValues-    , npHTMLValues-    , npEnumValues-    , npTimestampValues-    , npIntegerValues--    -- ** MatchRange-    , MatchRange-    , matchRange-    , mrStart-    , mrEnd--    -- ** ResponseDebugInfo-    , ResponseDebugInfo-    , responseDebugInfo-    , rFormattedDebugInfo--    -- ** ListDataSourceResponse-    , ListDataSourceResponse-    , listDataSourceResponse-    , ldsrNextPageToken-    , ldsrSources--    -- ** SearchRequest-    , SearchRequest-    , searchRequest-    , srSortOptions-    , srDataSourceRestrictions-    , srQueryInterpretationOptions-    , srStart-    , srQuery-    , srFacetOptions-    , srPageSize-    , srRequestOptions--    -- ** Name-    , Name-    , name-    , nDisplayName--    -- ** SourceResultCount-    , SourceResultCount-    , sourceResultCount-    , srcHasMoreResults-    , srcResultCountExact-    , srcResultCountEstimate-    , srcSource--    -- ** SourceConfig-    , SourceConfig-    , sourceConfig-    , scCrowdingConfig-    , scScoringConfig-    , scSource--    -- ** UnmAppedIdentityResolutionStatusCode-    , UnmAppedIdentityResolutionStatusCode (..)--    -- ** ListItemsResponse-    , ListItemsResponse-    , listItemsResponse-    , lirNextPageToken-    , lirItems--    -- ** ScoringConfig-    , ScoringConfig-    , scoringConfig-    , scDisablePersonalization-    , scDisableFreshness--    -- ** StartUploadItemRequest-    , StartUploadItemRequest-    , startUploadItemRequest-    , suirDebugOptions-    , suirConnectorName--    -- ** UploadItemRef-    , UploadItemRef-    , uploadItemRef-    , uirName--    -- ** GmailTimeRestrict-    , GmailTimeRestrict-    , gmailTimeRestrict-    , gtrType--    -- ** PushItemRequest-    , PushItemRequest-    , pushItemRequest-    , pirDebugOptions-    , pirConnectorName-    , pirItem--    -- ** DoublePropertyOptions-    , DoublePropertyOptions-    , doublePropertyOptions-    , dpoOperatorOptions--    -- ** QueryOperator-    , QueryOperator-    , queryOperator-    , qoIsSuggestable-    , qoIsReturnable-    , qoIsRepeatable-    , qoOperatorName-    , qoIsSortable-    , qoIsFacetable-    , qoDisplayName-    , qoLessThanOperatorName-    , qoType-    , qoEnumValues-    , qoGreaterThanOperatorName--    -- ** Xgafv-    , Xgafv (..)--    -- ** PollItemsResponse-    , PollItemsResponse-    , pollItemsResponse-    , pirItems--    -- ** SourceScoringConfig-    , SourceScoringConfig-    , sourceScoringConfig-    , sscSourceImportance--    -- ** EmailAddress-    , EmailAddress-    , emailAddress-    , eaEmailAddress--    -- ** RetrievalImportance-    , RetrievalImportance-    , retrievalImportance-    , riImportance--    -- ** DataSourceIndexStats-    , DataSourceIndexStats-    , dataSourceIndexStats-    , dsisItemCountByStatus-    , dsisDate--    -- ** SourceCrowdingConfig-    , SourceCrowdingConfig-    , sourceCrowdingConfig-    , sccField-    , sccNumSuggestions-    , sccNumResults-    , sccSource--    -- ** Interaction-    , Interaction-    , interaction-    , iInteractionTime-    , iPrincipal-    , iType--    -- ** Principal-    , Principal-    , principal-    , pUserResourceName-    , pGroupResourceName-    , pGsuitePrincipal--    -- ** IndexItemRequest-    , IndexItemRequest-    , indexItemRequest-    , iirMode-    , iirDebugOptions-    , iirConnectorName-    , iirItem-    , iirIndexItemOptions--    -- ** RepositoryErrorType-    , RepositoryErrorType (..)--    -- ** TextPropertyOptions-    , TextPropertyOptions-    , textPropertyOptions-    , tRetrievalImportance-    , tOperatorOptions--    -- ** EnumValuePair-    , EnumValuePair-    , enumValuePair-    , evpIntegerValue-    , evpStringValue--    -- ** DriveLocationRestrictType-    , DriveLocationRestrictType (..)--    -- ** Metadata-    , Metadata-    , metadata-    , mObjectType-    , mOwner-    , mMimeType-    , mUpdateTime-    , mDisplayOptions-    , mSource-    , mCreateTime-    , mFields--    -- ** UpdateDataSourceRequest-    , UpdateDataSourceRequest-    , updateDataSourceRequest-    , udsrDebugOptions-    , udsrSource--    -- ** DataSource-    , DataSource-    , dataSource-    , dsShortName-    , dsItemsVisibility-    , dsOperationIds-    , dsDisableServing-    , dsIndexingServiceAccounts-    , dsDisableModifications-    , dsName-    , dsDisplayName--    -- ** HTMLValues-    , HTMLValues-    , htmlValues-    , hvValues--    -- ** GmailIntelligentRestrict-    , GmailIntelligentRestrict-    , gmailIntelligentRestrict-    , girType--    -- ** HTMLOperatorOptions-    , HTMLOperatorOptions-    , htmlOperatorOptions-    , hooOperatorName--    -- ** Item-    , Item-    , item-    , iStatus-    , iItemType-    , iPayload-    , iStructuredData-    , iQueue-    , iContent-    , iName-    , iVersion-    , iMetadata-    , iACL--    -- ** Source-    , Source-    , source-    , sName-    , sPredefinedSource--    -- ** PropertyDisplayOptions-    , PropertyDisplayOptions-    , propertyDisplayOptions-    , pdoDisplayLabel--    -- ** ObjectValues-    , ObjectValues-    , objectValues-    , ovValues--    -- ** ObjectOptions-    , ObjectOptions-    , objectOptions-    , ooFreshnessOptions-    , ooDisplayOptions--    -- ** FacetOptions-    , FacetOptions-    , facetOptions-    , fSourceName-    , fObjectType-    , fNumFacetBuckets-    , fOperatorName--    -- ** SuggestRequest-    , SuggestRequest-    , suggestRequest-    , sDataSourceRestrictions-    , sQuery-    , sRequestOptions--    -- ** Filter-    , Filter-    , filter'-    , fCompositeFilter-    , fValueFilter--    -- ** ObjectDefinition-    , ObjectDefinition-    , objectDefinition-    , odName-    , odOptions-    , odPropertyDefinitions--    -- ** ItemItemType-    , ItemItemType (..)--    -- ** ItemCountByStatusStatusCode-    , ItemCountByStatusStatusCode (..)--    -- ** PollItemsRequest-    , PollItemsRequest-    , pollItemsRequest-    , pQueue-    , pDebugOptions-    , pConnectorName-    , pStatusCodes-    , pLimit--    -- ** QueryInterpretation-    , QueryInterpretation-    , queryInterpretation-    , qiInterpretedQuery-    , qiInterpretationType--    -- ** UnmAppedIdentity-    , UnmAppedIdentity-    , unmAppedIdentity-    , uaiResolutionStatusCode-    , uaiExternalIdentity--    -- ** OperationMetadata-    , OperationMetadata-    , operationMetadata-    , omAddtional--    -- ** CustomerIndexStats-    , CustomerIndexStats-    , customerIndexStats-    , cisItemCountByStatus-    , cisDate--    -- ** PushItem-    , PushItem-    , pushItem-    , piRepositoryError-    , piContentHash-    , piStructuredDataHash-    , piPayload-    , piQueue-    , piMetadataHash-    , piType--    -- ** ErrorMessage-    , ErrorMessage-    , errorMessage-    , emSource-    , emErrorMessage--    -- ** BooleanPropertyOptions-    , BooleanPropertyOptions-    , booleanPropertyOptions-    , bpoOperatorOptions--    -- ** ValueFilter-    , ValueFilter-    , valueFilter-    , vfValue-    , vfOperatorName--    -- ** EnumOperatorOptions-    , EnumOperatorOptions-    , enumOperatorOptions-    , eooOperatorName--    -- ** GmailAttachmentRestrict-    , GmailAttachmentRestrict-    , gmailAttachmentRestrict-    , gType--    -- ** DatePropertyOptions-    , DatePropertyOptions-    , datePropertyOptions-    , dOperatorOptions--    -- ** EnumValues-    , EnumValues-    , enumValues-    , evValues--    -- ** GSuitePrincipal-    , GSuitePrincipal-    , gSuitePrincipal-    , gspGsuiteGroupEmail-    , gspGsuiteUserEmail-    , gspGsuiteDomain--    -- ** IndexItemOptions-    , IndexItemOptions-    , indexItemOptions-    , iioAllowUnknownGsuitePrincipals--    -- ** SearchQualityMetadata-    , SearchQualityMetadata-    , searchQualityMetadata-    , sqmQuality--    -- ** ItemContentContentFormat-    , ItemContentContentFormat (..)--    -- ** TimestampValues-    , TimestampValues-    , timestampValues-    , tValues--    -- ** ErrorInfo-    , ErrorInfo-    , errorInfo-    , eiErrorMessages--    -- ** ResultDisplayMetadata-    , ResultDisplayMetadata-    , resultDisplayMetadata-    , rdmMetalines-    , rdmObjectTypeLabel--    -- ** OperationResponse-    , OperationResponse-    , operationResponse-    , orAddtional--    -- ** IntegerValues-    , IntegerValues-    , integerValues-    , ivValues--    -- ** SearchItemsByViewURLResponse-    , SearchItemsByViewURLResponse-    , searchItemsByViewURLResponse-    , sibvurNextPageToken-    , sibvurItems--    -- ** SourcePredefinedSource-    , SourcePredefinedSource (..)--    -- ** GetCustomerIndexStatsResponse-    , GetCustomerIndexStatsResponse-    , getCustomerIndexStatsResponse-    , gcisrStats--    -- ** RestrictItem-    , RestrictItem-    , restrictItem-    , riGmailFolderRestrict-    , riGmailActionRestrict-    , riDriveLocationRestrict-    , riDriveTimeSpanRestrict-    , riDriveMimeTypeRestrict-    , riDriveFollowUpRestrict-    , riGmailTimeRestrict-    , riGmailIntelligentRestrict-    , riGmailAttachmentRestrict-    , riSearchOperator--    -- ** DriveTimeSpanRestrictType-    , DriveTimeSpanRestrictType (..)--    -- ** IndexItemRequestMode-    , IndexItemRequestMode (..)--    -- ** ItemACLACLInheritanceType-    , ItemACLACLInheritanceType (..)--    -- ** CheckAccessResponse-    , CheckAccessResponse-    , checkAccessResponse-    , carHasAccess--    -- ** RequestOptions-    , RequestOptions-    , requestOptions-    , roLanguageCode-    , roDebugOptions-    , roTimeZone-    , roSearchApplicationId--    -- ** ItemStatus-    , ItemStatus-    , itemStatus-    , isProcessingErrors-    , isCode-    , isRepositoryErrors-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude-import           Network.Google.Resource.CloudSearch.Debug.Datasources.Items.CheckAccess-import           Network.Google.Resource.CloudSearch.Debug.Datasources.Items.SearchByViewURL-import           Network.Google.Resource.CloudSearch.Debug.Datasources.Items.UnmAppedids.List-import           Network.Google.Resource.CloudSearch.Debug.Identitysources.Items.ListForunmAppedidentity-import           Network.Google.Resource.CloudSearch.Debug.Identitysources.UnmAppedids.List-import           Network.Google.Resource.CloudSearch.Indexing.Datasources.DeleteSchema-import           Network.Google.Resource.CloudSearch.Indexing.Datasources.GetSchema-import           Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Delete-import           Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.DeleteQueueItems-import           Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Get-import           Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Index-import           Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.List-import           Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Poll-import           Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Push-import           Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Unreserve-import           Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Upload-import           Network.Google.Resource.CloudSearch.Indexing.Datasources.UpdateSchema-import           Network.Google.Resource.CloudSearch.Media.Upload-import           Network.Google.Resource.CloudSearch.Operations.Get-import           Network.Google.Resource.CloudSearch.Query.Search-import           Network.Google.Resource.CloudSearch.Query.Sources.List-import           Network.Google.Resource.CloudSearch.Query.Suggest-import           Network.Google.Resource.CloudSearch.Settings.Datasources.Create-import           Network.Google.Resource.CloudSearch.Settings.Datasources.Delete-import           Network.Google.Resource.CloudSearch.Settings.Datasources.Get-import           Network.Google.Resource.CloudSearch.Settings.Datasources.List-import           Network.Google.Resource.CloudSearch.Settings.Datasources.Update-import           Network.Google.Resource.CloudSearch.Settings.SearchApplications.Create-import           Network.Google.Resource.CloudSearch.Settings.SearchApplications.Delete-import           Network.Google.Resource.CloudSearch.Settings.SearchApplications.Get-import           Network.Google.Resource.CloudSearch.Settings.SearchApplications.List-import           Network.Google.Resource.CloudSearch.Settings.SearchApplications.Reset-import           Network.Google.Resource.CloudSearch.Settings.SearchApplications.Update-import           Network.Google.Resource.CloudSearch.Stats.GetIndex-import           Network.Google.Resource.CloudSearch.Stats.Index.Datasources.Get--{- $resources-TODO--}---- | Represents the entirety of the methods and resources available for the Cloud Search API service.-type CloudSearchAPI =-     SettingsDatasourcesListResource :<|>-       SettingsDatasourcesGetResource-       :<|> SettingsDatasourcesCreateResource-       :<|> SettingsDatasourcesDeleteResource-       :<|> SettingsDatasourcesUpdateResource-       :<|> SettingsSearchApplicationsListResource-       :<|> SettingsSearchApplicationsGetResource-       :<|> SettingsSearchApplicationsCreateResource-       :<|> SettingsSearchApplicationsResetResource-       :<|> SettingsSearchApplicationsDeleteResource-       :<|> SettingsSearchApplicationsUpdateResource-       :<|> StatsIndexDatasourcesGetResource-       :<|> StatsGetIndexResource-       :<|> DebugDatasourcesItemsUnmAppedidsListResource-       :<|> DebugDatasourcesItemsCheckAccessResource-       :<|> DebugDatasourcesItemsSearchByViewURLResource-       :<|> DebugIdentitysourcesUnmAppedidsListResource-       :<|>-       DebugIdentitysourcesItemsListForunmAppedidentityResource-       :<|> MediaUploadResource-       :<|> QuerySourcesListResource-       :<|> QuerySuggestResource-       :<|> QuerySearchResource-       :<|> OperationsGetResource-       :<|> IndexingDatasourcesItemsListResource-       :<|> IndexingDatasourcesItemsUnreserveResource-       :<|> IndexingDatasourcesItemsGetResource-       :<|> IndexingDatasourcesItemsDeleteQueueItemsResource-       :<|> IndexingDatasourcesItemsPollResource-       :<|> IndexingDatasourcesItemsUploadResource-       :<|> IndexingDatasourcesItemsIndexResource-       :<|> IndexingDatasourcesItemsPushResource-       :<|> IndexingDatasourcesItemsDeleteResource-       :<|> IndexingDatasourcesGetSchemaResource-       :<|> IndexingDatasourcesUpdateSchemaResource-       :<|> IndexingDatasourcesDeleteSchemaResource
− gen/Network/Google/CloudSearch/Types.hs 
@@ -1,1143 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.CloudSearch.Types--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.Google.CloudSearch.Types-    (-    -- * Service Configuration-      cloudSearchService--    -- * OAuth Scopes-    , cloudSearchSettingsQueryScope-    , cloudSearchStatsIndexingScope-    , cloudSearchIndexingScope-    , cloudSearchScope-    , cloudSearchSettingsIndexingScope-    , cloudSearchQueryScope-    , cloudSearchDebugScope-    , cloudSearchStatsScope-    , cloudSearchSettingsScope--    -- * DriveMimeTypeRestrictType-    , DriveMimeTypeRestrictType (..)--    -- * DriveFollowUpRestrictType-    , DriveFollowUpRestrictType (..)--    -- * GmailFolderRestrict-    , GmailFolderRestrict-    , gmailFolderRestrict-    , gfrType--    -- * ItemContent-    , ItemContent-    , itemContent-    , icHash-    , icContentFormat-    , icContentDataRef-    , icInlineContent--    -- * Photo-    , Photo-    , photo-    , pURL--    -- * SearchItemsByViewURLRequest-    , SearchItemsByViewURLRequest-    , searchItemsByViewURLRequest-    , sibvurDebugOptions-    , sibvurPageToken-    , sibvurViewURL--    -- * SearchApplication-    , SearchApplication-    , searchApplication-    , saDataSourceRestrictions-    , saOperationIds-    , saDefaultFacetOptions-    , saScoringConfig-    , saName-    , saSourceConfig-    , saDisplayName-    , saDefaultSortOptions--    -- * BooleanOperatorOptions-    , BooleanOperatorOptions-    , booleanOperatorOptions-    , booOperatorName--    -- * Status-    , Status-    , status-    , sDetails-    , sCode-    , sMessage--    -- * EnumPropertyOptions-    , EnumPropertyOptions-    , enumPropertyOptions-    , epoPossibleValues-    , epoOrderedRanking-    , epoOperatorOptions--    -- * ItemStatusCode-    , ItemStatusCode (..)--    -- * GmailActionRestrict-    , GmailActionRestrict-    , gmailActionRestrict-    , garType--    -- * UnreserveItemsRequest-    , UnreserveItemsRequest-    , unreserveItemsRequest-    , uirQueue-    , uirDebugOptions-    , uirConnectorName--    -- * DateOperatorOptions-    , DateOperatorOptions-    , dateOperatorOptions-    , dooOperatorName-    , dooLessThanOperatorName-    , dooGreaterThanOperatorName--    -- * GetDataSourceIndexStatsResponse-    , GetDataSourceIndexStatsResponse-    , getDataSourceIndexStatsResponse-    , gdsisrStats--    -- * ObjectDisplayOptions-    , ObjectDisplayOptions-    , objectDisplayOptions-    , odoMetalines-    , odoObjectDisplayLabel--    -- * QueryItem-    , QueryItem-    , queryItem-    , qiIsSynthetic--    -- * ListUnmAppedIdentitiesResponse-    , ListUnmAppedIdentitiesResponse-    , listUnmAppedIdentitiesResponse-    , luairNextPageToken-    , luairUnmAppedIdentities--    -- * DeleteQueueItemsRequest-    , DeleteQueueItemsRequest-    , deleteQueueItemsRequest-    , dqirQueue-    , dqirDebugOptions-    , dqirConnectorName--    -- * SearchResult-    , SearchResult-    , searchResult-    , srDebugInfo-    , srSnippet-    , srURL-    , srClusteredResults-    , srMetadata-    , srTitle--    -- * SpellResult-    , SpellResult-    , spellResult-    , srSuggestedQuery--    -- * PeopleSuggestion-    , PeopleSuggestion-    , peopleSuggestion-    , psPerson--    -- * QuerySource-    , QuerySource-    , querySource-    , qsShortName-    , qsDisplayName-    , qsSource-    , qsOperators--    -- * GmailTimeRestrictType-    , GmailTimeRestrictType (..)--    -- * SuggestResponse-    , SuggestResponse-    , suggestResponse-    , srSuggestResults--    -- * RepositoryError-    , RepositoryError-    , repositoryError-    , reHTTPStatusCode-    , reType-    , reErrorMessage--    -- * QueryInterpretationInterpretationType-    , QueryInterpretationInterpretationType (..)--    -- * HTMLPropertyOptions-    , HTMLPropertyOptions-    , htmlPropertyOptions-    , hpoRetrievalImportance-    , hpoOperatorOptions--    -- * PropertyDefinition-    , PropertyDefinition-    , propertyDefinition-    , pdEnumPropertyOptions-    , pdHTMLPropertyOptions-    , pdObjectPropertyOptions-    , pdIsReturnable-    , pdTimestampPropertyOptions-    , pdIntegerPropertyOptions-    , pdName-    , pdIsRepeatable-    , pdDoublePropertyOptions-    , pdDisplayOptions-    , pdTextPropertyOptions-    , pdIsSortable-    , pdIsFacetable-    , pdBooleanPropertyOptions-    , pdDatePropertyOptions--    -- * SortOptions-    , SortOptions-    , sortOptions-    , soSortOrder-    , soOperatorName--    -- * ObjectPropertyOptions-    , ObjectPropertyOptions-    , objectPropertyOptions-    , opoSubobjectProperties--    -- * InteractionType-    , InteractionType (..)--    -- * QueryOperatorType-    , QueryOperatorType (..)--    -- * SearchResponse-    , SearchResponse-    , searchResponse-    , sSpellResults-    , sFacetResults-    , sDebugInfo-    , sResults-    , sHasMoreResults-    , sResultCounts-    , sResultCountExact-    , sResultCountEstimate-    , sQueryInterpretation-    , sStructuredResults-    , sErrorInfo--    -- * SuggestResult-    , SuggestResult-    , suggestResult-    , sPeopleSuggestion-    , sQuerySuggestion-    , sSuggestedQuery-    , sSource--    -- * TextValues-    , TextValues-    , textValues-    , tvValues--    -- * DriveLocationRestrict-    , DriveLocationRestrict-    , driveLocationRestrict-    , dlrType--    -- * ListQuerySourcesResponse-    , ListQuerySourcesResponse-    , listQuerySourcesResponse-    , lqsrNextPageToken-    , lqsrSources--    -- * DoubleOperatorOptions-    , DoubleOperatorOptions-    , doubleOperatorOptions-    , dOperatorName--    -- * GmailIntelligentRestrictType-    , GmailIntelligentRestrictType (..)--    -- * Operation-    , Operation-    , operation-    , oDone-    , oError-    , oResponse-    , oName-    , oMetadata--    -- * Person-    , Person-    , person-    , pEmailAddresses-    , pPersonNames-    , pPhotos-    , pName-    , pObfuscatedId--    -- * CompositeFilter-    , CompositeFilter-    , compositeFilter-    , cfSubFilters-    , cfLogicOperator--    -- * ResultDisplayLine-    , ResultDisplayLine-    , resultDisplayLine-    , rdlFields--    -- * DoubleValues-    , DoubleValues-    , doubleValues-    , dvValues--    -- * Snippet-    , Snippet-    , snippet-    , sMatchRanges-    , sSnippet--    -- * TextOperatorOptions-    , TextOperatorOptions-    , textOperatorOptions-    , tooOperatorName-    , tooExactMatchWithOperator--    -- * EnumPropertyOptionsOrderedRanking-    , EnumPropertyOptionsOrderedRanking (..)--    -- * QueryInterpretationOptions-    , QueryInterpretationOptions-    , queryInterpretationOptions-    , qioDisableNlInterpretation--    -- * ResetSearchApplicationRequest-    , ResetSearchApplicationRequest-    , resetSearchApplicationRequest-    , rsarDebugOptions--    -- * IntegerPropertyOptionsOrderedRanking-    , IntegerPropertyOptionsOrderedRanking (..)--    -- * ItemMetadata-    , ItemMetadata-    , itemMetadata-    , imSourceRepositoryURL-    , imHash-    , imObjectType-    , imContainerName-    , imInteractions-    , imMimeType-    , imUpdateTime-    , imKeywords-    , imTitle-    , imContentLanguage-    , imSearchQualityMetadata-    , imCreateTime--    -- * FilterOptions-    , FilterOptions-    , filterOptions-    , foObjectType-    , foFilter--    -- * StructuredResult-    , StructuredResult-    , structuredResult-    , srPerson--    -- * ProcessingError-    , ProcessingError-    , processingError-    , peFieldViolations-    , peCode-    , peErrorMessage--    -- * PushItemType-    , PushItemType (..)--    -- * ListItemNamesForUnmAppedIdentityResponse-    , ListItemNamesForUnmAppedIdentityResponse-    , listItemNamesForUnmAppedIdentityResponse-    , linfuairNextPageToken-    , linfuairItemNames--    -- * CompositeFilterLogicOperator-    , CompositeFilterLogicOperator (..)--    -- * ItemACL-    , ItemACL-    , itemACL-    , iaOwners-    , iaReaders-    , iaACLInheritanceType-    , iaInheritACLFrom-    , iaDeniedReaders--    -- * Value-    , Value-    , value-    , vIntegerValue-    , vTimestampValue-    , vDoubleValue-    , vStringValue-    , vDateValue-    , vBooleanValue--    -- * FieldViolation-    , FieldViolation-    , fieldViolation-    , fvField-    , fvDescription--    -- * SourceScoringConfigSourceImportance-    , SourceScoringConfigSourceImportance (..)--    -- * GmailAttachmentRestrictType-    , GmailAttachmentRestrictType (..)--    -- * Metaline-    , Metaline-    , metaline-    , mProperties--    -- * FacetBucket-    , FacetBucket-    , facetBucket-    , fbValue-    , fbCount-    , fbPercentage--    -- * StatusDetailsItem-    , StatusDetailsItem-    , statusDetailsItem-    , sdiAddtional--    -- * RetrievalImportanceImportance-    , RetrievalImportanceImportance (..)--    -- * TimestampOperatorOptions-    , TimestampOperatorOptions-    , timestampOperatorOptions-    , tOperatorName-    , tLessThanOperatorName-    , tGreaterThanOperatorName--    -- * ProcessingErrorCode-    , ProcessingErrorCode (..)--    -- * IntegerOperatorOptions-    , IntegerOperatorOptions-    , integerOperatorOptions-    , iooOperatorName-    , iooLessThanOperatorName-    , iooGreaterThanOperatorName--    -- * SortOptionsSortOrder-    , SortOptionsSortOrder (..)--    -- * QuerySuggestion-    , QuerySuggestion-    , querySuggestion--    -- * ListSearchApplicationsResponse-    , ListSearchApplicationsResponse-    , listSearchApplicationsResponse-    , lsarNextPageToken-    , lsarSearchApplications--    -- * ResultDebugInfo-    , ResultDebugInfo-    , resultDebugInfo-    , rdiFormattedDebugInfo--    -- * ItemCountByStatus-    , ItemCountByStatus-    , itemCountByStatus-    , icbsCount-    , icbsStatusCode--    -- * TimestampPropertyOptions-    , TimestampPropertyOptions-    , timestampPropertyOptions-    , tpoOperatorOptions--    -- * ResultCounts-    , ResultCounts-    , resultCounts-    , rcSourceResultCounts--    -- * FreshnessOptions-    , FreshnessOptions-    , freshnessOptions-    , foFreshnessDuration-    , foFreshnessProperty--    -- * DebugOptions-    , DebugOptions-    , debugOptions-    , doEnableDebugging--    -- * IntegerPropertyOptions-    , IntegerPropertyOptions-    , integerPropertyOptions-    , ipoMaximumValue-    , ipoOrderedRanking-    , ipoMinimumValue-    , ipoOperatorOptions--    -- * DataSourceRestriction-    , DataSourceRestriction-    , dataSourceRestriction-    , dsrFilterOptions-    , dsrSource--    -- * Schema-    , Schema-    , schema-    , sObjectDefinitions-    , sOperationIds--    -- * DriveTimeSpanRestrict-    , DriveTimeSpanRestrict-    , driveTimeSpanRestrict-    , dtsrType--    -- * ResultDisplayField-    , ResultDisplayField-    , resultDisplayField-    , rdfProperty-    , rdfOperatorName-    , rdfLabel--    -- * UpdateSchemaRequest-    , UpdateSchemaRequest-    , updateSchemaRequest-    , usrValidateOnly-    , usrSchema-    , usrDebugOptions--    -- * Date-    , Date-    , date-    , dDay-    , dYear-    , dMonth--    -- * DisplayedProperty-    , DisplayedProperty-    , displayedProperty-    , dpPropertyName--    -- * GmailActionRestrictType-    , GmailActionRestrictType (..)--    -- * FacetResult-    , FacetResult-    , facetResult-    , frSourceName-    , frBuckets-    , frObjectType-    , frOperatorName--    -- * DriveMimeTypeRestrict-    , DriveMimeTypeRestrict-    , driveMimeTypeRestrict-    , dmtrType--    -- * StructuredDataObject-    , StructuredDataObject-    , structuredDataObject-    , sdoProperties--    -- * Media-    , Media-    , media-    , mResourceName--    -- * ItemStructuredData-    , ItemStructuredData-    , itemStructuredData-    , isdHash-    , isdObject--    -- * DriveFollowUpRestrict-    , DriveFollowUpRestrict-    , driveFollowUpRestrict-    , dfurType--    -- * DateValues-    , DateValues-    , dateValues-    , dValues--    -- * GmailFolderRestrictType-    , GmailFolderRestrictType (..)--    -- * NamedProperty-    , NamedProperty-    , namedProperty-    , npDoubleValues-    , npTextValues-    , npDateValues-    , npName-    , npBooleanValue-    , npObjectValues-    , npHTMLValues-    , npEnumValues-    , npTimestampValues-    , npIntegerValues--    -- * MatchRange-    , MatchRange-    , matchRange-    , mrStart-    , mrEnd--    -- * ResponseDebugInfo-    , ResponseDebugInfo-    , responseDebugInfo-    , rFormattedDebugInfo--    -- * ListDataSourceResponse-    , ListDataSourceResponse-    , listDataSourceResponse-    , ldsrNextPageToken-    , ldsrSources--    -- * SearchRequest-    , SearchRequest-    , searchRequest-    , srSortOptions-    , srDataSourceRestrictions-    , srQueryInterpretationOptions-    , srStart-    , srQuery-    , srFacetOptions-    , srPageSize-    , srRequestOptions--    -- * Name-    , Name-    , name-    , nDisplayName--    -- * SourceResultCount-    , SourceResultCount-    , sourceResultCount-    , srcHasMoreResults-    , srcResultCountExact-    , srcResultCountEstimate-    , srcSource--    -- * SourceConfig-    , SourceConfig-    , sourceConfig-    , scCrowdingConfig-    , scScoringConfig-    , scSource--    -- * UnmAppedIdentityResolutionStatusCode-    , UnmAppedIdentityResolutionStatusCode (..)--    -- * ListItemsResponse-    , ListItemsResponse-    , listItemsResponse-    , lirNextPageToken-    , lirItems--    -- * ScoringConfig-    , ScoringConfig-    , scoringConfig-    , scDisablePersonalization-    , scDisableFreshness--    -- * StartUploadItemRequest-    , StartUploadItemRequest-    , startUploadItemRequest-    , suirDebugOptions-    , suirConnectorName--    -- * UploadItemRef-    , UploadItemRef-    , uploadItemRef-    , uirName--    -- * GmailTimeRestrict-    , GmailTimeRestrict-    , gmailTimeRestrict-    , gtrType--    -- * PushItemRequest-    , PushItemRequest-    , pushItemRequest-    , pirDebugOptions-    , pirConnectorName-    , pirItem--    -- * DoublePropertyOptions-    , DoublePropertyOptions-    , doublePropertyOptions-    , dpoOperatorOptions--    -- * QueryOperator-    , QueryOperator-    , queryOperator-    , qoIsSuggestable-    , qoIsReturnable-    , qoIsRepeatable-    , qoOperatorName-    , qoIsSortable-    , qoIsFacetable-    , qoDisplayName-    , qoLessThanOperatorName-    , qoType-    , qoEnumValues-    , qoGreaterThanOperatorName--    -- * Xgafv-    , Xgafv (..)--    -- * PollItemsResponse-    , PollItemsResponse-    , pollItemsResponse-    , pirItems--    -- * SourceScoringConfig-    , SourceScoringConfig-    , sourceScoringConfig-    , sscSourceImportance--    -- * EmailAddress-    , EmailAddress-    , emailAddress-    , eaEmailAddress--    -- * RetrievalImportance-    , RetrievalImportance-    , retrievalImportance-    , riImportance--    -- * DataSourceIndexStats-    , DataSourceIndexStats-    , dataSourceIndexStats-    , dsisItemCountByStatus-    , dsisDate--    -- * SourceCrowdingConfig-    , SourceCrowdingConfig-    , sourceCrowdingConfig-    , sccField-    , sccNumSuggestions-    , sccNumResults-    , sccSource--    -- * Interaction-    , Interaction-    , interaction-    , iInteractionTime-    , iPrincipal-    , iType--    -- * Principal-    , Principal-    , principal-    , pUserResourceName-    , pGroupResourceName-    , pGsuitePrincipal--    -- * IndexItemRequest-    , IndexItemRequest-    , indexItemRequest-    , iirMode-    , iirDebugOptions-    , iirConnectorName-    , iirItem-    , iirIndexItemOptions--    -- * RepositoryErrorType-    , RepositoryErrorType (..)--    -- * TextPropertyOptions-    , TextPropertyOptions-    , textPropertyOptions-    , tRetrievalImportance-    , tOperatorOptions--    -- * EnumValuePair-    , EnumValuePair-    , enumValuePair-    , evpIntegerValue-    , evpStringValue--    -- * DriveLocationRestrictType-    , DriveLocationRestrictType (..)--    -- * Metadata-    , Metadata-    , metadata-    , mObjectType-    , mOwner-    , mMimeType-    , mUpdateTime-    , mDisplayOptions-    , mSource-    , mCreateTime-    , mFields--    -- * UpdateDataSourceRequest-    , UpdateDataSourceRequest-    , updateDataSourceRequest-    , udsrDebugOptions-    , udsrSource--    -- * DataSource-    , DataSource-    , dataSource-    , dsShortName-    , dsItemsVisibility-    , dsOperationIds-    , dsDisableServing-    , dsIndexingServiceAccounts-    , dsDisableModifications-    , dsName-    , dsDisplayName--    -- * HTMLValues-    , HTMLValues-    , htmlValues-    , hvValues--    -- * GmailIntelligentRestrict-    , GmailIntelligentRestrict-    , gmailIntelligentRestrict-    , girType--    -- * HTMLOperatorOptions-    , HTMLOperatorOptions-    , htmlOperatorOptions-    , hooOperatorName--    -- * Item-    , Item-    , item-    , iStatus-    , iItemType-    , iPayload-    , iStructuredData-    , iQueue-    , iContent-    , iName-    , iVersion-    , iMetadata-    , iACL--    -- * Source-    , Source-    , source-    , sName-    , sPredefinedSource--    -- * PropertyDisplayOptions-    , PropertyDisplayOptions-    , propertyDisplayOptions-    , pdoDisplayLabel--    -- * ObjectValues-    , ObjectValues-    , objectValues-    , ovValues--    -- * ObjectOptions-    , ObjectOptions-    , objectOptions-    , ooFreshnessOptions-    , ooDisplayOptions--    -- * FacetOptions-    , FacetOptions-    , facetOptions-    , fSourceName-    , fObjectType-    , fNumFacetBuckets-    , fOperatorName--    -- * SuggestRequest-    , SuggestRequest-    , suggestRequest-    , sDataSourceRestrictions-    , sQuery-    , sRequestOptions--    -- * Filter-    , Filter-    , filter'-    , fCompositeFilter-    , fValueFilter--    -- * ObjectDefinition-    , ObjectDefinition-    , objectDefinition-    , odName-    , odOptions-    , odPropertyDefinitions--    -- * ItemItemType-    , ItemItemType (..)--    -- * ItemCountByStatusStatusCode-    , ItemCountByStatusStatusCode (..)--    -- * PollItemsRequest-    , PollItemsRequest-    , pollItemsRequest-    , pQueue-    , pDebugOptions-    , pConnectorName-    , pStatusCodes-    , pLimit--    -- * QueryInterpretation-    , QueryInterpretation-    , queryInterpretation-    , qiInterpretedQuery-    , qiInterpretationType--    -- * UnmAppedIdentity-    , UnmAppedIdentity-    , unmAppedIdentity-    , uaiResolutionStatusCode-    , uaiExternalIdentity--    -- * OperationMetadata-    , OperationMetadata-    , operationMetadata-    , omAddtional--    -- * CustomerIndexStats-    , CustomerIndexStats-    , customerIndexStats-    , cisItemCountByStatus-    , cisDate--    -- * PushItem-    , PushItem-    , pushItem-    , piRepositoryError-    , piContentHash-    , piStructuredDataHash-    , piPayload-    , piQueue-    , piMetadataHash-    , piType--    -- * ErrorMessage-    , ErrorMessage-    , errorMessage-    , emSource-    , emErrorMessage--    -- * BooleanPropertyOptions-    , BooleanPropertyOptions-    , booleanPropertyOptions-    , bpoOperatorOptions--    -- * ValueFilter-    , ValueFilter-    , valueFilter-    , vfValue-    , vfOperatorName--    -- * EnumOperatorOptions-    , EnumOperatorOptions-    , enumOperatorOptions-    , eooOperatorName--    -- * GmailAttachmentRestrict-    , GmailAttachmentRestrict-    , gmailAttachmentRestrict-    , gType--    -- * DatePropertyOptions-    , DatePropertyOptions-    , datePropertyOptions-    , dOperatorOptions--    -- * EnumValues-    , EnumValues-    , enumValues-    , evValues--    -- * GSuitePrincipal-    , GSuitePrincipal-    , gSuitePrincipal-    , gspGsuiteGroupEmail-    , gspGsuiteUserEmail-    , gspGsuiteDomain--    -- * IndexItemOptions-    , IndexItemOptions-    , indexItemOptions-    , iioAllowUnknownGsuitePrincipals--    -- * SearchQualityMetadata-    , SearchQualityMetadata-    , searchQualityMetadata-    , sqmQuality--    -- * ItemContentContentFormat-    , ItemContentContentFormat (..)--    -- * TimestampValues-    , TimestampValues-    , timestampValues-    , tValues--    -- * ErrorInfo-    , ErrorInfo-    , errorInfo-    , eiErrorMessages--    -- * ResultDisplayMetadata-    , ResultDisplayMetadata-    , resultDisplayMetadata-    , rdmMetalines-    , rdmObjectTypeLabel--    -- * OperationResponse-    , OperationResponse-    , operationResponse-    , orAddtional--    -- * IntegerValues-    , IntegerValues-    , integerValues-    , ivValues--    -- * SearchItemsByViewURLResponse-    , SearchItemsByViewURLResponse-    , searchItemsByViewURLResponse-    , sibvurNextPageToken-    , sibvurItems--    -- * SourcePredefinedSource-    , SourcePredefinedSource (..)--    -- * GetCustomerIndexStatsResponse-    , GetCustomerIndexStatsResponse-    , getCustomerIndexStatsResponse-    , gcisrStats--    -- * RestrictItem-    , RestrictItem-    , restrictItem-    , riGmailFolderRestrict-    , riGmailActionRestrict-    , riDriveLocationRestrict-    , riDriveTimeSpanRestrict-    , riDriveMimeTypeRestrict-    , riDriveFollowUpRestrict-    , riGmailTimeRestrict-    , riGmailIntelligentRestrict-    , riGmailAttachmentRestrict-    , riSearchOperator--    -- * DriveTimeSpanRestrictType-    , DriveTimeSpanRestrictType (..)--    -- * IndexItemRequestMode-    , IndexItemRequestMode (..)--    -- * ItemACLACLInheritanceType-    , ItemACLACLInheritanceType (..)--    -- * CheckAccessResponse-    , CheckAccessResponse-    , checkAccessResponse-    , carHasAccess--    -- * RequestOptions-    , RequestOptions-    , requestOptions-    , roLanguageCode-    , roDebugOptions-    , roTimeZone-    , roSearchApplicationId--    -- * ItemStatus-    , ItemStatus-    , itemStatus-    , isProcessingErrors-    , isCode-    , isRepositoryErrors-    ) where--import           Network.Google.CloudSearch.Types.Product-import           Network.Google.CloudSearch.Types.Sum-import           Network.Google.Prelude---- | Default request referring to version 'v1' of the Cloud Search API. This contains the host and root path used as a starting point for constructing service requests.-cloudSearchService :: ServiceConfig-cloudSearchService-  = defaultService (ServiceId "cloudsearch:v1")-      "cloudsearch.googleapis.com"---- | New Service:--- https:\/\/www.googleapis.com\/auth\/cloud_search.settings.query-cloudSearchSettingsQueryScope :: Proxy '["https://www.googleapis.com/auth/cloud_search.settings.query"]-cloudSearchSettingsQueryScope = Proxy---- | New Service:--- https:\/\/www.googleapis.com\/auth\/cloud_search.stats.indexing-cloudSearchStatsIndexingScope :: Proxy '["https://www.googleapis.com/auth/cloud_search.stats.indexing"]-cloudSearchStatsIndexingScope = Proxy---- | New Service: https:\/\/www.googleapis.com\/auth\/cloud_search.indexing-cloudSearchIndexingScope :: Proxy '["https://www.googleapis.com/auth/cloud_search.indexing"]-cloudSearchIndexingScope = Proxy---- | Index and serve your organization\'s data with Cloud Search-cloudSearchScope :: Proxy '["https://www.googleapis.com/auth/cloud_search"]-cloudSearchScope = Proxy---- | New Service:--- https:\/\/www.googleapis.com\/auth\/cloud_search.settings.indexing-cloudSearchSettingsIndexingScope :: Proxy '["https://www.googleapis.com/auth/cloud_search.settings.indexing"]-cloudSearchSettingsIndexingScope = Proxy---- | Search your organization\'s data in the Cloud Search index-cloudSearchQueryScope :: Proxy '["https://www.googleapis.com/auth/cloud_search.query"]-cloudSearchQueryScope = Proxy---- | New Service: https:\/\/www.googleapis.com\/auth\/cloud_search.debug-cloudSearchDebugScope :: Proxy '["https://www.googleapis.com/auth/cloud_search.debug"]-cloudSearchDebugScope = Proxy---- | New Service: https:\/\/www.googleapis.com\/auth\/cloud_search.stats-cloudSearchStatsScope :: Proxy '["https://www.googleapis.com/auth/cloud_search.stats"]-cloudSearchStatsScope = Proxy---- | New Service: https:\/\/www.googleapis.com\/auth\/cloud_search.settings-cloudSearchSettingsScope :: Proxy '["https://www.googleapis.com/auth/cloud_search.settings"]-cloudSearchSettingsScope = Proxy
− gen/Network/Google/CloudSearch/Types/Product.hs 
@@ -1,9016 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}--{-# OPTIONS_GHC -fno-warn-unused-binds   #-}-{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.CloudSearch.Types.Product--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.Google.CloudSearch.Types.Product where--import           Network.Google.CloudSearch.Types.Sum-import           Network.Google.Prelude---- | Gmail Folder restricts (i.e. in Drafts\/Sent\/Chats\/User Generated--- Labels).------ /See:/ 'gmailFolderRestrict' smart constructor.-newtype GmailFolderRestrict =-  GmailFolderRestrict'-    { _gfrType :: Maybe GmailFolderRestrictType-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GmailFolderRestrict' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gfrType'-gmailFolderRestrict-    :: GmailFolderRestrict-gmailFolderRestrict = GmailFolderRestrict' {_gfrType = Nothing}---gfrType :: Lens' GmailFolderRestrict (Maybe GmailFolderRestrictType)-gfrType = lens _gfrType (\ s a -> s{_gfrType = a})--instance FromJSON GmailFolderRestrict where-        parseJSON-          = withObject "GmailFolderRestrict"-              (\ o -> GmailFolderRestrict' <$> (o .:? "type"))--instance ToJSON GmailFolderRestrict where-        toJSON GmailFolderRestrict'{..}-          = object (catMaybes [("type" .=) <$> _gfrType])---- | Content of an item to be indexed and surfaced by Cloud Search.------ /See:/ 'itemContent' smart constructor.-data ItemContent =-  ItemContent'-    { _icHash           :: !(Maybe Text)-    , _icContentFormat  :: !(Maybe ItemContentContentFormat)-    , _icContentDataRef :: !(Maybe UploadItemRef)-    , _icInlineContent  :: !(Maybe Bytes)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ItemContent' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'icHash'------ * 'icContentFormat'------ * 'icContentDataRef'------ * 'icInlineContent'-itemContent-    :: ItemContent-itemContent =-  ItemContent'-    { _icHash = Nothing-    , _icContentFormat = Nothing-    , _icContentDataRef = Nothing-    , _icInlineContent = Nothing-    }----- | Hashing info calculated and provided by the API client for content. Can--- be used with the items.push method to calculate modified state. The--- maximum length is 2048 characters.-icHash :: Lens' ItemContent (Maybe Text)-icHash = lens _icHash (\ s a -> s{_icHash = a})--icContentFormat :: Lens' ItemContent (Maybe ItemContentContentFormat)-icContentFormat-  = lens _icContentFormat-      (\ s a -> s{_icContentFormat = a})---- | Upload reference ID of a previously uploaded content via write method.-icContentDataRef :: Lens' ItemContent (Maybe UploadItemRef)-icContentDataRef-  = lens _icContentDataRef-      (\ s a -> s{_icContentDataRef = a})---- | Content that is supplied inlined within the update method. The maximum--- length is 102400 bytes (100 KiB).-icInlineContent :: Lens' ItemContent (Maybe ByteString)-icInlineContent-  = lens _icInlineContent-      (\ s a -> s{_icInlineContent = a})-      . mapping _Bytes--instance FromJSON ItemContent where-        parseJSON-          = withObject "ItemContent"-              (\ o ->-                 ItemContent' <$>-                   (o .:? "hash") <*> (o .:? "contentFormat") <*>-                     (o .:? "contentDataRef")-                     <*> (o .:? "inlineContent"))--instance ToJSON ItemContent where-        toJSON ItemContent'{..}-          = object-              (catMaybes-                 [("hash" .=) <$> _icHash,-                  ("contentFormat" .=) <$> _icContentFormat,-                  ("contentDataRef" .=) <$> _icContentDataRef,-                  ("inlineContent" .=) <$> _icInlineContent])---- | A person\'s photo.------ /See:/ 'photo' smart constructor.-newtype Photo =-  Photo'-    { _pURL :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Photo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pURL'-photo-    :: Photo-photo = Photo' {_pURL = Nothing}----- | The URL of the photo.-pURL :: Lens' Photo (Maybe Text)-pURL = lens _pURL (\ s a -> s{_pURL = a})--instance FromJSON Photo where-        parseJSON-          = withObject "Photo"-              (\ o -> Photo' <$> (o .:? "url"))--instance ToJSON Photo where-        toJSON Photo'{..}-          = object (catMaybes [("url" .=) <$> _pURL])------- /See:/ 'searchItemsByViewURLRequest' smart constructor.-data SearchItemsByViewURLRequest =-  SearchItemsByViewURLRequest'-    { _sibvurDebugOptions :: !(Maybe DebugOptions)-    , _sibvurPageToken    :: !(Maybe Text)-    , _sibvurViewURL      :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SearchItemsByViewURLRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sibvurDebugOptions'------ * 'sibvurPageToken'------ * 'sibvurViewURL'-searchItemsByViewURLRequest-    :: SearchItemsByViewURLRequest-searchItemsByViewURLRequest =-  SearchItemsByViewURLRequest'-    { _sibvurDebugOptions = Nothing-    , _sibvurPageToken = Nothing-    , _sibvurViewURL = Nothing-    }----- | Common debug options.-sibvurDebugOptions :: Lens' SearchItemsByViewURLRequest (Maybe DebugOptions)-sibvurDebugOptions-  = lens _sibvurDebugOptions-      (\ s a -> s{_sibvurDebugOptions = a})---- | The next_page_token value returned from a previous request, if any.-sibvurPageToken :: Lens' SearchItemsByViewURLRequest (Maybe Text)-sibvurPageToken-  = lens _sibvurPageToken-      (\ s a -> s{_sibvurPageToken = a})---- | Specify the full view URL to find the corresponding item. The maximum--- length is 2048 characters.-sibvurViewURL :: Lens' SearchItemsByViewURLRequest (Maybe Text)-sibvurViewURL-  = lens _sibvurViewURL-      (\ s a -> s{_sibvurViewURL = a})--instance FromJSON SearchItemsByViewURLRequest where-        parseJSON-          = withObject "SearchItemsByViewURLRequest"-              (\ o ->-                 SearchItemsByViewURLRequest' <$>-                   (o .:? "debugOptions") <*> (o .:? "pageToken") <*>-                     (o .:? "viewUrl"))--instance ToJSON SearchItemsByViewURLRequest where-        toJSON SearchItemsByViewURLRequest'{..}-          = object-              (catMaybes-                 [("debugOptions" .=) <$> _sibvurDebugOptions,-                  ("pageToken" .=) <$> _sibvurPageToken,-                  ("viewUrl" .=) <$> _sibvurViewURL])---- | SearchApplication------ /See:/ 'searchApplication' smart constructor.-data SearchApplication =-  SearchApplication'-    { _saDataSourceRestrictions :: !(Maybe [DataSourceRestriction])-    , _saOperationIds           :: !(Maybe [Text])-    , _saDefaultFacetOptions    :: !(Maybe [FacetOptions])-    , _saScoringConfig          :: !(Maybe ScoringConfig)-    , _saName                   :: !(Maybe Text)-    , _saSourceConfig           :: !(Maybe [SourceConfig])-    , _saDisplayName            :: !(Maybe Text)-    , _saDefaultSortOptions     :: !(Maybe SortOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SearchApplication' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'saDataSourceRestrictions'------ * 'saOperationIds'------ * 'saDefaultFacetOptions'------ * 'saScoringConfig'------ * 'saName'------ * 'saSourceConfig'------ * 'saDisplayName'------ * 'saDefaultSortOptions'-searchApplication-    :: SearchApplication-searchApplication =-  SearchApplication'-    { _saDataSourceRestrictions = Nothing-    , _saOperationIds = Nothing-    , _saDefaultFacetOptions = Nothing-    , _saScoringConfig = Nothing-    , _saName = Nothing-    , _saSourceConfig = Nothing-    , _saDisplayName = Nothing-    , _saDefaultSortOptions = Nothing-    }----- | Retrictions applied to the configurations. The maximum number of--- elements is 10.-saDataSourceRestrictions :: Lens' SearchApplication [DataSourceRestriction]-saDataSourceRestrictions-  = lens _saDataSourceRestrictions-      (\ s a -> s{_saDataSourceRestrictions = a})-      . _Default-      . _Coerce---- | IDs of the Long Running Operations (LROs) currently running for this--- schema. Output only field.-saOperationIds :: Lens' SearchApplication [Text]-saOperationIds-  = lens _saOperationIds-      (\ s a -> s{_saOperationIds = a})-      . _Default-      . _Coerce---- | The default fields for returning facet results. The sources specified--- here also have been included in data_source_restrictions above.-saDefaultFacetOptions :: Lens' SearchApplication [FacetOptions]-saDefaultFacetOptions-  = lens _saDefaultFacetOptions-      (\ s a -> s{_saDefaultFacetOptions = a})-      . _Default-      . _Coerce---- | Configuration for ranking results.-saScoringConfig :: Lens' SearchApplication (Maybe ScoringConfig)-saScoringConfig-  = lens _saScoringConfig-      (\ s a -> s{_saScoringConfig = a})---- | Name of the Search Application.--- Format: searchapplications\/{application_id}.-saName :: Lens' SearchApplication (Maybe Text)-saName = lens _saName (\ s a -> s{_saName = a})---- | Configuration for a sources specified in data_source_restrictions.-saSourceConfig :: Lens' SearchApplication [SourceConfig]-saSourceConfig-  = lens _saSourceConfig-      (\ s a -> s{_saSourceConfig = a})-      . _Default-      . _Coerce---- | Display name of the Search Application. The maximum length is 300--- characters.-saDisplayName :: Lens' SearchApplication (Maybe Text)-saDisplayName-  = lens _saDisplayName-      (\ s a -> s{_saDisplayName = a})---- | The default options for sorting the search results-saDefaultSortOptions :: Lens' SearchApplication (Maybe SortOptions)-saDefaultSortOptions-  = lens _saDefaultSortOptions-      (\ s a -> s{_saDefaultSortOptions = a})--instance FromJSON SearchApplication where-        parseJSON-          = withObject "SearchApplication"-              (\ o ->-                 SearchApplication' <$>-                   (o .:? "dataSourceRestrictions" .!= mempty) <*>-                     (o .:? "operationIds" .!= mempty)-                     <*> (o .:? "defaultFacetOptions" .!= mempty)-                     <*> (o .:? "scoringConfig")-                     <*> (o .:? "name")-                     <*> (o .:? "sourceConfig" .!= mempty)-                     <*> (o .:? "displayName")-                     <*> (o .:? "defaultSortOptions"))--instance ToJSON SearchApplication where-        toJSON SearchApplication'{..}-          = object-              (catMaybes-                 [("dataSourceRestrictions" .=) <$>-                    _saDataSourceRestrictions,-                  ("operationIds" .=) <$> _saOperationIds,-                  ("defaultFacetOptions" .=) <$>-                    _saDefaultFacetOptions,-                  ("scoringConfig" .=) <$> _saScoringConfig,-                  ("name" .=) <$> _saName,-                  ("sourceConfig" .=) <$> _saSourceConfig,-                  ("displayName" .=) <$> _saDisplayName,-                  ("defaultSortOptions" .=) <$> _saDefaultSortOptions])---- | Used to provide a search operator for boolean properties. This is--- optional. Search operators let users restrict the query to specific--- fields relevant to the type of item being searched.------ /See:/ 'booleanOperatorOptions' smart constructor.-newtype BooleanOperatorOptions =-  BooleanOperatorOptions'-    { _booOperatorName :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'BooleanOperatorOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'booOperatorName'-booleanOperatorOptions-    :: BooleanOperatorOptions-booleanOperatorOptions = BooleanOperatorOptions' {_booOperatorName = Nothing}----- | Indicates the operator name required in the query in order to isolate--- the boolean property. For example, if operatorName is *closed* and the--- property\'s name is *isClosed*, then queries like *closed:\<value>* will--- show results only where the value of the property named *isClosed*--- matches *\<value>*. By contrast, a search that uses the same *\<value>*--- without an operator will return all items where *\<value>* matches the--- value of any String properties or text within the content field for the--- item. The operator name can only contain lowercase letters (a-z). The--- maximum length is 32 characters.-booOperatorName :: Lens' BooleanOperatorOptions (Maybe Text)-booOperatorName-  = lens _booOperatorName-      (\ s a -> s{_booOperatorName = a})--instance FromJSON BooleanOperatorOptions where-        parseJSON-          = withObject "BooleanOperatorOptions"-              (\ o ->-                 BooleanOperatorOptions' <$> (o .:? "operatorName"))--instance ToJSON BooleanOperatorOptions where-        toJSON BooleanOperatorOptions'{..}-          = object-              (catMaybes-                 [("operatorName" .=) <$> _booOperatorName])---- | The \`Status\` type defines a logical error model that is suitable for--- different programming environments, including REST APIs and RPC APIs. It--- is used by [gRPC](https:\/\/github.com\/grpc). The error model is--- designed to be: - Simple to use and understand for most users - Flexible--- enough to meet unexpected needs # Overview The \`Status\` message--- contains three pieces of data: error code, error message, and error--- details. The error code should be an enum value of google.rpc.Code, but--- it may accept additional error codes if needed. The error message should--- be a developer-facing English message that helps developers *understand*--- and *resolve* the error. If a localized user-facing error message is--- needed, put the localized message in the error details or localize it in--- the client. The optional error details may contain arbitrary information--- about the error. There is a predefined set of error detail types in the--- package \`google.rpc\` that can be used for common error conditions. #--- Language mapping The \`Status\` message is the logical representation of--- the error model, but it is not necessarily the actual wire format. When--- the \`Status\` message is exposed in different client libraries and--- different wire protocols, it can be mapped differently. For example, it--- will likely be mapped to some exceptions in Java, but more likely mapped--- to some error codes in C. # Other uses The error model and the--- \`Status\` message can be used in a variety of environments, either with--- or without APIs, to provide a consistent developer experience across--- different environments. Example uses of this error model include: ---- Partial errors. If a service needs to return partial errors to the--- client, it may embed the \`Status\` in the normal response to indicate--- the partial errors. - Workflow errors. A typical workflow has multiple--- steps. Each step may have a \`Status\` message for error reporting. ---- Batch operations. If a client uses batch request and batch response, the--- \`Status\` message should be used directly inside batch response, one--- for each error sub-response. - Asynchronous operations. If an API call--- embeds asynchronous operation results in its response, the status of--- those operations should be represented directly using the \`Status\`--- message. - Logging. If some API errors are stored in logs, the message--- \`Status\` could be used directly after any stripping needed for--- security\/privacy reasons.------ /See:/ 'status' smart constructor.-data Status =-  Status'-    { _sDetails :: !(Maybe [StatusDetailsItem])-    , _sCode    :: !(Maybe (Textual Int32))-    , _sMessage :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Status' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sDetails'------ * 'sCode'------ * 'sMessage'-status-    :: Status-status = Status' {_sDetails = Nothing, _sCode = Nothing, _sMessage = Nothing}----- | A list of messages that carry the error details. There is a common set--- of message types for APIs to use.-sDetails :: Lens' Status [StatusDetailsItem]-sDetails-  = lens _sDetails (\ s a -> s{_sDetails = a}) .-      _Default-      . _Coerce---- | The status code, which should be an enum value of google.rpc.Code.-sCode :: Lens' Status (Maybe Int32)-sCode-  = lens _sCode (\ s a -> s{_sCode = a}) .-      mapping _Coerce---- | A developer-facing error message, which should be in English. Any--- user-facing error message should be localized and sent in the--- google.rpc.Status.details field, or localized by the client.-sMessage :: Lens' Status (Maybe Text)-sMessage = lens _sMessage (\ s a -> s{_sMessage = a})--instance FromJSON Status where-        parseJSON-          = withObject "Status"-              (\ o ->-                 Status' <$>-                   (o .:? "details" .!= mempty) <*> (o .:? "code") <*>-                     (o .:? "message"))--instance ToJSON Status where-        toJSON Status'{..}-          = object-              (catMaybes-                 [("details" .=) <$> _sDetails,-                  ("code" .=) <$> _sCode,-                  ("message" .=) <$> _sMessage])---- | Options for enum properties, which allow you to define a restricted set--- of strings to match user queries, set rankings for those string values,--- and define an operator name to be paired with those strings so that--- users can narrow results to only items with a specific value. For--- example, for items in a request tracking system with priority--- information, you could define *p0* as an allowable enum value and tie--- this enum to the operator name *priority* so that search users could add--- *priority:p0* to their query to restrict the set of results to only--- those items indexed with the value *p0*.------ /See:/ 'enumPropertyOptions' smart constructor.-data EnumPropertyOptions =-  EnumPropertyOptions'-    { _epoPossibleValues  :: !(Maybe [EnumValuePair])-    , _epoOrderedRanking  :: !(Maybe EnumPropertyOptionsOrderedRanking)-    , _epoOperatorOptions :: !(Maybe EnumOperatorOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'EnumPropertyOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'epoPossibleValues'------ * 'epoOrderedRanking'------ * 'epoOperatorOptions'-enumPropertyOptions-    :: EnumPropertyOptions-enumPropertyOptions =-  EnumPropertyOptions'-    { _epoPossibleValues = Nothing-    , _epoOrderedRanking = Nothing-    , _epoOperatorOptions = Nothing-    }----- | The list of possible values for the enumeration property. All--- EnumValuePairs must provide a string value. If you specify an integer--- value for one EnumValuePair, then all possible EnumValuePairs must--- provide an integer value. Both the string value and integer value must--- be unique over all possible values. Once set, possible values cannot be--- removed or modified. If you supply an ordered ranking and think you--- might insert additional enum values in the future, leave gaps in the--- initial integer values to allow adding a value in between previously--- registered values. The maximum number of elements is 100.-epoPossibleValues :: Lens' EnumPropertyOptions [EnumValuePair]-epoPossibleValues-  = lens _epoPossibleValues-      (\ s a -> s{_epoPossibleValues = a})-      . _Default-      . _Coerce---- | Used to specify the ordered ranking for the enumeration that determines--- how the integer values provided in the possible EnumValuePairs are used--- to rank results. If specified, integer values must be provided for all--- possible EnumValuePair values given for this property. Can only be used--- if isRepeatable is false.-epoOrderedRanking :: Lens' EnumPropertyOptions (Maybe EnumPropertyOptionsOrderedRanking)-epoOrderedRanking-  = lens _epoOrderedRanking-      (\ s a -> s{_epoOrderedRanking = a})---- | If set, describes how the enum should be used as a search operator.-epoOperatorOptions :: Lens' EnumPropertyOptions (Maybe EnumOperatorOptions)-epoOperatorOptions-  = lens _epoOperatorOptions-      (\ s a -> s{_epoOperatorOptions = a})--instance FromJSON EnumPropertyOptions where-        parseJSON-          = withObject "EnumPropertyOptions"-              (\ o ->-                 EnumPropertyOptions' <$>-                   (o .:? "possibleValues" .!= mempty) <*>-                     (o .:? "orderedRanking")-                     <*> (o .:? "operatorOptions"))--instance ToJSON EnumPropertyOptions where-        toJSON EnumPropertyOptions'{..}-          = object-              (catMaybes-                 [("possibleValues" .=) <$> _epoPossibleValues,-                  ("orderedRanking" .=) <$> _epoOrderedRanking,-                  ("operatorOptions" .=) <$> _epoOperatorOptions])---- | Gmail Action restricts (i.e. read\/replied\/snoozed).------ /See:/ 'gmailActionRestrict' smart constructor.-newtype GmailActionRestrict =-  GmailActionRestrict'-    { _garType :: Maybe GmailActionRestrictType-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GmailActionRestrict' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'garType'-gmailActionRestrict-    :: GmailActionRestrict-gmailActionRestrict = GmailActionRestrict' {_garType = Nothing}---garType :: Lens' GmailActionRestrict (Maybe GmailActionRestrictType)-garType = lens _garType (\ s a -> s{_garType = a})--instance FromJSON GmailActionRestrict where-        parseJSON-          = withObject "GmailActionRestrict"-              (\ o -> GmailActionRestrict' <$> (o .:? "type"))--instance ToJSON GmailActionRestrict where-        toJSON GmailActionRestrict'{..}-          = object (catMaybes [("type" .=) <$> _garType])------- /See:/ 'unreserveItemsRequest' smart constructor.-data UnreserveItemsRequest =-  UnreserveItemsRequest'-    { _uirQueue         :: !(Maybe Text)-    , _uirDebugOptions  :: !(Maybe DebugOptions)-    , _uirConnectorName :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'UnreserveItemsRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'uirQueue'------ * 'uirDebugOptions'------ * 'uirConnectorName'-unreserveItemsRequest-    :: UnreserveItemsRequest-unreserveItemsRequest =-  UnreserveItemsRequest'-    { _uirQueue = Nothing-    , _uirDebugOptions = Nothing-    , _uirConnectorName = Nothing-    }----- | Name of a queue to unreserve items from.-uirQueue :: Lens' UnreserveItemsRequest (Maybe Text)-uirQueue = lens _uirQueue (\ s a -> s{_uirQueue = a})---- | Common debug options.-uirDebugOptions :: Lens' UnreserveItemsRequest (Maybe DebugOptions)-uirDebugOptions-  = lens _uirDebugOptions-      (\ s a -> s{_uirDebugOptions = a})---- | Name of connector making this call.--- Format: datasources\/{source_id}\/connectors\/{ID}-uirConnectorName :: Lens' UnreserveItemsRequest (Maybe Text)-uirConnectorName-  = lens _uirConnectorName-      (\ s a -> s{_uirConnectorName = a})--instance FromJSON UnreserveItemsRequest where-        parseJSON-          = withObject "UnreserveItemsRequest"-              (\ o ->-                 UnreserveItemsRequest' <$>-                   (o .:? "queue") <*> (o .:? "debugOptions") <*>-                     (o .:? "connectorName"))--instance ToJSON UnreserveItemsRequest where-        toJSON UnreserveItemsRequest'{..}-          = object-              (catMaybes-                 [("queue" .=) <$> _uirQueue,-                  ("debugOptions" .=) <$> _uirDebugOptions,-                  ("connectorName" .=) <$> _uirConnectorName])---- | Optional. Provides a search operator for date properties. Search--- operators let users restrict the query to specific fields relevant to--- the type of item being searched.------ /See:/ 'dateOperatorOptions' smart constructor.-data DateOperatorOptions =-  DateOperatorOptions'-    { _dooOperatorName            :: !(Maybe Text)-    , _dooLessThanOperatorName    :: !(Maybe Text)-    , _dooGreaterThanOperatorName :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DateOperatorOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dooOperatorName'------ * 'dooLessThanOperatorName'------ * 'dooGreaterThanOperatorName'-dateOperatorOptions-    :: DateOperatorOptions-dateOperatorOptions =-  DateOperatorOptions'-    { _dooOperatorName = Nothing-    , _dooLessThanOperatorName = Nothing-    , _dooGreaterThanOperatorName = Nothing-    }----- | Indicates the actual string required in the query in order to isolate--- the date property. For example, suppose an issue tracking schema object--- has a property named *closeDate* that specifies an operator with an--- operatorName of *closedon*. For searches on that data, queries like--- *closedon:\<value>* will show results only where the value of the--- *closeDate* property matches *\<value>*. By contrast, a search that uses--- the same *\<value>* without an operator will return all items where--- *\<value>* matches the value of any String properties or text within the--- content field for the indexed datasource. The operator name can only--- contain lowercase letters (a-z). The maximum length is 32 characters.-dooOperatorName :: Lens' DateOperatorOptions (Maybe Text)-dooOperatorName-  = lens _dooOperatorName-      (\ s a -> s{_dooOperatorName = a})---- | Indicates the operator name required in the query in order to isolate--- the date property using the less-than operator. For example, if--- lessThanOperatorName is *closedbefore* and the property\'s name is--- *closeDate*, then queries like *closedbefore:\<value>* will show results--- only where the value of the property named *closeDate* is earlier than--- *\<value>*. The operator name can only contain lowercase letters (a-z).--- The maximum length is 32 characters.-dooLessThanOperatorName :: Lens' DateOperatorOptions (Maybe Text)-dooLessThanOperatorName-  = lens _dooLessThanOperatorName-      (\ s a -> s{_dooLessThanOperatorName = a})---- | Indicates the operator name required in the query in order to isolate--- the date property using the greater-than operator. For example, if--- greaterThanOperatorName is *closedafter* and the property\'s name is--- *closeDate*, then queries like *closedafter:\<value>* will show results--- only where the value of the property named *closeDate* is later than--- *\<value>*. The operator name can only contain lowercase letters (a-z).--- The maximum length is 32 characters.-dooGreaterThanOperatorName :: Lens' DateOperatorOptions (Maybe Text)-dooGreaterThanOperatorName-  = lens _dooGreaterThanOperatorName-      (\ s a -> s{_dooGreaterThanOperatorName = a})--instance FromJSON DateOperatorOptions where-        parseJSON-          = withObject "DateOperatorOptions"-              (\ o ->-                 DateOperatorOptions' <$>-                   (o .:? "operatorName") <*>-                     (o .:? "lessThanOperatorName")-                     <*> (o .:? "greaterThanOperatorName"))--instance ToJSON DateOperatorOptions where-        toJSON DateOperatorOptions'{..}-          = object-              (catMaybes-                 [("operatorName" .=) <$> _dooOperatorName,-                  ("lessThanOperatorName" .=) <$>-                    _dooLessThanOperatorName,-                  ("greaterThanOperatorName" .=) <$>-                    _dooGreaterThanOperatorName])------- /See:/ 'getDataSourceIndexStatsResponse' smart constructor.-newtype GetDataSourceIndexStatsResponse =-  GetDataSourceIndexStatsResponse'-    { _gdsisrStats :: Maybe [DataSourceIndexStats]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GetDataSourceIndexStatsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gdsisrStats'-getDataSourceIndexStatsResponse-    :: GetDataSourceIndexStatsResponse-getDataSourceIndexStatsResponse =-  GetDataSourceIndexStatsResponse' {_gdsisrStats = Nothing}----- | Summary of indexed item counts, one for each day in the requested range.-gdsisrStats :: Lens' GetDataSourceIndexStatsResponse [DataSourceIndexStats]-gdsisrStats-  = lens _gdsisrStats (\ s a -> s{_gdsisrStats = a}) .-      _Default-      . _Coerce--instance FromJSON GetDataSourceIndexStatsResponse-         where-        parseJSON-          = withObject "GetDataSourceIndexStatsResponse"-              (\ o ->-                 GetDataSourceIndexStatsResponse' <$>-                   (o .:? "stats" .!= mempty))--instance ToJSON GetDataSourceIndexStatsResponse where-        toJSON GetDataSourceIndexStatsResponse'{..}-          = object (catMaybes [("stats" .=) <$> _gdsisrStats])---- | The display options for an object.------ /See:/ 'objectDisplayOptions' smart constructor.-data ObjectDisplayOptions =-  ObjectDisplayOptions'-    { _odoMetalines          :: !(Maybe [Metaline])-    , _odoObjectDisplayLabel :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ObjectDisplayOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'odoMetalines'------ * 'odoObjectDisplayLabel'-objectDisplayOptions-    :: ObjectDisplayOptions-objectDisplayOptions =-  ObjectDisplayOptions'-    {_odoMetalines = Nothing, _odoObjectDisplayLabel = Nothing}----- | Defines the properties that will be displayed in the metalines of the--- search results. The property values will be displayed in the order given--- here. If a property holds multiple values, all of the values will be--- diplayed before the next properties. For this reason, it is a good--- practice to specify singular properties before repeated properties in--- this list. All of the properties must set is_returnable to true. The--- maximum number of metalines is 3.-odoMetalines :: Lens' ObjectDisplayOptions [Metaline]-odoMetalines-  = lens _odoMetalines (\ s a -> s{_odoMetalines = a})-      . _Default-      . _Coerce---- | The user friendly label to display in the search result to inidicate the--- type of the item. This is OPTIONAL; if not given, an object label will--- not be displayed on the context line of the search results. The maximum--- length is 32 characters.-odoObjectDisplayLabel :: Lens' ObjectDisplayOptions (Maybe Text)-odoObjectDisplayLabel-  = lens _odoObjectDisplayLabel-      (\ s a -> s{_odoObjectDisplayLabel = a})--instance FromJSON ObjectDisplayOptions where-        parseJSON-          = withObject "ObjectDisplayOptions"-              (\ o ->-                 ObjectDisplayOptions' <$>-                   (o .:? "metalines" .!= mempty) <*>-                     (o .:? "objectDisplayLabel"))--instance ToJSON ObjectDisplayOptions where-        toJSON ObjectDisplayOptions'{..}-          = object-              (catMaybes-                 [("metalines" .=) <$> _odoMetalines,-                  ("objectDisplayLabel" .=) <$>-                    _odoObjectDisplayLabel])---- | Information relevant only to a query entry.------ /See:/ 'queryItem' smart constructor.-newtype QueryItem =-  QueryItem'-    { _qiIsSynthetic :: Maybe Bool-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'QueryItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'qiIsSynthetic'-queryItem-    :: QueryItem-queryItem = QueryItem' {_qiIsSynthetic = Nothing}----- | True if the text was generated by means other than a previous user--- search.-qiIsSynthetic :: Lens' QueryItem (Maybe Bool)-qiIsSynthetic-  = lens _qiIsSynthetic-      (\ s a -> s{_qiIsSynthetic = a})--instance FromJSON QueryItem where-        parseJSON-          = withObject "QueryItem"-              (\ o -> QueryItem' <$> (o .:? "isSynthetic"))--instance ToJSON QueryItem where-        toJSON QueryItem'{..}-          = object-              (catMaybes [("isSynthetic" .=) <$> _qiIsSynthetic])------- /See:/ 'listUnmAppedIdentitiesResponse' smart constructor.-data ListUnmAppedIdentitiesResponse =-  ListUnmAppedIdentitiesResponse'-    { _luairNextPageToken      :: !(Maybe Text)-    , _luairUnmAppedIdentities :: !(Maybe [UnmAppedIdentity])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ListUnmAppedIdentitiesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'luairNextPageToken'------ * 'luairUnmAppedIdentities'-listUnmAppedIdentitiesResponse-    :: ListUnmAppedIdentitiesResponse-listUnmAppedIdentitiesResponse =-  ListUnmAppedIdentitiesResponse'-    {_luairNextPageToken = Nothing, _luairUnmAppedIdentities = Nothing}----- | Token to retrieve the next page of results, or empty if there are no--- more results in the list.-luairNextPageToken :: Lens' ListUnmAppedIdentitiesResponse (Maybe Text)-luairNextPageToken-  = lens _luairNextPageToken-      (\ s a -> s{_luairNextPageToken = a})--luairUnmAppedIdentities :: Lens' ListUnmAppedIdentitiesResponse [UnmAppedIdentity]-luairUnmAppedIdentities-  = lens _luairUnmAppedIdentities-      (\ s a -> s{_luairUnmAppedIdentities = a})-      . _Default-      . _Coerce--instance FromJSON ListUnmAppedIdentitiesResponse-         where-        parseJSON-          = withObject "ListUnmAppedIdentitiesResponse"-              (\ o ->-                 ListUnmAppedIdentitiesResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "unmappedIdentities" .!= mempty))--instance ToJSON ListUnmAppedIdentitiesResponse where-        toJSON ListUnmAppedIdentitiesResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _luairNextPageToken,-                  ("unmappedIdentities" .=) <$>-                    _luairUnmAppedIdentities])------- /See:/ 'deleteQueueItemsRequest' smart constructor.-data DeleteQueueItemsRequest =-  DeleteQueueItemsRequest'-    { _dqirQueue         :: !(Maybe Text)-    , _dqirDebugOptions  :: !(Maybe DebugOptions)-    , _dqirConnectorName :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DeleteQueueItemsRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dqirQueue'------ * 'dqirDebugOptions'------ * 'dqirConnectorName'-deleteQueueItemsRequest-    :: DeleteQueueItemsRequest-deleteQueueItemsRequest =-  DeleteQueueItemsRequest'-    { _dqirQueue = Nothing-    , _dqirDebugOptions = Nothing-    , _dqirConnectorName = Nothing-    }----- | Name of a queue to delete items from.-dqirQueue :: Lens' DeleteQueueItemsRequest (Maybe Text)-dqirQueue-  = lens _dqirQueue (\ s a -> s{_dqirQueue = a})---- | Common debug options.-dqirDebugOptions :: Lens' DeleteQueueItemsRequest (Maybe DebugOptions)-dqirDebugOptions-  = lens _dqirDebugOptions-      (\ s a -> s{_dqirDebugOptions = a})---- | Name of connector making this call.--- Format: datasources\/{source_id}\/connectors\/{ID}-dqirConnectorName :: Lens' DeleteQueueItemsRequest (Maybe Text)-dqirConnectorName-  = lens _dqirConnectorName-      (\ s a -> s{_dqirConnectorName = a})--instance FromJSON DeleteQueueItemsRequest where-        parseJSON-          = withObject "DeleteQueueItemsRequest"-              (\ o ->-                 DeleteQueueItemsRequest' <$>-                   (o .:? "queue") <*> (o .:? "debugOptions") <*>-                     (o .:? "connectorName"))--instance ToJSON DeleteQueueItemsRequest where-        toJSON DeleteQueueItemsRequest'{..}-          = object-              (catMaybes-                 [("queue" .=) <$> _dqirQueue,-                  ("debugOptions" .=) <$> _dqirDebugOptions,-                  ("connectorName" .=) <$> _dqirConnectorName])---- | Results containing indexed information for a document.------ /See:/ 'searchResult' smart constructor.-data SearchResult =-  SearchResult'-    { _srDebugInfo        :: !(Maybe ResultDebugInfo)-    , _srSnippet          :: !(Maybe Snippet)-    , _srURL              :: !(Maybe Text)-    , _srClusteredResults :: !(Maybe [SearchResult])-    , _srMetadata         :: !(Maybe Metadata)-    , _srTitle            :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SearchResult' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'srDebugInfo'------ * 'srSnippet'------ * 'srURL'------ * 'srClusteredResults'------ * 'srMetadata'------ * 'srTitle'-searchResult-    :: SearchResult-searchResult =-  SearchResult'-    { _srDebugInfo = Nothing-    , _srSnippet = Nothing-    , _srURL = Nothing-    , _srClusteredResults = Nothing-    , _srMetadata = Nothing-    , _srTitle = Nothing-    }----- | Debugging information about this search result.-srDebugInfo :: Lens' SearchResult (Maybe ResultDebugInfo)-srDebugInfo-  = lens _srDebugInfo (\ s a -> s{_srDebugInfo = a})---- | The concatenation of all snippets (summaries) available for this result.-srSnippet :: Lens' SearchResult (Maybe Snippet)-srSnippet-  = lens _srSnippet (\ s a -> s{_srSnippet = a})---- | The URL of the search result. The URL contains a Google redirect to the--- actual item. This URL is signed and shouldn\'t be changed.-srURL :: Lens' SearchResult (Maybe Text)-srURL = lens _srURL (\ s a -> s{_srURL = a})---- | If source is clustered, provide list of clustered results. There will--- only be one level of clustered results. If current source is not enabled--- for clustering, this field will be empty.-srClusteredResults :: Lens' SearchResult [SearchResult]-srClusteredResults-  = lens _srClusteredResults-      (\ s a -> s{_srClusteredResults = a})-      . _Default-      . _Coerce---- | Metadata of the search result.-srMetadata :: Lens' SearchResult (Maybe Metadata)-srMetadata-  = lens _srMetadata (\ s a -> s{_srMetadata = a})---- | Title of the search result.-srTitle :: Lens' SearchResult (Maybe Text)-srTitle = lens _srTitle (\ s a -> s{_srTitle = a})--instance FromJSON SearchResult where-        parseJSON-          = withObject "SearchResult"-              (\ o ->-                 SearchResult' <$>-                   (o .:? "debugInfo") <*> (o .:? "snippet") <*>-                     (o .:? "url")-                     <*> (o .:? "clusteredResults" .!= mempty)-                     <*> (o .:? "metadata")-                     <*> (o .:? "title"))--instance ToJSON SearchResult where-        toJSON SearchResult'{..}-          = object-              (catMaybes-                 [("debugInfo" .=) <$> _srDebugInfo,-                  ("snippet" .=) <$> _srSnippet, ("url" .=) <$> _srURL,-                  ("clusteredResults" .=) <$> _srClusteredResults,-                  ("metadata" .=) <$> _srMetadata,-                  ("title" .=) <$> _srTitle])------- /See:/ 'spellResult' smart constructor.-newtype SpellResult =-  SpellResult'-    { _srSuggestedQuery :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SpellResult' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'srSuggestedQuery'-spellResult-    :: SpellResult-spellResult = SpellResult' {_srSuggestedQuery = Nothing}----- | The suggested spelling of the query.-srSuggestedQuery :: Lens' SpellResult (Maybe Text)-srSuggestedQuery-  = lens _srSuggestedQuery-      (\ s a -> s{_srSuggestedQuery = a})--instance FromJSON SpellResult where-        parseJSON-          = withObject "SpellResult"-              (\ o -> SpellResult' <$> (o .:? "suggestedQuery"))--instance ToJSON SpellResult where-        toJSON SpellResult'{..}-          = object-              (catMaybes-                 [("suggestedQuery" .=) <$> _srSuggestedQuery])---- | This field contains information about the person being suggested.------ /See:/ 'peopleSuggestion' smart constructor.-newtype PeopleSuggestion =-  PeopleSuggestion'-    { _psPerson :: Maybe Person-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PeopleSuggestion' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'psPerson'-peopleSuggestion-    :: PeopleSuggestion-peopleSuggestion = PeopleSuggestion' {_psPerson = Nothing}----- | Suggested person. All fields of the person object might not be--- populated.-psPerson :: Lens' PeopleSuggestion (Maybe Person)-psPerson = lens _psPerson (\ s a -> s{_psPerson = a})--instance FromJSON PeopleSuggestion where-        parseJSON-          = withObject "PeopleSuggestion"-              (\ o -> PeopleSuggestion' <$> (o .:? "person"))--instance ToJSON PeopleSuggestion where-        toJSON PeopleSuggestion'{..}-          = object (catMaybes [("person" .=) <$> _psPerson])---- | List of sources that the user can search using the query API.------ /See:/ 'querySource' smart constructor.-data QuerySource =-  QuerySource'-    { _qsShortName   :: !(Maybe Text)-    , _qsDisplayName :: !(Maybe Text)-    , _qsSource      :: !(Maybe Source)-    , _qsOperators   :: !(Maybe [QueryOperator])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'QuerySource' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'qsShortName'------ * 'qsDisplayName'------ * 'qsSource'------ * 'qsOperators'-querySource-    :: QuerySource-querySource =-  QuerySource'-    { _qsShortName = Nothing-    , _qsDisplayName = Nothing-    , _qsSource = Nothing-    , _qsOperators = Nothing-    }----- | A short name or alias for the source. This value can be used with the--- \'source\' operator.-qsShortName :: Lens' QuerySource (Maybe Text)-qsShortName-  = lens _qsShortName (\ s a -> s{_qsShortName = a})---- | Display name of the data source.-qsDisplayName :: Lens' QuerySource (Maybe Text)-qsDisplayName-  = lens _qsDisplayName-      (\ s a -> s{_qsDisplayName = a})---- | Name of the source-qsSource :: Lens' QuerySource (Maybe Source)-qsSource = lens _qsSource (\ s a -> s{_qsSource = a})---- | List of all operators applicable for this source.-qsOperators :: Lens' QuerySource [QueryOperator]-qsOperators-  = lens _qsOperators (\ s a -> s{_qsOperators = a}) .-      _Default-      . _Coerce--instance FromJSON QuerySource where-        parseJSON-          = withObject "QuerySource"-              (\ o ->-                 QuerySource' <$>-                   (o .:? "shortName") <*> (o .:? "displayName") <*>-                     (o .:? "source")-                     <*> (o .:? "operators" .!= mempty))--instance ToJSON QuerySource where-        toJSON QuerySource'{..}-          = object-              (catMaybes-                 [("shortName" .=) <$> _qsShortName,-                  ("displayName" .=) <$> _qsDisplayName,-                  ("source" .=) <$> _qsSource,-                  ("operators" .=) <$> _qsOperators])---- | Response of the suggest API.------ /See:/ 'suggestResponse' smart constructor.-newtype SuggestResponse =-  SuggestResponse'-    { _srSuggestResults :: Maybe [SuggestResult]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SuggestResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'srSuggestResults'-suggestResponse-    :: SuggestResponse-suggestResponse = SuggestResponse' {_srSuggestResults = Nothing}----- | List of suggestions.-srSuggestResults :: Lens' SuggestResponse [SuggestResult]-srSuggestResults-  = lens _srSuggestResults-      (\ s a -> s{_srSuggestResults = a})-      . _Default-      . _Coerce--instance FromJSON SuggestResponse where-        parseJSON-          = withObject "SuggestResponse"-              (\ o ->-                 SuggestResponse' <$>-                   (o .:? "suggestResults" .!= mempty))--instance ToJSON SuggestResponse where-        toJSON SuggestResponse'{..}-          = object-              (catMaybes-                 [("suggestResults" .=) <$> _srSuggestResults])---- | Errors when the connector is communicating to the source repository.------ /See:/ 'repositoryError' smart constructor.-data RepositoryError =-  RepositoryError'-    { _reHTTPStatusCode :: !(Maybe (Textual Int32))-    , _reType           :: !(Maybe RepositoryErrorType)-    , _reErrorMessage   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'RepositoryError' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'reHTTPStatusCode'------ * 'reType'------ * 'reErrorMessage'-repositoryError-    :: RepositoryError-repositoryError =-  RepositoryError'-    {_reHTTPStatusCode = Nothing, _reType = Nothing, _reErrorMessage = Nothing}----- | Error codes. Matches the definition of HTTP status codes.-reHTTPStatusCode :: Lens' RepositoryError (Maybe Int32)-reHTTPStatusCode-  = lens _reHTTPStatusCode-      (\ s a -> s{_reHTTPStatusCode = a})-      . mapping _Coerce---- | Type of error.-reType :: Lens' RepositoryError (Maybe RepositoryErrorType)-reType = lens _reType (\ s a -> s{_reType = a})---- | Message that describes the error. The maximum allowable length of the--- message is 8192 characters.-reErrorMessage :: Lens' RepositoryError (Maybe Text)-reErrorMessage-  = lens _reErrorMessage-      (\ s a -> s{_reErrorMessage = a})--instance FromJSON RepositoryError where-        parseJSON-          = withObject "RepositoryError"-              (\ o ->-                 RepositoryError' <$>-                   (o .:? "httpStatusCode") <*> (o .:? "type") <*>-                     (o .:? "errorMessage"))--instance ToJSON RepositoryError where-        toJSON RepositoryError'{..}-          = object-              (catMaybes-                 [("httpStatusCode" .=) <$> _reHTTPStatusCode,-                  ("type" .=) <$> _reType,-                  ("errorMessage" .=) <$> _reErrorMessage])---- | Options for html properties.------ /See:/ 'htmlPropertyOptions' smart constructor.-data HTMLPropertyOptions =-  HTMLPropertyOptions'-    { _hpoRetrievalImportance :: !(Maybe RetrievalImportance)-    , _hpoOperatorOptions     :: !(Maybe HTMLOperatorOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'HTMLPropertyOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'hpoRetrievalImportance'------ * 'hpoOperatorOptions'-htmlPropertyOptions-    :: HTMLPropertyOptions-htmlPropertyOptions =-  HTMLPropertyOptions'-    {_hpoRetrievalImportance = Nothing, _hpoOperatorOptions = Nothing}----- | Indicates the search quality importance of the tokens within the field--- when used for retrieval. Can only be set to DEFAULT or NONE.-hpoRetrievalImportance :: Lens' HTMLPropertyOptions (Maybe RetrievalImportance)-hpoRetrievalImportance-  = lens _hpoRetrievalImportance-      (\ s a -> s{_hpoRetrievalImportance = a})---- | If set, describes how the property should be used as a search operator.-hpoOperatorOptions :: Lens' HTMLPropertyOptions (Maybe HTMLOperatorOptions)-hpoOperatorOptions-  = lens _hpoOperatorOptions-      (\ s a -> s{_hpoOperatorOptions = a})--instance FromJSON HTMLPropertyOptions where-        parseJSON-          = withObject "HTMLPropertyOptions"-              (\ o ->-                 HTMLPropertyOptions' <$>-                   (o .:? "retrievalImportance") <*>-                     (o .:? "operatorOptions"))--instance ToJSON HTMLPropertyOptions where-        toJSON HTMLPropertyOptions'{..}-          = object-              (catMaybes-                 [("retrievalImportance" .=) <$>-                    _hpoRetrievalImportance,-                  ("operatorOptions" .=) <$> _hpoOperatorOptions])---- | The definition of a property within an object.------ /See:/ 'propertyDefinition' smart constructor.-data PropertyDefinition =-  PropertyDefinition'-    { _pdEnumPropertyOptions      :: !(Maybe EnumPropertyOptions)-    , _pdHTMLPropertyOptions      :: !(Maybe HTMLPropertyOptions)-    , _pdObjectPropertyOptions    :: !(Maybe ObjectPropertyOptions)-    , _pdIsReturnable             :: !(Maybe Bool)-    , _pdTimestampPropertyOptions :: !(Maybe TimestampPropertyOptions)-    , _pdIntegerPropertyOptions   :: !(Maybe IntegerPropertyOptions)-    , _pdName                     :: !(Maybe Text)-    , _pdIsRepeatable             :: !(Maybe Bool)-    , _pdDoublePropertyOptions    :: !(Maybe DoublePropertyOptions)-    , _pdDisplayOptions           :: !(Maybe PropertyDisplayOptions)-    , _pdTextPropertyOptions      :: !(Maybe TextPropertyOptions)-    , _pdIsSortable               :: !(Maybe Bool)-    , _pdIsFacetable              :: !(Maybe Bool)-    , _pdBooleanPropertyOptions   :: !(Maybe BooleanPropertyOptions)-    , _pdDatePropertyOptions      :: !(Maybe DatePropertyOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PropertyDefinition' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pdEnumPropertyOptions'------ * 'pdHTMLPropertyOptions'------ * 'pdObjectPropertyOptions'------ * 'pdIsReturnable'------ * 'pdTimestampPropertyOptions'------ * 'pdIntegerPropertyOptions'------ * 'pdName'------ * 'pdIsRepeatable'------ * 'pdDoublePropertyOptions'------ * 'pdDisplayOptions'------ * 'pdTextPropertyOptions'------ * 'pdIsSortable'------ * 'pdIsFacetable'------ * 'pdBooleanPropertyOptions'------ * 'pdDatePropertyOptions'-propertyDefinition-    :: PropertyDefinition-propertyDefinition =-  PropertyDefinition'-    { _pdEnumPropertyOptions = Nothing-    , _pdHTMLPropertyOptions = Nothing-    , _pdObjectPropertyOptions = Nothing-    , _pdIsReturnable = Nothing-    , _pdTimestampPropertyOptions = Nothing-    , _pdIntegerPropertyOptions = Nothing-    , _pdName = Nothing-    , _pdIsRepeatable = Nothing-    , _pdDoublePropertyOptions = Nothing-    , _pdDisplayOptions = Nothing-    , _pdTextPropertyOptions = Nothing-    , _pdIsSortable = Nothing-    , _pdIsFacetable = Nothing-    , _pdBooleanPropertyOptions = Nothing-    , _pdDatePropertyOptions = Nothing-    }---pdEnumPropertyOptions :: Lens' PropertyDefinition (Maybe EnumPropertyOptions)-pdEnumPropertyOptions-  = lens _pdEnumPropertyOptions-      (\ s a -> s{_pdEnumPropertyOptions = a})--pdHTMLPropertyOptions :: Lens' PropertyDefinition (Maybe HTMLPropertyOptions)-pdHTMLPropertyOptions-  = lens _pdHTMLPropertyOptions-      (\ s a -> s{_pdHTMLPropertyOptions = a})--pdObjectPropertyOptions :: Lens' PropertyDefinition (Maybe ObjectPropertyOptions)-pdObjectPropertyOptions-  = lens _pdObjectPropertyOptions-      (\ s a -> s{_pdObjectPropertyOptions = a})---- | Indicates that the property identifies data that should be returned in--- search results via the Query API. If set to *true*, indicates that Query--- API users can use matching property fields in results. However, storing--- fields requires more space allocation and uses more bandwidth for search--- queries, which impacts performance over large datasets. Set to *true*--- here only if the field is needed for search results. Cannot be true for--- properties whose type is an object.-pdIsReturnable :: Lens' PropertyDefinition (Maybe Bool)-pdIsReturnable-  = lens _pdIsReturnable-      (\ s a -> s{_pdIsReturnable = a})--pdTimestampPropertyOptions :: Lens' PropertyDefinition (Maybe TimestampPropertyOptions)-pdTimestampPropertyOptions-  = lens _pdTimestampPropertyOptions-      (\ s a -> s{_pdTimestampPropertyOptions = a})--pdIntegerPropertyOptions :: Lens' PropertyDefinition (Maybe IntegerPropertyOptions)-pdIntegerPropertyOptions-  = lens _pdIntegerPropertyOptions-      (\ s a -> s{_pdIntegerPropertyOptions = a})---- | The name of the property. Item indexing requests sent to the Indexing--- API should set the property name equal to this value. For example, if--- name is *subject_line*, then indexing requests for document items with--- subject fields should set the name for that field equal to--- *subject_line*. Use the name as the identifier for the object property.--- Once registered as a property for an object, you cannot re-use this name--- for another property within that object. The name must start with a--- letter and can only contain letters (A-Z, a-z) or numbers (0-9). The--- maximum length is 256 characters.-pdName :: Lens' PropertyDefinition (Maybe Text)-pdName = lens _pdName (\ s a -> s{_pdName = a})---- | Indicates that multiple values are allowed for the property. For--- example, a document only has one description but can have multiple--- comments. Cannot be true for properties whose type is a boolean. If set--- to false, properties that contain more than one value will cause the--- indexing request for that item to be rejected.-pdIsRepeatable :: Lens' PropertyDefinition (Maybe Bool)-pdIsRepeatable-  = lens _pdIsRepeatable-      (\ s a -> s{_pdIsRepeatable = a})--pdDoublePropertyOptions :: Lens' PropertyDefinition (Maybe DoublePropertyOptions)-pdDoublePropertyOptions-  = lens _pdDoublePropertyOptions-      (\ s a -> s{_pdDoublePropertyOptions = a})---- | Options that determine how the property is displayed in the Cloud Search--- results page if it is specified to be displayed in the object\'s display--- options .-pdDisplayOptions :: Lens' PropertyDefinition (Maybe PropertyDisplayOptions)-pdDisplayOptions-  = lens _pdDisplayOptions-      (\ s a -> s{_pdDisplayOptions = a})--pdTextPropertyOptions :: Lens' PropertyDefinition (Maybe TextPropertyOptions)-pdTextPropertyOptions-  = lens _pdTextPropertyOptions-      (\ s a -> s{_pdTextPropertyOptions = a})---- | Indicates that the property can be used for sorting. Cannot be true for--- properties that are repeatable. Cannot be true for properties whose type--- is object or user identifier. IsReturnable must be true to set this--- option. Only supported for Boolean, Date, Double, Integer, and Timestamp--- properties.-pdIsSortable :: Lens' PropertyDefinition (Maybe Bool)-pdIsSortable-  = lens _pdIsSortable (\ s a -> s{_pdIsSortable = a})---- | Indicates that the property can be used for generating facets. Cannot be--- true for properties whose type is object. IsReturnable must be true to--- set this option. Only supported for Boolean, Enum, and Text properties.-pdIsFacetable :: Lens' PropertyDefinition (Maybe Bool)-pdIsFacetable-  = lens _pdIsFacetable-      (\ s a -> s{_pdIsFacetable = a})--pdBooleanPropertyOptions :: Lens' PropertyDefinition (Maybe BooleanPropertyOptions)-pdBooleanPropertyOptions-  = lens _pdBooleanPropertyOptions-      (\ s a -> s{_pdBooleanPropertyOptions = a})--pdDatePropertyOptions :: Lens' PropertyDefinition (Maybe DatePropertyOptions)-pdDatePropertyOptions-  = lens _pdDatePropertyOptions-      (\ s a -> s{_pdDatePropertyOptions = a})--instance FromJSON PropertyDefinition where-        parseJSON-          = withObject "PropertyDefinition"-              (\ o ->-                 PropertyDefinition' <$>-                   (o .:? "enumPropertyOptions") <*>-                     (o .:? "htmlPropertyOptions")-                     <*> (o .:? "objectPropertyOptions")-                     <*> (o .:? "isReturnable")-                     <*> (o .:? "timestampPropertyOptions")-                     <*> (o .:? "integerPropertyOptions")-                     <*> (o .:? "name")-                     <*> (o .:? "isRepeatable")-                     <*> (o .:? "doublePropertyOptions")-                     <*> (o .:? "displayOptions")-                     <*> (o .:? "textPropertyOptions")-                     <*> (o .:? "isSortable")-                     <*> (o .:? "isFacetable")-                     <*> (o .:? "booleanPropertyOptions")-                     <*> (o .:? "datePropertyOptions"))--instance ToJSON PropertyDefinition where-        toJSON PropertyDefinition'{..}-          = object-              (catMaybes-                 [("enumPropertyOptions" .=) <$>-                    _pdEnumPropertyOptions,-                  ("htmlPropertyOptions" .=) <$>-                    _pdHTMLPropertyOptions,-                  ("objectPropertyOptions" .=) <$>-                    _pdObjectPropertyOptions,-                  ("isReturnable" .=) <$> _pdIsReturnable,-                  ("timestampPropertyOptions" .=) <$>-                    _pdTimestampPropertyOptions,-                  ("integerPropertyOptions" .=) <$>-                    _pdIntegerPropertyOptions,-                  ("name" .=) <$> _pdName,-                  ("isRepeatable" .=) <$> _pdIsRepeatable,-                  ("doublePropertyOptions" .=) <$>-                    _pdDoublePropertyOptions,-                  ("displayOptions" .=) <$> _pdDisplayOptions,-                  ("textPropertyOptions" .=) <$>-                    _pdTextPropertyOptions,-                  ("isSortable" .=) <$> _pdIsSortable,-                  ("isFacetable" .=) <$> _pdIsFacetable,-                  ("booleanPropertyOptions" .=) <$>-                    _pdBooleanPropertyOptions,-                  ("datePropertyOptions" .=) <$>-                    _pdDatePropertyOptions])------- /See:/ 'sortOptions' smart constructor.-data SortOptions =-  SortOptions'-    { _soSortOrder    :: !(Maybe SortOptionsSortOrder)-    , _soOperatorName :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SortOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'soSortOrder'------ * 'soOperatorName'-sortOptions-    :: SortOptions-sortOptions = SortOptions' {_soSortOrder = Nothing, _soOperatorName = Nothing}----- | Ascending is the default sort order-soSortOrder :: Lens' SortOptions (Maybe SortOptionsSortOrder)-soSortOrder-  = lens _soSortOrder (\ s a -> s{_soSortOrder = a})---- | Name of the operator corresponding to the field to sort on. The--- corresponding property must be marked as sortable.-soOperatorName :: Lens' SortOptions (Maybe Text)-soOperatorName-  = lens _soOperatorName-      (\ s a -> s{_soOperatorName = a})--instance FromJSON SortOptions where-        parseJSON-          = withObject "SortOptions"-              (\ o ->-                 SortOptions' <$>-                   (o .:? "sortOrder") <*> (o .:? "operatorName"))--instance ToJSON SortOptions where-        toJSON SortOptions'{..}-          = object-              (catMaybes-                 [("sortOrder" .=) <$> _soSortOrder,-                  ("operatorName" .=) <$> _soOperatorName])---- | Options for object properties.------ /See:/ 'objectPropertyOptions' smart constructor.-newtype ObjectPropertyOptions =-  ObjectPropertyOptions'-    { _opoSubobjectProperties :: Maybe [PropertyDefinition]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ObjectPropertyOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'opoSubobjectProperties'-objectPropertyOptions-    :: ObjectPropertyOptions-objectPropertyOptions =-  ObjectPropertyOptions' {_opoSubobjectProperties = Nothing}----- | The properties of the sub-object. These properties represent a nested--- object. For example, if this property represents a postal address, the--- subobjectProperties might be named *street*, *city*, and *state*. The--- maximum number of elements is 1000.-opoSubobjectProperties :: Lens' ObjectPropertyOptions [PropertyDefinition]-opoSubobjectProperties-  = lens _opoSubobjectProperties-      (\ s a -> s{_opoSubobjectProperties = a})-      . _Default-      . _Coerce--instance FromJSON ObjectPropertyOptions where-        parseJSON-          = withObject "ObjectPropertyOptions"-              (\ o ->-                 ObjectPropertyOptions' <$>-                   (o .:? "subobjectProperties" .!= mempty))--instance ToJSON ObjectPropertyOptions where-        toJSON ObjectPropertyOptions'{..}-          = object-              (catMaybes-                 [("subobjectProperties" .=) <$>-                    _opoSubobjectProperties])---- | The search API response.------ /See:/ 'searchResponse' smart constructor.-data SearchResponse =-  SearchResponse'-    { _sSpellResults        :: !(Maybe [SpellResult])-    , _sFacetResults        :: !(Maybe [FacetResult])-    , _sDebugInfo           :: !(Maybe ResponseDebugInfo)-    , _sResults             :: !(Maybe [SearchResult])-    , _sHasMoreResults      :: !(Maybe Bool)-    , _sResultCounts        :: !(Maybe ResultCounts)-    , _sResultCountExact    :: !(Maybe (Textual Int64))-    , _sResultCountEstimate :: !(Maybe (Textual Int64))-    , _sQueryInterpretation :: !(Maybe QueryInterpretation)-    , _sStructuredResults   :: !(Maybe [StructuredResult])-    , _sErrorInfo           :: !(Maybe ErrorInfo)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SearchResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sSpellResults'------ * 'sFacetResults'------ * 'sDebugInfo'------ * 'sResults'------ * 'sHasMoreResults'------ * 'sResultCounts'------ * 'sResultCountExact'------ * 'sResultCountEstimate'------ * 'sQueryInterpretation'------ * 'sStructuredResults'------ * 'sErrorInfo'-searchResponse-    :: SearchResponse-searchResponse =-  SearchResponse'-    { _sSpellResults = Nothing-    , _sFacetResults = Nothing-    , _sDebugInfo = Nothing-    , _sResults = Nothing-    , _sHasMoreResults = Nothing-    , _sResultCounts = Nothing-    , _sResultCountExact = Nothing-    , _sResultCountEstimate = Nothing-    , _sQueryInterpretation = Nothing-    , _sStructuredResults = Nothing-    , _sErrorInfo = Nothing-    }----- | Suggested spelling for the query.-sSpellResults :: Lens' SearchResponse [SpellResult]-sSpellResults-  = lens _sSpellResults-      (\ s a -> s{_sSpellResults = a})-      . _Default-      . _Coerce---- | Repeated facet results.-sFacetResults :: Lens' SearchResponse [FacetResult]-sFacetResults-  = lens _sFacetResults-      (\ s a -> s{_sFacetResults = a})-      . _Default-      . _Coerce---- | Debugging information about the response.-sDebugInfo :: Lens' SearchResponse (Maybe ResponseDebugInfo)-sDebugInfo-  = lens _sDebugInfo (\ s a -> s{_sDebugInfo = a})---- | Results from a search query.-sResults :: Lens' SearchResponse [SearchResult]-sResults-  = lens _sResults (\ s a -> s{_sResults = a}) .-      _Default-      . _Coerce---- | Whether there are more search results matching the query.-sHasMoreResults :: Lens' SearchResponse (Maybe Bool)-sHasMoreResults-  = lens _sHasMoreResults-      (\ s a -> s{_sHasMoreResults = a})---- | Expanded result count information.-sResultCounts :: Lens' SearchResponse (Maybe ResultCounts)-sResultCounts-  = lens _sResultCounts-      (\ s a -> s{_sResultCounts = a})---- | The exact result count for this query.-sResultCountExact :: Lens' SearchResponse (Maybe Int64)-sResultCountExact-  = lens _sResultCountExact-      (\ s a -> s{_sResultCountExact = a})-      . mapping _Coerce---- | The estimated result count for this query.-sResultCountEstimate :: Lens' SearchResponse (Maybe Int64)-sResultCountEstimate-  = lens _sResultCountEstimate-      (\ s a -> s{_sResultCountEstimate = a})-      . mapping _Coerce---- | Query interpretation result for user query. Empty if query--- interpretation is disabled.-sQueryInterpretation :: Lens' SearchResponse (Maybe QueryInterpretation)-sQueryInterpretation-  = lens _sQueryInterpretation-      (\ s a -> s{_sQueryInterpretation = a})---- | Structured results for the user query. These results are not counted--- against the page_size.-sStructuredResults :: Lens' SearchResponse [StructuredResult]-sStructuredResults-  = lens _sStructuredResults-      (\ s a -> s{_sStructuredResults = a})-      . _Default-      . _Coerce---- | Error information about the response.-sErrorInfo :: Lens' SearchResponse (Maybe ErrorInfo)-sErrorInfo-  = lens _sErrorInfo (\ s a -> s{_sErrorInfo = a})--instance FromJSON SearchResponse where-        parseJSON-          = withObject "SearchResponse"-              (\ o ->-                 SearchResponse' <$>-                   (o .:? "spellResults" .!= mempty) <*>-                     (o .:? "facetResults" .!= mempty)-                     <*> (o .:? "debugInfo")-                     <*> (o .:? "results" .!= mempty)-                     <*> (o .:? "hasMoreResults")-                     <*> (o .:? "resultCounts")-                     <*> (o .:? "resultCountExact")-                     <*> (o .:? "resultCountEstimate")-                     <*> (o .:? "queryInterpretation")-                     <*> (o .:? "structuredResults" .!= mempty)-                     <*> (o .:? "errorInfo"))--instance ToJSON SearchResponse where-        toJSON SearchResponse'{..}-          = object-              (catMaybes-                 [("spellResults" .=) <$> _sSpellResults,-                  ("facetResults" .=) <$> _sFacetResults,-                  ("debugInfo" .=) <$> _sDebugInfo,-                  ("results" .=) <$> _sResults,-                  ("hasMoreResults" .=) <$> _sHasMoreResults,-                  ("resultCounts" .=) <$> _sResultCounts,-                  ("resultCountExact" .=) <$> _sResultCountExact,-                  ("resultCountEstimate" .=) <$> _sResultCountEstimate,-                  ("queryInterpretation" .=) <$> _sQueryInterpretation,-                  ("structuredResults" .=) <$> _sStructuredResults,-                  ("errorInfo" .=) <$> _sErrorInfo])---- | One suggestion result.------ /See:/ 'suggestResult' smart constructor.-data SuggestResult =-  SuggestResult'-    { _sPeopleSuggestion :: !(Maybe PeopleSuggestion)-    , _sQuerySuggestion  :: !(Maybe QuerySuggestion)-    , _sSuggestedQuery   :: !(Maybe Text)-    , _sSource           :: !(Maybe Source)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SuggestResult' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sPeopleSuggestion'------ * 'sQuerySuggestion'------ * 'sSuggestedQuery'------ * 'sSource'-suggestResult-    :: SuggestResult-suggestResult =-  SuggestResult'-    { _sPeopleSuggestion = Nothing-    , _sQuerySuggestion = Nothing-    , _sSuggestedQuery = Nothing-    , _sSource = Nothing-    }----- | This is present when the suggestion indicates a person. It contains more--- information about the person - like their email ID, name etc.-sPeopleSuggestion :: Lens' SuggestResult (Maybe PeopleSuggestion)-sPeopleSuggestion-  = lens _sPeopleSuggestion-      (\ s a -> s{_sPeopleSuggestion = a})---- | This field will be present if the suggested query is a word\/phrase--- completion.-sQuerySuggestion :: Lens' SuggestResult (Maybe QuerySuggestion)-sQuerySuggestion-  = lens _sQuerySuggestion-      (\ s a -> s{_sQuerySuggestion = a})---- | The suggested query that will be used for search, when the user clicks--- on the suggestion-sSuggestedQuery :: Lens' SuggestResult (Maybe Text)-sSuggestedQuery-  = lens _sSuggestedQuery-      (\ s a -> s{_sSuggestedQuery = a})---- | The source of the suggestion.-sSource :: Lens' SuggestResult (Maybe Source)-sSource = lens _sSource (\ s a -> s{_sSource = a})--instance FromJSON SuggestResult where-        parseJSON-          = withObject "SuggestResult"-              (\ o ->-                 SuggestResult' <$>-                   (o .:? "peopleSuggestion") <*>-                     (o .:? "querySuggestion")-                     <*> (o .:? "suggestedQuery")-                     <*> (o .:? "source"))--instance ToJSON SuggestResult where-        toJSON SuggestResult'{..}-          = object-              (catMaybes-                 [("peopleSuggestion" .=) <$> _sPeopleSuggestion,-                  ("querySuggestion" .=) <$> _sQuerySuggestion,-                  ("suggestedQuery" .=) <$> _sSuggestedQuery,-                  ("source" .=) <$> _sSource])---- | List of text values.------ /See:/ 'textValues' smart constructor.-newtype TextValues =-  TextValues'-    { _tvValues :: Maybe [Text]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TextValues' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tvValues'-textValues-    :: TextValues-textValues = TextValues' {_tvValues = Nothing}----- | The maximum allowable length for text values is 2048 characters.-tvValues :: Lens' TextValues [Text]-tvValues-  = lens _tvValues (\ s a -> s{_tvValues = a}) .-      _Default-      . _Coerce--instance FromJSON TextValues where-        parseJSON-          = withObject "TextValues"-              (\ o -> TextValues' <$> (o .:? "values" .!= mempty))--instance ToJSON TextValues where-        toJSON TextValues'{..}-          = object (catMaybes [("values" .=) <$> _tvValues])---- | Drive location search restricts (e.g. \"is:starred\").------ /See:/ 'driveLocationRestrict' smart constructor.-newtype DriveLocationRestrict =-  DriveLocationRestrict'-    { _dlrType :: Maybe DriveLocationRestrictType-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DriveLocationRestrict' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dlrType'-driveLocationRestrict-    :: DriveLocationRestrict-driveLocationRestrict = DriveLocationRestrict' {_dlrType = Nothing}---dlrType :: Lens' DriveLocationRestrict (Maybe DriveLocationRestrictType)-dlrType = lens _dlrType (\ s a -> s{_dlrType = a})--instance FromJSON DriveLocationRestrict where-        parseJSON-          = withObject "DriveLocationRestrict"-              (\ o -> DriveLocationRestrict' <$> (o .:? "type"))--instance ToJSON DriveLocationRestrict where-        toJSON DriveLocationRestrict'{..}-          = object (catMaybes [("type" .=) <$> _dlrType])---- | List sources response.------ /See:/ 'listQuerySourcesResponse' smart constructor.-data ListQuerySourcesResponse =-  ListQuerySourcesResponse'-    { _lqsrNextPageToken :: !(Maybe Text)-    , _lqsrSources       :: !(Maybe [QuerySource])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ListQuerySourcesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lqsrNextPageToken'------ * 'lqsrSources'-listQuerySourcesResponse-    :: ListQuerySourcesResponse-listQuerySourcesResponse =-  ListQuerySourcesResponse'-    {_lqsrNextPageToken = Nothing, _lqsrSources = Nothing}---lqsrNextPageToken :: Lens' ListQuerySourcesResponse (Maybe Text)-lqsrNextPageToken-  = lens _lqsrNextPageToken-      (\ s a -> s{_lqsrNextPageToken = a})--lqsrSources :: Lens' ListQuerySourcesResponse [QuerySource]-lqsrSources-  = lens _lqsrSources (\ s a -> s{_lqsrSources = a}) .-      _Default-      . _Coerce--instance FromJSON ListQuerySourcesResponse where-        parseJSON-          = withObject "ListQuerySourcesResponse"-              (\ o ->-                 ListQuerySourcesResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "sources" .!= mempty))--instance ToJSON ListQuerySourcesResponse where-        toJSON ListQuerySourcesResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _lqsrNextPageToken,-                  ("sources" .=) <$> _lqsrSources])---- | Used to provide a search operator for double properties. This is--- optional. Search operators let users restrict the query to specific--- fields relevant to the type of item being searched.------ /See:/ 'doubleOperatorOptions' smart constructor.-newtype DoubleOperatorOptions =-  DoubleOperatorOptions'-    { _dOperatorName :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DoubleOperatorOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dOperatorName'-doubleOperatorOptions-    :: DoubleOperatorOptions-doubleOperatorOptions = DoubleOperatorOptions' {_dOperatorName = Nothing}----- | Indicates the operator name required in the query in order to use the--- double property in sorting or as a facet. The operator name can only--- contain lowercase letters (a-z). The maximum length is 32 characters.-dOperatorName :: Lens' DoubleOperatorOptions (Maybe Text)-dOperatorName-  = lens _dOperatorName-      (\ s a -> s{_dOperatorName = a})--instance FromJSON DoubleOperatorOptions where-        parseJSON-          = withObject "DoubleOperatorOptions"-              (\ o ->-                 DoubleOperatorOptions' <$> (o .:? "operatorName"))--instance ToJSON DoubleOperatorOptions where-        toJSON DoubleOperatorOptions'{..}-          = object-              (catMaybes [("operatorName" .=) <$> _dOperatorName])---- | This resource represents a long-running operation that is the result of--- a network API call.------ /See:/ 'operation' smart constructor.-data Operation =-  Operation'-    { _oDone     :: !(Maybe Bool)-    , _oError    :: !(Maybe Status)-    , _oResponse :: !(Maybe OperationResponse)-    , _oName     :: !(Maybe Text)-    , _oMetadata :: !(Maybe OperationMetadata)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Operation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'oDone'------ * 'oError'------ * 'oResponse'------ * 'oName'------ * 'oMetadata'-operation-    :: Operation-operation =-  Operation'-    { _oDone = Nothing-    , _oError = Nothing-    , _oResponse = Nothing-    , _oName = Nothing-    , _oMetadata = Nothing-    }----- | If the value is \`false\`, it means the operation is still in progress.--- If \`true\`, the operation is completed, and either \`error\` or--- \`response\` is available.-oDone :: Lens' Operation (Maybe Bool)-oDone = lens _oDone (\ s a -> s{_oDone = a})---- | The error result of the operation in case of failure or cancellation.-oError :: Lens' Operation (Maybe Status)-oError = lens _oError (\ s a -> s{_oError = a})---- | The normal response of the operation in case of success. If the original--- method returns no data on success, such as \`Delete\`, the response is--- \`google.protobuf.Empty\`. If the original method is standard--- \`Get\`\/\`Create\`\/\`Update\`, the response should be the resource.--- For other methods, the response should have the type \`XxxResponse\`,--- where \`Xxx\` is the original method name. For example, if the original--- method name is \`TakeSnapshot()\`, the inferred response type is--- \`TakeSnapshotResponse\`.-oResponse :: Lens' Operation (Maybe OperationResponse)-oResponse-  = lens _oResponse (\ s a -> s{_oResponse = a})---- | The server-assigned name, which is only unique within the same service--- that originally returns it. If you use the default HTTP mapping, the--- \`name\` should have the format of \`operations\/some\/unique\/name\`.-oName :: Lens' Operation (Maybe Text)-oName = lens _oName (\ s a -> s{_oName = a})---- | Service-specific metadata associated with the operation. It typically--- contains progress information and common metadata such as create time.--- Some services might not provide such metadata. Any method that returns a--- long-running operation should document the metadata type, if any.-oMetadata :: Lens' Operation (Maybe OperationMetadata)-oMetadata-  = lens _oMetadata (\ s a -> s{_oMetadata = a})--instance FromJSON Operation where-        parseJSON-          = withObject "Operation"-              (\ o ->-                 Operation' <$>-                   (o .:? "done") <*> (o .:? "error") <*>-                     (o .:? "response")-                     <*> (o .:? "name")-                     <*> (o .:? "metadata"))--instance ToJSON Operation where-        toJSON Operation'{..}-          = object-              (catMaybes-                 [("done" .=) <$> _oDone, ("error" .=) <$> _oError,-                  ("response" .=) <$> _oResponse,-                  ("name" .=) <$> _oName,-                  ("metadata" .=) <$> _oMetadata])---- | Object to represent a person.------ /See:/ 'person' smart constructor.-data Person =-  Person'-    { _pEmailAddresses :: !(Maybe [EmailAddress])-    , _pPersonNames    :: !(Maybe [Name])-    , _pPhotos         :: !(Maybe [Photo])-    , _pName           :: !(Maybe Text)-    , _pObfuscatedId   :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Person' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pEmailAddresses'------ * 'pPersonNames'------ * 'pPhotos'------ * 'pName'------ * 'pObfuscatedId'-person-    :: Person-person =-  Person'-    { _pEmailAddresses = Nothing-    , _pPersonNames = Nothing-    , _pPhotos = Nothing-    , _pName = Nothing-    , _pObfuscatedId = Nothing-    }----- | The person\'s email addresses-pEmailAddresses :: Lens' Person [EmailAddress]-pEmailAddresses-  = lens _pEmailAddresses-      (\ s a -> s{_pEmailAddresses = a})-      . _Default-      . _Coerce---- | The person\'s name-pPersonNames :: Lens' Person [Name]-pPersonNames-  = lens _pPersonNames (\ s a -> s{_pPersonNames = a})-      . _Default-      . _Coerce---- | A person\'s read-only photo. A picture shown next to the person\'s name--- to help others recognize the person in search results.-pPhotos :: Lens' Person [Photo]-pPhotos-  = lens _pPhotos (\ s a -> s{_pPhotos = a}) . _Default-      . _Coerce---- | The resource name of the person to provide information about. See--- <https://developers.google.com/people/api/rest/v1/people/get People.get>--- from Google People API.-pName :: Lens' Person (Maybe Text)-pName = lens _pName (\ s a -> s{_pName = a})---- | Obfuscated ID of a person.-pObfuscatedId :: Lens' Person (Maybe Text)-pObfuscatedId-  = lens _pObfuscatedId-      (\ s a -> s{_pObfuscatedId = a})--instance FromJSON Person where-        parseJSON-          = withObject "Person"-              (\ o ->-                 Person' <$>-                   (o .:? "emailAddresses" .!= mempty) <*>-                     (o .:? "personNames" .!= mempty)-                     <*> (o .:? "photos" .!= mempty)-                     <*> (o .:? "name")-                     <*> (o .:? "obfuscatedId"))--instance ToJSON Person where-        toJSON Person'{..}-          = object-              (catMaybes-                 [("emailAddresses" .=) <$> _pEmailAddresses,-                  ("personNames" .=) <$> _pPersonNames,-                  ("photos" .=) <$> _pPhotos, ("name" .=) <$> _pName,-                  ("obfuscatedId" .=) <$> _pObfuscatedId])------- /See:/ 'compositeFilter' smart constructor.-data CompositeFilter =-  CompositeFilter'-    { _cfSubFilters    :: !(Maybe [Filter])-    , _cfLogicOperator :: !(Maybe CompositeFilterLogicOperator)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CompositeFilter' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cfSubFilters'------ * 'cfLogicOperator'-compositeFilter-    :: CompositeFilter-compositeFilter =-  CompositeFilter' {_cfSubFilters = Nothing, _cfLogicOperator = Nothing}----- | Sub filters.-cfSubFilters :: Lens' CompositeFilter [Filter]-cfSubFilters-  = lens _cfSubFilters (\ s a -> s{_cfSubFilters = a})-      . _Default-      . _Coerce---- | The logic operator of the sub filter.-cfLogicOperator :: Lens' CompositeFilter (Maybe CompositeFilterLogicOperator)-cfLogicOperator-  = lens _cfLogicOperator-      (\ s a -> s{_cfLogicOperator = a})--instance FromJSON CompositeFilter where-        parseJSON-          = withObject "CompositeFilter"-              (\ o ->-                 CompositeFilter' <$>-                   (o .:? "subFilters" .!= mempty) <*>-                     (o .:? "logicOperator"))--instance ToJSON CompositeFilter where-        toJSON CompositeFilter'{..}-          = object-              (catMaybes-                 [("subFilters" .=) <$> _cfSubFilters,-                  ("logicOperator" .=) <$> _cfLogicOperator])---- | The collection of fields that make up a displayed line------ /See:/ 'resultDisplayLine' smart constructor.-newtype ResultDisplayLine =-  ResultDisplayLine'-    { _rdlFields :: Maybe [ResultDisplayField]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResultDisplayLine' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rdlFields'-resultDisplayLine-    :: ResultDisplayLine-resultDisplayLine = ResultDisplayLine' {_rdlFields = Nothing}---rdlFields :: Lens' ResultDisplayLine [ResultDisplayField]-rdlFields-  = lens _rdlFields (\ s a -> s{_rdlFields = a}) .-      _Default-      . _Coerce--instance FromJSON ResultDisplayLine where-        parseJSON-          = withObject "ResultDisplayLine"-              (\ o ->-                 ResultDisplayLine' <$> (o .:? "fields" .!= mempty))--instance ToJSON ResultDisplayLine where-        toJSON ResultDisplayLine'{..}-          = object (catMaybes [("fields" .=) <$> _rdlFields])---- | List of double values.------ /See:/ 'doubleValues' smart constructor.-newtype DoubleValues =-  DoubleValues'-    { _dvValues :: Maybe [Textual Double]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DoubleValues' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dvValues'-doubleValues-    :: DoubleValues-doubleValues = DoubleValues' {_dvValues = Nothing}---dvValues :: Lens' DoubleValues [Double]-dvValues-  = lens _dvValues (\ s a -> s{_dvValues = a}) .-      _Default-      . _Coerce--instance FromJSON DoubleValues where-        parseJSON-          = withObject "DoubleValues"-              (\ o ->-                 DoubleValues' <$> (o .:? "values" .!= mempty))--instance ToJSON DoubleValues where-        toJSON DoubleValues'{..}-          = object (catMaybes [("values" .=) <$> _dvValues])---- | Snippet of the search result, which summarizes the content of the--- resulting page.------ /See:/ 'snippet' smart constructor.-data Snippet =-  Snippet'-    { _sMatchRanges :: !(Maybe [MatchRange])-    , _sSnippet     :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Snippet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sMatchRanges'------ * 'sSnippet'-snippet-    :: Snippet-snippet = Snippet' {_sMatchRanges = Nothing, _sSnippet = Nothing}----- | The matched ranges in the snippet.-sMatchRanges :: Lens' Snippet [MatchRange]-sMatchRanges-  = lens _sMatchRanges (\ s a -> s{_sMatchRanges = a})-      . _Default-      . _Coerce---- | The snippet of the document. The snippet of the document. May contain--- escaped HTML character that should be unescaped prior to rendering.-sSnippet :: Lens' Snippet (Maybe Text)-sSnippet = lens _sSnippet (\ s a -> s{_sSnippet = a})--instance FromJSON Snippet where-        parseJSON-          = withObject "Snippet"-              (\ o ->-                 Snippet' <$>-                   (o .:? "matchRanges" .!= mempty) <*>-                     (o .:? "snippet"))--instance ToJSON Snippet where-        toJSON Snippet'{..}-          = object-              (catMaybes-                 [("matchRanges" .=) <$> _sMatchRanges,-                  ("snippet" .=) <$> _sSnippet])---- | Used to provide a search operator for text properties. This is optional.--- Search operators let users restrict the query to specific fields--- relevant to the type of item being searched.------ /See:/ 'textOperatorOptions' smart constructor.-data TextOperatorOptions =-  TextOperatorOptions'-    { _tooOperatorName           :: !(Maybe Text)-    , _tooExactMatchWithOperator :: !(Maybe Bool)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TextOperatorOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tooOperatorName'------ * 'tooExactMatchWithOperator'-textOperatorOptions-    :: TextOperatorOptions-textOperatorOptions =-  TextOperatorOptions'-    {_tooOperatorName = Nothing, _tooExactMatchWithOperator = Nothing}----- | Indicates the operator name required in the query in order to isolate--- the text property. For example, if operatorName is *subject* and the--- property\'s name is *subjectLine*, then queries like *subject:\<value>*--- will show results only where the value of the property named--- *subjectLine* matches *\<value>*. By contrast, a search that uses the--- same *\<value>* without an operator will return all items where--- *\<value>* matches the value of any text properties or text within the--- content field for the item. The operator name can only contain lowercase--- letters (a-z). The maximum length is 32 characters.-tooOperatorName :: Lens' TextOperatorOptions (Maybe Text)-tooOperatorName-  = lens _tooOperatorName-      (\ s a -> s{_tooOperatorName = a})---- | If true, the text value will be tokenized as one atomic value in--- operator searches and facet matches. For example, if the operator name--- is \"genre\" and the value is \"science-fiction\" the query restrictions--- \"genre:science\" and \"genre:fiction\" will not match the item;--- \"genre:science-fiction\" will. Value matching is case-sensitive and--- does not remove special characters. If false, the text will be--- tokenized. For example, if the value is \"science-fiction\" the queries--- \"genre:science\" and \"genre:fiction\" will match the item.-tooExactMatchWithOperator :: Lens' TextOperatorOptions (Maybe Bool)-tooExactMatchWithOperator-  = lens _tooExactMatchWithOperator-      (\ s a -> s{_tooExactMatchWithOperator = a})--instance FromJSON TextOperatorOptions where-        parseJSON-          = withObject "TextOperatorOptions"-              (\ o ->-                 TextOperatorOptions' <$>-                   (o .:? "operatorName") <*>-                     (o .:? "exactMatchWithOperator"))--instance ToJSON TextOperatorOptions where-        toJSON TextOperatorOptions'{..}-          = object-              (catMaybes-                 [("operatorName" .=) <$> _tooOperatorName,-                  ("exactMatchWithOperator" .=) <$>-                    _tooExactMatchWithOperator])---- | Options to interpret user query.------ /See:/ 'queryInterpretationOptions' smart constructor.-newtype QueryInterpretationOptions =-  QueryInterpretationOptions'-    { _qioDisableNlInterpretation :: Maybe Bool-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'QueryInterpretationOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'qioDisableNlInterpretation'-queryInterpretationOptions-    :: QueryInterpretationOptions-queryInterpretationOptions =-  QueryInterpretationOptions' {_qioDisableNlInterpretation = Nothing}----- | Flag to disable natural language (NL) interpretation of queries. Default--- is false, Set to true to disable natural language interpretation. NL--- interpretation only applies to predefined datasources.-qioDisableNlInterpretation :: Lens' QueryInterpretationOptions (Maybe Bool)-qioDisableNlInterpretation-  = lens _qioDisableNlInterpretation-      (\ s a -> s{_qioDisableNlInterpretation = a})--instance FromJSON QueryInterpretationOptions where-        parseJSON-          = withObject "QueryInterpretationOptions"-              (\ o ->-                 QueryInterpretationOptions' <$>-                   (o .:? "disableNlInterpretation"))--instance ToJSON QueryInterpretationOptions where-        toJSON QueryInterpretationOptions'{..}-          = object-              (catMaybes-                 [("disableNlInterpretation" .=) <$>-                    _qioDisableNlInterpretation])------- /See:/ 'resetSearchApplicationRequest' smart constructor.-newtype ResetSearchApplicationRequest =-  ResetSearchApplicationRequest'-    { _rsarDebugOptions :: Maybe DebugOptions-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResetSearchApplicationRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rsarDebugOptions'-resetSearchApplicationRequest-    :: ResetSearchApplicationRequest-resetSearchApplicationRequest =-  ResetSearchApplicationRequest' {_rsarDebugOptions = Nothing}----- | Common debug options.-rsarDebugOptions :: Lens' ResetSearchApplicationRequest (Maybe DebugOptions)-rsarDebugOptions-  = lens _rsarDebugOptions-      (\ s a -> s{_rsarDebugOptions = a})--instance FromJSON ResetSearchApplicationRequest where-        parseJSON-          = withObject "ResetSearchApplicationRequest"-              (\ o ->-                 ResetSearchApplicationRequest' <$>-                   (o .:? "debugOptions"))--instance ToJSON ResetSearchApplicationRequest where-        toJSON ResetSearchApplicationRequest'{..}-          = object-              (catMaybes-                 [("debugOptions" .=) <$> _rsarDebugOptions])---- | Available metadata fields for the item.------ /See:/ 'itemMetadata' smart constructor.-data ItemMetadata =-  ItemMetadata'-    { _imSourceRepositoryURL   :: !(Maybe Text)-    , _imHash                  :: !(Maybe Text)-    , _imObjectType            :: !(Maybe Text)-    , _imContainerName         :: !(Maybe Text)-    , _imInteractions          :: !(Maybe [Interaction])-    , _imMimeType              :: !(Maybe Text)-    , _imUpdateTime            :: !(Maybe DateTime')-    , _imKeywords              :: !(Maybe [Text])-    , _imTitle                 :: !(Maybe Text)-    , _imContentLanguage       :: !(Maybe Text)-    , _imSearchQualityMetadata :: !(Maybe SearchQualityMetadata)-    , _imCreateTime            :: !(Maybe DateTime')-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ItemMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'imSourceRepositoryURL'------ * 'imHash'------ * 'imObjectType'------ * 'imContainerName'------ * 'imInteractions'------ * 'imMimeType'------ * 'imUpdateTime'------ * 'imKeywords'------ * 'imTitle'------ * 'imContentLanguage'------ * 'imSearchQualityMetadata'------ * 'imCreateTime'-itemMetadata-    :: ItemMetadata-itemMetadata =-  ItemMetadata'-    { _imSourceRepositoryURL = Nothing-    , _imHash = Nothing-    , _imObjectType = Nothing-    , _imContainerName = Nothing-    , _imInteractions = Nothing-    , _imMimeType = Nothing-    , _imUpdateTime = Nothing-    , _imKeywords = Nothing-    , _imTitle = Nothing-    , _imContentLanguage = Nothing-    , _imSearchQualityMetadata = Nothing-    , _imCreateTime = Nothing-    }----- | Link to the source repository serving the data. Search results apply--- this link to the title. The maximum length is 2048 characters.-imSourceRepositoryURL :: Lens' ItemMetadata (Maybe Text)-imSourceRepositoryURL-  = lens _imSourceRepositoryURL-      (\ s a -> s{_imSourceRepositoryURL = a})---- | Hashing value provided by the API caller. This can be used with the--- items.push method to calculate modified state. The maximum length is--- 2048 characters.-imHash :: Lens' ItemMetadata (Maybe Text)-imHash = lens _imHash (\ s a -> s{_imHash = a})---- | The type of the item. This should correspond to the name of an object--- definition in the schema registered for the data source. For example, if--- the schema for the data source contains an object definition with name--- \'document\', then item indexing requests for objects of that type--- should set objectType to \'document\'. The maximum length is 256--- characters.-imObjectType :: Lens' ItemMetadata (Maybe Text)-imObjectType-  = lens _imObjectType (\ s a -> s{_imObjectType = a})---- | The name of the container for this item. Deletion of the container item--- leads to automatic deletion of this item. Note: ACLs are not inherited--- from a container item. To provide ACL inheritance for an item, use the--- inheritAclFrom field. The maximum length is 1536 characters.-imContainerName :: Lens' ItemMetadata (Maybe Text)-imContainerName-  = lens _imContainerName-      (\ s a -> s{_imContainerName = a})---- | A list of interactions for the item. Interactions are used to improve--- Search quality, but are not exposed to end users. The maximum number of--- elements is 1000.-imInteractions :: Lens' ItemMetadata [Interaction]-imInteractions-  = lens _imInteractions-      (\ s a -> s{_imInteractions = a})-      . _Default-      . _Coerce---- | The original mime-type of ItemContent.content in the source repository.--- The maximum length is 256 characters.-imMimeType :: Lens' ItemMetadata (Maybe Text)-imMimeType-  = lens _imMimeType (\ s a -> s{_imMimeType = a})---- | The time when the item was last modified in the source repository.-imUpdateTime :: Lens' ItemMetadata (Maybe UTCTime)-imUpdateTime-  = lens _imUpdateTime (\ s a -> s{_imUpdateTime = a})-      . mapping _DateTime---- | Additional keywords or phrases that should match the item. Used--- internally for user generated content. The maximum number of elements is--- 100. The maximum length is 8192 characters.-imKeywords :: Lens' ItemMetadata [Text]-imKeywords-  = lens _imKeywords (\ s a -> s{_imKeywords = a}) .-      _Default-      . _Coerce---- | The title of the item. If given, this will be the displayed title of the--- Search result. The maximum length is 2048 characters.-imTitle :: Lens' ItemMetadata (Maybe Text)-imTitle = lens _imTitle (\ s a -> s{_imTitle = a})---- | The BCP-47 language code for the item, such as \"en-US\" or \"sr-Latn\".--- For more information, see--- http:\/\/www.unicode.org\/reports\/tr35\/#Unicode_locale_identifier. The--- maximum length is 32 characters.-imContentLanguage :: Lens' ItemMetadata (Maybe Text)-imContentLanguage-  = lens _imContentLanguage-      (\ s a -> s{_imContentLanguage = a})---- | Additional search quality metadata of the item-imSearchQualityMetadata :: Lens' ItemMetadata (Maybe SearchQualityMetadata)-imSearchQualityMetadata-  = lens _imSearchQualityMetadata-      (\ s a -> s{_imSearchQualityMetadata = a})---- | The time when the item was created in the source repository.-imCreateTime :: Lens' ItemMetadata (Maybe UTCTime)-imCreateTime-  = lens _imCreateTime (\ s a -> s{_imCreateTime = a})-      . mapping _DateTime--instance FromJSON ItemMetadata where-        parseJSON-          = withObject "ItemMetadata"-              (\ o ->-                 ItemMetadata' <$>-                   (o .:? "sourceRepositoryUrl") <*> (o .:? "hash") <*>-                     (o .:? "objectType")-                     <*> (o .:? "containerName")-                     <*> (o .:? "interactions" .!= mempty)-                     <*> (o .:? "mimeType")-                     <*> (o .:? "updateTime")-                     <*> (o .:? "keywords" .!= mempty)-                     <*> (o .:? "title")-                     <*> (o .:? "contentLanguage")-                     <*> (o .:? "searchQualityMetadata")-                     <*> (o .:? "createTime"))--instance ToJSON ItemMetadata where-        toJSON ItemMetadata'{..}-          = object-              (catMaybes-                 [("sourceRepositoryUrl" .=) <$>-                    _imSourceRepositoryURL,-                  ("hash" .=) <$> _imHash,-                  ("objectType" .=) <$> _imObjectType,-                  ("containerName" .=) <$> _imContainerName,-                  ("interactions" .=) <$> _imInteractions,-                  ("mimeType" .=) <$> _imMimeType,-                  ("updateTime" .=) <$> _imUpdateTime,-                  ("keywords" .=) <$> _imKeywords,-                  ("title" .=) <$> _imTitle,-                  ("contentLanguage" .=) <$> _imContentLanguage,-                  ("searchQualityMetadata" .=) <$>-                    _imSearchQualityMetadata,-                  ("createTime" .=) <$> _imCreateTime])---- | Filter options to be applied on query.------ /See:/ 'filterOptions' smart constructor.-data FilterOptions =-  FilterOptions'-    { _foObjectType :: !(Maybe Text)-    , _foFilter     :: !(Maybe Filter)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'FilterOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'foObjectType'------ * 'foFilter'-filterOptions-    :: FilterOptions-filterOptions = FilterOptions' {_foObjectType = Nothing, _foFilter = Nothing}----- | If object_type is set, only objects of that type are returned. This--- should correspond to the name of the object that was registered within--- the definition of schema. The maximum length is 256 characters.-foObjectType :: Lens' FilterOptions (Maybe Text)-foObjectType-  = lens _foObjectType (\ s a -> s{_foObjectType = a})---- | Generic filter to restrict the search, such as \`lang:en\`,--- \`site:xyz\`.-foFilter :: Lens' FilterOptions (Maybe Filter)-foFilter = lens _foFilter (\ s a -> s{_foFilter = a})--instance FromJSON FilterOptions where-        parseJSON-          = withObject "FilterOptions"-              (\ o ->-                 FilterOptions' <$>-                   (o .:? "objectType") <*> (o .:? "filter"))--instance ToJSON FilterOptions where-        toJSON FilterOptions'{..}-          = object-              (catMaybes-                 [("objectType" .=) <$> _foObjectType,-                  ("filter" .=) <$> _foFilter])---- | Structured results that are returned as part of search request.------ /See:/ 'structuredResult' smart constructor.-newtype StructuredResult =-  StructuredResult'-    { _srPerson :: Maybe Person-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'StructuredResult' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'srPerson'-structuredResult-    :: StructuredResult-structuredResult = StructuredResult' {_srPerson = Nothing}----- | Representation of a person-srPerson :: Lens' StructuredResult (Maybe Person)-srPerson = lens _srPerson (\ s a -> s{_srPerson = a})--instance FromJSON StructuredResult where-        parseJSON-          = withObject "StructuredResult"-              (\ o -> StructuredResult' <$> (o .:? "person"))--instance ToJSON StructuredResult where-        toJSON StructuredResult'{..}-          = object (catMaybes [("person" .=) <$> _srPerson])------- /See:/ 'processingError' smart constructor.-data ProcessingError =-  ProcessingError'-    { _peFieldViolations :: !(Maybe [FieldViolation])-    , _peCode            :: !(Maybe ProcessingErrorCode)-    , _peErrorMessage    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ProcessingError' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'peFieldViolations'------ * 'peCode'------ * 'peErrorMessage'-processingError-    :: ProcessingError-processingError =-  ProcessingError'-    {_peFieldViolations = Nothing, _peCode = Nothing, _peErrorMessage = Nothing}----- | In case the item fields are invalid, this field contains the details--- about the validation errors.-peFieldViolations :: Lens' ProcessingError [FieldViolation]-peFieldViolations-  = lens _peFieldViolations-      (\ s a -> s{_peFieldViolations = a})-      . _Default-      . _Coerce---- | Error code indicating the nature of the error.-peCode :: Lens' ProcessingError (Maybe ProcessingErrorCode)-peCode = lens _peCode (\ s a -> s{_peCode = a})---- | Description of the error.-peErrorMessage :: Lens' ProcessingError (Maybe Text)-peErrorMessage-  = lens _peErrorMessage-      (\ s a -> s{_peErrorMessage = a})--instance FromJSON ProcessingError where-        parseJSON-          = withObject "ProcessingError"-              (\ o ->-                 ProcessingError' <$>-                   (o .:? "fieldViolations" .!= mempty) <*>-                     (o .:? "code")-                     <*> (o .:? "errorMessage"))--instance ToJSON ProcessingError where-        toJSON ProcessingError'{..}-          = object-              (catMaybes-                 [("fieldViolations" .=) <$> _peFieldViolations,-                  ("code" .=) <$> _peCode,-                  ("errorMessage" .=) <$> _peErrorMessage])------- /See:/ 'listItemNamesForUnmAppedIdentityResponse' smart constructor.-data ListItemNamesForUnmAppedIdentityResponse =-  ListItemNamesForUnmAppedIdentityResponse'-    { _linfuairNextPageToken :: !(Maybe Text)-    , _linfuairItemNames     :: !(Maybe [Text])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ListItemNamesForUnmAppedIdentityResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'linfuairNextPageToken'------ * 'linfuairItemNames'-listItemNamesForUnmAppedIdentityResponse-    :: ListItemNamesForUnmAppedIdentityResponse-listItemNamesForUnmAppedIdentityResponse =-  ListItemNamesForUnmAppedIdentityResponse'-    {_linfuairNextPageToken = Nothing, _linfuairItemNames = Nothing}----- | Token to retrieve the next page of results, or empty if there are no--- more results in the list.-linfuairNextPageToken :: Lens' ListItemNamesForUnmAppedIdentityResponse (Maybe Text)-linfuairNextPageToken-  = lens _linfuairNextPageToken-      (\ s a -> s{_linfuairNextPageToken = a})--linfuairItemNames :: Lens' ListItemNamesForUnmAppedIdentityResponse [Text]-linfuairItemNames-  = lens _linfuairItemNames-      (\ s a -> s{_linfuairItemNames = a})-      . _Default-      . _Coerce--instance FromJSON-           ListItemNamesForUnmAppedIdentityResponse-         where-        parseJSON-          = withObject-              "ListItemNamesForUnmAppedIdentityResponse"-              (\ o ->-                 ListItemNamesForUnmAppedIdentityResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "itemNames" .!= mempty))--instance ToJSON-           ListItemNamesForUnmAppedIdentityResponse-         where-        toJSON ListItemNamesForUnmAppedIdentityResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _linfuairNextPageToken,-                  ("itemNames" .=) <$> _linfuairItemNames])---- | Access control list information for the item. For more information see--- https:\/\/developers.google.com\/cloud-search\/docs\/guides\/index-your-data#acls------ /See:/ 'itemACL' smart constructor.-data ItemACL =-  ItemACL'-    { _iaOwners             :: !(Maybe [Principal])-    , _iaReaders            :: !(Maybe [Principal])-    , _iaACLInheritanceType :: !(Maybe ItemACLACLInheritanceType)-    , _iaInheritACLFrom     :: !(Maybe Text)-    , _iaDeniedReaders      :: !(Maybe [Principal])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ItemACL' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'iaOwners'------ * 'iaReaders'------ * 'iaACLInheritanceType'------ * 'iaInheritACLFrom'------ * 'iaDeniedReaders'-itemACL-    :: ItemACL-itemACL =-  ItemACL'-    { _iaOwners = Nothing-    , _iaReaders = Nothing-    , _iaACLInheritanceType = Nothing-    , _iaInheritACLFrom = Nothing-    , _iaDeniedReaders = Nothing-    }----- | Optional. List of owners for the item. This field has no bearing on--- document access permissions. It does, however, offer a slight ranking--- boosts items where the querying user is an owner. The maximum number of--- elements is 5.-iaOwners :: Lens' ItemACL [Principal]-iaOwners-  = lens _iaOwners (\ s a -> s{_iaOwners = a}) .-      _Default-      . _Coerce---- | List of principals who are allowed to see the item in search results.--- Optional if inheriting permissions from another item or if the item is--- not intended to be visible, such as virtual containers. The maximum--- number of elements is 1000.-iaReaders :: Lens' ItemACL [Principal]-iaReaders-  = lens _iaReaders (\ s a -> s{_iaReaders = a}) .-      _Default-      . _Coerce---- | Sets the type of access rules to apply when an item inherits its ACL--- from a parent. This should always be set in tandem with the--- inheritAclFrom field. Also, when the inheritAclFrom field is set, this--- field should be set to a valid AclInheritanceType.-iaACLInheritanceType :: Lens' ItemACL (Maybe ItemACLACLInheritanceType)-iaACLInheritanceType-  = lens _iaACLInheritanceType-      (\ s a -> s{_iaACLInheritanceType = a})---- | Name of the item to inherit the Access Permission List (ACL) from. Note:--- ACL inheritance *only* provides access permissions to child items and--- does not define structural relationships, nor does it provide convenient--- ways to delete large groups of items. Deleting an ACL parent from the--- index only alters the access permissions of child items that reference--- the parent in the inheritAclFrom field. The item is still in the index,--- but may not visible in search results. By contrast, deletion of a--- container item also deletes all items that reference the container via--- the containerName field. The maximum length for this field is 1536--- characters.-iaInheritACLFrom :: Lens' ItemACL (Maybe Text)-iaInheritACLFrom-  = lens _iaInheritACLFrom-      (\ s a -> s{_iaInheritACLFrom = a})---- | List of principals who are explicitly denied access to the item in--- search results. While principals are denied access by default, use--- denied readers to handle exceptions and override the list allowed--- readers. The maximum number of elements is 100.-iaDeniedReaders :: Lens' ItemACL [Principal]-iaDeniedReaders-  = lens _iaDeniedReaders-      (\ s a -> s{_iaDeniedReaders = a})-      . _Default-      . _Coerce--instance FromJSON ItemACL where-        parseJSON-          = withObject "ItemACL"-              (\ o ->-                 ItemACL' <$>-                   (o .:? "owners" .!= mempty) <*>-                     (o .:? "readers" .!= mempty)-                     <*> (o .:? "aclInheritanceType")-                     <*> (o .:? "inheritAclFrom")-                     <*> (o .:? "deniedReaders" .!= mempty))--instance ToJSON ItemACL where-        toJSON ItemACL'{..}-          = object-              (catMaybes-                 [("owners" .=) <$> _iaOwners,-                  ("readers" .=) <$> _iaReaders,-                  ("aclInheritanceType" .=) <$> _iaACLInheritanceType,-                  ("inheritAclFrom" .=) <$> _iaInheritACLFrom,-                  ("deniedReaders" .=) <$> _iaDeniedReaders])---- | Definition of a single value with generic type.------ /See:/ 'value' smart constructor.-data Value =-  Value'-    { _vIntegerValue   :: !(Maybe (Textual Int64))-    , _vTimestampValue :: !(Maybe DateTime')-    , _vDoubleValue    :: !(Maybe (Textual Double))-    , _vStringValue    :: !(Maybe Text)-    , _vDateValue      :: !(Maybe Date)-    , _vBooleanValue   :: !(Maybe Bool)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Value' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'vIntegerValue'------ * 'vTimestampValue'------ * 'vDoubleValue'------ * 'vStringValue'------ * 'vDateValue'------ * 'vBooleanValue'-value-    :: Value-value =-  Value'-    { _vIntegerValue = Nothing-    , _vTimestampValue = Nothing-    , _vDoubleValue = Nothing-    , _vStringValue = Nothing-    , _vDateValue = Nothing-    , _vBooleanValue = Nothing-    }---vIntegerValue :: Lens' Value (Maybe Int64)-vIntegerValue-  = lens _vIntegerValue-      (\ s a -> s{_vIntegerValue = a})-      . mapping _Coerce--vTimestampValue :: Lens' Value (Maybe UTCTime)-vTimestampValue-  = lens _vTimestampValue-      (\ s a -> s{_vTimestampValue = a})-      . mapping _DateTime--vDoubleValue :: Lens' Value (Maybe Double)-vDoubleValue-  = lens _vDoubleValue (\ s a -> s{_vDoubleValue = a})-      . mapping _Coerce--vStringValue :: Lens' Value (Maybe Text)-vStringValue-  = lens _vStringValue (\ s a -> s{_vStringValue = a})--vDateValue :: Lens' Value (Maybe Date)-vDateValue-  = lens _vDateValue (\ s a -> s{_vDateValue = a})--vBooleanValue :: Lens' Value (Maybe Bool)-vBooleanValue-  = lens _vBooleanValue-      (\ s a -> s{_vBooleanValue = a})--instance FromJSON Value where-        parseJSON-          = withObject "Value"-              (\ o ->-                 Value' <$>-                   (o .:? "integerValue") <*> (o .:? "timestampValue")-                     <*> (o .:? "doubleValue")-                     <*> (o .:? "stringValue")-                     <*> (o .:? "dateValue")-                     <*> (o .:? "booleanValue"))--instance ToJSON Value where-        toJSON Value'{..}-          = object-              (catMaybes-                 [("integerValue" .=) <$> _vIntegerValue,-                  ("timestampValue" .=) <$> _vTimestampValue,-                  ("doubleValue" .=) <$> _vDoubleValue,-                  ("stringValue" .=) <$> _vStringValue,-                  ("dateValue" .=) <$> _vDateValue,-                  ("booleanValue" .=) <$> _vBooleanValue])------- /See:/ 'fieldViolation' smart constructor.-data FieldViolation =-  FieldViolation'-    { _fvField       :: !(Maybe Text)-    , _fvDescription :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'FieldViolation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fvField'------ * 'fvDescription'-fieldViolation-    :: FieldViolation-fieldViolation = FieldViolation' {_fvField = Nothing, _fvDescription = Nothing}----- | Path of field with violation.-fvField :: Lens' FieldViolation (Maybe Text)-fvField = lens _fvField (\ s a -> s{_fvField = a})---- | Description of the error.-fvDescription :: Lens' FieldViolation (Maybe Text)-fvDescription-  = lens _fvDescription-      (\ s a -> s{_fvDescription = a})--instance FromJSON FieldViolation where-        parseJSON-          = withObject "FieldViolation"-              (\ o ->-                 FieldViolation' <$>-                   (o .:? "field") <*> (o .:? "description"))--instance ToJSON FieldViolation where-        toJSON FieldViolation'{..}-          = object-              (catMaybes-                 [("field" .=) <$> _fvField,-                  ("description" .=) <$> _fvDescription])---- | A metaline is a list of properties that are displayed along with the--- search result to provide context.------ /See:/ 'metaline' smart constructor.-newtype Metaline =-  Metaline'-    { _mProperties :: Maybe [DisplayedProperty]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Metaline' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mProperties'-metaline-    :: Metaline-metaline = Metaline' {_mProperties = Nothing}----- | The list of displayed properties for the metaline. The maxiumum number--- of properties is 5.-mProperties :: Lens' Metaline [DisplayedProperty]-mProperties-  = lens _mProperties (\ s a -> s{_mProperties = a}) .-      _Default-      . _Coerce--instance FromJSON Metaline where-        parseJSON-          = withObject "Metaline"-              (\ o ->-                 Metaline' <$> (o .:? "properties" .!= mempty))--instance ToJSON Metaline where-        toJSON Metaline'{..}-          = object-              (catMaybes [("properties" .=) <$> _mProperties])---- | A bucket in a facet is the basic unit of operation. A bucket can--- comprise either a single value OR a contiguous range of values,--- depending on the type of the field bucketed. FacetBucket is currently--- used only for returning the response object.------ /See:/ 'facetBucket' smart constructor.-data FacetBucket =-  FacetBucket'-    { _fbValue      :: !(Maybe Value)-    , _fbCount      :: !(Maybe (Textual Int32))-    , _fbPercentage :: !(Maybe (Textual Int32))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'FacetBucket' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fbValue'------ * 'fbCount'------ * 'fbPercentage'-facetBucket-    :: FacetBucket-facetBucket =-  FacetBucket' {_fbValue = Nothing, _fbCount = Nothing, _fbPercentage = Nothing}---fbValue :: Lens' FacetBucket (Maybe Value)-fbValue = lens _fbValue (\ s a -> s{_fbValue = a})---- | Number of results that match the bucket value. Counts are only returned--- for searches when count accuracy is ensured. Can be empty.-fbCount :: Lens' FacetBucket (Maybe Int32)-fbCount-  = lens _fbCount (\ s a -> s{_fbCount = a}) .-      mapping _Coerce---- | Percent of results that match the bucket value. This value is between--- (0-100]. Percentages are returned for all searches, but are an estimate.--- Because percentages are always returned, you should render percentages--- instead of counts.-fbPercentage :: Lens' FacetBucket (Maybe Int32)-fbPercentage-  = lens _fbPercentage (\ s a -> s{_fbPercentage = a})-      . mapping _Coerce--instance FromJSON FacetBucket where-        parseJSON-          = withObject "FacetBucket"-              (\ o ->-                 FacetBucket' <$>-                   (o .:? "value") <*> (o .:? "count") <*>-                     (o .:? "percentage"))--instance ToJSON FacetBucket where-        toJSON FacetBucket'{..}-          = object-              (catMaybes-                 [("value" .=) <$> _fbValue,-                  ("count" .=) <$> _fbCount,-                  ("percentage" .=) <$> _fbPercentage])------- /See:/ 'statusDetailsItem' smart constructor.-newtype StatusDetailsItem =-  StatusDetailsItem'-    { _sdiAddtional :: HashMap Text JSONValue-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'StatusDetailsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sdiAddtional'-statusDetailsItem-    :: HashMap Text JSONValue -- ^ 'sdiAddtional'-    -> StatusDetailsItem-statusDetailsItem pSdiAddtional_ =-  StatusDetailsItem' {_sdiAddtional = _Coerce # pSdiAddtional_}----- | Properties of the object. Contains field \'type with type URL.-sdiAddtional :: Lens' StatusDetailsItem (HashMap Text JSONValue)-sdiAddtional-  = lens _sdiAddtional (\ s a -> s{_sdiAddtional = a})-      . _Coerce--instance FromJSON StatusDetailsItem where-        parseJSON-          = withObject "StatusDetailsItem"-              (\ o -> StatusDetailsItem' <$> (parseJSONObject o))--instance ToJSON StatusDetailsItem where-        toJSON = toJSON . _sdiAddtional---- | Used to provide a search operator for timestamp properties. This is--- optional. Search operators let users restrict the query to specific--- fields relevant to the type of item being searched.------ /See:/ 'timestampOperatorOptions' smart constructor.-data TimestampOperatorOptions =-  TimestampOperatorOptions'-    { _tOperatorName            :: !(Maybe Text)-    , _tLessThanOperatorName    :: !(Maybe Text)-    , _tGreaterThanOperatorName :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TimestampOperatorOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tOperatorName'------ * 'tLessThanOperatorName'------ * 'tGreaterThanOperatorName'-timestampOperatorOptions-    :: TimestampOperatorOptions-timestampOperatorOptions =-  TimestampOperatorOptions'-    { _tOperatorName = Nothing-    , _tLessThanOperatorName = Nothing-    , _tGreaterThanOperatorName = Nothing-    }----- | Indicates the operator name required in the query in order to isolate--- the timestamp property. For example, if operatorName is *closedon* and--- the property\'s name is *closeDate*, then queries like--- *closedon:\<value>* will show results only where the value of the--- property named *closeDate* matches *\<value>*. By contrast, a search--- that uses the same *\<value>* without an operator will return all items--- where *\<value>* matches the value of any String properties or text--- within the content field for the item. The operator name can only--- contain lowercase letters (a-z). The maximum length is 32 characters.-tOperatorName :: Lens' TimestampOperatorOptions (Maybe Text)-tOperatorName-  = lens _tOperatorName-      (\ s a -> s{_tOperatorName = a})---- | Indicates the operator name required in the query in order to isolate--- the timestamp property using the less-than operator. For example, if--- lessThanOperatorName is *closedbefore* and the property\'s name is--- *closeDate*, then queries like *closedbefore:\<value>* will show results--- only where the value of the property named *closeDate* is earlier than--- *\<value>*. The operator name can only contain lowercase letters (a-z).--- The maximum length is 32 characters.-tLessThanOperatorName :: Lens' TimestampOperatorOptions (Maybe Text)-tLessThanOperatorName-  = lens _tLessThanOperatorName-      (\ s a -> s{_tLessThanOperatorName = a})---- | Indicates the operator name required in the query in order to isolate--- the timestamp property using the greater-than operator. For example, if--- greaterThanOperatorName is *closedafter* and the property\'s name is--- *closeDate*, then queries like *closedafter:\<value>* will show results--- only where the value of the property named *closeDate* is later than--- *\<value>*. The operator name can only contain lowercase letters (a-z).--- The maximum length is 32 characters.-tGreaterThanOperatorName :: Lens' TimestampOperatorOptions (Maybe Text)-tGreaterThanOperatorName-  = lens _tGreaterThanOperatorName-      (\ s a -> s{_tGreaterThanOperatorName = a})--instance FromJSON TimestampOperatorOptions where-        parseJSON-          = withObject "TimestampOperatorOptions"-              (\ o ->-                 TimestampOperatorOptions' <$>-                   (o .:? "operatorName") <*>-                     (o .:? "lessThanOperatorName")-                     <*> (o .:? "greaterThanOperatorName"))--instance ToJSON TimestampOperatorOptions where-        toJSON TimestampOperatorOptions'{..}-          = object-              (catMaybes-                 [("operatorName" .=) <$> _tOperatorName,-                  ("lessThanOperatorName" .=) <$>-                    _tLessThanOperatorName,-                  ("greaterThanOperatorName" .=) <$>-                    _tGreaterThanOperatorName])---- | Used to provide a search operator for integer properties. This is--- optional. Search operators let users restrict the query to specific--- fields relevant to the type of item being searched.------ /See:/ 'integerOperatorOptions' smart constructor.-data IntegerOperatorOptions =-  IntegerOperatorOptions'-    { _iooOperatorName            :: !(Maybe Text)-    , _iooLessThanOperatorName    :: !(Maybe Text)-    , _iooGreaterThanOperatorName :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IntegerOperatorOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'iooOperatorName'------ * 'iooLessThanOperatorName'------ * 'iooGreaterThanOperatorName'-integerOperatorOptions-    :: IntegerOperatorOptions-integerOperatorOptions =-  IntegerOperatorOptions'-    { _iooOperatorName = Nothing-    , _iooLessThanOperatorName = Nothing-    , _iooGreaterThanOperatorName = Nothing-    }----- | Indicates the operator name required in the query in order to isolate--- the integer property. For example, if operatorName is *priority* and the--- property\'s name is *priorityVal*, then queries like *priority:\<value>*--- will show results only where the value of the property named--- *priorityVal* matches *\<value>*. By contrast, a search that uses the--- same *\<value>* without an operator will return all items where--- *\<value>* matches the value of any String properties or text within the--- content field for the item. The operator name can only contain lowercase--- letters (a-z). The maximum length is 32 characters.-iooOperatorName :: Lens' IntegerOperatorOptions (Maybe Text)-iooOperatorName-  = lens _iooOperatorName-      (\ s a -> s{_iooOperatorName = a})---- | Indicates the operator name required in the query in order to isolate--- the integer property using the less-than operator. For example, if--- lessThanOperatorName is *prioritybelow* and the property\'s name is--- *priorityVal*, then queries like *prioritybelow:\<value>* will show--- results only where the value of the property named *priorityVal* is less--- than *\<value>*. The operator name can only contain lowercase letters--- (a-z). The maximum length is 32 characters.-iooLessThanOperatorName :: Lens' IntegerOperatorOptions (Maybe Text)-iooLessThanOperatorName-  = lens _iooLessThanOperatorName-      (\ s a -> s{_iooLessThanOperatorName = a})---- | Indicates the operator name required in the query in order to isolate--- the integer property using the greater-than operator. For example, if--- greaterThanOperatorName is *priorityabove* and the property\'s name is--- *priorityVal*, then queries like *priorityabove:\<value>* will show--- results only where the value of the property named *priorityVal* is--- greater than *\<value>*. The operator name can only contain lowercase--- letters (a-z). The maximum length is 32 characters.-iooGreaterThanOperatorName :: Lens' IntegerOperatorOptions (Maybe Text)-iooGreaterThanOperatorName-  = lens _iooGreaterThanOperatorName-      (\ s a -> s{_iooGreaterThanOperatorName = a})--instance FromJSON IntegerOperatorOptions where-        parseJSON-          = withObject "IntegerOperatorOptions"-              (\ o ->-                 IntegerOperatorOptions' <$>-                   (o .:? "operatorName") <*>-                     (o .:? "lessThanOperatorName")-                     <*> (o .:? "greaterThanOperatorName"))--instance ToJSON IntegerOperatorOptions where-        toJSON IntegerOperatorOptions'{..}-          = object-              (catMaybes-                 [("operatorName" .=) <$> _iooOperatorName,-                  ("lessThanOperatorName" .=) <$>-                    _iooLessThanOperatorName,-                  ("greaterThanOperatorName" .=) <$>-                    _iooGreaterThanOperatorName])---- | This field does not contain anything as of now and is just used as an--- indicator that the suggest result was a phrase completion.------ /See:/ 'querySuggestion' smart constructor.-data QuerySuggestion =-  QuerySuggestion'-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'QuerySuggestion' with the minimum fields required to make a request.----querySuggestion-    :: QuerySuggestion-querySuggestion = QuerySuggestion'---instance FromJSON QuerySuggestion where-        parseJSON-          = withObject "QuerySuggestion"-              (\ o -> pure QuerySuggestion')--instance ToJSON QuerySuggestion where-        toJSON = const emptyObject------- /See:/ 'listSearchApplicationsResponse' smart constructor.-data ListSearchApplicationsResponse =-  ListSearchApplicationsResponse'-    { _lsarNextPageToken      :: !(Maybe Text)-    , _lsarSearchApplications :: !(Maybe [SearchApplication])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ListSearchApplicationsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lsarNextPageToken'------ * 'lsarSearchApplications'-listSearchApplicationsResponse-    :: ListSearchApplicationsResponse-listSearchApplicationsResponse =-  ListSearchApplicationsResponse'-    {_lsarNextPageToken = Nothing, _lsarSearchApplications = Nothing}----- | Token to retrieve the next page of results, or empty if there are no--- more results in the list.-lsarNextPageToken :: Lens' ListSearchApplicationsResponse (Maybe Text)-lsarNextPageToken-  = lens _lsarNextPageToken-      (\ s a -> s{_lsarNextPageToken = a})--lsarSearchApplications :: Lens' ListSearchApplicationsResponse [SearchApplication]-lsarSearchApplications-  = lens _lsarSearchApplications-      (\ s a -> s{_lsarSearchApplications = a})-      . _Default-      . _Coerce--instance FromJSON ListSearchApplicationsResponse-         where-        parseJSON-          = withObject "ListSearchApplicationsResponse"-              (\ o ->-                 ListSearchApplicationsResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "searchApplications" .!= mempty))--instance ToJSON ListSearchApplicationsResponse where-        toJSON ListSearchApplicationsResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _lsarNextPageToken,-                  ("searchApplications" .=) <$>-                    _lsarSearchApplications])---- | Debugging information about the result.------ /See:/ 'resultDebugInfo' smart constructor.-newtype ResultDebugInfo =-  ResultDebugInfo'-    { _rdiFormattedDebugInfo :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResultDebugInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rdiFormattedDebugInfo'-resultDebugInfo-    :: ResultDebugInfo-resultDebugInfo = ResultDebugInfo' {_rdiFormattedDebugInfo = Nothing}----- | General debug info formatted for display.-rdiFormattedDebugInfo :: Lens' ResultDebugInfo (Maybe Text)-rdiFormattedDebugInfo-  = lens _rdiFormattedDebugInfo-      (\ s a -> s{_rdiFormattedDebugInfo = a})--instance FromJSON ResultDebugInfo where-        parseJSON-          = withObject "ResultDebugInfo"-              (\ o ->-                 ResultDebugInfo' <$> (o .:? "formattedDebugInfo"))--instance ToJSON ResultDebugInfo where-        toJSON ResultDebugInfo'{..}-          = object-              (catMaybes-                 [("formattedDebugInfo" .=) <$>-                    _rdiFormattedDebugInfo])------- /See:/ 'itemCountByStatus' smart constructor.-data ItemCountByStatus =-  ItemCountByStatus'-    { _icbsCount      :: !(Maybe (Textual Int64))-    , _icbsStatusCode :: !(Maybe ItemCountByStatusStatusCode)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ItemCountByStatus' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'icbsCount'------ * 'icbsStatusCode'-itemCountByStatus-    :: ItemCountByStatus-itemCountByStatus =-  ItemCountByStatus' {_icbsCount = Nothing, _icbsStatusCode = Nothing}----- | Number of items matching the status code.-icbsCount :: Lens' ItemCountByStatus (Maybe Int64)-icbsCount-  = lens _icbsCount (\ s a -> s{_icbsCount = a}) .-      mapping _Coerce---- | Status of the items.-icbsStatusCode :: Lens' ItemCountByStatus (Maybe ItemCountByStatusStatusCode)-icbsStatusCode-  = lens _icbsStatusCode-      (\ s a -> s{_icbsStatusCode = a})--instance FromJSON ItemCountByStatus where-        parseJSON-          = withObject "ItemCountByStatus"-              (\ o ->-                 ItemCountByStatus' <$>-                   (o .:? "count") <*> (o .:? "statusCode"))--instance ToJSON ItemCountByStatus where-        toJSON ItemCountByStatus'{..}-          = object-              (catMaybes-                 [("count" .=) <$> _icbsCount,-                  ("statusCode" .=) <$> _icbsStatusCode])---- | Options for timestamp properties.------ /See:/ 'timestampPropertyOptions' smart constructor.-newtype TimestampPropertyOptions =-  TimestampPropertyOptions'-    { _tpoOperatorOptions :: Maybe TimestampOperatorOptions-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TimestampPropertyOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tpoOperatorOptions'-timestampPropertyOptions-    :: TimestampPropertyOptions-timestampPropertyOptions =-  TimestampPropertyOptions' {_tpoOperatorOptions = Nothing}----- | If set, describes how the timestamp should be used as a search operator.-tpoOperatorOptions :: Lens' TimestampPropertyOptions (Maybe TimestampOperatorOptions)-tpoOperatorOptions-  = lens _tpoOperatorOptions-      (\ s a -> s{_tpoOperatorOptions = a})--instance FromJSON TimestampPropertyOptions where-        parseJSON-          = withObject "TimestampPropertyOptions"-              (\ o ->-                 TimestampPropertyOptions' <$>-                   (o .:? "operatorOptions"))--instance ToJSON TimestampPropertyOptions where-        toJSON TimestampPropertyOptions'{..}-          = object-              (catMaybes-                 [("operatorOptions" .=) <$> _tpoOperatorOptions])---- | Result count information------ /See:/ 'resultCounts' smart constructor.-newtype ResultCounts =-  ResultCounts'-    { _rcSourceResultCounts :: Maybe [SourceResultCount]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResultCounts' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rcSourceResultCounts'-resultCounts-    :: ResultCounts-resultCounts = ResultCounts' {_rcSourceResultCounts = Nothing}----- | Result count information for each source with results.-rcSourceResultCounts :: Lens' ResultCounts [SourceResultCount]-rcSourceResultCounts-  = lens _rcSourceResultCounts-      (\ s a -> s{_rcSourceResultCounts = a})-      . _Default-      . _Coerce--instance FromJSON ResultCounts where-        parseJSON-          = withObject "ResultCounts"-              (\ o ->-                 ResultCounts' <$>-                   (o .:? "sourceResultCounts" .!= mempty))--instance ToJSON ResultCounts where-        toJSON ResultCounts'{..}-          = object-              (catMaybes-                 [("sourceResultCounts" .=) <$>-                    _rcSourceResultCounts])---- | Indicates which freshness property to use when adjusting search ranking--- for an item. Fresher, more recent dates indicate higher quality. Use the--- freshness option property that best works with your data. For fileshare--- documents, last modified time is most relevant. For calendar event data,--- the time when the event occurs is a more relevant freshness indicator.--- In this way, calendar events that occur closer to the time of the search--- query are considered higher quality and ranked accordingly.------ /See:/ 'freshnessOptions' smart constructor.-data FreshnessOptions =-  FreshnessOptions'-    { _foFreshnessDuration :: !(Maybe GDuration)-    , _foFreshnessProperty :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'FreshnessOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'foFreshnessDuration'------ * 'foFreshnessProperty'-freshnessOptions-    :: FreshnessOptions-freshnessOptions =-  FreshnessOptions'-    {_foFreshnessDuration = Nothing, _foFreshnessProperty = Nothing}----- | The duration after which an object should be considered stale. The--- default value is 180 days (in seconds).-foFreshnessDuration :: Lens' FreshnessOptions (Maybe Scientific)-foFreshnessDuration-  = lens _foFreshnessDuration-      (\ s a -> s{_foFreshnessDuration = a})-      . mapping _GDuration---- | This property indicates the freshness level of the object in the index.--- If set, this property must be a top-level property within the property--- definitions and it must be a timestamp type or date type. Otherwise, the--- Indexing API uses updateTime as the freshness indicator. The maximum--- length is 256 characters. When a property is used to calculate--- fresheness, the value defaults to 2 years from the current time.-foFreshnessProperty :: Lens' FreshnessOptions (Maybe Text)-foFreshnessProperty-  = lens _foFreshnessProperty-      (\ s a -> s{_foFreshnessProperty = a})--instance FromJSON FreshnessOptions where-        parseJSON-          = withObject "FreshnessOptions"-              (\ o ->-                 FreshnessOptions' <$>-                   (o .:? "freshnessDuration") <*>-                     (o .:? "freshnessProperty"))--instance ToJSON FreshnessOptions where-        toJSON FreshnessOptions'{..}-          = object-              (catMaybes-                 [("freshnessDuration" .=) <$> _foFreshnessDuration,-                  ("freshnessProperty" .=) <$> _foFreshnessProperty])---- | Shared request debug options for all cloudsearch RPC methods.------ /See:/ 'debugOptions' smart constructor.-newtype DebugOptions =-  DebugOptions'-    { _doEnableDebugging :: Maybe Bool-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DebugOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'doEnableDebugging'-debugOptions-    :: DebugOptions-debugOptions = DebugOptions' {_doEnableDebugging = Nothing}----- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-doEnableDebugging :: Lens' DebugOptions (Maybe Bool)-doEnableDebugging-  = lens _doEnableDebugging-      (\ s a -> s{_doEnableDebugging = a})--instance FromJSON DebugOptions where-        parseJSON-          = withObject "DebugOptions"-              (\ o -> DebugOptions' <$> (o .:? "enableDebugging"))--instance ToJSON DebugOptions where-        toJSON DebugOptions'{..}-          = object-              (catMaybes-                 [("enableDebugging" .=) <$> _doEnableDebugging])---- | Options for integer properties.------ /See:/ 'integerPropertyOptions' smart constructor.-data IntegerPropertyOptions =-  IntegerPropertyOptions'-    { _ipoMaximumValue    :: !(Maybe (Textual Int64))-    , _ipoOrderedRanking  :: !(Maybe IntegerPropertyOptionsOrderedRanking)-    , _ipoMinimumValue    :: !(Maybe (Textual Int64))-    , _ipoOperatorOptions :: !(Maybe IntegerOperatorOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IntegerPropertyOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ipoMaximumValue'------ * 'ipoOrderedRanking'------ * 'ipoMinimumValue'------ * 'ipoOperatorOptions'-integerPropertyOptions-    :: IntegerPropertyOptions-integerPropertyOptions =-  IntegerPropertyOptions'-    { _ipoMaximumValue = Nothing-    , _ipoOrderedRanking = Nothing-    , _ipoMinimumValue = Nothing-    , _ipoOperatorOptions = Nothing-    }----- | The maximum value of the property. The minimum and maximum values for--- the property are used to rank results according to the ordered ranking.--- Indexing requests with values greater than the maximum are accepted and--- ranked with the same weight as items indexed with the maximum value.-ipoMaximumValue :: Lens' IntegerPropertyOptions (Maybe Int64)-ipoMaximumValue-  = lens _ipoMaximumValue-      (\ s a -> s{_ipoMaximumValue = a})-      . mapping _Coerce---- | Used to specify the ordered ranking for the integer. Can only be used if--- isRepeatable is false.-ipoOrderedRanking :: Lens' IntegerPropertyOptions (Maybe IntegerPropertyOptionsOrderedRanking)-ipoOrderedRanking-  = lens _ipoOrderedRanking-      (\ s a -> s{_ipoOrderedRanking = a})---- | The minimum value of the property. The minimum and maximum values for--- the property are used to rank results according to the ordered ranking.--- Indexing requests with values less than the minimum are accepted and--- ranked with the same weight as items indexed with the minimum value.-ipoMinimumValue :: Lens' IntegerPropertyOptions (Maybe Int64)-ipoMinimumValue-  = lens _ipoMinimumValue-      (\ s a -> s{_ipoMinimumValue = a})-      . mapping _Coerce---- | If set, describes how the integer should be used as a search operator.-ipoOperatorOptions :: Lens' IntegerPropertyOptions (Maybe IntegerOperatorOptions)-ipoOperatorOptions-  = lens _ipoOperatorOptions-      (\ s a -> s{_ipoOperatorOptions = a})--instance FromJSON IntegerPropertyOptions where-        parseJSON-          = withObject "IntegerPropertyOptions"-              (\ o ->-                 IntegerPropertyOptions' <$>-                   (o .:? "maximumValue") <*> (o .:? "orderedRanking")-                     <*> (o .:? "minimumValue")-                     <*> (o .:? "operatorOptions"))--instance ToJSON IntegerPropertyOptions where-        toJSON IntegerPropertyOptions'{..}-          = object-              (catMaybes-                 [("maximumValue" .=) <$> _ipoMaximumValue,-                  ("orderedRanking" .=) <$> _ipoOrderedRanking,-                  ("minimumValue" .=) <$> _ipoMinimumValue,-                  ("operatorOptions" .=) <$> _ipoOperatorOptions])---- | Restriction on Datasource.------ /See:/ 'dataSourceRestriction' smart constructor.-data DataSourceRestriction =-  DataSourceRestriction'-    { _dsrFilterOptions :: !(Maybe [FilterOptions])-    , _dsrSource        :: !(Maybe Source)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DataSourceRestriction' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsrFilterOptions'------ * 'dsrSource'-dataSourceRestriction-    :: DataSourceRestriction-dataSourceRestriction =-  DataSourceRestriction' {_dsrFilterOptions = Nothing, _dsrSource = Nothing}----- | Filter options restricting the results. If multiple filters are present,--- they are grouped by object type before joining. Filters with the same--- object type are joined conjunctively, then the resulting expressions are--- joined disjunctively. The maximum number of elements is 20. NOTE:--- Suggest API supports only few filters at the moment: \"objecttype\",--- \"type\" and \"mimetype\". For now, schema specific filters cannot be--- used to filter suggestions.-dsrFilterOptions :: Lens' DataSourceRestriction [FilterOptions]-dsrFilterOptions-  = lens _dsrFilterOptions-      (\ s a -> s{_dsrFilterOptions = a})-      . _Default-      . _Coerce---- | The source of restriction.-dsrSource :: Lens' DataSourceRestriction (Maybe Source)-dsrSource-  = lens _dsrSource (\ s a -> s{_dsrSource = a})--instance FromJSON DataSourceRestriction where-        parseJSON-          = withObject "DataSourceRestriction"-              (\ o ->-                 DataSourceRestriction' <$>-                   (o .:? "filterOptions" .!= mempty) <*>-                     (o .:? "source"))--instance ToJSON DataSourceRestriction where-        toJSON DataSourceRestriction'{..}-          = object-              (catMaybes-                 [("filterOptions" .=) <$> _dsrFilterOptions,-                  ("source" .=) <$> _dsrSource])---- | The schema definition for a data source.------ /See:/ 'schema' smart constructor.-data Schema =-  Schema'-    { _sObjectDefinitions :: !(Maybe [ObjectDefinition])-    , _sOperationIds      :: !(Maybe [Text])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Schema' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sObjectDefinitions'------ * 'sOperationIds'-schema-    :: Schema-schema = Schema' {_sObjectDefinitions = Nothing, _sOperationIds = Nothing}----- | The list of top-level objects for the data source. The maximum number of--- elements is 10.-sObjectDefinitions :: Lens' Schema [ObjectDefinition]-sObjectDefinitions-  = lens _sObjectDefinitions-      (\ s a -> s{_sObjectDefinitions = a})-      . _Default-      . _Coerce---- | IDs of the Long Running Operations (LROs) currently running for this--- schema. After modifying the schema, wait for operations to complete--- before indexing additional content.-sOperationIds :: Lens' Schema [Text]-sOperationIds-  = lens _sOperationIds-      (\ s a -> s{_sOperationIds = a})-      . _Default-      . _Coerce--instance FromJSON Schema where-        parseJSON-          = withObject "Schema"-              (\ o ->-                 Schema' <$>-                   (o .:? "objectDefinitions" .!= mempty) <*>-                     (o .:? "operationIds" .!= mempty))--instance ToJSON Schema where-        toJSON Schema'{..}-          = object-              (catMaybes-                 [("objectDefinitions" .=) <$> _sObjectDefinitions,-                  ("operationIds" .=) <$> _sOperationIds])---- | The time span search restrict (e.g. \"after:2017-09-11--- before:2017-09-12\").------ /See:/ 'driveTimeSpanRestrict' smart constructor.-newtype DriveTimeSpanRestrict =-  DriveTimeSpanRestrict'-    { _dtsrType :: Maybe DriveTimeSpanRestrictType-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DriveTimeSpanRestrict' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dtsrType'-driveTimeSpanRestrict-    :: DriveTimeSpanRestrict-driveTimeSpanRestrict = DriveTimeSpanRestrict' {_dtsrType = Nothing}---dtsrType :: Lens' DriveTimeSpanRestrict (Maybe DriveTimeSpanRestrictType)-dtsrType = lens _dtsrType (\ s a -> s{_dtsrType = a})--instance FromJSON DriveTimeSpanRestrict where-        parseJSON-          = withObject "DriveTimeSpanRestrict"-              (\ o -> DriveTimeSpanRestrict' <$> (o .:? "type"))--instance ToJSON DriveTimeSpanRestrict where-        toJSON DriveTimeSpanRestrict'{..}-          = object (catMaybes [("type" .=) <$> _dtsrType])---- | Display Fields for Search Results------ /See:/ 'resultDisplayField' smart constructor.-data ResultDisplayField =-  ResultDisplayField'-    { _rdfProperty     :: !(Maybe NamedProperty)-    , _rdfOperatorName :: !(Maybe Text)-    , _rdfLabel        :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResultDisplayField' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rdfProperty'------ * 'rdfOperatorName'------ * 'rdfLabel'-resultDisplayField-    :: ResultDisplayField-resultDisplayField =-  ResultDisplayField'-    {_rdfProperty = Nothing, _rdfOperatorName = Nothing, _rdfLabel = Nothing}----- | The name value pair for the property.-rdfProperty :: Lens' ResultDisplayField (Maybe NamedProperty)-rdfProperty-  = lens _rdfProperty (\ s a -> s{_rdfProperty = a})---- | The operator name of the property.-rdfOperatorName :: Lens' ResultDisplayField (Maybe Text)-rdfOperatorName-  = lens _rdfOperatorName-      (\ s a -> s{_rdfOperatorName = a})---- | The display label for the property.-rdfLabel :: Lens' ResultDisplayField (Maybe Text)-rdfLabel = lens _rdfLabel (\ s a -> s{_rdfLabel = a})--instance FromJSON ResultDisplayField where-        parseJSON-          = withObject "ResultDisplayField"-              (\ o ->-                 ResultDisplayField' <$>-                   (o .:? "property") <*> (o .:? "operatorName") <*>-                     (o .:? "label"))--instance ToJSON ResultDisplayField where-        toJSON ResultDisplayField'{..}-          = object-              (catMaybes-                 [("property" .=) <$> _rdfProperty,-                  ("operatorName" .=) <$> _rdfOperatorName,-                  ("label" .=) <$> _rdfLabel])------- /See:/ 'updateSchemaRequest' smart constructor.-data UpdateSchemaRequest =-  UpdateSchemaRequest'-    { _usrValidateOnly :: !(Maybe Bool)-    , _usrSchema       :: !(Maybe Schema)-    , _usrDebugOptions :: !(Maybe DebugOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateSchemaRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'usrValidateOnly'------ * 'usrSchema'------ * 'usrDebugOptions'-updateSchemaRequest-    :: UpdateSchemaRequest-updateSchemaRequest =-  UpdateSchemaRequest'-    { _usrValidateOnly = Nothing-    , _usrSchema = Nothing-    , _usrDebugOptions = Nothing-    }----- | If true, the request will be validated without side effects.-usrValidateOnly :: Lens' UpdateSchemaRequest (Maybe Bool)-usrValidateOnly-  = lens _usrValidateOnly-      (\ s a -> s{_usrValidateOnly = a})---- | The new schema for the source.-usrSchema :: Lens' UpdateSchemaRequest (Maybe Schema)-usrSchema-  = lens _usrSchema (\ s a -> s{_usrSchema = a})---- | Common debug options.-usrDebugOptions :: Lens' UpdateSchemaRequest (Maybe DebugOptions)-usrDebugOptions-  = lens _usrDebugOptions-      (\ s a -> s{_usrDebugOptions = a})--instance FromJSON UpdateSchemaRequest where-        parseJSON-          = withObject "UpdateSchemaRequest"-              (\ o ->-                 UpdateSchemaRequest' <$>-                   (o .:? "validateOnly") <*> (o .:? "schema") <*>-                     (o .:? "debugOptions"))--instance ToJSON UpdateSchemaRequest where-        toJSON UpdateSchemaRequest'{..}-          = object-              (catMaybes-                 [("validateOnly" .=) <$> _usrValidateOnly,-                  ("schema" .=) <$> _usrSchema,-                  ("debugOptions" .=) <$> _usrDebugOptions])---- | Represents a whole calendar date, for example a date of birth. The time--- of day and time zone are either specified elsewhere or are not--- significant. The date is relative to the [Proleptic Gregorian--- Calendar](https:\/\/en.wikipedia.org\/wiki\/Proleptic_Gregorian_calendar).--- The date must be a valid calendar date between the year 1 and 9999.------ /See:/ 'date' smart constructor.-data Date =-  Date'-    { _dDay   :: !(Maybe (Textual Int32))-    , _dYear  :: !(Maybe (Textual Int32))-    , _dMonth :: !(Maybe (Textual Int32))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Date' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dDay'------ * 'dYear'------ * 'dMonth'-date-    :: Date-date = Date' {_dDay = Nothing, _dYear = Nothing, _dMonth = Nothing}----- | Day of month. Must be from 1 to 31 and valid for the year and month.-dDay :: Lens' Date (Maybe Int32)-dDay-  = lens _dDay (\ s a -> s{_dDay = a}) .-      mapping _Coerce---- | Year of date. Must be from 1 to 9999.-dYear :: Lens' Date (Maybe Int32)-dYear-  = lens _dYear (\ s a -> s{_dYear = a}) .-      mapping _Coerce---- | Month of date. Must be from 1 to 12.-dMonth :: Lens' Date (Maybe Int32)-dMonth-  = lens _dMonth (\ s a -> s{_dMonth = a}) .-      mapping _Coerce--instance FromJSON Date where-        parseJSON-          = withObject "Date"-              (\ o ->-                 Date' <$>-                   (o .:? "day") <*> (o .:? "year") <*> (o .:? "month"))--instance ToJSON Date where-        toJSON Date'{..}-          = object-              (catMaybes-                 [("day" .=) <$> _dDay, ("year" .=) <$> _dYear,-                  ("month" .=) <$> _dMonth])---- | A reference to a top-level property within the object that should be--- displayed in search results. The values of the chosen properties will be--- displayed in the search results along with the dislpay label for that--- property if one is specified. If a display label is not specified, only--- the values will be shown.------ /See:/ 'displayedProperty' smart constructor.-newtype DisplayedProperty =-  DisplayedProperty'-    { _dpPropertyName :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DisplayedProperty' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dpPropertyName'-displayedProperty-    :: DisplayedProperty-displayedProperty = DisplayedProperty' {_dpPropertyName = Nothing}----- | The name of the top-level property as defined in a property definition--- for the object. If the name is not a defined property in the schema, an--- error will be given when attempting to update the schema.-dpPropertyName :: Lens' DisplayedProperty (Maybe Text)-dpPropertyName-  = lens _dpPropertyName-      (\ s a -> s{_dpPropertyName = a})--instance FromJSON DisplayedProperty where-        parseJSON-          = withObject "DisplayedProperty"-              (\ o ->-                 DisplayedProperty' <$> (o .:? "propertyName"))--instance ToJSON DisplayedProperty where-        toJSON DisplayedProperty'{..}-          = object-              (catMaybes [("propertyName" .=) <$> _dpPropertyName])---- | Source specific facet response------ /See:/ 'facetResult' smart constructor.-data FacetResult =-  FacetResult'-    { _frSourceName   :: !(Maybe Text)-    , _frBuckets      :: !(Maybe [FacetBucket])-    , _frObjectType   :: !(Maybe Text)-    , _frOperatorName :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'FacetResult' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'frSourceName'------ * 'frBuckets'------ * 'frObjectType'------ * 'frOperatorName'-facetResult-    :: FacetResult-facetResult =-  FacetResult'-    { _frSourceName = Nothing-    , _frBuckets = Nothing-    , _frObjectType = Nothing-    , _frOperatorName = Nothing-    }----- | Source name for which facet results are returned. Will not be empty.-frSourceName :: Lens' FacetResult (Maybe Text)-frSourceName-  = lens _frSourceName (\ s a -> s{_frSourceName = a})---- | FacetBuckets for values in response containing at least a single result.-frBuckets :: Lens' FacetResult [FacetBucket]-frBuckets-  = lens _frBuckets (\ s a -> s{_frBuckets = a}) .-      _Default-      . _Coerce---- | Object type for which facet results are returned. Can be empty.-frObjectType :: Lens' FacetResult (Maybe Text)-frObjectType-  = lens _frObjectType (\ s a -> s{_frObjectType = a})---- | Name of the operator chosen for faceting. \'see--- cloudsearch.SchemaPropertyOptions-frOperatorName :: Lens' FacetResult (Maybe Text)-frOperatorName-  = lens _frOperatorName-      (\ s a -> s{_frOperatorName = a})--instance FromJSON FacetResult where-        parseJSON-          = withObject "FacetResult"-              (\ o ->-                 FacetResult' <$>-                   (o .:? "sourceName") <*> (o .:? "buckets" .!= mempty)-                     <*> (o .:? "objectType")-                     <*> (o .:? "operatorName"))--instance ToJSON FacetResult where-        toJSON FacetResult'{..}-          = object-              (catMaybes-                 [("sourceName" .=) <$> _frSourceName,-                  ("buckets" .=) <$> _frBuckets,-                  ("objectType" .=) <$> _frObjectType,-                  ("operatorName" .=) <$> _frOperatorName])---- | Drive mime-type search restricts (e.g. \"type:pdf\").------ /See:/ 'driveMimeTypeRestrict' smart constructor.-newtype DriveMimeTypeRestrict =-  DriveMimeTypeRestrict'-    { _dmtrType :: Maybe DriveMimeTypeRestrictType-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DriveMimeTypeRestrict' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dmtrType'-driveMimeTypeRestrict-    :: DriveMimeTypeRestrict-driveMimeTypeRestrict = DriveMimeTypeRestrict' {_dmtrType = Nothing}---dmtrType :: Lens' DriveMimeTypeRestrict (Maybe DriveMimeTypeRestrictType)-dmtrType = lens _dmtrType (\ s a -> s{_dmtrType = a})--instance FromJSON DriveMimeTypeRestrict where-        parseJSON-          = withObject "DriveMimeTypeRestrict"-              (\ o -> DriveMimeTypeRestrict' <$> (o .:? "type"))--instance ToJSON DriveMimeTypeRestrict where-        toJSON DriveMimeTypeRestrict'{..}-          = object (catMaybes [("type" .=) <$> _dmtrType])---- | A structured data object consisting of named properties.------ /See:/ 'structuredDataObject' smart constructor.-newtype StructuredDataObject =-  StructuredDataObject'-    { _sdoProperties :: Maybe [NamedProperty]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'StructuredDataObject' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sdoProperties'-structuredDataObject-    :: StructuredDataObject-structuredDataObject = StructuredDataObject' {_sdoProperties = Nothing}----- | The properties for the object. The maximum number of elements is 1000.-sdoProperties :: Lens' StructuredDataObject [NamedProperty]-sdoProperties-  = lens _sdoProperties-      (\ s a -> s{_sdoProperties = a})-      . _Default-      . _Coerce--instance FromJSON StructuredDataObject where-        parseJSON-          = withObject "StructuredDataObject"-              (\ o ->-                 StructuredDataObject' <$>-                   (o .:? "properties" .!= mempty))--instance ToJSON StructuredDataObject where-        toJSON StructuredDataObject'{..}-          = object-              (catMaybes [("properties" .=) <$> _sdoProperties])---- | Media resource.------ /See:/ 'media' smart constructor.-newtype Media =-  Media'-    { _mResourceName :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Media' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mResourceName'-media-    :: Media-media = Media' {_mResourceName = Nothing}----- | Name of the media resource.-mResourceName :: Lens' Media (Maybe Text)-mResourceName-  = lens _mResourceName-      (\ s a -> s{_mResourceName = a})--instance FromJSON Media where-        parseJSON-          = withObject "Media"-              (\ o -> Media' <$> (o .:? "resourceName"))--instance ToJSON Media where-        toJSON Media'{..}-          = object-              (catMaybes [("resourceName" .=) <$> _mResourceName])---- | Available structured data fields for the item.------ /See:/ 'itemStructuredData' smart constructor.-data ItemStructuredData =-  ItemStructuredData'-    { _isdHash   :: !(Maybe Text)-    , _isdObject :: !(Maybe StructuredDataObject)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ItemStructuredData' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'isdHash'------ * 'isdObject'-itemStructuredData-    :: ItemStructuredData-itemStructuredData =-  ItemStructuredData' {_isdHash = Nothing, _isdObject = Nothing}----- | Hashing value provided by the API caller. This can be used with the--- items.push method to calculate modified state. The maximum length is--- 2048 characters.-isdHash :: Lens' ItemStructuredData (Maybe Text)-isdHash = lens _isdHash (\ s a -> s{_isdHash = a})---- | The structured data object that should conform to a registered object--- definition in the schema for the data source.-isdObject :: Lens' ItemStructuredData (Maybe StructuredDataObject)-isdObject-  = lens _isdObject (\ s a -> s{_isdObject = a})--instance FromJSON ItemStructuredData where-        parseJSON-          = withObject "ItemStructuredData"-              (\ o ->-                 ItemStructuredData' <$>-                   (o .:? "hash") <*> (o .:? "object"))--instance ToJSON ItemStructuredData where-        toJSON ItemStructuredData'{..}-          = object-              (catMaybes-                 [("hash" .=) <$> _isdHash,-                  ("object" .=) <$> _isdObject])---- | Drive follow-up search restricts (e.g. \"followup:suggestions\").------ /See:/ 'driveFollowUpRestrict' smart constructor.-newtype DriveFollowUpRestrict =-  DriveFollowUpRestrict'-    { _dfurType :: Maybe DriveFollowUpRestrictType-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DriveFollowUpRestrict' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dfurType'-driveFollowUpRestrict-    :: DriveFollowUpRestrict-driveFollowUpRestrict = DriveFollowUpRestrict' {_dfurType = Nothing}---dfurType :: Lens' DriveFollowUpRestrict (Maybe DriveFollowUpRestrictType)-dfurType = lens _dfurType (\ s a -> s{_dfurType = a})--instance FromJSON DriveFollowUpRestrict where-        parseJSON-          = withObject "DriveFollowUpRestrict"-              (\ o -> DriveFollowUpRestrict' <$> (o .:? "type"))--instance ToJSON DriveFollowUpRestrict where-        toJSON DriveFollowUpRestrict'{..}-          = object (catMaybes [("type" .=) <$> _dfurType])---- | List of date values.------ /See:/ 'dateValues' smart constructor.-newtype DateValues =-  DateValues'-    { _dValues :: Maybe [Date]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DateValues' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dValues'-dateValues-    :: DateValues-dateValues = DateValues' {_dValues = Nothing}---dValues :: Lens' DateValues [Date]-dValues-  = lens _dValues (\ s a -> s{_dValues = a}) . _Default-      . _Coerce--instance FromJSON DateValues where-        parseJSON-          = withObject "DateValues"-              (\ o -> DateValues' <$> (o .:? "values" .!= mempty))--instance ToJSON DateValues where-        toJSON DateValues'{..}-          = object (catMaybes [("values" .=) <$> _dValues])---- | A typed name-value pair for structured data. The type of the value--- should be the same as the registered type for the \`name\` property in--- the object definition of \`objectType\`.------ /See:/ 'namedProperty' smart constructor.-data NamedProperty =-  NamedProperty'-    { _npDoubleValues    :: !(Maybe DoubleValues)-    , _npTextValues      :: !(Maybe TextValues)-    , _npDateValues      :: !(Maybe DateValues)-    , _npName            :: !(Maybe Text)-    , _npBooleanValue    :: !(Maybe Bool)-    , _npObjectValues    :: !(Maybe ObjectValues)-    , _npHTMLValues      :: !(Maybe HTMLValues)-    , _npEnumValues      :: !(Maybe EnumValues)-    , _npTimestampValues :: !(Maybe TimestampValues)-    , _npIntegerValues   :: !(Maybe IntegerValues)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'NamedProperty' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'npDoubleValues'------ * 'npTextValues'------ * 'npDateValues'------ * 'npName'------ * 'npBooleanValue'------ * 'npObjectValues'------ * 'npHTMLValues'------ * 'npEnumValues'------ * 'npTimestampValues'------ * 'npIntegerValues'-namedProperty-    :: NamedProperty-namedProperty =-  NamedProperty'-    { _npDoubleValues = Nothing-    , _npTextValues = Nothing-    , _npDateValues = Nothing-    , _npName = Nothing-    , _npBooleanValue = Nothing-    , _npObjectValues = Nothing-    , _npHTMLValues = Nothing-    , _npEnumValues = Nothing-    , _npTimestampValues = Nothing-    , _npIntegerValues = Nothing-    }---npDoubleValues :: Lens' NamedProperty (Maybe DoubleValues)-npDoubleValues-  = lens _npDoubleValues-      (\ s a -> s{_npDoubleValues = a})--npTextValues :: Lens' NamedProperty (Maybe TextValues)-npTextValues-  = lens _npTextValues (\ s a -> s{_npTextValues = a})--npDateValues :: Lens' NamedProperty (Maybe DateValues)-npDateValues-  = lens _npDateValues (\ s a -> s{_npDateValues = a})---- | The name of the property. This name should correspond to the name of the--- property that was registered for object definition in the schema. The--- maximum allowable length for this property is 256 characters.-npName :: Lens' NamedProperty (Maybe Text)-npName = lens _npName (\ s a -> s{_npName = a})--npBooleanValue :: Lens' NamedProperty (Maybe Bool)-npBooleanValue-  = lens _npBooleanValue-      (\ s a -> s{_npBooleanValue = a})--npObjectValues :: Lens' NamedProperty (Maybe ObjectValues)-npObjectValues-  = lens _npObjectValues-      (\ s a -> s{_npObjectValues = a})--npHTMLValues :: Lens' NamedProperty (Maybe HTMLValues)-npHTMLValues-  = lens _npHTMLValues (\ s a -> s{_npHTMLValues = a})--npEnumValues :: Lens' NamedProperty (Maybe EnumValues)-npEnumValues-  = lens _npEnumValues (\ s a -> s{_npEnumValues = a})--npTimestampValues :: Lens' NamedProperty (Maybe TimestampValues)-npTimestampValues-  = lens _npTimestampValues-      (\ s a -> s{_npTimestampValues = a})--npIntegerValues :: Lens' NamedProperty (Maybe IntegerValues)-npIntegerValues-  = lens _npIntegerValues-      (\ s a -> s{_npIntegerValues = a})--instance FromJSON NamedProperty where-        parseJSON-          = withObject "NamedProperty"-              (\ o ->-                 NamedProperty' <$>-                   (o .:? "doubleValues") <*> (o .:? "textValues") <*>-                     (o .:? "dateValues")-                     <*> (o .:? "name")-                     <*> (o .:? "booleanValue")-                     <*> (o .:? "objectValues")-                     <*> (o .:? "htmlValues")-                     <*> (o .:? "enumValues")-                     <*> (o .:? "timestampValues")-                     <*> (o .:? "integerValues"))--instance ToJSON NamedProperty where-        toJSON NamedProperty'{..}-          = object-              (catMaybes-                 [("doubleValues" .=) <$> _npDoubleValues,-                  ("textValues" .=) <$> _npTextValues,-                  ("dateValues" .=) <$> _npDateValues,-                  ("name" .=) <$> _npName,-                  ("booleanValue" .=) <$> _npBooleanValue,-                  ("objectValues" .=) <$> _npObjectValues,-                  ("htmlValues" .=) <$> _npHTMLValues,-                  ("enumValues" .=) <$> _npEnumValues,-                  ("timestampValues" .=) <$> _npTimestampValues,-                  ("integerValues" .=) <$> _npIntegerValues])---- | Matched range of a snippet [start, end).------ /See:/ 'matchRange' smart constructor.-data MatchRange =-  MatchRange'-    { _mrStart :: !(Maybe (Textual Int32))-    , _mrEnd   :: !(Maybe (Textual Int32))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MatchRange' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mrStart'------ * 'mrEnd'-matchRange-    :: MatchRange-matchRange = MatchRange' {_mrStart = Nothing, _mrEnd = Nothing}----- | Starting position of the match in the snippet.-mrStart :: Lens' MatchRange (Maybe Int32)-mrStart-  = lens _mrStart (\ s a -> s{_mrStart = a}) .-      mapping _Coerce---- | End of the match in the snippet.-mrEnd :: Lens' MatchRange (Maybe Int32)-mrEnd-  = lens _mrEnd (\ s a -> s{_mrEnd = a}) .-      mapping _Coerce--instance FromJSON MatchRange where-        parseJSON-          = withObject "MatchRange"-              (\ o ->-                 MatchRange' <$> (o .:? "start") <*> (o .:? "end"))--instance ToJSON MatchRange where-        toJSON MatchRange'{..}-          = object-              (catMaybes-                 [("start" .=) <$> _mrStart, ("end" .=) <$> _mrEnd])---- | Debugging information about the response.------ /See:/ 'responseDebugInfo' smart constructor.-newtype ResponseDebugInfo =-  ResponseDebugInfo'-    { _rFormattedDebugInfo :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResponseDebugInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rFormattedDebugInfo'-responseDebugInfo-    :: ResponseDebugInfo-responseDebugInfo = ResponseDebugInfo' {_rFormattedDebugInfo = Nothing}----- | General debug info formatted for display.-rFormattedDebugInfo :: Lens' ResponseDebugInfo (Maybe Text)-rFormattedDebugInfo-  = lens _rFormattedDebugInfo-      (\ s a -> s{_rFormattedDebugInfo = a})--instance FromJSON ResponseDebugInfo where-        parseJSON-          = withObject "ResponseDebugInfo"-              (\ o ->-                 ResponseDebugInfo' <$> (o .:? "formattedDebugInfo"))--instance ToJSON ResponseDebugInfo where-        toJSON ResponseDebugInfo'{..}-          = object-              (catMaybes-                 [("formattedDebugInfo" .=) <$> _rFormattedDebugInfo])------- /See:/ 'listDataSourceResponse' smart constructor.-data ListDataSourceResponse =-  ListDataSourceResponse'-    { _ldsrNextPageToken :: !(Maybe Text)-    , _ldsrSources       :: !(Maybe [DataSource])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ListDataSourceResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ldsrNextPageToken'------ * 'ldsrSources'-listDataSourceResponse-    :: ListDataSourceResponse-listDataSourceResponse =-  ListDataSourceResponse' {_ldsrNextPageToken = Nothing, _ldsrSources = Nothing}----- | Token to retrieve the next page of results, or empty if there are no--- more results in the list.-ldsrNextPageToken :: Lens' ListDataSourceResponse (Maybe Text)-ldsrNextPageToken-  = lens _ldsrNextPageToken-      (\ s a -> s{_ldsrNextPageToken = a})--ldsrSources :: Lens' ListDataSourceResponse [DataSource]-ldsrSources-  = lens _ldsrSources (\ s a -> s{_ldsrSources = a}) .-      _Default-      . _Coerce--instance FromJSON ListDataSourceResponse where-        parseJSON-          = withObject "ListDataSourceResponse"-              (\ o ->-                 ListDataSourceResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "sources" .!= mempty))--instance ToJSON ListDataSourceResponse where-        toJSON ListDataSourceResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _ldsrNextPageToken,-                  ("sources" .=) <$> _ldsrSources])---- | The search API request.------ /See:/ 'searchRequest' smart constructor.-data SearchRequest =-  SearchRequest'-    { _srSortOptions                :: !(Maybe SortOptions)-    , _srDataSourceRestrictions     :: !(Maybe [DataSourceRestriction])-    , _srQueryInterpretationOptions :: !(Maybe QueryInterpretationOptions)-    , _srStart                      :: !(Maybe (Textual Int32))-    , _srQuery                      :: !(Maybe Text)-    , _srFacetOptions               :: !(Maybe [FacetOptions])-    , _srPageSize                   :: !(Maybe (Textual Int32))-    , _srRequestOptions             :: !(Maybe RequestOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SearchRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'srSortOptions'------ * 'srDataSourceRestrictions'------ * 'srQueryInterpretationOptions'------ * 'srStart'------ * 'srQuery'------ * 'srFacetOptions'------ * 'srPageSize'------ * 'srRequestOptions'-searchRequest-    :: SearchRequest-searchRequest =-  SearchRequest'-    { _srSortOptions = Nothing-    , _srDataSourceRestrictions = Nothing-    , _srQueryInterpretationOptions = Nothing-    , _srStart = Nothing-    , _srQuery = Nothing-    , _srFacetOptions = Nothing-    , _srPageSize = Nothing-    , _srRequestOptions = Nothing-    }----- | The options for sorting the search results-srSortOptions :: Lens' SearchRequest (Maybe SortOptions)-srSortOptions-  = lens _srSortOptions-      (\ s a -> s{_srSortOptions = a})---- | The sources to use for querying. If not specified, all data sources from--- the current search application are used.-srDataSourceRestrictions :: Lens' SearchRequest [DataSourceRestriction]-srDataSourceRestrictions-  = lens _srDataSourceRestrictions-      (\ s a -> s{_srDataSourceRestrictions = a})-      . _Default-      . _Coerce---- | Options to interpret the user query.-srQueryInterpretationOptions :: Lens' SearchRequest (Maybe QueryInterpretationOptions)-srQueryInterpretationOptions-  = lens _srQueryInterpretationOptions-      (\ s a -> s{_srQueryInterpretationOptions = a})---- | Starting index of the results.-srStart :: Lens' SearchRequest (Maybe Int32)-srStart-  = lens _srStart (\ s a -> s{_srStart = a}) .-      mapping _Coerce---- | The raw query string. See supported search operators in the [Cloud--- search Cheat--- Sheet](https:\/\/gsuite.google.com\/learning-center\/products\/cloudsearch\/cheat-sheet\/)-srQuery :: Lens' SearchRequest (Maybe Text)-srQuery = lens _srQuery (\ s a -> s{_srQuery = a})--srFacetOptions :: Lens' SearchRequest [FacetOptions]-srFacetOptions-  = lens _srFacetOptions-      (\ s a -> s{_srFacetOptions = a})-      . _Default-      . _Coerce---- | Maximum number of search results to return in one page. Valid values are--- between 1 and 100, inclusive. Default value is 10.-srPageSize :: Lens' SearchRequest (Maybe Int32)-srPageSize-  = lens _srPageSize (\ s a -> s{_srPageSize = a}) .-      mapping _Coerce---- | Request options, such as the search application and user timezone.-srRequestOptions :: Lens' SearchRequest (Maybe RequestOptions)-srRequestOptions-  = lens _srRequestOptions-      (\ s a -> s{_srRequestOptions = a})--instance FromJSON SearchRequest where-        parseJSON-          = withObject "SearchRequest"-              (\ o ->-                 SearchRequest' <$>-                   (o .:? "sortOptions") <*>-                     (o .:? "dataSourceRestrictions" .!= mempty)-                     <*> (o .:? "queryInterpretationOptions")-                     <*> (o .:? "start")-                     <*> (o .:? "query")-                     <*> (o .:? "facetOptions" .!= mempty)-                     <*> (o .:? "pageSize")-                     <*> (o .:? "requestOptions"))--instance ToJSON SearchRequest where-        toJSON SearchRequest'{..}-          = object-              (catMaybes-                 [("sortOptions" .=) <$> _srSortOptions,-                  ("dataSourceRestrictions" .=) <$>-                    _srDataSourceRestrictions,-                  ("queryInterpretationOptions" .=) <$>-                    _srQueryInterpretationOptions,-                  ("start" .=) <$> _srStart, ("query" .=) <$> _srQuery,-                  ("facetOptions" .=) <$> _srFacetOptions,-                  ("pageSize" .=) <$> _srPageSize,-                  ("requestOptions" .=) <$> _srRequestOptions])---- | A person\'s name.------ /See:/ 'name' smart constructor.-newtype Name =-  Name'-    { _nDisplayName :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Name' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'nDisplayName'-name-    :: Name-name = Name' {_nDisplayName = Nothing}----- | The read-only display name formatted according to the locale specified--- by the viewer\'s account or the 'Accept-Language' HTTP header.-nDisplayName :: Lens' Name (Maybe Text)-nDisplayName-  = lens _nDisplayName (\ s a -> s{_nDisplayName = a})--instance FromJSON Name where-        parseJSON-          = withObject "Name"-              (\ o -> Name' <$> (o .:? "displayName"))--instance ToJSON Name where-        toJSON Name'{..}-          = object-              (catMaybes [("displayName" .=) <$> _nDisplayName])---- | Per source result count information.------ /See:/ 'sourceResultCount' smart constructor.-data SourceResultCount =-  SourceResultCount'-    { _srcHasMoreResults      :: !(Maybe Bool)-    , _srcResultCountExact    :: !(Maybe (Textual Int64))-    , _srcResultCountEstimate :: !(Maybe (Textual Int64))-    , _srcSource              :: !(Maybe Source)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SourceResultCount' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'srcHasMoreResults'------ * 'srcResultCountExact'------ * 'srcResultCountEstimate'------ * 'srcSource'-sourceResultCount-    :: SourceResultCount-sourceResultCount =-  SourceResultCount'-    { _srcHasMoreResults = Nothing-    , _srcResultCountExact = Nothing-    , _srcResultCountEstimate = Nothing-    , _srcSource = Nothing-    }----- | Whether there are more search results for this source.-srcHasMoreResults :: Lens' SourceResultCount (Maybe Bool)-srcHasMoreResults-  = lens _srcHasMoreResults-      (\ s a -> s{_srcHasMoreResults = a})---- | The exact result count for this source.-srcResultCountExact :: Lens' SourceResultCount (Maybe Int64)-srcResultCountExact-  = lens _srcResultCountExact-      (\ s a -> s{_srcResultCountExact = a})-      . mapping _Coerce---- | The estimated result count for this source.-srcResultCountEstimate :: Lens' SourceResultCount (Maybe Int64)-srcResultCountEstimate-  = lens _srcResultCountEstimate-      (\ s a -> s{_srcResultCountEstimate = a})-      . mapping _Coerce---- | The source the result count information is associated with.-srcSource :: Lens' SourceResultCount (Maybe Source)-srcSource-  = lens _srcSource (\ s a -> s{_srcSource = a})--instance FromJSON SourceResultCount where-        parseJSON-          = withObject "SourceResultCount"-              (\ o ->-                 SourceResultCount' <$>-                   (o .:? "hasMoreResults") <*>-                     (o .:? "resultCountExact")-                     <*> (o .:? "resultCountEstimate")-                     <*> (o .:? "source"))--instance ToJSON SourceResultCount where-        toJSON SourceResultCount'{..}-          = object-              (catMaybes-                 [("hasMoreResults" .=) <$> _srcHasMoreResults,-                  ("resultCountExact" .=) <$> _srcResultCountExact,-                  ("resultCountEstimate" .=) <$>-                    _srcResultCountEstimate,-                  ("source" .=) <$> _srcSource])---- | Configurations for a source while processing a Search or Suggest--- request.------ /See:/ 'sourceConfig' smart constructor.-data SourceConfig =-  SourceConfig'-    { _scCrowdingConfig :: !(Maybe SourceCrowdingConfig)-    , _scScoringConfig  :: !(Maybe SourceScoringConfig)-    , _scSource         :: !(Maybe Source)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SourceConfig' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'scCrowdingConfig'------ * 'scScoringConfig'------ * 'scSource'-sourceConfig-    :: SourceConfig-sourceConfig =-  SourceConfig'-    { _scCrowdingConfig = Nothing-    , _scScoringConfig = Nothing-    , _scSource = Nothing-    }----- | The crowding configuration for the source.-scCrowdingConfig :: Lens' SourceConfig (Maybe SourceCrowdingConfig)-scCrowdingConfig-  = lens _scCrowdingConfig-      (\ s a -> s{_scCrowdingConfig = a})---- | The scoring configuration for the source.-scScoringConfig :: Lens' SourceConfig (Maybe SourceScoringConfig)-scScoringConfig-  = lens _scScoringConfig-      (\ s a -> s{_scScoringConfig = a})---- | The source for which this configuration is to be used.-scSource :: Lens' SourceConfig (Maybe Source)-scSource = lens _scSource (\ s a -> s{_scSource = a})--instance FromJSON SourceConfig where-        parseJSON-          = withObject "SourceConfig"-              (\ o ->-                 SourceConfig' <$>-                   (o .:? "crowdingConfig") <*> (o .:? "scoringConfig")-                     <*> (o .:? "source"))--instance ToJSON SourceConfig where-        toJSON SourceConfig'{..}-          = object-              (catMaybes-                 [("crowdingConfig" .=) <$> _scCrowdingConfig,-                  ("scoringConfig" .=) <$> _scScoringConfig,-                  ("source" .=) <$> _scSource])------- /See:/ 'listItemsResponse' smart constructor.-data ListItemsResponse =-  ListItemsResponse'-    { _lirNextPageToken :: !(Maybe Text)-    , _lirItems         :: !(Maybe [Item])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ListItemsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'lirNextPageToken'------ * 'lirItems'-listItemsResponse-    :: ListItemsResponse-listItemsResponse =-  ListItemsResponse' {_lirNextPageToken = Nothing, _lirItems = Nothing}----- | Token to retrieve the next page of results, or empty if there are no--- more results in the list.-lirNextPageToken :: Lens' ListItemsResponse (Maybe Text)-lirNextPageToken-  = lens _lirNextPageToken-      (\ s a -> s{_lirNextPageToken = a})--lirItems :: Lens' ListItemsResponse [Item]-lirItems-  = lens _lirItems (\ s a -> s{_lirItems = a}) .-      _Default-      . _Coerce--instance FromJSON ListItemsResponse where-        parseJSON-          = withObject "ListItemsResponse"-              (\ o ->-                 ListItemsResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "items" .!= mempty))--instance ToJSON ListItemsResponse where-        toJSON ListItemsResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _lirNextPageToken,-                  ("items" .=) <$> _lirItems])---- | Scoring configurations for a source while processing a Search or Suggest--- request.------ /See:/ 'scoringConfig' smart constructor.-data ScoringConfig =-  ScoringConfig'-    { _scDisablePersonalization :: !(Maybe Bool)-    , _scDisableFreshness       :: !(Maybe Bool)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ScoringConfig' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'scDisablePersonalization'------ * 'scDisableFreshness'-scoringConfig-    :: ScoringConfig-scoringConfig =-  ScoringConfig'-    {_scDisablePersonalization = Nothing, _scDisableFreshness = Nothing}----- | Whether to personalize the results. By default, personal signals will be--- used to boost results.-scDisablePersonalization :: Lens' ScoringConfig (Maybe Bool)-scDisablePersonalization-  = lens _scDisablePersonalization-      (\ s a -> s{_scDisablePersonalization = a})---- | Whether to use freshness as a ranking signal. By default, freshness is--- used as a ranking signal. Note that this setting is not available in the--- Admin UI.-scDisableFreshness :: Lens' ScoringConfig (Maybe Bool)-scDisableFreshness-  = lens _scDisableFreshness-      (\ s a -> s{_scDisableFreshness = a})--instance FromJSON ScoringConfig where-        parseJSON-          = withObject "ScoringConfig"-              (\ o ->-                 ScoringConfig' <$>-                   (o .:? "disablePersonalization") <*>-                     (o .:? "disableFreshness"))--instance ToJSON ScoringConfig where-        toJSON ScoringConfig'{..}-          = object-              (catMaybes-                 [("disablePersonalization" .=) <$>-                    _scDisablePersonalization,-                  ("disableFreshness" .=) <$> _scDisableFreshness])---- | Start upload file request.------ /See:/ 'startUploadItemRequest' smart constructor.-data StartUploadItemRequest =-  StartUploadItemRequest'-    { _suirDebugOptions  :: !(Maybe DebugOptions)-    , _suirConnectorName :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'StartUploadItemRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'suirDebugOptions'------ * 'suirConnectorName'-startUploadItemRequest-    :: StartUploadItemRequest-startUploadItemRequest =-  StartUploadItemRequest'-    {_suirDebugOptions = Nothing, _suirConnectorName = Nothing}----- | Common debug options.-suirDebugOptions :: Lens' StartUploadItemRequest (Maybe DebugOptions)-suirDebugOptions-  = lens _suirDebugOptions-      (\ s a -> s{_suirDebugOptions = a})---- | Name of connector making this call.--- Format: datasources\/{source_id}\/connectors\/{ID}-suirConnectorName :: Lens' StartUploadItemRequest (Maybe Text)-suirConnectorName-  = lens _suirConnectorName-      (\ s a -> s{_suirConnectorName = a})--instance FromJSON StartUploadItemRequest where-        parseJSON-          = withObject "StartUploadItemRequest"-              (\ o ->-                 StartUploadItemRequest' <$>-                   (o .:? "debugOptions") <*> (o .:? "connectorName"))--instance ToJSON StartUploadItemRequest where-        toJSON StartUploadItemRequest'{..}-          = object-              (catMaybes-                 [("debugOptions" .=) <$> _suirDebugOptions,-                  ("connectorName" .=) <$> _suirConnectorName])---- | Represents an upload session reference. This reference is created via--- upload method. Updating of item content may refer to this uploaded--- content via contentDataRef.------ /See:/ 'uploadItemRef' smart constructor.-newtype UploadItemRef =-  UploadItemRef'-    { _uirName :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'UploadItemRef' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'uirName'-uploadItemRef-    :: UploadItemRef-uploadItemRef = UploadItemRef' {_uirName = Nothing}----- | Name of the content reference. The maximum length is 2048 characters.-uirName :: Lens' UploadItemRef (Maybe Text)-uirName = lens _uirName (\ s a -> s{_uirName = a})--instance FromJSON UploadItemRef where-        parseJSON-          = withObject "UploadItemRef"-              (\ o -> UploadItemRef' <$> (o .:? "name"))--instance ToJSON UploadItemRef where-        toJSON UploadItemRef'{..}-          = object (catMaybes [("name" .=) <$> _uirName])---- | Gmail Time restricts (i.e. received today, this week).------ /See:/ 'gmailTimeRestrict' smart constructor.-newtype GmailTimeRestrict =-  GmailTimeRestrict'-    { _gtrType :: Maybe GmailTimeRestrictType-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GmailTimeRestrict' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gtrType'-gmailTimeRestrict-    :: GmailTimeRestrict-gmailTimeRestrict = GmailTimeRestrict' {_gtrType = Nothing}---gtrType :: Lens' GmailTimeRestrict (Maybe GmailTimeRestrictType)-gtrType = lens _gtrType (\ s a -> s{_gtrType = a})--instance FromJSON GmailTimeRestrict where-        parseJSON-          = withObject "GmailTimeRestrict"-              (\ o -> GmailTimeRestrict' <$> (o .:? "type"))--instance ToJSON GmailTimeRestrict where-        toJSON GmailTimeRestrict'{..}-          = object (catMaybes [("type" .=) <$> _gtrType])------- /See:/ 'pushItemRequest' smart constructor.-data PushItemRequest =-  PushItemRequest'-    { _pirDebugOptions  :: !(Maybe DebugOptions)-    , _pirConnectorName :: !(Maybe Text)-    , _pirItem          :: !(Maybe PushItem)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PushItemRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pirDebugOptions'------ * 'pirConnectorName'------ * 'pirItem'-pushItemRequest-    :: PushItemRequest-pushItemRequest =-  PushItemRequest'-    { _pirDebugOptions = Nothing-    , _pirConnectorName = Nothing-    , _pirItem = Nothing-    }----- | Common debug options.-pirDebugOptions :: Lens' PushItemRequest (Maybe DebugOptions)-pirDebugOptions-  = lens _pirDebugOptions-      (\ s a -> s{_pirDebugOptions = a})---- | Name of connector making this call.--- Format: datasources\/{source_id}\/connectors\/{ID}-pirConnectorName :: Lens' PushItemRequest (Maybe Text)-pirConnectorName-  = lens _pirConnectorName-      (\ s a -> s{_pirConnectorName = a})---- | Item to push onto the queue.-pirItem :: Lens' PushItemRequest (Maybe PushItem)-pirItem = lens _pirItem (\ s a -> s{_pirItem = a})--instance FromJSON PushItemRequest where-        parseJSON-          = withObject "PushItemRequest"-              (\ o ->-                 PushItemRequest' <$>-                   (o .:? "debugOptions") <*> (o .:? "connectorName")-                     <*> (o .:? "item"))--instance ToJSON PushItemRequest where-        toJSON PushItemRequest'{..}-          = object-              (catMaybes-                 [("debugOptions" .=) <$> _pirDebugOptions,-                  ("connectorName" .=) <$> _pirConnectorName,-                  ("item" .=) <$> _pirItem])---- | Options for double properties.------ /See:/ 'doublePropertyOptions' smart constructor.-newtype DoublePropertyOptions =-  DoublePropertyOptions'-    { _dpoOperatorOptions :: Maybe DoubleOperatorOptions-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DoublePropertyOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dpoOperatorOptions'-doublePropertyOptions-    :: DoublePropertyOptions-doublePropertyOptions = DoublePropertyOptions' {_dpoOperatorOptions = Nothing}----- | If set, describes how the double should be used as a search operator.-dpoOperatorOptions :: Lens' DoublePropertyOptions (Maybe DoubleOperatorOptions)-dpoOperatorOptions-  = lens _dpoOperatorOptions-      (\ s a -> s{_dpoOperatorOptions = a})--instance FromJSON DoublePropertyOptions where-        parseJSON-          = withObject "DoublePropertyOptions"-              (\ o ->-                 DoublePropertyOptions' <$> (o .:? "operatorOptions"))--instance ToJSON DoublePropertyOptions where-        toJSON DoublePropertyOptions'{..}-          = object-              (catMaybes-                 [("operatorOptions" .=) <$> _dpoOperatorOptions])---- | The definition of a operator that can be used in a Search\/Suggest--- request.------ /See:/ 'queryOperator' smart constructor.-data QueryOperator =-  QueryOperator'-    { _qoIsSuggestable           :: !(Maybe Bool)-    , _qoIsReturnable            :: !(Maybe Bool)-    , _qoIsRepeatable            :: !(Maybe Bool)-    , _qoOperatorName            :: !(Maybe Text)-    , _qoIsSortable              :: !(Maybe Bool)-    , _qoIsFacetable             :: !(Maybe Bool)-    , _qoDisplayName             :: !(Maybe Text)-    , _qoLessThanOperatorName    :: !(Maybe Text)-    , _qoType                    :: !(Maybe QueryOperatorType)-    , _qoEnumValues              :: !(Maybe [Text])-    , _qoGreaterThanOperatorName :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'QueryOperator' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'qoIsSuggestable'------ * 'qoIsReturnable'------ * 'qoIsRepeatable'------ * 'qoOperatorName'------ * 'qoIsSortable'------ * 'qoIsFacetable'------ * 'qoDisplayName'------ * 'qoLessThanOperatorName'------ * 'qoType'------ * 'qoEnumValues'------ * 'qoGreaterThanOperatorName'-queryOperator-    :: QueryOperator-queryOperator =-  QueryOperator'-    { _qoIsSuggestable = Nothing-    , _qoIsReturnable = Nothing-    , _qoIsRepeatable = Nothing-    , _qoOperatorName = Nothing-    , _qoIsSortable = Nothing-    , _qoIsFacetable = Nothing-    , _qoDisplayName = Nothing-    , _qoLessThanOperatorName = Nothing-    , _qoType = Nothing-    , _qoEnumValues = Nothing-    , _qoGreaterThanOperatorName = Nothing-    }----- | Can get suggestions for this field.-qoIsSuggestable :: Lens' QueryOperator (Maybe Bool)-qoIsSuggestable-  = lens _qoIsSuggestable-      (\ s a -> s{_qoIsSuggestable = a})---- | Will the property associated with this facet be returned as part of--- search results.-qoIsReturnable :: Lens' QueryOperator (Maybe Bool)-qoIsReturnable-  = lens _qoIsReturnable-      (\ s a -> s{_qoIsReturnable = a})---- | Indicates if multiple values can be set for this property.-qoIsRepeatable :: Lens' QueryOperator (Maybe Bool)-qoIsRepeatable-  = lens _qoIsRepeatable-      (\ s a -> s{_qoIsRepeatable = a})---- | The name of the operator.-qoOperatorName :: Lens' QueryOperator (Maybe Text)-qoOperatorName-  = lens _qoOperatorName-      (\ s a -> s{_qoOperatorName = a})---- | Can this operator be used to sort results.-qoIsSortable :: Lens' QueryOperator (Maybe Bool)-qoIsSortable-  = lens _qoIsSortable (\ s a -> s{_qoIsSortable = a})---- | Can this operator be used to get facets.-qoIsFacetable :: Lens' QueryOperator (Maybe Bool)-qoIsFacetable-  = lens _qoIsFacetable-      (\ s a -> s{_qoIsFacetable = a})---- | Display name of the operator-qoDisplayName :: Lens' QueryOperator (Maybe Text)-qoDisplayName-  = lens _qoDisplayName-      (\ s a -> s{_qoDisplayName = a})---- | Indicates the operator name that can be used to isolate the property--- using the less-than operator.-qoLessThanOperatorName :: Lens' QueryOperator (Maybe Text)-qoLessThanOperatorName-  = lens _qoLessThanOperatorName-      (\ s a -> s{_qoLessThanOperatorName = a})---- | Type of the operator.-qoType :: Lens' QueryOperator (Maybe QueryOperatorType)-qoType = lens _qoType (\ s a -> s{_qoType = a})---- | Potential list of values for the opeatror field. This field is only--- filled when we can safely enumerate all the possible values of this--- operator.-qoEnumValues :: Lens' QueryOperator [Text]-qoEnumValues-  = lens _qoEnumValues (\ s a -> s{_qoEnumValues = a})-      . _Default-      . _Coerce---- | Indicates the operator name that can be used to isolate the property--- using the greater-than operator.-qoGreaterThanOperatorName :: Lens' QueryOperator (Maybe Text)-qoGreaterThanOperatorName-  = lens _qoGreaterThanOperatorName-      (\ s a -> s{_qoGreaterThanOperatorName = a})--instance FromJSON QueryOperator where-        parseJSON-          = withObject "QueryOperator"-              (\ o ->-                 QueryOperator' <$>-                   (o .:? "isSuggestable") <*> (o .:? "isReturnable")-                     <*> (o .:? "isRepeatable")-                     <*> (o .:? "operatorName")-                     <*> (o .:? "isSortable")-                     <*> (o .:? "isFacetable")-                     <*> (o .:? "displayName")-                     <*> (o .:? "lessThanOperatorName")-                     <*> (o .:? "type")-                     <*> (o .:? "enumValues" .!= mempty)-                     <*> (o .:? "greaterThanOperatorName"))--instance ToJSON QueryOperator where-        toJSON QueryOperator'{..}-          = object-              (catMaybes-                 [("isSuggestable" .=) <$> _qoIsSuggestable,-                  ("isReturnable" .=) <$> _qoIsReturnable,-                  ("isRepeatable" .=) <$> _qoIsRepeatable,-                  ("operatorName" .=) <$> _qoOperatorName,-                  ("isSortable" .=) <$> _qoIsSortable,-                  ("isFacetable" .=) <$> _qoIsFacetable,-                  ("displayName" .=) <$> _qoDisplayName,-                  ("lessThanOperatorName" .=) <$>-                    _qoLessThanOperatorName,-                  ("type" .=) <$> _qoType,-                  ("enumValues" .=) <$> _qoEnumValues,-                  ("greaterThanOperatorName" .=) <$>-                    _qoGreaterThanOperatorName])------- /See:/ 'pollItemsResponse' smart constructor.-newtype PollItemsResponse =-  PollItemsResponse'-    { _pirItems :: Maybe [Item]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PollItemsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pirItems'-pollItemsResponse-    :: PollItemsResponse-pollItemsResponse = PollItemsResponse' {_pirItems = Nothing}----- | Set of items from the queue available for connector to process.--- These items have the following subset of fields populated:--- version--- metadata.hash--- structured_data.hash--- content.hash--- payload--- status--- queue-pirItems :: Lens' PollItemsResponse [Item]-pirItems-  = lens _pirItems (\ s a -> s{_pirItems = a}) .-      _Default-      . _Coerce--instance FromJSON PollItemsResponse where-        parseJSON-          = withObject "PollItemsResponse"-              (\ o ->-                 PollItemsResponse' <$> (o .:? "items" .!= mempty))--instance ToJSON PollItemsResponse where-        toJSON PollItemsResponse'{..}-          = object (catMaybes [("items" .=) <$> _pirItems])---- | Set the scoring configuration. This allows modifying the ranking of--- results for a source.------ /See:/ 'sourceScoringConfig' smart constructor.-newtype SourceScoringConfig =-  SourceScoringConfig'-    { _sscSourceImportance :: Maybe SourceScoringConfigSourceImportance-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SourceScoringConfig' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sscSourceImportance'-sourceScoringConfig-    :: SourceScoringConfig-sourceScoringConfig = SourceScoringConfig' {_sscSourceImportance = Nothing}----- | Importance of the source.-sscSourceImportance :: Lens' SourceScoringConfig (Maybe SourceScoringConfigSourceImportance)-sscSourceImportance-  = lens _sscSourceImportance-      (\ s a -> s{_sscSourceImportance = a})--instance FromJSON SourceScoringConfig where-        parseJSON-          = withObject "SourceScoringConfig"-              (\ o ->-                 SourceScoringConfig' <$> (o .:? "sourceImportance"))--instance ToJSON SourceScoringConfig where-        toJSON SourceScoringConfig'{..}-          = object-              (catMaybes-                 [("sourceImportance" .=) <$> _sscSourceImportance])---- | A person\'s email address.------ /See:/ 'emailAddress' smart constructor.-newtype EmailAddress =-  EmailAddress'-    { _eaEmailAddress :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'EmailAddress' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'eaEmailAddress'-emailAddress-    :: EmailAddress-emailAddress = EmailAddress' {_eaEmailAddress = Nothing}----- | The email address.-eaEmailAddress :: Lens' EmailAddress (Maybe Text)-eaEmailAddress-  = lens _eaEmailAddress-      (\ s a -> s{_eaEmailAddress = a})--instance FromJSON EmailAddress where-        parseJSON-          = withObject "EmailAddress"-              (\ o -> EmailAddress' <$> (o .:? "emailAddress"))--instance ToJSON EmailAddress where-        toJSON EmailAddress'{..}-          = object-              (catMaybes [("emailAddress" .=) <$> _eaEmailAddress])------- /See:/ 'retrievalImportance' smart constructor.-newtype RetrievalImportance =-  RetrievalImportance'-    { _riImportance :: Maybe RetrievalImportanceImportance-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'RetrievalImportance' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'riImportance'-retrievalImportance-    :: RetrievalImportance-retrievalImportance = RetrievalImportance' {_riImportance = Nothing}----- | Indicates the ranking importance given to property when it is matched--- during retrieval. Once set, the token importance of a property cannot be--- changed.-riImportance :: Lens' RetrievalImportance (Maybe RetrievalImportanceImportance)-riImportance-  = lens _riImportance (\ s a -> s{_riImportance = a})--instance FromJSON RetrievalImportance where-        parseJSON-          = withObject "RetrievalImportance"-              (\ o ->-                 RetrievalImportance' <$> (o .:? "importance"))--instance ToJSON RetrievalImportance where-        toJSON RetrievalImportance'{..}-          = object-              (catMaybes [("importance" .=) <$> _riImportance])---- | Aggregation of items by status code as of the specified date.------ /See:/ 'dataSourceIndexStats' smart constructor.-data DataSourceIndexStats =-  DataSourceIndexStats'-    { _dsisItemCountByStatus :: !(Maybe [ItemCountByStatus])-    , _dsisDate              :: !(Maybe Date)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DataSourceIndexStats' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsisItemCountByStatus'------ * 'dsisDate'-dataSourceIndexStats-    :: DataSourceIndexStats-dataSourceIndexStats =-  DataSourceIndexStats' {_dsisItemCountByStatus = Nothing, _dsisDate = Nothing}----- | Number of items aggregrated by status code.-dsisItemCountByStatus :: Lens' DataSourceIndexStats [ItemCountByStatus]-dsisItemCountByStatus-  = lens _dsisItemCountByStatus-      (\ s a -> s{_dsisItemCountByStatus = a})-      . _Default-      . _Coerce---- | Date for which index stats were calculated. If the date of request is--- not the current date then stats calculated on the next day are returned.--- Stats are calculated close to mid night in this case. If date of request--- is current date, then real time stats are returned.-dsisDate :: Lens' DataSourceIndexStats (Maybe Date)-dsisDate = lens _dsisDate (\ s a -> s{_dsisDate = a})--instance FromJSON DataSourceIndexStats where-        parseJSON-          = withObject "DataSourceIndexStats"-              (\ o ->-                 DataSourceIndexStats' <$>-                   (o .:? "itemCountByStatus" .!= mempty) <*>-                     (o .:? "date"))--instance ToJSON DataSourceIndexStats where-        toJSON DataSourceIndexStats'{..}-          = object-              (catMaybes-                 [("itemCountByStatus" .=) <$> _dsisItemCountByStatus,-                  ("date" .=) <$> _dsisDate])---- | Set search results crowding limits. Crowding is a situation in which--- multiple results from the same source or host \"crowd out\" other--- results, diminishing the quality of search for users. To foster better--- search quality and source diversity in search results, you can set a--- condition to reduce repetitive results by source.------ /See:/ 'sourceCrowdingConfig' smart constructor.-data SourceCrowdingConfig =-  SourceCrowdingConfig'-    { _sccField          :: !(Maybe Text)-    , _sccNumSuggestions :: !(Maybe (Textual Int32))-    , _sccNumResults     :: !(Maybe (Textual Int32))-    , _sccSource         :: !(Maybe Bool)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SourceCrowdingConfig' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sccField'------ * 'sccNumSuggestions'------ * 'sccNumResults'------ * 'sccSource'-sourceCrowdingConfig-    :: SourceCrowdingConfig-sourceCrowdingConfig =-  SourceCrowdingConfig'-    { _sccField = Nothing-    , _sccNumSuggestions = Nothing-    , _sccNumResults = Nothing-    , _sccSource = Nothing-    }----- | Use a field to control results crowding. For example, if you want to--- control overly similar results from Gmail topics, use \`thread_id\`. For--- similar pages from Google Sites, you can use \`webspace_id\`. When--- matching query results contain the same field value in--- \`GenericMetadata\`, crowding limits are set on those records.-sccField :: Lens' SourceCrowdingConfig (Maybe Text)-sccField = lens _sccField (\ s a -> s{_sccField = a})---- | Maximum number of suggestions allowed from a source. No limits will be--- set on results if this value is less than or equal to 0.-sccNumSuggestions :: Lens' SourceCrowdingConfig (Maybe Int32)-sccNumSuggestions-  = lens _sccNumSuggestions-      (\ s a -> s{_sccNumSuggestions = a})-      . mapping _Coerce---- | Maximum number of results allowed from a source. No limits will be set--- on results if this value is less than or equal to 0.-sccNumResults :: Lens' SourceCrowdingConfig (Maybe Int32)-sccNumResults-  = lens _sccNumResults-      (\ s a -> s{_sccNumResults = a})-      . mapping _Coerce---- | Control results by content source. This option limits the total number--- of results from a given source and ignores field-based crowding control.-sccSource :: Lens' SourceCrowdingConfig (Maybe Bool)-sccSource-  = lens _sccSource (\ s a -> s{_sccSource = a})--instance FromJSON SourceCrowdingConfig where-        parseJSON-          = withObject "SourceCrowdingConfig"-              (\ o ->-                 SourceCrowdingConfig' <$>-                   (o .:? "field") <*> (o .:? "numSuggestions") <*>-                     (o .:? "numResults")-                     <*> (o .:? "source"))--instance ToJSON SourceCrowdingConfig where-        toJSON SourceCrowdingConfig'{..}-          = object-              (catMaybes-                 [("field" .=) <$> _sccField,-                  ("numSuggestions" .=) <$> _sccNumSuggestions,-                  ("numResults" .=) <$> _sccNumResults,-                  ("source" .=) <$> _sccSource])---- | Represents an interaction between a user and an item.------ /See:/ 'interaction' smart constructor.-data Interaction =-  Interaction'-    { _iInteractionTime :: !(Maybe DateTime')-    , _iPrincipal       :: !(Maybe Principal)-    , _iType            :: !(Maybe InteractionType)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Interaction' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'iInteractionTime'------ * 'iPrincipal'------ * 'iType'-interaction-    :: Interaction-interaction =-  Interaction'-    {_iInteractionTime = Nothing, _iPrincipal = Nothing, _iType = Nothing}----- | The time when the user acted on the item. If multiple actions of the--- same type exist for a single user, only the most recent action is--- recorded.-iInteractionTime :: Lens' Interaction (Maybe UTCTime)-iInteractionTime-  = lens _iInteractionTime-      (\ s a -> s{_iInteractionTime = a})-      . mapping _DateTime---- | The user that acted on the item.-iPrincipal :: Lens' Interaction (Maybe Principal)-iPrincipal-  = lens _iPrincipal (\ s a -> s{_iPrincipal = a})--iType :: Lens' Interaction (Maybe InteractionType)-iType = lens _iType (\ s a -> s{_iType = a})--instance FromJSON Interaction where-        parseJSON-          = withObject "Interaction"-              (\ o ->-                 Interaction' <$>-                   (o .:? "interactionTime") <*> (o .:? "principal") <*>-                     (o .:? "type"))--instance ToJSON Interaction where-        toJSON Interaction'{..}-          = object-              (catMaybes-                 [("interactionTime" .=) <$> _iInteractionTime,-                  ("principal" .=) <$> _iPrincipal,-                  ("type" .=) <$> _iType])---- | Reference to a user, group, or domain.------ /See:/ 'principal' smart constructor.-data Principal =-  Principal'-    { _pUserResourceName  :: !(Maybe Text)-    , _pGroupResourceName :: !(Maybe Text)-    , _pGsuitePrincipal   :: !(Maybe GSuitePrincipal)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Principal' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pUserResourceName'------ * 'pGroupResourceName'------ * 'pGsuitePrincipal'-principal-    :: Principal-principal =-  Principal'-    { _pUserResourceName = Nothing-    , _pGroupResourceName = Nothing-    , _pGsuitePrincipal = Nothing-    }----- | This principal is a user identified using an external identity. The name--- field must specify the user resource name with this format:--- identitysources\/{source_id}\/users\/{ID}-pUserResourceName :: Lens' Principal (Maybe Text)-pUserResourceName-  = lens _pUserResourceName-      (\ s a -> s{_pUserResourceName = a})---- | This principal is a group identified using an external identity. The--- name field must specify the group resource name with this format:--- identitysources\/{source_id}\/groups\/{ID}-pGroupResourceName :: Lens' Principal (Maybe Text)-pGroupResourceName-  = lens _pGroupResourceName-      (\ s a -> s{_pGroupResourceName = a})---- | This principal is a GSuite user, group or domain.-pGsuitePrincipal :: Lens' Principal (Maybe GSuitePrincipal)-pGsuitePrincipal-  = lens _pGsuitePrincipal-      (\ s a -> s{_pGsuitePrincipal = a})--instance FromJSON Principal where-        parseJSON-          = withObject "Principal"-              (\ o ->-                 Principal' <$>-                   (o .:? "userResourceName") <*>-                     (o .:? "groupResourceName")-                     <*> (o .:? "gsuitePrincipal"))--instance ToJSON Principal where-        toJSON Principal'{..}-          = object-              (catMaybes-                 [("userResourceName" .=) <$> _pUserResourceName,-                  ("groupResourceName" .=) <$> _pGroupResourceName,-                  ("gsuitePrincipal" .=) <$> _pGsuitePrincipal])------- /See:/ 'indexItemRequest' smart constructor.-data IndexItemRequest =-  IndexItemRequest'-    { _iirMode             :: !(Maybe IndexItemRequestMode)-    , _iirDebugOptions     :: !(Maybe DebugOptions)-    , _iirConnectorName    :: !(Maybe Text)-    , _iirItem             :: !(Maybe Item)-    , _iirIndexItemOptions :: !(Maybe IndexItemOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexItemRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'iirMode'------ * 'iirDebugOptions'------ * 'iirConnectorName'------ * 'iirItem'------ * 'iirIndexItemOptions'-indexItemRequest-    :: IndexItemRequest-indexItemRequest =-  IndexItemRequest'-    { _iirMode = Nothing-    , _iirDebugOptions = Nothing-    , _iirConnectorName = Nothing-    , _iirItem = Nothing-    , _iirIndexItemOptions = Nothing-    }----- | Required. The RequestMode for this request.-iirMode :: Lens' IndexItemRequest (Maybe IndexItemRequestMode)-iirMode = lens _iirMode (\ s a -> s{_iirMode = a})---- | Common debug options.-iirDebugOptions :: Lens' IndexItemRequest (Maybe DebugOptions)-iirDebugOptions-  = lens _iirDebugOptions-      (\ s a -> s{_iirDebugOptions = a})---- | Name of connector making this call.--- Format: datasources\/{source_id}\/connectors\/{ID}-iirConnectorName :: Lens' IndexItemRequest (Maybe Text)-iirConnectorName-  = lens _iirConnectorName-      (\ s a -> s{_iirConnectorName = a})---- | Name of the item. Format: datasources\/{source_id}\/items\/{item_id}-iirItem :: Lens' IndexItemRequest (Maybe Item)-iirItem = lens _iirItem (\ s a -> s{_iirItem = a})--iirIndexItemOptions :: Lens' IndexItemRequest (Maybe IndexItemOptions)-iirIndexItemOptions-  = lens _iirIndexItemOptions-      (\ s a -> s{_iirIndexItemOptions = a})--instance FromJSON IndexItemRequest where-        parseJSON-          = withObject "IndexItemRequest"-              (\ o ->-                 IndexItemRequest' <$>-                   (o .:? "mode") <*> (o .:? "debugOptions") <*>-                     (o .:? "connectorName")-                     <*> (o .:? "item")-                     <*> (o .:? "indexItemOptions"))--instance ToJSON IndexItemRequest where-        toJSON IndexItemRequest'{..}-          = object-              (catMaybes-                 [("mode" .=) <$> _iirMode,-                  ("debugOptions" .=) <$> _iirDebugOptions,-                  ("connectorName" .=) <$> _iirConnectorName,-                  ("item" .=) <$> _iirItem,-                  ("indexItemOptions" .=) <$> _iirIndexItemOptions])---- | Options for text properties.------ /See:/ 'textPropertyOptions' smart constructor.-data TextPropertyOptions =-  TextPropertyOptions'-    { _tRetrievalImportance :: !(Maybe RetrievalImportance)-    , _tOperatorOptions     :: !(Maybe TextOperatorOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TextPropertyOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tRetrievalImportance'------ * 'tOperatorOptions'-textPropertyOptions-    :: TextPropertyOptions-textPropertyOptions =-  TextPropertyOptions'-    {_tRetrievalImportance = Nothing, _tOperatorOptions = Nothing}----- | Indicates the search quality importance of the tokens within the field--- when used for retrieval.-tRetrievalImportance :: Lens' TextPropertyOptions (Maybe RetrievalImportance)-tRetrievalImportance-  = lens _tRetrievalImportance-      (\ s a -> s{_tRetrievalImportance = a})---- | If set, describes how the property should be used as a search operator.-tOperatorOptions :: Lens' TextPropertyOptions (Maybe TextOperatorOptions)-tOperatorOptions-  = lens _tOperatorOptions-      (\ s a -> s{_tOperatorOptions = a})--instance FromJSON TextPropertyOptions where-        parseJSON-          = withObject "TextPropertyOptions"-              (\ o ->-                 TextPropertyOptions' <$>-                   (o .:? "retrievalImportance") <*>-                     (o .:? "operatorOptions"))--instance ToJSON TextPropertyOptions where-        toJSON TextPropertyOptions'{..}-          = object-              (catMaybes-                 [("retrievalImportance" .=) <$>-                    _tRetrievalImportance,-                  ("operatorOptions" .=) <$> _tOperatorOptions])---- | The enumeration value pair defines two things: a required string value--- and an optional integer value. The string value defines the necessary--- query term required to retrieve that item, such as *p0* for a priority--- item. The integer value determines the ranking of that string value--- relative to other enumerated values for the same property. For example,--- you might associate *p0* with *0* and define another enum pair such as--- *p1* and *1*. You must use the integer value in combination with ordered--- ranking to set the ranking of a given value relative to other enumerated--- values for the same property name. Here, a ranking order of DESCENDING--- for *priority* properties results in a ranking boost for items indexed--- with a value of *p0* compared to items indexed with a value of *p1*.--- Without a specified ranking order, the integer value has no effect on--- item ranking.------ /See:/ 'enumValuePair' smart constructor.-data EnumValuePair =-  EnumValuePair'-    { _evpIntegerValue :: !(Maybe (Textual Int32))-    , _evpStringValue  :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'EnumValuePair' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'evpIntegerValue'------ * 'evpStringValue'-enumValuePair-    :: EnumValuePair-enumValuePair =-  EnumValuePair' {_evpIntegerValue = Nothing, _evpStringValue = Nothing}----- | The integer value of the EnumValuePair which must be non-negative.--- Optional.-evpIntegerValue :: Lens' EnumValuePair (Maybe Int32)-evpIntegerValue-  = lens _evpIntegerValue-      (\ s a -> s{_evpIntegerValue = a})-      . mapping _Coerce---- | The string value of the EnumValuePair. The maximum length is 32--- characters.-evpStringValue :: Lens' EnumValuePair (Maybe Text)-evpStringValue-  = lens _evpStringValue-      (\ s a -> s{_evpStringValue = a})--instance FromJSON EnumValuePair where-        parseJSON-          = withObject "EnumValuePair"-              (\ o ->-                 EnumValuePair' <$>-                   (o .:? "integerValue") <*> (o .:? "stringValue"))--instance ToJSON EnumValuePair where-        toJSON EnumValuePair'{..}-          = object-              (catMaybes-                 [("integerValue" .=) <$> _evpIntegerValue,-                  ("stringValue" .=) <$> _evpStringValue])---- | Metadata of a matched search result.------ /See:/ 'metadata' smart constructor.-data Metadata =-  Metadata'-    { _mObjectType     :: !(Maybe Text)-    , _mOwner          :: !(Maybe Person)-    , _mMimeType       :: !(Maybe Text)-    , _mUpdateTime     :: !(Maybe DateTime')-    , _mDisplayOptions :: !(Maybe ResultDisplayMetadata)-    , _mSource         :: !(Maybe Source)-    , _mCreateTime     :: !(Maybe DateTime')-    , _mFields         :: !(Maybe [NamedProperty])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Metadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'mObjectType'------ * 'mOwner'------ * 'mMimeType'------ * 'mUpdateTime'------ * 'mDisplayOptions'------ * 'mSource'------ * 'mCreateTime'------ * 'mFields'-metadata-    :: Metadata-metadata =-  Metadata'-    { _mObjectType = Nothing-    , _mOwner = Nothing-    , _mMimeType = Nothing-    , _mUpdateTime = Nothing-    , _mDisplayOptions = Nothing-    , _mSource = Nothing-    , _mCreateTime = Nothing-    , _mFields = Nothing-    }----- | Object type of the search result.-mObjectType :: Lens' Metadata (Maybe Text)-mObjectType-  = lens _mObjectType (\ s a -> s{_mObjectType = a})---- | Owner (usually creator) of the document or object of the search result.-mOwner :: Lens' Metadata (Maybe Person)-mOwner = lens _mOwner (\ s a -> s{_mOwner = a})---- | Mime type of the search result.-mMimeType :: Lens' Metadata (Maybe Text)-mMimeType-  = lens _mMimeType (\ s a -> s{_mMimeType = a})---- | The last modified date for the object in the search result. If not set--- in the item, the value returned here is empty. When \`updateTime\` is--- used for calculating freshness and is not set, this value defaults to 2--- years from the current time.-mUpdateTime :: Lens' Metadata (Maybe UTCTime)-mUpdateTime-  = lens _mUpdateTime (\ s a -> s{_mUpdateTime = a}) .-      mapping _DateTime---- | Options that specify how to display a structured data search result.-mDisplayOptions :: Lens' Metadata (Maybe ResultDisplayMetadata)-mDisplayOptions-  = lens _mDisplayOptions-      (\ s a -> s{_mDisplayOptions = a})---- | The named source for the result, such as Gmail.-mSource :: Lens' Metadata (Maybe Source)-mSource = lens _mSource (\ s a -> s{_mSource = a})---- | The creation time for this document or object in the search result.-mCreateTime :: Lens' Metadata (Maybe UTCTime)-mCreateTime-  = lens _mCreateTime (\ s a -> s{_mCreateTime = a}) .-      mapping _DateTime---- | Indexed fields in structured data, returned as a generic named property.-mFields :: Lens' Metadata [NamedProperty]-mFields-  = lens _mFields (\ s a -> s{_mFields = a}) . _Default-      . _Coerce--instance FromJSON Metadata where-        parseJSON-          = withObject "Metadata"-              (\ o ->-                 Metadata' <$>-                   (o .:? "objectType") <*> (o .:? "owner") <*>-                     (o .:? "mimeType")-                     <*> (o .:? "updateTime")-                     <*> (o .:? "displayOptions")-                     <*> (o .:? "source")-                     <*> (o .:? "createTime")-                     <*> (o .:? "fields" .!= mempty))--instance ToJSON Metadata where-        toJSON Metadata'{..}-          = object-              (catMaybes-                 [("objectType" .=) <$> _mObjectType,-                  ("owner" .=) <$> _mOwner,-                  ("mimeType" .=) <$> _mMimeType,-                  ("updateTime" .=) <$> _mUpdateTime,-                  ("displayOptions" .=) <$> _mDisplayOptions,-                  ("source" .=) <$> _mSource,-                  ("createTime" .=) <$> _mCreateTime,-                  ("fields" .=) <$> _mFields])------- /See:/ 'updateDataSourceRequest' smart constructor.-data UpdateDataSourceRequest =-  UpdateDataSourceRequest'-    { _udsrDebugOptions :: !(Maybe DebugOptions)-    , _udsrSource       :: !(Maybe DataSource)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'UpdateDataSourceRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'udsrDebugOptions'------ * 'udsrSource'-updateDataSourceRequest-    :: UpdateDataSourceRequest-updateDataSourceRequest =-  UpdateDataSourceRequest' {_udsrDebugOptions = Nothing, _udsrSource = Nothing}----- | Common debug options.-udsrDebugOptions :: Lens' UpdateDataSourceRequest (Maybe DebugOptions)-udsrDebugOptions-  = lens _udsrDebugOptions-      (\ s a -> s{_udsrDebugOptions = a})--udsrSource :: Lens' UpdateDataSourceRequest (Maybe DataSource)-udsrSource-  = lens _udsrSource (\ s a -> s{_udsrSource = a})--instance FromJSON UpdateDataSourceRequest where-        parseJSON-          = withObject "UpdateDataSourceRequest"-              (\ o ->-                 UpdateDataSourceRequest' <$>-                   (o .:? "debugOptions") <*> (o .:? "source"))--instance ToJSON UpdateDataSourceRequest where-        toJSON UpdateDataSourceRequest'{..}-          = object-              (catMaybes-                 [("debugOptions" .=) <$> _udsrDebugOptions,-                  ("source" .=) <$> _udsrSource])---- | Datasource is a logical namespace for items to be indexed. All items--- must belong to a datasource. This is the prerequisite before items can--- be indexed into Cloud Search.------ /See:/ 'dataSource' smart constructor.-data DataSource =-  DataSource'-    { _dsShortName               :: !(Maybe Text)-    , _dsItemsVisibility         :: !(Maybe [GSuitePrincipal])-    , _dsOperationIds            :: !(Maybe [Text])-    , _dsDisableServing          :: !(Maybe Bool)-    , _dsIndexingServiceAccounts :: !(Maybe [Text])-    , _dsDisableModifications    :: !(Maybe Bool)-    , _dsName                    :: !(Maybe Text)-    , _dsDisplayName             :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DataSource' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dsShortName'------ * 'dsItemsVisibility'------ * 'dsOperationIds'------ * 'dsDisableServing'------ * 'dsIndexingServiceAccounts'------ * 'dsDisableModifications'------ * 'dsName'------ * 'dsDisplayName'-dataSource-    :: DataSource-dataSource =-  DataSource'-    { _dsShortName = Nothing-    , _dsItemsVisibility = Nothing-    , _dsOperationIds = Nothing-    , _dsDisableServing = Nothing-    , _dsIndexingServiceAccounts = Nothing-    , _dsDisableModifications = Nothing-    , _dsName = Nothing-    , _dsDisplayName = Nothing-    }----- | A short name or alias for the source. This value will be used to match--- the \'source\' operator. For example, if the short name is *\<value>*--- then queries like *source:\<value>* will only return results for this--- source. The value must be unique across all datasources. The value must--- only contain alphanumeric characters (a-zA-Z0-9). The value cannot start--- with \'google\' and cannot be one of the following: mail, gmail, docs,--- drive, groups, sites, calendar, hangouts, gplus, keep, people, teams.--- Its maximum length is 32 characters.-dsShortName :: Lens' DataSource (Maybe Text)-dsShortName-  = lens _dsShortName (\ s a -> s{_dsShortName = a})---- | This field restricts visibility to items at the datasource level. Items--- within the datasource are restricted to the union of users and groups--- included in this field. Note that, this does not ensure access to a--- specific item, as users need to have ACL permissions on the contained--- items. This ensures a high level access on the entire datasource, and--- that the individual items are not shared outside this visibility.-dsItemsVisibility :: Lens' DataSource [GSuitePrincipal]-dsItemsVisibility-  = lens _dsItemsVisibility-      (\ s a -> s{_dsItemsVisibility = a})-      . _Default-      . _Coerce---- | IDs of the Long Running Operations (LROs) currently running for this--- schema.-dsOperationIds :: Lens' DataSource [Text]-dsOperationIds-  = lens _dsOperationIds-      (\ s a -> s{_dsOperationIds = a})-      . _Default-      . _Coerce---- | Disable serving any search or assist results.-dsDisableServing :: Lens' DataSource (Maybe Bool)-dsDisableServing-  = lens _dsDisableServing-      (\ s a -> s{_dsDisableServing = a})---- | List of service accounts that have indexing access.-dsIndexingServiceAccounts :: Lens' DataSource [Text]-dsIndexingServiceAccounts-  = lens _dsIndexingServiceAccounts-      (\ s a -> s{_dsIndexingServiceAccounts = a})-      . _Default-      . _Coerce---- | If true, Indexing API rejects any modification calls to this datasource--- such as create, update, and delete. Disabling this does not imply--- halting process of previously accepted data.-dsDisableModifications :: Lens' DataSource (Maybe Bool)-dsDisableModifications-  = lens _dsDisableModifications-      (\ s a -> s{_dsDisableModifications = a})---- | Name of the datasource resource. Format: datasources\/{source_id}.--- The name is ignored when creating a datasource.-dsName :: Lens' DataSource (Maybe Text)-dsName = lens _dsName (\ s a -> s{_dsName = a})---- | Required. Display name of the datasource The maximum length is 300--- characters.-dsDisplayName :: Lens' DataSource (Maybe Text)-dsDisplayName-  = lens _dsDisplayName-      (\ s a -> s{_dsDisplayName = a})--instance FromJSON DataSource where-        parseJSON-          = withObject "DataSource"-              (\ o ->-                 DataSource' <$>-                   (o .:? "shortName") <*>-                     (o .:? "itemsVisibility" .!= mempty)-                     <*> (o .:? "operationIds" .!= mempty)-                     <*> (o .:? "disableServing")-                     <*> (o .:? "indexingServiceAccounts" .!= mempty)-                     <*> (o .:? "disableModifications")-                     <*> (o .:? "name")-                     <*> (o .:? "displayName"))--instance ToJSON DataSource where-        toJSON DataSource'{..}-          = object-              (catMaybes-                 [("shortName" .=) <$> _dsShortName,-                  ("itemsVisibility" .=) <$> _dsItemsVisibility,-                  ("operationIds" .=) <$> _dsOperationIds,-                  ("disableServing" .=) <$> _dsDisableServing,-                  ("indexingServiceAccounts" .=) <$>-                    _dsIndexingServiceAccounts,-                  ("disableModifications" .=) <$>-                    _dsDisableModifications,-                  ("name" .=) <$> _dsName,-                  ("displayName" .=) <$> _dsDisplayName])---- | List of html values.------ /See:/ 'htmlValues' smart constructor.-newtype HTMLValues =-  HTMLValues'-    { _hvValues :: Maybe [Text]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'HTMLValues' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'hvValues'-htmlValues-    :: HTMLValues-htmlValues = HTMLValues' {_hvValues = Nothing}----- | The maximum allowable length for html values is 2048 characters.-hvValues :: Lens' HTMLValues [Text]-hvValues-  = lens _hvValues (\ s a -> s{_hvValues = a}) .-      _Default-      . _Coerce--instance FromJSON HTMLValues where-        parseJSON-          = withObject "HTMLValues"-              (\ o -> HTMLValues' <$> (o .:? "values" .!= mempty))--instance ToJSON HTMLValues where-        toJSON HTMLValues'{..}-          = object (catMaybes [("values" .=) <$> _hvValues])---- | Gmail Intelligent restricts (i.e. smartlabels, important).------ /See:/ 'gmailIntelligentRestrict' smart constructor.-newtype GmailIntelligentRestrict =-  GmailIntelligentRestrict'-    { _girType :: Maybe GmailIntelligentRestrictType-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GmailIntelligentRestrict' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'girType'-gmailIntelligentRestrict-    :: GmailIntelligentRestrict-gmailIntelligentRestrict = GmailIntelligentRestrict' {_girType = Nothing}---girType :: Lens' GmailIntelligentRestrict (Maybe GmailIntelligentRestrictType)-girType = lens _girType (\ s a -> s{_girType = a})--instance FromJSON GmailIntelligentRestrict where-        parseJSON-          = withObject "GmailIntelligentRestrict"-              (\ o -> GmailIntelligentRestrict' <$> (o .:? "type"))--instance ToJSON GmailIntelligentRestrict where-        toJSON GmailIntelligentRestrict'{..}-          = object (catMaybes [("type" .=) <$> _girType])---- | Used to provide a search operator for html properties. This is optional.--- Search operators let users restrict the query to specific fields--- relevant to the type of item being searched.------ /See:/ 'htmlOperatorOptions' smart constructor.-newtype HTMLOperatorOptions =-  HTMLOperatorOptions'-    { _hooOperatorName :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'HTMLOperatorOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'hooOperatorName'-htmlOperatorOptions-    :: HTMLOperatorOptions-htmlOperatorOptions = HTMLOperatorOptions' {_hooOperatorName = Nothing}----- | Indicates the operator name required in the query in order to isolate--- the html property. For example, if operatorName is *subject* and the--- property\'s name is *subjectLine*, then queries like *subject:\<value>*--- will show results only where the value of the property named--- *subjectLine* matches *\<value>*. By contrast, a search that uses the--- same *\<value>* without an operator will return all items where--- *\<value>* matches the value of any html properties or text within the--- content field for the item. The operator name can only contain lowercase--- letters (a-z). The maximum length is 32 characters.-hooOperatorName :: Lens' HTMLOperatorOptions (Maybe Text)-hooOperatorName-  = lens _hooOperatorName-      (\ s a -> s{_hooOperatorName = a})--instance FromJSON HTMLOperatorOptions where-        parseJSON-          = withObject "HTMLOperatorOptions"-              (\ o ->-                 HTMLOperatorOptions' <$> (o .:? "operatorName"))--instance ToJSON HTMLOperatorOptions where-        toJSON HTMLOperatorOptions'{..}-          = object-              (catMaybes-                 [("operatorName" .=) <$> _hooOperatorName])---- | Represents a single object that is an item in the search index, such as--- a file, folder, or a database record.------ /See:/ 'item' smart constructor.-data Item =-  Item'-    { _iStatus         :: !(Maybe ItemStatus)-    , _iItemType       :: !(Maybe ItemItemType)-    , _iPayload        :: !(Maybe Bytes)-    , _iStructuredData :: !(Maybe ItemStructuredData)-    , _iQueue          :: !(Maybe Text)-    , _iContent        :: !(Maybe ItemContent)-    , _iName           :: !(Maybe Text)-    , _iVersion        :: !(Maybe Bytes)-    , _iMetadata       :: !(Maybe ItemMetadata)-    , _iACL            :: !(Maybe ItemACL)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Item' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'iStatus'------ * 'iItemType'------ * 'iPayload'------ * 'iStructuredData'------ * 'iQueue'------ * 'iContent'------ * 'iName'------ * 'iVersion'------ * 'iMetadata'------ * 'iACL'-item-    :: Item-item =-  Item'-    { _iStatus = Nothing-    , _iItemType = Nothing-    , _iPayload = Nothing-    , _iStructuredData = Nothing-    , _iQueue = Nothing-    , _iContent = Nothing-    , _iName = Nothing-    , _iVersion = Nothing-    , _iMetadata = Nothing-    , _iACL = Nothing-    }----- | Status of the item. Output only field.-iStatus :: Lens' Item (Maybe ItemStatus)-iStatus = lens _iStatus (\ s a -> s{_iStatus = a})---- | Type for this item.-iItemType :: Lens' Item (Maybe ItemItemType)-iItemType-  = lens _iItemType (\ s a -> s{_iItemType = a})---- | Additional state connector can store for this item. The maximum length--- is 10000 bytes.-iPayload :: Lens' Item (Maybe ByteString)-iPayload-  = lens _iPayload (\ s a -> s{_iPayload = a}) .-      mapping _Bytes---- | The structured data for the item that should conform to a registered--- object definition in the schema for the data source.-iStructuredData :: Lens' Item (Maybe ItemStructuredData)-iStructuredData-  = lens _iStructuredData-      (\ s a -> s{_iStructuredData = a})---- | Queue this item belongs to. The maximum length is 100 characters.-iQueue :: Lens' Item (Maybe Text)-iQueue = lens _iQueue (\ s a -> s{_iQueue = a})---- | Item content to be indexed and made text searchable.-iContent :: Lens' Item (Maybe ItemContent)-iContent = lens _iContent (\ s a -> s{_iContent = a})---- | Name of the Item. Format: datasources\/{source_id}\/items\/{item_id}--- This is a required field. The maximum length is 1536 characters.-iName :: Lens' Item (Maybe Text)-iName = lens _iName (\ s a -> s{_iName = a})---- | Required. The indexing system stores the version from the datasource as--- a byte string and compares the Item version in the index to the version--- of the queued Item using lexical ordering.--- Cloud Search Indexing won\'t index or delete any queued item with a--- version value that is less than or equal to the version of the currently--- indexed item. The maximum length for this field is 1024 bytes.-iVersion :: Lens' Item (Maybe ByteString)-iVersion-  = lens _iVersion (\ s a -> s{_iVersion = a}) .-      mapping _Bytes---- | Metadata information.-iMetadata :: Lens' Item (Maybe ItemMetadata)-iMetadata-  = lens _iMetadata (\ s a -> s{_iMetadata = a})---- | Access control list for this item.-iACL :: Lens' Item (Maybe ItemACL)-iACL = lens _iACL (\ s a -> s{_iACL = a})--instance FromJSON Item where-        parseJSON-          = withObject "Item"-              (\ o ->-                 Item' <$>-                   (o .:? "status") <*> (o .:? "itemType") <*>-                     (o .:? "payload")-                     <*> (o .:? "structuredData")-                     <*> (o .:? "queue")-                     <*> (o .:? "content")-                     <*> (o .:? "name")-                     <*> (o .:? "version")-                     <*> (o .:? "metadata")-                     <*> (o .:? "acl"))--instance ToJSON Item where-        toJSON Item'{..}-          = object-              (catMaybes-                 [("status" .=) <$> _iStatus,-                  ("itemType" .=) <$> _iItemType,-                  ("payload" .=) <$> _iPayload,-                  ("structuredData" .=) <$> _iStructuredData,-                  ("queue" .=) <$> _iQueue,-                  ("content" .=) <$> _iContent, ("name" .=) <$> _iName,-                  ("version" .=) <$> _iVersion,-                  ("metadata" .=) <$> _iMetadata,-                  ("acl" .=) <$> _iACL])---- | Defines sources for the suggest\/search APIs.------ /See:/ 'source' smart constructor.-data Source =-  Source'-    { _sName             :: !(Maybe Text)-    , _sPredefinedSource :: !(Maybe SourcePredefinedSource)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Source' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sName'------ * 'sPredefinedSource'-source-    :: Source-source = Source' {_sName = Nothing, _sPredefinedSource = Nothing}----- | Source name for content indexed by the Indexing API.-sName :: Lens' Source (Maybe Text)-sName = lens _sName (\ s a -> s{_sName = a})---- | Predefined content source for Google Apps.-sPredefinedSource :: Lens' Source (Maybe SourcePredefinedSource)-sPredefinedSource-  = lens _sPredefinedSource-      (\ s a -> s{_sPredefinedSource = a})--instance FromJSON Source where-        parseJSON-          = withObject "Source"-              (\ o ->-                 Source' <$>-                   (o .:? "name") <*> (o .:? "predefinedSource"))--instance ToJSON Source where-        toJSON Source'{..}-          = object-              (catMaybes-                 [("name" .=) <$> _sName,-                  ("predefinedSource" .=) <$> _sPredefinedSource])---- | The display options for a property.------ /See:/ 'propertyDisplayOptions' smart constructor.-newtype PropertyDisplayOptions =-  PropertyDisplayOptions'-    { _pdoDisplayLabel :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PropertyDisplayOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pdoDisplayLabel'-propertyDisplayOptions-    :: PropertyDisplayOptions-propertyDisplayOptions = PropertyDisplayOptions' {_pdoDisplayLabel = Nothing}----- | The user friendly label for the property that will be used if the--- property is specified to be displayed in ObjectDisplayOptions. If given,--- the display label will be shown in front of the property values when the--- property is part of the object display options. For example, if the--- property value is \'1\', the value by itself may not be useful context--- for the user. If the display name given was \'priority\', then the user--- will see \'priority : 1\' in the search results which provides clear--- conext to search users. This is OPTIONAL; if not given, only the--- property values will be displayed. The maximum length is 32 characters.-pdoDisplayLabel :: Lens' PropertyDisplayOptions (Maybe Text)-pdoDisplayLabel-  = lens _pdoDisplayLabel-      (\ s a -> s{_pdoDisplayLabel = a})--instance FromJSON PropertyDisplayOptions where-        parseJSON-          = withObject "PropertyDisplayOptions"-              (\ o ->-                 PropertyDisplayOptions' <$> (o .:? "displayLabel"))--instance ToJSON PropertyDisplayOptions where-        toJSON PropertyDisplayOptions'{..}-          = object-              (catMaybes-                 [("displayLabel" .=) <$> _pdoDisplayLabel])---- | List of object values.------ /See:/ 'objectValues' smart constructor.-newtype ObjectValues =-  ObjectValues'-    { _ovValues :: Maybe [StructuredDataObject]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ObjectValues' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ovValues'-objectValues-    :: ObjectValues-objectValues = ObjectValues' {_ovValues = Nothing}---ovValues :: Lens' ObjectValues [StructuredDataObject]-ovValues-  = lens _ovValues (\ s a -> s{_ovValues = a}) .-      _Default-      . _Coerce--instance FromJSON ObjectValues where-        parseJSON-          = withObject "ObjectValues"-              (\ o ->-                 ObjectValues' <$> (o .:? "values" .!= mempty))--instance ToJSON ObjectValues where-        toJSON ObjectValues'{..}-          = object (catMaybes [("values" .=) <$> _ovValues])---- | The options for an object.------ /See:/ 'objectOptions' smart constructor.-data ObjectOptions =-  ObjectOptions'-    { _ooFreshnessOptions :: !(Maybe FreshnessOptions)-    , _ooDisplayOptions   :: !(Maybe ObjectDisplayOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ObjectOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ooFreshnessOptions'------ * 'ooDisplayOptions'-objectOptions-    :: ObjectOptions-objectOptions =-  ObjectOptions' {_ooFreshnessOptions = Nothing, _ooDisplayOptions = Nothing}----- | The freshness options for an object.-ooFreshnessOptions :: Lens' ObjectOptions (Maybe FreshnessOptions)-ooFreshnessOptions-  = lens _ooFreshnessOptions-      (\ s a -> s{_ooFreshnessOptions = a})---- | Options that determine how the object is displayed in the Cloud Search--- results page.-ooDisplayOptions :: Lens' ObjectOptions (Maybe ObjectDisplayOptions)-ooDisplayOptions-  = lens _ooDisplayOptions-      (\ s a -> s{_ooDisplayOptions = a})--instance FromJSON ObjectOptions where-        parseJSON-          = withObject "ObjectOptions"-              (\ o ->-                 ObjectOptions' <$>-                   (o .:? "freshnessOptions") <*>-                     (o .:? "displayOptions"))--instance ToJSON ObjectOptions where-        toJSON ObjectOptions'{..}-          = object-              (catMaybes-                 [("freshnessOptions" .=) <$> _ooFreshnessOptions,-                  ("displayOptions" .=) <$> _ooDisplayOptions])---- | Specifies operators to return facet results for. There will be one--- FacetResult for every source_name\/object_type\/operator_name--- combination.------ /See:/ 'facetOptions' smart constructor.-data FacetOptions =-  FacetOptions'-    { _fSourceName      :: !(Maybe Text)-    , _fObjectType      :: !(Maybe Text)-    , _fNumFacetBuckets :: !(Maybe (Textual Int32))-    , _fOperatorName    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'FacetOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fSourceName'------ * 'fObjectType'------ * 'fNumFacetBuckets'------ * 'fOperatorName'-facetOptions-    :: FacetOptions-facetOptions =-  FacetOptions'-    { _fSourceName = Nothing-    , _fObjectType = Nothing-    , _fNumFacetBuckets = Nothing-    , _fOperatorName = Nothing-    }----- | Source name to facet on. Format: datasources\/{source_id} If empty, all--- data sources will be used.-fSourceName :: Lens' FacetOptions (Maybe Text)-fSourceName-  = lens _fSourceName (\ s a -> s{_fSourceName = a})---- | If object_type is set, only those objects of that type will be used to--- compute facets. If empty, then all objects will be used to compute--- facets.-fObjectType :: Lens' FacetOptions (Maybe Text)-fObjectType-  = lens _fObjectType (\ s a -> s{_fObjectType = a})---- | Maximum number of facet buckets that should be returned for this facet.--- Defaults to 10. Maximum value is 100.-fNumFacetBuckets :: Lens' FacetOptions (Maybe Int32)-fNumFacetBuckets-  = lens _fNumFacetBuckets-      (\ s a -> s{_fNumFacetBuckets = a})-      . mapping _Coerce---- | Name of the operator chosen for faceting. \'see--- cloudsearch.SchemaPropertyOptions-fOperatorName :: Lens' FacetOptions (Maybe Text)-fOperatorName-  = lens _fOperatorName-      (\ s a -> s{_fOperatorName = a})--instance FromJSON FacetOptions where-        parseJSON-          = withObject "FacetOptions"-              (\ o ->-                 FacetOptions' <$>-                   (o .:? "sourceName") <*> (o .:? "objectType") <*>-                     (o .:? "numFacetBuckets")-                     <*> (o .:? "operatorName"))--instance ToJSON FacetOptions where-        toJSON FacetOptions'{..}-          = object-              (catMaybes-                 [("sourceName" .=) <$> _fSourceName,-                  ("objectType" .=) <$> _fObjectType,-                  ("numFacetBuckets" .=) <$> _fNumFacetBuckets,-                  ("operatorName" .=) <$> _fOperatorName])---- | Request of suggest API.------ /See:/ 'suggestRequest' smart constructor.-data SuggestRequest =-  SuggestRequest'-    { _sDataSourceRestrictions :: !(Maybe [DataSourceRestriction])-    , _sQuery                  :: !(Maybe Text)-    , _sRequestOptions         :: !(Maybe RequestOptions)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SuggestRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sDataSourceRestrictions'------ * 'sQuery'------ * 'sRequestOptions'-suggestRequest-    :: SuggestRequest-suggestRequest =-  SuggestRequest'-    { _sDataSourceRestrictions = Nothing-    , _sQuery = Nothing-    , _sRequestOptions = Nothing-    }----- | The sources to use for suggestions. If not specified, all data sources--- from the current search application are used. Suggestions are based on--- Gmail titles. Suggestions from third party sources are not available.-sDataSourceRestrictions :: Lens' SuggestRequest [DataSourceRestriction]-sDataSourceRestrictions-  = lens _sDataSourceRestrictions-      (\ s a -> s{_sDataSourceRestrictions = a})-      . _Default-      . _Coerce---- | Partial query for which autocomplete suggestions will be shown. For--- example, if the query is \"sea\", then the server might return--- \"season\", \"search\", \"seagull\" and so on.-sQuery :: Lens' SuggestRequest (Maybe Text)-sQuery = lens _sQuery (\ s a -> s{_sQuery = a})---- | Request options, such as the search application and user timezone.-sRequestOptions :: Lens' SuggestRequest (Maybe RequestOptions)-sRequestOptions-  = lens _sRequestOptions-      (\ s a -> s{_sRequestOptions = a})--instance FromJSON SuggestRequest where-        parseJSON-          = withObject "SuggestRequest"-              (\ o ->-                 SuggestRequest' <$>-                   (o .:? "dataSourceRestrictions" .!= mempty) <*>-                     (o .:? "query")-                     <*> (o .:? "requestOptions"))--instance ToJSON SuggestRequest where-        toJSON SuggestRequest'{..}-          = object-              (catMaybes-                 [("dataSourceRestrictions" .=) <$>-                    _sDataSourceRestrictions,-                  ("query" .=) <$> _sQuery,-                  ("requestOptions" .=) <$> _sRequestOptions])---- | A generic way of expressing filters in a query, which supports two--- approaches:--- **1. Setting a ValueFilter.** The name must match an operator_name--- defined in the schema for your data source.--- **2. Setting a CompositeFilter.** The filters are evaluated using the--- logical operator. The top-level operators can only be either an AND or a--- NOT. AND can appear only at the top-most level. OR can appear only under--- a top-level AND.------ /See:/ 'filter'' smart constructor.-data Filter =-  Filter'-    { _fCompositeFilter :: !(Maybe CompositeFilter)-    , _fValueFilter     :: !(Maybe ValueFilter)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'Filter' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'fCompositeFilter'------ * 'fValueFilter'-filter'-    :: Filter-filter' = Filter' {_fCompositeFilter = Nothing, _fValueFilter = Nothing}---fCompositeFilter :: Lens' Filter (Maybe CompositeFilter)-fCompositeFilter-  = lens _fCompositeFilter-      (\ s a -> s{_fCompositeFilter = a})--fValueFilter :: Lens' Filter (Maybe ValueFilter)-fValueFilter-  = lens _fValueFilter (\ s a -> s{_fValueFilter = a})--instance FromJSON Filter where-        parseJSON-          = withObject "Filter"-              (\ o ->-                 Filter' <$>-                   (o .:? "compositeFilter") <*> (o .:? "valueFilter"))--instance ToJSON Filter where-        toJSON Filter'{..}-          = object-              (catMaybes-                 [("compositeFilter" .=) <$> _fCompositeFilter,-                  ("valueFilter" .=) <$> _fValueFilter])---- | The definition for an object within a data source.------ /See:/ 'objectDefinition' smart constructor.-data ObjectDefinition =-  ObjectDefinition'-    { _odName                :: !(Maybe Text)-    , _odOptions             :: !(Maybe ObjectOptions)-    , _odPropertyDefinitions :: !(Maybe [PropertyDefinition])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ObjectDefinition' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'odName'------ * 'odOptions'------ * 'odPropertyDefinitions'-objectDefinition-    :: ObjectDefinition-objectDefinition =-  ObjectDefinition'-    {_odName = Nothing, _odOptions = Nothing, _odPropertyDefinitions = Nothing}----- | Name for the object, which then defines its type. Item indexing requests--- should set the objectType field equal to this value. For example, if--- *name* is *Document*, then indexing requests for items of type Document--- should set objectType equal to *Document*. Each object definition must--- be uniquely named within a schema. The name must start with a letter and--- can only contain letters (A-Z, a-z) or numbers (0-9). The maximum length--- is 256 characters.-odName :: Lens' ObjectDefinition (Maybe Text)-odName = lens _odName (\ s a -> s{_odName = a})---- | The optional object-specific options.-odOptions :: Lens' ObjectDefinition (Maybe ObjectOptions)-odOptions-  = lens _odOptions (\ s a -> s{_odOptions = a})---- | The property definitions for the object. The maximum number of elements--- is 1000.-odPropertyDefinitions :: Lens' ObjectDefinition [PropertyDefinition]-odPropertyDefinitions-  = lens _odPropertyDefinitions-      (\ s a -> s{_odPropertyDefinitions = a})-      . _Default-      . _Coerce--instance FromJSON ObjectDefinition where-        parseJSON-          = withObject "ObjectDefinition"-              (\ o ->-                 ObjectDefinition' <$>-                   (o .:? "name") <*> (o .:? "options") <*>-                     (o .:? "propertyDefinitions" .!= mempty))--instance ToJSON ObjectDefinition where-        toJSON ObjectDefinition'{..}-          = object-              (catMaybes-                 [("name" .=) <$> _odName,-                  ("options" .=) <$> _odOptions,-                  ("propertyDefinitions" .=) <$>-                    _odPropertyDefinitions])------- /See:/ 'pollItemsRequest' smart constructor.-data PollItemsRequest =-  PollItemsRequest'-    { _pQueue         :: !(Maybe Text)-    , _pDebugOptions  :: !(Maybe DebugOptions)-    , _pConnectorName :: !(Maybe Text)-    , _pStatusCodes   :: !(Maybe [Text])-    , _pLimit         :: !(Maybe (Textual Int32))-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PollItemsRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'pQueue'------ * 'pDebugOptions'------ * 'pConnectorName'------ * 'pStatusCodes'------ * 'pLimit'-pollItemsRequest-    :: PollItemsRequest-pollItemsRequest =-  PollItemsRequest'-    { _pQueue = Nothing-    , _pDebugOptions = Nothing-    , _pConnectorName = Nothing-    , _pStatusCodes = Nothing-    , _pLimit = Nothing-    }----- | Queue name to fetch items from. If unspecified, PollItems will fetch--- from \'default\' queue. The maximum length is 100 characters.-pQueue :: Lens' PollItemsRequest (Maybe Text)-pQueue = lens _pQueue (\ s a -> s{_pQueue = a})---- | Common debug options.-pDebugOptions :: Lens' PollItemsRequest (Maybe DebugOptions)-pDebugOptions-  = lens _pDebugOptions-      (\ s a -> s{_pDebugOptions = a})---- | Name of connector making this call.--- Format: datasources\/{source_id}\/connectors\/{ID}-pConnectorName :: Lens' PollItemsRequest (Maybe Text)-pConnectorName-  = lens _pConnectorName-      (\ s a -> s{_pConnectorName = a})---- | Limit the items polled to the ones with these statuses.-pStatusCodes :: Lens' PollItemsRequest [Text]-pStatusCodes-  = lens _pStatusCodes (\ s a -> s{_pStatusCodes = a})-      . _Default-      . _Coerce---- | Maximum number of items to return.--- The maximum and the default value is 1000-pLimit :: Lens' PollItemsRequest (Maybe Int32)-pLimit-  = lens _pLimit (\ s a -> s{_pLimit = a}) .-      mapping _Coerce--instance FromJSON PollItemsRequest where-        parseJSON-          = withObject "PollItemsRequest"-              (\ o ->-                 PollItemsRequest' <$>-                   (o .:? "queue") <*> (o .:? "debugOptions") <*>-                     (o .:? "connectorName")-                     <*> (o .:? "statusCodes" .!= mempty)-                     <*> (o .:? "limit"))--instance ToJSON PollItemsRequest where-        toJSON PollItemsRequest'{..}-          = object-              (catMaybes-                 [("queue" .=) <$> _pQueue,-                  ("debugOptions" .=) <$> _pDebugOptions,-                  ("connectorName" .=) <$> _pConnectorName,-                  ("statusCodes" .=) <$> _pStatusCodes,-                  ("limit" .=) <$> _pLimit])------- /See:/ 'queryInterpretation' smart constructor.-data QueryInterpretation =-  QueryInterpretation'-    { _qiInterpretedQuery   :: !(Maybe Text)-    , _qiInterpretationType :: !(Maybe QueryInterpretationInterpretationType)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'QueryInterpretation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'qiInterpretedQuery'------ * 'qiInterpretationType'-queryInterpretation-    :: QueryInterpretation-queryInterpretation =-  QueryInterpretation'-    {_qiInterpretedQuery = Nothing, _qiInterpretationType = Nothing}----- | The interpretation of the query used in search. For example, query--- \"email from john\" will be interpreted as \"from:john source:mail\"-qiInterpretedQuery :: Lens' QueryInterpretation (Maybe Text)-qiInterpretedQuery-  = lens _qiInterpretedQuery-      (\ s a -> s{_qiInterpretedQuery = a})--qiInterpretationType :: Lens' QueryInterpretation (Maybe QueryInterpretationInterpretationType)-qiInterpretationType-  = lens _qiInterpretationType-      (\ s a -> s{_qiInterpretationType = a})--instance FromJSON QueryInterpretation where-        parseJSON-          = withObject "QueryInterpretation"-              (\ o ->-                 QueryInterpretation' <$>-                   (o .:? "interpretedQuery") <*>-                     (o .:? "interpretationType"))--instance ToJSON QueryInterpretation where-        toJSON QueryInterpretation'{..}-          = object-              (catMaybes-                 [("interpretedQuery" .=) <$> _qiInterpretedQuery,-                  ("interpretationType" .=) <$> _qiInterpretationType])------- /See:/ 'unmAppedIdentity' smart constructor.-data UnmAppedIdentity =-  UnmAppedIdentity'-    { _uaiResolutionStatusCode :: !(Maybe UnmAppedIdentityResolutionStatusCode)-    , _uaiExternalIdentity     :: !(Maybe Principal)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'UnmAppedIdentity' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'uaiResolutionStatusCode'------ * 'uaiExternalIdentity'-unmAppedIdentity-    :: UnmAppedIdentity-unmAppedIdentity =-  UnmAppedIdentity'-    {_uaiResolutionStatusCode = Nothing, _uaiExternalIdentity = Nothing}----- | The resolution status for the external identity.-uaiResolutionStatusCode :: Lens' UnmAppedIdentity (Maybe UnmAppedIdentityResolutionStatusCode)-uaiResolutionStatusCode-  = lens _uaiResolutionStatusCode-      (\ s a -> s{_uaiResolutionStatusCode = a})---- | The resource name for an external user.-uaiExternalIdentity :: Lens' UnmAppedIdentity (Maybe Principal)-uaiExternalIdentity-  = lens _uaiExternalIdentity-      (\ s a -> s{_uaiExternalIdentity = a})--instance FromJSON UnmAppedIdentity where-        parseJSON-          = withObject "UnmAppedIdentity"-              (\ o ->-                 UnmAppedIdentity' <$>-                   (o .:? "resolutionStatusCode") <*>-                     (o .:? "externalIdentity"))--instance ToJSON UnmAppedIdentity where-        toJSON UnmAppedIdentity'{..}-          = object-              (catMaybes-                 [("resolutionStatusCode" .=) <$>-                    _uaiResolutionStatusCode,-                  ("externalIdentity" .=) <$> _uaiExternalIdentity])---- | Service-specific metadata associated with the operation. It typically--- contains progress information and common metadata such as create time.--- Some services might not provide such metadata. Any method that returns a--- long-running operation should document the metadata type, if any.------ /See:/ 'operationMetadata' smart constructor.-newtype OperationMetadata =-  OperationMetadata'-    { _omAddtional :: HashMap Text JSONValue-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'OperationMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'omAddtional'-operationMetadata-    :: HashMap Text JSONValue -- ^ 'omAddtional'-    -> OperationMetadata-operationMetadata pOmAddtional_ =-  OperationMetadata' {_omAddtional = _Coerce # pOmAddtional_}----- | Properties of the object. Contains field \'type with type URL.-omAddtional :: Lens' OperationMetadata (HashMap Text JSONValue)-omAddtional-  = lens _omAddtional (\ s a -> s{_omAddtional = a}) .-      _Coerce--instance FromJSON OperationMetadata where-        parseJSON-          = withObject "OperationMetadata"-              (\ o -> OperationMetadata' <$> (parseJSONObject o))--instance ToJSON OperationMetadata where-        toJSON = toJSON . _omAddtional---- | Aggregation of items by status code as of the specified date.------ /See:/ 'customerIndexStats' smart constructor.-data CustomerIndexStats =-  CustomerIndexStats'-    { _cisItemCountByStatus :: !(Maybe [ItemCountByStatus])-    , _cisDate              :: !(Maybe Date)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CustomerIndexStats' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'cisItemCountByStatus'------ * 'cisDate'-customerIndexStats-    :: CustomerIndexStats-customerIndexStats =-  CustomerIndexStats' {_cisItemCountByStatus = Nothing, _cisDate = Nothing}----- | Number of items aggregrated by status code.-cisItemCountByStatus :: Lens' CustomerIndexStats [ItemCountByStatus]-cisItemCountByStatus-  = lens _cisItemCountByStatus-      (\ s a -> s{_cisItemCountByStatus = a})-      . _Default-      . _Coerce---- | Date for which statistics were calculated.-cisDate :: Lens' CustomerIndexStats (Maybe Date)-cisDate = lens _cisDate (\ s a -> s{_cisDate = a})--instance FromJSON CustomerIndexStats where-        parseJSON-          = withObject "CustomerIndexStats"-              (\ o ->-                 CustomerIndexStats' <$>-                   (o .:? "itemCountByStatus" .!= mempty) <*>-                     (o .:? "date"))--instance ToJSON CustomerIndexStats where-        toJSON CustomerIndexStats'{..}-          = object-              (catMaybes-                 [("itemCountByStatus" .=) <$> _cisItemCountByStatus,-                  ("date" .=) <$> _cisDate])---- | Represents an item to be pushed to the indexing queue.------ /See:/ 'pushItem' smart constructor.-data PushItem =-  PushItem'-    { _piRepositoryError    :: !(Maybe RepositoryError)-    , _piContentHash        :: !(Maybe Text)-    , _piStructuredDataHash :: !(Maybe Text)-    , _piPayload            :: !(Maybe Bytes)-    , _piQueue              :: !(Maybe Text)-    , _piMetadataHash       :: !(Maybe Text)-    , _piType               :: !(Maybe PushItemType)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'PushItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'piRepositoryError'------ * 'piContentHash'------ * 'piStructuredDataHash'------ * 'piPayload'------ * 'piQueue'------ * 'piMetadataHash'------ * 'piType'-pushItem-    :: PushItem-pushItem =-  PushItem'-    { _piRepositoryError = Nothing-    , _piContentHash = Nothing-    , _piStructuredDataHash = Nothing-    , _piPayload = Nothing-    , _piQueue = Nothing-    , _piMetadataHash = Nothing-    , _piType = Nothing-    }----- | Populate this field to store Connector or repository error details. This--- information is displayed in the Admin Console. This field may only be--- populated when the Type is REPOSITORY_ERROR.-piRepositoryError :: Lens' PushItem (Maybe RepositoryError)-piRepositoryError-  = lens _piRepositoryError-      (\ s a -> s{_piRepositoryError = a})---- | Content hash of the item according to the repository. If specified, this--- is used to determine how to modify this item\'s status. Setting this--- field and the type field results in argument error. The maximum length--- is 2048 characters.-piContentHash :: Lens' PushItem (Maybe Text)-piContentHash-  = lens _piContentHash-      (\ s a -> s{_piContentHash = a})---- | Structured data hash of the item according to the repository. If--- specified, this is used to determine how to modify this item\'s status.--- Setting this field and the type field results in argument error. The--- maximum length is 2048 characters.-piStructuredDataHash :: Lens' PushItem (Maybe Text)-piStructuredDataHash-  = lens _piStructuredDataHash-      (\ s a -> s{_piStructuredDataHash = a})---- | Provides additional document state information for the connector, such--- as an alternate repository ID and other metadata. The maximum length is--- 8192 bytes.-piPayload :: Lens' PushItem (Maybe ByteString)-piPayload-  = lens _piPayload (\ s a -> s{_piPayload = a}) .-      mapping _Bytes---- | Queue to which this item belongs to. The 'default' queue is chosen if--- this field is not specified. The maximum length is 512 characters.-piQueue :: Lens' PushItem (Maybe Text)-piQueue = lens _piQueue (\ s a -> s{_piQueue = a})---- | Metadata hash of the item according to the repository. If specified,--- this is used to determine how to modify this item\'s status. Setting--- this field and the type field results in argument error. The maximum--- length is 2048 characters.-piMetadataHash :: Lens' PushItem (Maybe Text)-piMetadataHash-  = lens _piMetadataHash-      (\ s a -> s{_piMetadataHash = a})---- | The type of the push operation that defines the push behavior.-piType :: Lens' PushItem (Maybe PushItemType)-piType = lens _piType (\ s a -> s{_piType = a})--instance FromJSON PushItem where-        parseJSON-          = withObject "PushItem"-              (\ o ->-                 PushItem' <$>-                   (o .:? "repositoryError") <*> (o .:? "contentHash")-                     <*> (o .:? "structuredDataHash")-                     <*> (o .:? "payload")-                     <*> (o .:? "queue")-                     <*> (o .:? "metadataHash")-                     <*> (o .:? "type"))--instance ToJSON PushItem where-        toJSON PushItem'{..}-          = object-              (catMaybes-                 [("repositoryError" .=) <$> _piRepositoryError,-                  ("contentHash" .=) <$> _piContentHash,-                  ("structuredDataHash" .=) <$> _piStructuredDataHash,-                  ("payload" .=) <$> _piPayload,-                  ("queue" .=) <$> _piQueue,-                  ("metadataHash" .=) <$> _piMetadataHash,-                  ("type" .=) <$> _piType])---- | Error message per source response.------ /See:/ 'errorMessage' smart constructor.-data ErrorMessage =-  ErrorMessage'-    { _emSource       :: !(Maybe Source)-    , _emErrorMessage :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ErrorMessage' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'emSource'------ * 'emErrorMessage'-errorMessage-    :: ErrorMessage-errorMessage = ErrorMessage' {_emSource = Nothing, _emErrorMessage = Nothing}---emSource :: Lens' ErrorMessage (Maybe Source)-emSource = lens _emSource (\ s a -> s{_emSource = a})--emErrorMessage :: Lens' ErrorMessage (Maybe Text)-emErrorMessage-  = lens _emErrorMessage-      (\ s a -> s{_emErrorMessage = a})--instance FromJSON ErrorMessage where-        parseJSON-          = withObject "ErrorMessage"-              (\ o ->-                 ErrorMessage' <$>-                   (o .:? "source") <*> (o .:? "errorMessage"))--instance ToJSON ErrorMessage where-        toJSON ErrorMessage'{..}-          = object-              (catMaybes-                 [("source" .=) <$> _emSource,-                  ("errorMessage" .=) <$> _emErrorMessage])---- | Options for boolean properties.------ /See:/ 'booleanPropertyOptions' smart constructor.-newtype BooleanPropertyOptions =-  BooleanPropertyOptions'-    { _bpoOperatorOptions :: Maybe BooleanOperatorOptions-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'BooleanPropertyOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'bpoOperatorOptions'-booleanPropertyOptions-    :: BooleanPropertyOptions-booleanPropertyOptions = BooleanPropertyOptions' {_bpoOperatorOptions = Nothing}----- | If set, describes how the boolean should be used as a search operator.-bpoOperatorOptions :: Lens' BooleanPropertyOptions (Maybe BooleanOperatorOptions)-bpoOperatorOptions-  = lens _bpoOperatorOptions-      (\ s a -> s{_bpoOperatorOptions = a})--instance FromJSON BooleanPropertyOptions where-        parseJSON-          = withObject "BooleanPropertyOptions"-              (\ o ->-                 BooleanPropertyOptions' <$>-                   (o .:? "operatorOptions"))--instance ToJSON BooleanPropertyOptions where-        toJSON BooleanPropertyOptions'{..}-          = object-              (catMaybes-                 [("operatorOptions" .=) <$> _bpoOperatorOptions])------- /See:/ 'valueFilter' smart constructor.-data ValueFilter =-  ValueFilter'-    { _vfValue        :: !(Maybe Value)-    , _vfOperatorName :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ValueFilter' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'vfValue'------ * 'vfOperatorName'-valueFilter-    :: ValueFilter-valueFilter = ValueFilter' {_vfValue = Nothing, _vfOperatorName = Nothing}----- | The value to be compared with.-vfValue :: Lens' ValueFilter (Maybe Value)-vfValue = lens _vfValue (\ s a -> s{_vfValue = a})---- | The \`operator_name\` applied to the query, such as--- *price_greater_than*. The filter can work against both types of filters--- defined in the schema for your data source:--- 1. \`operator_name\`, where the query filters results by the property--- that matches the value.--- 2. \`greater_than_operator_name\` or \`less_than_operator_name\` in your--- schema. The query filters the results for the property values that are--- greater than or less than the supplied value in the query.-vfOperatorName :: Lens' ValueFilter (Maybe Text)-vfOperatorName-  = lens _vfOperatorName-      (\ s a -> s{_vfOperatorName = a})--instance FromJSON ValueFilter where-        parseJSON-          = withObject "ValueFilter"-              (\ o ->-                 ValueFilter' <$>-                   (o .:? "value") <*> (o .:? "operatorName"))--instance ToJSON ValueFilter where-        toJSON ValueFilter'{..}-          = object-              (catMaybes-                 [("value" .=) <$> _vfValue,-                  ("operatorName" .=) <$> _vfOperatorName])---- | Used to provide a search operator for enum properties. This is optional.--- Search operators let users restrict the query to specific fields--- relevant to the type of item being searched. For example, if you provide--- no operator for a *priority* enum property with possible values *p0* and--- *p1*, a query that contains the term *p0* will return items that have--- *p0* as the value of the *priority* property, as well as any items that--- contain the string *p0* in other fields. If you provide an operator name--- for the enum, such as *priority*, then search users can use that--- operator to refine results to only items that have *p0* as this--- property\'s value, with the query *priority:p0*.------ /See:/ 'enumOperatorOptions' smart constructor.-newtype EnumOperatorOptions =-  EnumOperatorOptions'-    { _eooOperatorName :: Maybe Text-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'EnumOperatorOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'eooOperatorName'-enumOperatorOptions-    :: EnumOperatorOptions-enumOperatorOptions = EnumOperatorOptions' {_eooOperatorName = Nothing}----- | Indicates the operator name required in the query in order to isolate--- the enum property. For example, if operatorName is *priority* and the--- property\'s name is *priorityVal*, then queries like *priority:\<value>*--- will show results only where the value of the property named--- *priorityVal* matches *\<value>*. By contrast, a search that uses the--- same *\<value>* without an operator will return all items where--- *\<value>* matches the value of any String properties or text within the--- content field for the item. The operator name can only contain lowercase--- letters (a-z). The maximum length is 32 characters.-eooOperatorName :: Lens' EnumOperatorOptions (Maybe Text)-eooOperatorName-  = lens _eooOperatorName-      (\ s a -> s{_eooOperatorName = a})--instance FromJSON EnumOperatorOptions where-        parseJSON-          = withObject "EnumOperatorOptions"-              (\ o ->-                 EnumOperatorOptions' <$> (o .:? "operatorName"))--instance ToJSON EnumOperatorOptions where-        toJSON EnumOperatorOptions'{..}-          = object-              (catMaybes-                 [("operatorName" .=) <$> _eooOperatorName])---- | Gmail Attachment restricts (i.e. has:attachment, has:drive,--- filename:pdf).------ /See:/ 'gmailAttachmentRestrict' smart constructor.-newtype GmailAttachmentRestrict =-  GmailAttachmentRestrict'-    { _gType :: Maybe GmailAttachmentRestrictType-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GmailAttachmentRestrict' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gType'-gmailAttachmentRestrict-    :: GmailAttachmentRestrict-gmailAttachmentRestrict = GmailAttachmentRestrict' {_gType = Nothing}---gType :: Lens' GmailAttachmentRestrict (Maybe GmailAttachmentRestrictType)-gType = lens _gType (\ s a -> s{_gType = a})--instance FromJSON GmailAttachmentRestrict where-        parseJSON-          = withObject "GmailAttachmentRestrict"-              (\ o -> GmailAttachmentRestrict' <$> (o .:? "type"))--instance ToJSON GmailAttachmentRestrict where-        toJSON GmailAttachmentRestrict'{..}-          = object (catMaybes [("type" .=) <$> _gType])---- | Options for date properties.------ /See:/ 'datePropertyOptions' smart constructor.-newtype DatePropertyOptions =-  DatePropertyOptions'-    { _dOperatorOptions :: Maybe DateOperatorOptions-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DatePropertyOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'dOperatorOptions'-datePropertyOptions-    :: DatePropertyOptions-datePropertyOptions = DatePropertyOptions' {_dOperatorOptions = Nothing}----- | If set, describes how the date should be used as a search operator.-dOperatorOptions :: Lens' DatePropertyOptions (Maybe DateOperatorOptions)-dOperatorOptions-  = lens _dOperatorOptions-      (\ s a -> s{_dOperatorOptions = a})--instance FromJSON DatePropertyOptions where-        parseJSON-          = withObject "DatePropertyOptions"-              (\ o ->-                 DatePropertyOptions' <$> (o .:? "operatorOptions"))--instance ToJSON DatePropertyOptions where-        toJSON DatePropertyOptions'{..}-          = object-              (catMaybes-                 [("operatorOptions" .=) <$> _dOperatorOptions])---- | List of enum values.------ /See:/ 'enumValues' smart constructor.-newtype EnumValues =-  EnumValues'-    { _evValues :: Maybe [Text]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'EnumValues' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'evValues'-enumValues-    :: EnumValues-enumValues = EnumValues' {_evValues = Nothing}----- | The maximum allowable length for string values is 32 characters.-evValues :: Lens' EnumValues [Text]-evValues-  = lens _evValues (\ s a -> s{_evValues = a}) .-      _Default-      . _Coerce--instance FromJSON EnumValues where-        parseJSON-          = withObject "EnumValues"-              (\ o -> EnumValues' <$> (o .:? "values" .!= mempty))--instance ToJSON EnumValues where-        toJSON EnumValues'{..}-          = object (catMaybes [("values" .=) <$> _evValues])------- /See:/ 'gSuitePrincipal' smart constructor.-data GSuitePrincipal =-  GSuitePrincipal'-    { _gspGsuiteGroupEmail :: !(Maybe Text)-    , _gspGsuiteUserEmail  :: !(Maybe Text)-    , _gspGsuiteDomain     :: !(Maybe Bool)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GSuitePrincipal' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gspGsuiteGroupEmail'------ * 'gspGsuiteUserEmail'------ * 'gspGsuiteDomain'-gSuitePrincipal-    :: GSuitePrincipal-gSuitePrincipal =-  GSuitePrincipal'-    { _gspGsuiteGroupEmail = Nothing-    , _gspGsuiteUserEmail = Nothing-    , _gspGsuiteDomain = Nothing-    }----- | This principal references a G Suite group account-gspGsuiteGroupEmail :: Lens' GSuitePrincipal (Maybe Text)-gspGsuiteGroupEmail-  = lens _gspGsuiteGroupEmail-      (\ s a -> s{_gspGsuiteGroupEmail = a})---- | This principal references a G Suite user account-gspGsuiteUserEmail :: Lens' GSuitePrincipal (Maybe Text)-gspGsuiteUserEmail-  = lens _gspGsuiteUserEmail-      (\ s a -> s{_gspGsuiteUserEmail = a})---- | This principal represents all users of the G Suite domain of the--- customer.-gspGsuiteDomain :: Lens' GSuitePrincipal (Maybe Bool)-gspGsuiteDomain-  = lens _gspGsuiteDomain-      (\ s a -> s{_gspGsuiteDomain = a})--instance FromJSON GSuitePrincipal where-        parseJSON-          = withObject "GSuitePrincipal"-              (\ o ->-                 GSuitePrincipal' <$>-                   (o .:? "gsuiteGroupEmail") <*>-                     (o .:? "gsuiteUserEmail")-                     <*> (o .:? "gsuiteDomain"))--instance ToJSON GSuitePrincipal where-        toJSON GSuitePrincipal'{..}-          = object-              (catMaybes-                 [("gsuiteGroupEmail" .=) <$> _gspGsuiteGroupEmail,-                  ("gsuiteUserEmail" .=) <$> _gspGsuiteUserEmail,-                  ("gsuiteDomain" .=) <$> _gspGsuiteDomain])------- /See:/ 'indexItemOptions' smart constructor.-newtype IndexItemOptions =-  IndexItemOptions'-    { _iioAllowUnknownGsuitePrincipals :: Maybe Bool-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexItemOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'iioAllowUnknownGsuitePrincipals'-indexItemOptions-    :: IndexItemOptions-indexItemOptions =-  IndexItemOptions' {_iioAllowUnknownGsuitePrincipals = Nothing}----- | Specifies if the index request should allow gsuite principals that do--- not exist or are deleted in the index request.-iioAllowUnknownGsuitePrincipals :: Lens' IndexItemOptions (Maybe Bool)-iioAllowUnknownGsuitePrincipals-  = lens _iioAllowUnknownGsuitePrincipals-      (\ s a -> s{_iioAllowUnknownGsuitePrincipals = a})--instance FromJSON IndexItemOptions where-        parseJSON-          = withObject "IndexItemOptions"-              (\ o ->-                 IndexItemOptions' <$>-                   (o .:? "allowUnknownGsuitePrincipals"))--instance ToJSON IndexItemOptions where-        toJSON IndexItemOptions'{..}-          = object-              (catMaybes-                 [("allowUnknownGsuitePrincipals" .=) <$>-                    _iioAllowUnknownGsuitePrincipals])---- | Additional search quality metadata of the item.------ /See:/ 'searchQualityMetadata' smart constructor.-newtype SearchQualityMetadata =-  SearchQualityMetadata'-    { _sqmQuality :: Maybe (Textual Double)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SearchQualityMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sqmQuality'-searchQualityMetadata-    :: SearchQualityMetadata-searchQualityMetadata = SearchQualityMetadata' {_sqmQuality = Nothing}----- | An indication of the quality of the item, used to influence search--- quality. Value should be between 0.0 (lowest quality) and 1.0 (highest--- quality). The default value is 0.0.-sqmQuality :: Lens' SearchQualityMetadata (Maybe Double)-sqmQuality-  = lens _sqmQuality (\ s a -> s{_sqmQuality = a}) .-      mapping _Coerce--instance FromJSON SearchQualityMetadata where-        parseJSON-          = withObject "SearchQualityMetadata"-              (\ o -> SearchQualityMetadata' <$> (o .:? "quality"))--instance ToJSON SearchQualityMetadata where-        toJSON SearchQualityMetadata'{..}-          = object (catMaybes [("quality" .=) <$> _sqmQuality])---- | List of timestamp values.------ /See:/ 'timestampValues' smart constructor.-newtype TimestampValues =-  TimestampValues'-    { _tValues :: Maybe [DateTime']-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'TimestampValues' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'tValues'-timestampValues-    :: TimestampValues-timestampValues = TimestampValues' {_tValues = Nothing}---tValues :: Lens' TimestampValues [UTCTime]-tValues-  = lens _tValues (\ s a -> s{_tValues = a}) . _Default-      . _Coerce--instance FromJSON TimestampValues where-        parseJSON-          = withObject "TimestampValues"-              (\ o ->-                 TimestampValues' <$> (o .:? "values" .!= mempty))--instance ToJSON TimestampValues where-        toJSON TimestampValues'{..}-          = object (catMaybes [("values" .=) <$> _tValues])---- | Error information about the response.------ /See:/ 'errorInfo' smart constructor.-newtype ErrorInfo =-  ErrorInfo'-    { _eiErrorMessages :: Maybe [ErrorMessage]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ErrorInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'eiErrorMessages'-errorInfo-    :: ErrorInfo-errorInfo = ErrorInfo' {_eiErrorMessages = Nothing}---eiErrorMessages :: Lens' ErrorInfo [ErrorMessage]-eiErrorMessages-  = lens _eiErrorMessages-      (\ s a -> s{_eiErrorMessages = a})-      . _Default-      . _Coerce--instance FromJSON ErrorInfo where-        parseJSON-          = withObject "ErrorInfo"-              (\ o ->-                 ErrorInfo' <$> (o .:? "errorMessages" .!= mempty))--instance ToJSON ErrorInfo where-        toJSON ErrorInfo'{..}-          = object-              (catMaybes-                 [("errorMessages" .=) <$> _eiErrorMessages])------- /See:/ 'resultDisplayMetadata' smart constructor.-data ResultDisplayMetadata =-  ResultDisplayMetadata'-    { _rdmMetalines       :: !(Maybe [ResultDisplayLine])-    , _rdmObjectTypeLabel :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ResultDisplayMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'rdmMetalines'------ * 'rdmObjectTypeLabel'-resultDisplayMetadata-    :: ResultDisplayMetadata-resultDisplayMetadata =-  ResultDisplayMetadata'-    {_rdmMetalines = Nothing, _rdmObjectTypeLabel = Nothing}----- | The metalines content to be displayed with the result.-rdmMetalines :: Lens' ResultDisplayMetadata [ResultDisplayLine]-rdmMetalines-  = lens _rdmMetalines (\ s a -> s{_rdmMetalines = a})-      . _Default-      . _Coerce---- | The display label for the object.-rdmObjectTypeLabel :: Lens' ResultDisplayMetadata (Maybe Text)-rdmObjectTypeLabel-  = lens _rdmObjectTypeLabel-      (\ s a -> s{_rdmObjectTypeLabel = a})--instance FromJSON ResultDisplayMetadata where-        parseJSON-          = withObject "ResultDisplayMetadata"-              (\ o ->-                 ResultDisplayMetadata' <$>-                   (o .:? "metalines" .!= mempty) <*>-                     (o .:? "objectTypeLabel"))--instance ToJSON ResultDisplayMetadata where-        toJSON ResultDisplayMetadata'{..}-          = object-              (catMaybes-                 [("metalines" .=) <$> _rdmMetalines,-                  ("objectTypeLabel" .=) <$> _rdmObjectTypeLabel])---- | The normal response of the operation in case of success. If the original--- method returns no data on success, such as \`Delete\`, the response is--- \`google.protobuf.Empty\`. If the original method is standard--- \`Get\`\/\`Create\`\/\`Update\`, the response should be the resource.--- For other methods, the response should have the type \`XxxResponse\`,--- where \`Xxx\` is the original method name. For example, if the original--- method name is \`TakeSnapshot()\`, the inferred response type is--- \`TakeSnapshotResponse\`.------ /See:/ 'operationResponse' smart constructor.-newtype OperationResponse =-  OperationResponse'-    { _orAddtional :: HashMap Text JSONValue-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'OperationResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'orAddtional'-operationResponse-    :: HashMap Text JSONValue -- ^ 'orAddtional'-    -> OperationResponse-operationResponse pOrAddtional_ =-  OperationResponse' {_orAddtional = _Coerce # pOrAddtional_}----- | Properties of the object. Contains field \'type with type URL.-orAddtional :: Lens' OperationResponse (HashMap Text JSONValue)-orAddtional-  = lens _orAddtional (\ s a -> s{_orAddtional = a}) .-      _Coerce--instance FromJSON OperationResponse where-        parseJSON-          = withObject "OperationResponse"-              (\ o -> OperationResponse' <$> (parseJSONObject o))--instance ToJSON OperationResponse where-        toJSON = toJSON . _orAddtional---- | List of integer values.------ /See:/ 'integerValues' smart constructor.-newtype IntegerValues =-  IntegerValues'-    { _ivValues :: Maybe [Textual Int64]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IntegerValues' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ivValues'-integerValues-    :: IntegerValues-integerValues = IntegerValues' {_ivValues = Nothing}---ivValues :: Lens' IntegerValues [Int64]-ivValues-  = lens _ivValues (\ s a -> s{_ivValues = a}) .-      _Default-      . _Coerce--instance FromJSON IntegerValues where-        parseJSON-          = withObject "IntegerValues"-              (\ o ->-                 IntegerValues' <$> (o .:? "values" .!= mempty))--instance ToJSON IntegerValues where-        toJSON IntegerValues'{..}-          = object (catMaybes [("values" .=) <$> _ivValues])------- /See:/ 'searchItemsByViewURLResponse' smart constructor.-data SearchItemsByViewURLResponse =-  SearchItemsByViewURLResponse'-    { _sibvurNextPageToken :: !(Maybe Text)-    , _sibvurItems         :: !(Maybe [Item])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SearchItemsByViewURLResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sibvurNextPageToken'------ * 'sibvurItems'-searchItemsByViewURLResponse-    :: SearchItemsByViewURLResponse-searchItemsByViewURLResponse =-  SearchItemsByViewURLResponse'-    {_sibvurNextPageToken = Nothing, _sibvurItems = Nothing}----- | Token to retrieve the next page of results, or empty if there are no--- more results in the list.-sibvurNextPageToken :: Lens' SearchItemsByViewURLResponse (Maybe Text)-sibvurNextPageToken-  = lens _sibvurNextPageToken-      (\ s a -> s{_sibvurNextPageToken = a})--sibvurItems :: Lens' SearchItemsByViewURLResponse [Item]-sibvurItems-  = lens _sibvurItems (\ s a -> s{_sibvurItems = a}) .-      _Default-      . _Coerce--instance FromJSON SearchItemsByViewURLResponse where-        parseJSON-          = withObject "SearchItemsByViewURLResponse"-              (\ o ->-                 SearchItemsByViewURLResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "items" .!= mempty))--instance ToJSON SearchItemsByViewURLResponse where-        toJSON SearchItemsByViewURLResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _sibvurNextPageToken,-                  ("items" .=) <$> _sibvurItems])------- /See:/ 'getCustomerIndexStatsResponse' smart constructor.-newtype GetCustomerIndexStatsResponse =-  GetCustomerIndexStatsResponse'-    { _gcisrStats :: Maybe [CustomerIndexStats]-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'GetCustomerIndexStatsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcisrStats'-getCustomerIndexStatsResponse-    :: GetCustomerIndexStatsResponse-getCustomerIndexStatsResponse =-  GetCustomerIndexStatsResponse' {_gcisrStats = Nothing}----- | Summary of indexed item counts, one for each day in the requested range.-gcisrStats :: Lens' GetCustomerIndexStatsResponse [CustomerIndexStats]-gcisrStats-  = lens _gcisrStats (\ s a -> s{_gcisrStats = a}) .-      _Default-      . _Coerce--instance FromJSON GetCustomerIndexStatsResponse where-        parseJSON-          = withObject "GetCustomerIndexStatsResponse"-              (\ o ->-                 GetCustomerIndexStatsResponse' <$>-                   (o .:? "stats" .!= mempty))--instance ToJSON GetCustomerIndexStatsResponse where-        toJSON GetCustomerIndexStatsResponse'{..}-          = object (catMaybes [("stats" .=) <$> _gcisrStats])---- | Information relevant only to a restrict entry. NextId: 12------ /See:/ 'restrictItem' smart constructor.-data RestrictItem =-  RestrictItem'-    { _riGmailFolderRestrict      :: !(Maybe GmailFolderRestrict)-    , _riGmailActionRestrict      :: !(Maybe GmailActionRestrict)-    , _riDriveLocationRestrict    :: !(Maybe DriveLocationRestrict)-    , _riDriveTimeSpanRestrict    :: !(Maybe DriveTimeSpanRestrict)-    , _riDriveMimeTypeRestrict    :: !(Maybe DriveMimeTypeRestrict)-    , _riDriveFollowUpRestrict    :: !(Maybe DriveFollowUpRestrict)-    , _riGmailTimeRestrict        :: !(Maybe GmailTimeRestrict)-    , _riGmailIntelligentRestrict :: !(Maybe GmailIntelligentRestrict)-    , _riGmailAttachmentRestrict  :: !(Maybe GmailAttachmentRestrict)-    , _riSearchOperator           :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'RestrictItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'riGmailFolderRestrict'------ * 'riGmailActionRestrict'------ * 'riDriveLocationRestrict'------ * 'riDriveTimeSpanRestrict'------ * 'riDriveMimeTypeRestrict'------ * 'riDriveFollowUpRestrict'------ * 'riGmailTimeRestrict'------ * 'riGmailIntelligentRestrict'------ * 'riGmailAttachmentRestrict'------ * 'riSearchOperator'-restrictItem-    :: RestrictItem-restrictItem =-  RestrictItem'-    { _riGmailFolderRestrict = Nothing-    , _riGmailActionRestrict = Nothing-    , _riDriveLocationRestrict = Nothing-    , _riDriveTimeSpanRestrict = Nothing-    , _riDriveMimeTypeRestrict = Nothing-    , _riDriveFollowUpRestrict = Nothing-    , _riGmailTimeRestrict = Nothing-    , _riGmailIntelligentRestrict = Nothing-    , _riGmailAttachmentRestrict = Nothing-    , _riSearchOperator = Nothing-    }----- | Gmail Types.-riGmailFolderRestrict :: Lens' RestrictItem (Maybe GmailFolderRestrict)-riGmailFolderRestrict-  = lens _riGmailFolderRestrict-      (\ s a -> s{_riGmailFolderRestrict = a})--riGmailActionRestrict :: Lens' RestrictItem (Maybe GmailActionRestrict)-riGmailActionRestrict-  = lens _riGmailActionRestrict-      (\ s a -> s{_riGmailActionRestrict = a})--riDriveLocationRestrict :: Lens' RestrictItem (Maybe DriveLocationRestrict)-riDriveLocationRestrict-  = lens _riDriveLocationRestrict-      (\ s a -> s{_riDriveLocationRestrict = a})--riDriveTimeSpanRestrict :: Lens' RestrictItem (Maybe DriveTimeSpanRestrict)-riDriveTimeSpanRestrict-  = lens _riDriveTimeSpanRestrict-      (\ s a -> s{_riDriveTimeSpanRestrict = a})---- | LINT.IfChange Drive Types.-riDriveMimeTypeRestrict :: Lens' RestrictItem (Maybe DriveMimeTypeRestrict)-riDriveMimeTypeRestrict-  = lens _riDriveMimeTypeRestrict-      (\ s a -> s{_riDriveMimeTypeRestrict = a})---- | LINT.ThenChange(\/\/depot\/google3\/java\/com\/google\/apps\/search\/quality\/itemsuggest\/utils\/SubtypeRerankingUtils.java)-riDriveFollowUpRestrict :: Lens' RestrictItem (Maybe DriveFollowUpRestrict)-riDriveFollowUpRestrict-  = lens _riDriveFollowUpRestrict-      (\ s a -> s{_riDriveFollowUpRestrict = a})--riGmailTimeRestrict :: Lens' RestrictItem (Maybe GmailTimeRestrict)-riGmailTimeRestrict-  = lens _riGmailTimeRestrict-      (\ s a -> s{_riGmailTimeRestrict = a})--riGmailIntelligentRestrict :: Lens' RestrictItem (Maybe GmailIntelligentRestrict)-riGmailIntelligentRestrict-  = lens _riGmailIntelligentRestrict-      (\ s a -> s{_riGmailIntelligentRestrict = a})--riGmailAttachmentRestrict :: Lens' RestrictItem (Maybe GmailAttachmentRestrict)-riGmailAttachmentRestrict-  = lens _riGmailAttachmentRestrict-      (\ s a -> s{_riGmailAttachmentRestrict = a})---- | The search restrict (e.g. \"after:2017-09-11 before:2017-09-12\").-riSearchOperator :: Lens' RestrictItem (Maybe Text)-riSearchOperator-  = lens _riSearchOperator-      (\ s a -> s{_riSearchOperator = a})--instance FromJSON RestrictItem where-        parseJSON-          = withObject "RestrictItem"-              (\ o ->-                 RestrictItem' <$>-                   (o .:? "gmailFolderRestrict") <*>-                     (o .:? "gmailActionRestrict")-                     <*> (o .:? "driveLocationRestrict")-                     <*> (o .:? "driveTimeSpanRestrict")-                     <*> (o .:? "driveMimeTypeRestrict")-                     <*> (o .:? "driveFollowUpRestrict")-                     <*> (o .:? "gmailTimeRestrict")-                     <*> (o .:? "gmailIntelligentRestrict")-                     <*> (o .:? "gmailAttachmentRestrict")-                     <*> (o .:? "searchOperator"))--instance ToJSON RestrictItem where-        toJSON RestrictItem'{..}-          = object-              (catMaybes-                 [("gmailFolderRestrict" .=) <$>-                    _riGmailFolderRestrict,-                  ("gmailActionRestrict" .=) <$>-                    _riGmailActionRestrict,-                  ("driveLocationRestrict" .=) <$>-                    _riDriveLocationRestrict,-                  ("driveTimeSpanRestrict" .=) <$>-                    _riDriveTimeSpanRestrict,-                  ("driveMimeTypeRestrict" .=) <$>-                    _riDriveMimeTypeRestrict,-                  ("driveFollowUpRestrict" .=) <$>-                    _riDriveFollowUpRestrict,-                  ("gmailTimeRestrict" .=) <$> _riGmailTimeRestrict,-                  ("gmailIntelligentRestrict" .=) <$>-                    _riGmailIntelligentRestrict,-                  ("gmailAttachmentRestrict" .=) <$>-                    _riGmailAttachmentRestrict,-                  ("searchOperator" .=) <$> _riSearchOperator])------- /See:/ 'checkAccessResponse' smart constructor.-newtype CheckAccessResponse =-  CheckAccessResponse'-    { _carHasAccess :: Maybe Bool-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'CheckAccessResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'carHasAccess'-checkAccessResponse-    :: CheckAccessResponse-checkAccessResponse = CheckAccessResponse' {_carHasAccess = Nothing}----- | Returns true if principal has access. Returns false otherwise.-carHasAccess :: Lens' CheckAccessResponse (Maybe Bool)-carHasAccess-  = lens _carHasAccess (\ s a -> s{_carHasAccess = a})--instance FromJSON CheckAccessResponse where-        parseJSON-          = withObject "CheckAccessResponse"-              (\ o -> CheckAccessResponse' <$> (o .:? "hasAccess"))--instance ToJSON CheckAccessResponse where-        toJSON CheckAccessResponse'{..}-          = object-              (catMaybes [("hasAccess" .=) <$> _carHasAccess])---- | Shared request options for all RPC methods.------ /See:/ 'requestOptions' smart constructor.-data RequestOptions =-  RequestOptions'-    { _roLanguageCode        :: !(Maybe Text)-    , _roDebugOptions        :: !(Maybe DebugOptions)-    , _roTimeZone            :: !(Maybe Text)-    , _roSearchApplicationId :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'RequestOptions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'roLanguageCode'------ * 'roDebugOptions'------ * 'roTimeZone'------ * 'roSearchApplicationId'-requestOptions-    :: RequestOptions-requestOptions =-  RequestOptions'-    { _roLanguageCode = Nothing-    , _roDebugOptions = Nothing-    , _roTimeZone = Nothing-    , _roSearchApplicationId = Nothing-    }----- | The BCP-47 language code, such as \"en-US\" or \"sr-Latn\". For more--- information, see--- http:\/\/www.unicode.org\/reports\/tr35\/#Unicode_locale_identifier. For--- translations. When specified, the documents in search results are biased--- towards the specified language. Suggest API does not use this parameter.--- It autocompletes only based on characters in the query.-roLanguageCode :: Lens' RequestOptions (Maybe Text)-roLanguageCode-  = lens _roLanguageCode-      (\ s a -> s{_roLanguageCode = a})---- | Debug options of the request-roDebugOptions :: Lens' RequestOptions (Maybe DebugOptions)-roDebugOptions-  = lens _roDebugOptions-      (\ s a -> s{_roDebugOptions = a})---- | Current user\'s time zone id, such as \"America\/Los_Angeles\" or--- \"Australia\/Sydney\". These IDs are defined by [Unicode Common Locale--- Data Repository (CLDR)](http:\/\/cldr.unicode.org\/) project, and--- currently available in the file--- [timezone.xml](http:\/\/unicode.org\/repos\/cldr\/trunk\/common\/bcp47\/timezone.xml)-roTimeZone :: Lens' RequestOptions (Maybe Text)-roTimeZone-  = lens _roTimeZone (\ s a -> s{_roTimeZone = a})---- | Id of the application created using SearchApplicationsService.-roSearchApplicationId :: Lens' RequestOptions (Maybe Text)-roSearchApplicationId-  = lens _roSearchApplicationId-      (\ s a -> s{_roSearchApplicationId = a})--instance FromJSON RequestOptions where-        parseJSON-          = withObject "RequestOptions"-              (\ o ->-                 RequestOptions' <$>-                   (o .:? "languageCode") <*> (o .:? "debugOptions") <*>-                     (o .:? "timeZone")-                     <*> (o .:? "searchApplicationId"))--instance ToJSON RequestOptions where-        toJSON RequestOptions'{..}-          = object-              (catMaybes-                 [("languageCode" .=) <$> _roLanguageCode,-                  ("debugOptions" .=) <$> _roDebugOptions,-                  ("timeZone" .=) <$> _roTimeZone,-                  ("searchApplicationId" .=) <$>-                    _roSearchApplicationId])---- | This contains item\'s status and any errors.------ /See:/ 'itemStatus' smart constructor.-data ItemStatus =-  ItemStatus'-    { _isProcessingErrors :: !(Maybe [ProcessingError])-    , _isCode             :: !(Maybe ItemStatusCode)-    , _isRepositoryErrors :: !(Maybe [RepositoryError])-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'ItemStatus' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'isProcessingErrors'------ * 'isCode'------ * 'isRepositoryErrors'-itemStatus-    :: ItemStatus-itemStatus =-  ItemStatus'-    { _isProcessingErrors = Nothing-    , _isCode = Nothing-    , _isRepositoryErrors = Nothing-    }----- | Error details in case the item is in ERROR state.-isProcessingErrors :: Lens' ItemStatus [ProcessingError]-isProcessingErrors-  = lens _isProcessingErrors-      (\ s a -> s{_isProcessingErrors = a})-      . _Default-      . _Coerce---- | Status code.-isCode :: Lens' ItemStatus (Maybe ItemStatusCode)-isCode = lens _isCode (\ s a -> s{_isCode = a})---- | Repository error reported by connector.-isRepositoryErrors :: Lens' ItemStatus [RepositoryError]-isRepositoryErrors-  = lens _isRepositoryErrors-      (\ s a -> s{_isRepositoryErrors = a})-      . _Default-      . _Coerce--instance FromJSON ItemStatus where-        parseJSON-          = withObject "ItemStatus"-              (\ o ->-                 ItemStatus' <$>-                   (o .:? "processingErrors" .!= mempty) <*>-                     (o .:? "code")-                     <*> (o .:? "repositoryErrors" .!= mempty))--instance ToJSON ItemStatus where-        toJSON ItemStatus'{..}-          = object-              (catMaybes-                 [("processingErrors" .=) <$> _isProcessingErrors,-                  ("code" .=) <$> _isCode,-                  ("repositoryErrors" .=) <$> _isRepositoryErrors])
− gen/Network/Google/CloudSearch/Types/Sum.hs 
@@ -1,1404 +0,0 @@-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE LambdaCase         #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}--{-# OPTIONS_GHC -fno-warn-unused-imports #-}---- |--- Module      : Network.Google.CloudSearch.Types.Sum--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)----module Network.Google.CloudSearch.Types.Sum where--import           Network.Google.Prelude hiding (Bytes)--data DriveMimeTypeRestrictType-    = Unspecified-      -- ^ @UNSPECIFIED@-    | Pdf-      -- ^ @PDF@-    | Document-      -- ^ @DOCUMENT@-    | Presentation-      -- ^ @PRESENTATION@-    | Spreadsheet-      -- ^ @SPREADSHEET@-    | Form-      -- ^ @FORM@-    | Drawing-      -- ^ @DRAWING@-    | Script-      -- ^ @SCRIPT@-    | Map-      -- ^ @MAP@-    | Image-      -- ^ @IMAGE@-    | Audio-      -- ^ @AUDIO@-    | Video-      -- ^ @VIDEO@-    | Folder-      -- ^ @FOLDER@-    | Archive-      -- ^ @ARCHIVE@-    | Site-      -- ^ @SITE@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable DriveMimeTypeRestrictType--instance FromHttpApiData DriveMimeTypeRestrictType where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right Unspecified-        "PDF" -> Right Pdf-        "DOCUMENT" -> Right Document-        "PRESENTATION" -> Right Presentation-        "SPREADSHEET" -> Right Spreadsheet-        "FORM" -> Right Form-        "DRAWING" -> Right Drawing-        "SCRIPT" -> Right Script-        "MAP" -> Right Map-        "IMAGE" -> Right Image-        "AUDIO" -> Right Audio-        "VIDEO" -> Right Video-        "FOLDER" -> Right Folder-        "ARCHIVE" -> Right Archive-        "SITE" -> Right Site-        x -> Left ("Unable to parse DriveMimeTypeRestrictType from: " <> x)--instance ToHttpApiData DriveMimeTypeRestrictType where-    toQueryParam = \case-        Unspecified -> "UNSPECIFIED"-        Pdf -> "PDF"-        Document -> "DOCUMENT"-        Presentation -> "PRESENTATION"-        Spreadsheet -> "SPREADSHEET"-        Form -> "FORM"-        Drawing -> "DRAWING"-        Script -> "SCRIPT"-        Map -> "MAP"-        Image -> "IMAGE"-        Audio -> "AUDIO"-        Video -> "VIDEO"-        Folder -> "FOLDER"-        Archive -> "ARCHIVE"-        Site -> "SITE"--instance FromJSON DriveMimeTypeRestrictType where-    parseJSON = parseJSONText "DriveMimeTypeRestrictType"--instance ToJSON DriveMimeTypeRestrictType where-    toJSON = toJSONText--data DriveFollowUpRestrictType-    = DFURTUnspecified-      -- ^ @UNSPECIFIED@-    | DFURTFollowupSuggestions-      -- ^ @FOLLOWUP_SUGGESTIONS@-    | DFURTFollowupActionItems-      -- ^ @FOLLOWUP_ACTION_ITEMS@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable DriveFollowUpRestrictType--instance FromHttpApiData DriveFollowUpRestrictType where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right DFURTUnspecified-        "FOLLOWUP_SUGGESTIONS" -> Right DFURTFollowupSuggestions-        "FOLLOWUP_ACTION_ITEMS" -> Right DFURTFollowupActionItems-        x -> Left ("Unable to parse DriveFollowUpRestrictType from: " <> x)--instance ToHttpApiData DriveFollowUpRestrictType where-    toQueryParam = \case-        DFURTUnspecified -> "UNSPECIFIED"-        DFURTFollowupSuggestions -> "FOLLOWUP_SUGGESTIONS"-        DFURTFollowupActionItems -> "FOLLOWUP_ACTION_ITEMS"--instance FromJSON DriveFollowUpRestrictType where-    parseJSON = parseJSONText "DriveFollowUpRestrictType"--instance ToJSON DriveFollowUpRestrictType where-    toJSON = toJSONText---- | Status code.-data ItemStatusCode-    = CodeUnspecified-      -- ^ @CODE_UNSPECIFIED@-      -- Input-only value. Used with Items.list to list all items in the queue,-      -- regardless of status.-    | Error'-      -- ^ @ERROR@-      -- Error encountered by Cloud Search while processing this item. Details of-      -- the error are in repositoryError.-    | Modified-      -- ^ @MODIFIED@-      -- Item has been modified in the repository, and is out of date with the-      -- version previously accepted into Cloud Search.-    | NewItem-      -- ^ @NEW_ITEM@-      -- Item is known to exist in the repository, but is not yet accepted by-      -- Cloud Search. An item can be in this state when Items.push has been-      -- called for an item of this name that did not exist previously.-    | Accepted-      -- ^ @ACCEPTED@-      -- API has accepted the up-to-date data of this item.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable ItemStatusCode--instance FromHttpApiData ItemStatusCode where-    parseQueryParam = \case-        "CODE_UNSPECIFIED" -> Right CodeUnspecified-        "ERROR" -> Right Error'-        "MODIFIED" -> Right Modified-        "NEW_ITEM" -> Right NewItem-        "ACCEPTED" -> Right Accepted-        x -> Left ("Unable to parse ItemStatusCode from: " <> x)--instance ToHttpApiData ItemStatusCode where-    toQueryParam = \case-        CodeUnspecified -> "CODE_UNSPECIFIED"-        Error' -> "ERROR"-        Modified -> "MODIFIED"-        NewItem -> "NEW_ITEM"-        Accepted -> "ACCEPTED"--instance FromJSON ItemStatusCode where-    parseJSON = parseJSONText "ItemStatusCode"--instance ToJSON ItemStatusCode where-    toJSON = toJSONText--data GmailTimeRestrictType-    = GTRTUnspecified-      -- ^ @UNSPECIFIED@-    | GTRTFromThisWeek-      -- ^ @FROM_THIS_WEEK@-      -- newer_than:7d-    | GTRTOlderThanOneYear-      -- ^ @OLDER_THAN_ONE_YEAR@-      -- older_than:1y-    | GTRTFromToday-      -- ^ @FROM_TODAY@-      -- newer_than:1d-    | GTRTFromYesterday-      -- ^ @FROM_YESTERDAY@-      -- newer_than:2d older_than:1d-    | GTRTFromThisMonth-      -- ^ @FROM_THIS_MONTH@-      -- newer_than:30d-    | GTRTFromCertainMonth-      -- ^ @FROM_CERTAIN_MONTH@-      -- This will read as something like \"From November\" and will have-      -- operator before:X after:Y-    | GTRTOlderThanToday-      -- ^ @OLDER_THAN_TODAY@-      -- older_than:1d-    | GTRTOlderThanYesterday-      -- ^ @OLDER_THAN_YESTERDAY@-      -- older_than:2d-    | GTRTOlderThanAWeek-      -- ^ @OLDER_THAN_A_WEEK@-      -- older_than:7d-    | GTRTOlderThanAMonth-      -- ^ @OLDER_THAN_A_MONTH@-      -- older_than:30d-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable GmailTimeRestrictType--instance FromHttpApiData GmailTimeRestrictType where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right GTRTUnspecified-        "FROM_THIS_WEEK" -> Right GTRTFromThisWeek-        "OLDER_THAN_ONE_YEAR" -> Right GTRTOlderThanOneYear-        "FROM_TODAY" -> Right GTRTFromToday-        "FROM_YESTERDAY" -> Right GTRTFromYesterday-        "FROM_THIS_MONTH" -> Right GTRTFromThisMonth-        "FROM_CERTAIN_MONTH" -> Right GTRTFromCertainMonth-        "OLDER_THAN_TODAY" -> Right GTRTOlderThanToday-        "OLDER_THAN_YESTERDAY" -> Right GTRTOlderThanYesterday-        "OLDER_THAN_A_WEEK" -> Right GTRTOlderThanAWeek-        "OLDER_THAN_A_MONTH" -> Right GTRTOlderThanAMonth-        x -> Left ("Unable to parse GmailTimeRestrictType from: " <> x)--instance ToHttpApiData GmailTimeRestrictType where-    toQueryParam = \case-        GTRTUnspecified -> "UNSPECIFIED"-        GTRTFromThisWeek -> "FROM_THIS_WEEK"-        GTRTOlderThanOneYear -> "OLDER_THAN_ONE_YEAR"-        GTRTFromToday -> "FROM_TODAY"-        GTRTFromYesterday -> "FROM_YESTERDAY"-        GTRTFromThisMonth -> "FROM_THIS_MONTH"-        GTRTFromCertainMonth -> "FROM_CERTAIN_MONTH"-        GTRTOlderThanToday -> "OLDER_THAN_TODAY"-        GTRTOlderThanYesterday -> "OLDER_THAN_YESTERDAY"-        GTRTOlderThanAWeek -> "OLDER_THAN_A_WEEK"-        GTRTOlderThanAMonth -> "OLDER_THAN_A_MONTH"--instance FromJSON GmailTimeRestrictType where-    parseJSON = parseJSONText "GmailTimeRestrictType"--instance ToJSON GmailTimeRestrictType where-    toJSON = toJSONText--data QueryInterpretationInterpretationType-    = None-      -- ^ @NONE@-      -- No natural language interpretation or the natural language-      -- interpretation is not used to fetch the search results.-    | Blend-      -- ^ @BLEND@-      -- The natural language results is mixed with results from original query.-    | Replace-      -- ^ @REPLACE@-      -- The results only contain natural language results.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable QueryInterpretationInterpretationType--instance FromHttpApiData QueryInterpretationInterpretationType where-    parseQueryParam = \case-        "NONE" -> Right None-        "BLEND" -> Right Blend-        "REPLACE" -> Right Replace-        x -> Left ("Unable to parse QueryInterpretationInterpretationType from: " <> x)--instance ToHttpApiData QueryInterpretationInterpretationType where-    toQueryParam = \case-        None -> "NONE"-        Blend -> "BLEND"-        Replace -> "REPLACE"--instance FromJSON QueryInterpretationInterpretationType where-    parseJSON = parseJSONText "QueryInterpretationInterpretationType"--instance ToJSON QueryInterpretationInterpretationType where-    toJSON = toJSONText--data InteractionType-    = ITUnspecified-      -- ^ @UNSPECIFIED@-      -- Invalid value.-    | ITView-      -- ^ @VIEW@-      -- This interaction indicates the user viewed the item.-    | ITEdit-      -- ^ @EDIT@-      -- This interaction indicates the user edited the item.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable InteractionType--instance FromHttpApiData InteractionType where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right ITUnspecified-        "VIEW" -> Right ITView-        "EDIT" -> Right ITEdit-        x -> Left ("Unable to parse InteractionType from: " <> x)--instance ToHttpApiData InteractionType where-    toQueryParam = \case-        ITUnspecified -> "UNSPECIFIED"-        ITView -> "VIEW"-        ITEdit -> "EDIT"--instance FromJSON InteractionType where-    parseJSON = parseJSONText "InteractionType"--instance ToJSON InteractionType where-    toJSON = toJSONText---- | Type of the operator.-data QueryOperatorType-    = QOTUnknown-      -- ^ @UNKNOWN@-      -- Invalid value.-    | QOTInteger-      -- ^ @INTEGER@-    | QOTDouble-      -- ^ @DOUBLE@-    | QOTTimestamp-      -- ^ @TIMESTAMP@-    | QOTBoolean-      -- ^ @BOOLEAN@-    | QOTEnum'-      -- ^ @ENUM@-    | QOTDate-      -- ^ @DATE@-    | QOTText-      -- ^ @TEXT@-    | QOTHTML-      -- ^ @HTML@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable QueryOperatorType--instance FromHttpApiData QueryOperatorType where-    parseQueryParam = \case-        "UNKNOWN" -> Right QOTUnknown-        "INTEGER" -> Right QOTInteger-        "DOUBLE" -> Right QOTDouble-        "TIMESTAMP" -> Right QOTTimestamp-        "BOOLEAN" -> Right QOTBoolean-        "ENUM" -> Right QOTEnum'-        "DATE" -> Right QOTDate-        "TEXT" -> Right QOTText-        "HTML" -> Right QOTHTML-        x -> Left ("Unable to parse QueryOperatorType from: " <> x)--instance ToHttpApiData QueryOperatorType where-    toQueryParam = \case-        QOTUnknown -> "UNKNOWN"-        QOTInteger -> "INTEGER"-        QOTDouble -> "DOUBLE"-        QOTTimestamp -> "TIMESTAMP"-        QOTBoolean -> "BOOLEAN"-        QOTEnum' -> "ENUM"-        QOTDate -> "DATE"-        QOTText -> "TEXT"-        QOTHTML -> "HTML"--instance FromJSON QueryOperatorType where-    parseJSON = parseJSONText "QueryOperatorType"--instance ToJSON QueryOperatorType where-    toJSON = toJSONText--data GmailIntelligentRestrictType-    = GIRTUnspecified-      -- ^ @UNSPECIFIED@-    | GIRTSocial-      -- ^ @SOCIAL@-      -- category:social-    | GIRTUpdates-      -- ^ @UPDATES@-      -- category:updates-    | GIRTForums-      -- ^ @FORUMS@-      -- category:forums-    | GIRTPromotions-      -- ^ @PROMOTIONS@-      -- category:promotions-    | GIRTImportant-      -- ^ @IMPORTANT@-      -- is:important-    | GIRTFlightReservation-      -- ^ @FLIGHT_RESERVATION@-      -- label:^cob_sm_flightreservation-    | GIRTLodgingReservation-      -- ^ @LODGING_RESERVATION@-      -- label:^cob_sm_lodgingreservation-    | GIRTCarReservation-      -- ^ @CAR_RESERVATION@-      -- label:^cob_sm_rentalcarreservation-    | GIRTBusReservation-      -- ^ @BUS_RESERVATION@-      -- label:^cob_sm_busreservation-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable GmailIntelligentRestrictType--instance FromHttpApiData GmailIntelligentRestrictType where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right GIRTUnspecified-        "SOCIAL" -> Right GIRTSocial-        "UPDATES" -> Right GIRTUpdates-        "FORUMS" -> Right GIRTForums-        "PROMOTIONS" -> Right GIRTPromotions-        "IMPORTANT" -> Right GIRTImportant-        "FLIGHT_RESERVATION" -> Right GIRTFlightReservation-        "LODGING_RESERVATION" -> Right GIRTLodgingReservation-        "CAR_RESERVATION" -> Right GIRTCarReservation-        "BUS_RESERVATION" -> Right GIRTBusReservation-        x -> Left ("Unable to parse GmailIntelligentRestrictType from: " <> x)--instance ToHttpApiData GmailIntelligentRestrictType where-    toQueryParam = \case-        GIRTUnspecified -> "UNSPECIFIED"-        GIRTSocial -> "SOCIAL"-        GIRTUpdates -> "UPDATES"-        GIRTForums -> "FORUMS"-        GIRTPromotions -> "PROMOTIONS"-        GIRTImportant -> "IMPORTANT"-        GIRTFlightReservation -> "FLIGHT_RESERVATION"-        GIRTLodgingReservation -> "LODGING_RESERVATION"-        GIRTCarReservation -> "CAR_RESERVATION"-        GIRTBusReservation -> "BUS_RESERVATION"--instance FromJSON GmailIntelligentRestrictType where-    parseJSON = parseJSONText "GmailIntelligentRestrictType"--instance ToJSON GmailIntelligentRestrictType where-    toJSON = toJSONText---- | Used to specify the ordered ranking for the enumeration that determines--- how the integer values provided in the possible EnumValuePairs are used--- to rank results. If specified, integer values must be provided for all--- possible EnumValuePair values given for this property. Can only be used--- if isRepeatable is false.-data EnumPropertyOptionsOrderedRanking-    = NoOrder-      -- ^ @NO_ORDER@-      -- There is no ranking order for the property. Results will not be adjusted-      -- by this property\'s value.-    | Ascending-      -- ^ @ASCENDING@-      -- This property is ranked in ascending order. Lower values indicate lower-      -- ranking.-    | Descending-      -- ^ @DESCENDING@-      -- This property is ranked in descending order. Lower values indicate-      -- higher ranking.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable EnumPropertyOptionsOrderedRanking--instance FromHttpApiData EnumPropertyOptionsOrderedRanking where-    parseQueryParam = \case-        "NO_ORDER" -> Right NoOrder-        "ASCENDING" -> Right Ascending-        "DESCENDING" -> Right Descending-        x -> Left ("Unable to parse EnumPropertyOptionsOrderedRanking from: " <> x)--instance ToHttpApiData EnumPropertyOptionsOrderedRanking where-    toQueryParam = \case-        NoOrder -> "NO_ORDER"-        Ascending -> "ASCENDING"-        Descending -> "DESCENDING"--instance FromJSON EnumPropertyOptionsOrderedRanking where-    parseJSON = parseJSONText "EnumPropertyOptionsOrderedRanking"--instance ToJSON EnumPropertyOptionsOrderedRanking where-    toJSON = toJSONText---- | Used to specify the ordered ranking for the integer. Can only be used if--- isRepeatable is false.-data IntegerPropertyOptionsOrderedRanking-    = IPOORNoOrder-      -- ^ @NO_ORDER@-      -- There is no ranking order for the property. Results will not be adjusted-      -- by this property\'s value.-    | IPOORAscending-      -- ^ @ASCENDING@-      -- This property is ranked in ascending order. Lower values indicate lower-      -- ranking.-    | IPOORDescending-      -- ^ @DESCENDING@-      -- This property is ranked in descending order. Lower values indicate-      -- higher ranking.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable IntegerPropertyOptionsOrderedRanking--instance FromHttpApiData IntegerPropertyOptionsOrderedRanking where-    parseQueryParam = \case-        "NO_ORDER" -> Right IPOORNoOrder-        "ASCENDING" -> Right IPOORAscending-        "DESCENDING" -> Right IPOORDescending-        x -> Left ("Unable to parse IntegerPropertyOptionsOrderedRanking from: " <> x)--instance ToHttpApiData IntegerPropertyOptionsOrderedRanking where-    toQueryParam = \case-        IPOORNoOrder -> "NO_ORDER"-        IPOORAscending -> "ASCENDING"-        IPOORDescending -> "DESCENDING"--instance FromJSON IntegerPropertyOptionsOrderedRanking where-    parseJSON = parseJSONText "IntegerPropertyOptionsOrderedRanking"--instance ToJSON IntegerPropertyOptionsOrderedRanking where-    toJSON = toJSONText---- | The type of the push operation that defines the push behavior.-data PushItemType-    = PITUnspecified-      -- ^ @UNSPECIFIED@-      -- Default UNSPECIFIED. Specifies that the push operation should not modify-      -- ItemStatus-    | PITModified-      -- ^ @MODIFIED@-      -- Indicates that the repository document has been modified or updated-      -- since the previous update call. This changes status to MODIFIED state-      -- for an existing item. If this is called on a non existing item, the-      -- status is changed to NEW_ITEM.-    | PITNotModified-      -- ^ @NOT_MODIFIED@-      -- Item in the repository has not been modified since the last update call.-      -- This push operation will set status to ACCEPTED state.-    | PITRepositoryError-      -- ^ @REPOSITORY_ERROR@-      -- Connector is facing a repository error regarding this item. Change-      -- status to REPOSITORY_ERROR state. Item is unreserved and rescheduled at-      -- a future time determined by exponential backoff.-    | PITReQueue-      -- ^ @REQUEUE@-      -- Call push with REQUEUE only for items that have been reserved. This-      -- action unreserves the item and resets its available time to the wall-      -- clock time.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable PushItemType--instance FromHttpApiData PushItemType where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right PITUnspecified-        "MODIFIED" -> Right PITModified-        "NOT_MODIFIED" -> Right PITNotModified-        "REPOSITORY_ERROR" -> Right PITRepositoryError-        "REQUEUE" -> Right PITReQueue-        x -> Left ("Unable to parse PushItemType from: " <> x)--instance ToHttpApiData PushItemType where-    toQueryParam = \case-        PITUnspecified -> "UNSPECIFIED"-        PITModified -> "MODIFIED"-        PITNotModified -> "NOT_MODIFIED"-        PITRepositoryError -> "REPOSITORY_ERROR"-        PITReQueue -> "REQUEUE"--instance FromJSON PushItemType where-    parseJSON = parseJSONText "PushItemType"--instance ToJSON PushItemType where-    toJSON = toJSONText---- | The logic operator of the sub filter.-data CompositeFilterLogicOperator-    = And-      -- ^ @AND@-      -- Logical operators, which can only be applied to sub filters.-    | OR-      -- ^ @OR@-    | Not-      -- ^ @NOT@-      -- NOT can only be applied on a single sub filter.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable CompositeFilterLogicOperator--instance FromHttpApiData CompositeFilterLogicOperator where-    parseQueryParam = \case-        "AND" -> Right And-        "OR" -> Right OR-        "NOT" -> Right Not-        x -> Left ("Unable to parse CompositeFilterLogicOperator from: " <> x)--instance ToHttpApiData CompositeFilterLogicOperator where-    toQueryParam = \case-        And -> "AND"-        OR -> "OR"-        Not -> "NOT"--instance FromJSON CompositeFilterLogicOperator where-    parseJSON = parseJSONText "CompositeFilterLogicOperator"--instance ToJSON CompositeFilterLogicOperator where-    toJSON = toJSONText---- | Importance of the source.-data SourceScoringConfigSourceImportance-    = Default-      -- ^ @DEFAULT@-    | Low-      -- ^ @LOW@-    | High-      -- ^ @HIGH@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable SourceScoringConfigSourceImportance--instance FromHttpApiData SourceScoringConfigSourceImportance where-    parseQueryParam = \case-        "DEFAULT" -> Right Default-        "LOW" -> Right Low-        "HIGH" -> Right High-        x -> Left ("Unable to parse SourceScoringConfigSourceImportance from: " <> x)--instance ToHttpApiData SourceScoringConfigSourceImportance where-    toQueryParam = \case-        Default -> "DEFAULT"-        Low -> "LOW"-        High -> "HIGH"--instance FromJSON SourceScoringConfigSourceImportance where-    parseJSON = parseJSONText "SourceScoringConfigSourceImportance"--instance ToJSON SourceScoringConfigSourceImportance where-    toJSON = toJSONText--data GmailAttachmentRestrictType-    = GARTUnspecified-      -- ^ @UNSPECIFIED@-    | GARTHasAttachment-      -- ^ @HAS_ATTACHMENT@-      -- has:attachment-    | GARTHasPhoto-      -- ^ @HAS_PHOTO@-      -- has photos (changes to filename:(jpg OR jpeg OR png) when typed)-    | GARTHasDrive-      -- ^ @HAS_DRIVE@-      -- has:drive-    | GARTHasDocument-      -- ^ @HAS_DOCUMENT@-      -- has:document-    | GARTHasSpreadsheet-      -- ^ @HAS_SPREADSHEET@-      -- has:spreadsheet-    | GARTHasPresentation-      -- ^ @HAS_PRESENTATION@-      -- has:presentation-    | GARTHasYouTube-      -- ^ @HAS_YOUTUBE@-      -- has:youtube-    | GARTHasPdf-      -- ^ @HAS_PDF@-      -- filename:pdf-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable GmailAttachmentRestrictType--instance FromHttpApiData GmailAttachmentRestrictType where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right GARTUnspecified-        "HAS_ATTACHMENT" -> Right GARTHasAttachment-        "HAS_PHOTO" -> Right GARTHasPhoto-        "HAS_DRIVE" -> Right GARTHasDrive-        "HAS_DOCUMENT" -> Right GARTHasDocument-        "HAS_SPREADSHEET" -> Right GARTHasSpreadsheet-        "HAS_PRESENTATION" -> Right GARTHasPresentation-        "HAS_YOUTUBE" -> Right GARTHasYouTube-        "HAS_PDF" -> Right GARTHasPdf-        x -> Left ("Unable to parse GmailAttachmentRestrictType from: " <> x)--instance ToHttpApiData GmailAttachmentRestrictType where-    toQueryParam = \case-        GARTUnspecified -> "UNSPECIFIED"-        GARTHasAttachment -> "HAS_ATTACHMENT"-        GARTHasPhoto -> "HAS_PHOTO"-        GARTHasDrive -> "HAS_DRIVE"-        GARTHasDocument -> "HAS_DOCUMENT"-        GARTHasSpreadsheet -> "HAS_SPREADSHEET"-        GARTHasPresentation -> "HAS_PRESENTATION"-        GARTHasYouTube -> "HAS_YOUTUBE"-        GARTHasPdf -> "HAS_PDF"--instance FromJSON GmailAttachmentRestrictType where-    parseJSON = parseJSONText "GmailAttachmentRestrictType"--instance ToJSON GmailAttachmentRestrictType where-    toJSON = toJSONText---- | Indicates the ranking importance given to property when it is matched--- during retrieval. Once set, the token importance of a property cannot be--- changed.-data RetrievalImportanceImportance-    = RIIDefault-      -- ^ @DEFAULT@-      -- Treat the match like a body text match.-    | RIIHighest-      -- ^ @HIGHEST@-      -- Treat the match like a match against title of the item.-    | RIIHigh-      -- ^ @HIGH@-      -- Treat the match with higher importance than body text.-    | RIILow-      -- ^ @LOW@-      -- Treat the match with lower importance than body text.-    | RIINone-      -- ^ @NONE@-      -- Do not match against this field during retrieval. The property can still-      -- be used for operator matching, faceting, and suggest if desired.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable RetrievalImportanceImportance--instance FromHttpApiData RetrievalImportanceImportance where-    parseQueryParam = \case-        "DEFAULT" -> Right RIIDefault-        "HIGHEST" -> Right RIIHighest-        "HIGH" -> Right RIIHigh-        "LOW" -> Right RIILow-        "NONE" -> Right RIINone-        x -> Left ("Unable to parse RetrievalImportanceImportance from: " <> x)--instance ToHttpApiData RetrievalImportanceImportance where-    toQueryParam = \case-        RIIDefault -> "DEFAULT"-        RIIHighest -> "HIGHEST"-        RIIHigh -> "HIGH"-        RIILow -> "LOW"-        RIINone -> "NONE"--instance FromJSON RetrievalImportanceImportance where-    parseJSON = parseJSONText "RetrievalImportanceImportance"--instance ToJSON RetrievalImportanceImportance where-    toJSON = toJSONText---- | Error code indicating the nature of the error.-data ProcessingErrorCode-    = ProcessingErrorCodeUnspecified-      -- ^ @PROCESSING_ERROR_CODE_UNSPECIFIED@-      -- Input only value. Use this value in Items.-    | MalformedRequest-      -- ^ @MALFORMED_REQUEST@-      -- Item\'s ACL, metadata, or content is malformed or in invalid state.-      -- FieldViolations contains more details on where the problem is.-    | UnsupportedContentFormat-      -- ^ @UNSUPPORTED_CONTENT_FORMAT@-      -- Countent format is unsupported.-    | IndirectBrokenACL-      -- ^ @INDIRECT_BROKEN_ACL@-      -- Items with incomplete ACL information due to inheriting other items with-      -- broken ACL or having groups with unmapped descendants.-    | ACLCycle-      -- ^ @ACL_CYCLE@-      -- ACL inheritance graph formed a cycle.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable ProcessingErrorCode--instance FromHttpApiData ProcessingErrorCode where-    parseQueryParam = \case-        "PROCESSING_ERROR_CODE_UNSPECIFIED" -> Right ProcessingErrorCodeUnspecified-        "MALFORMED_REQUEST" -> Right MalformedRequest-        "UNSUPPORTED_CONTENT_FORMAT" -> Right UnsupportedContentFormat-        "INDIRECT_BROKEN_ACL" -> Right IndirectBrokenACL-        "ACL_CYCLE" -> Right ACLCycle-        x -> Left ("Unable to parse ProcessingErrorCode from: " <> x)--instance ToHttpApiData ProcessingErrorCode where-    toQueryParam = \case-        ProcessingErrorCodeUnspecified -> "PROCESSING_ERROR_CODE_UNSPECIFIED"-        MalformedRequest -> "MALFORMED_REQUEST"-        UnsupportedContentFormat -> "UNSUPPORTED_CONTENT_FORMAT"-        IndirectBrokenACL -> "INDIRECT_BROKEN_ACL"-        ACLCycle -> "ACL_CYCLE"--instance FromJSON ProcessingErrorCode where-    parseJSON = parseJSONText "ProcessingErrorCode"--instance ToJSON ProcessingErrorCode where-    toJSON = toJSONText---- | Ascending is the default sort order-data SortOptionsSortOrder-    = SOSOAscending-      -- ^ @ASCENDING@-    | SOSODescending-      -- ^ @DESCENDING@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable SortOptionsSortOrder--instance FromHttpApiData SortOptionsSortOrder where-    parseQueryParam = \case-        "ASCENDING" -> Right SOSOAscending-        "DESCENDING" -> Right SOSODescending-        x -> Left ("Unable to parse SortOptionsSortOrder from: " <> x)--instance ToHttpApiData SortOptionsSortOrder where-    toQueryParam = \case-        SOSOAscending -> "ASCENDING"-        SOSODescending -> "DESCENDING"--instance FromJSON SortOptionsSortOrder where-    parseJSON = parseJSONText "SortOptionsSortOrder"--instance ToJSON SortOptionsSortOrder where-    toJSON = toJSONText--data GmailActionRestrictType-    = GUnspecified-      -- ^ @UNSPECIFIED@-    | GUnread-      -- ^ @UNREAD@-      -- is:unread-    | GRead'-      -- ^ @READ@-      -- is:read-    | GRepliedTo-      -- ^ @REPLIED_TO@-      -- label:^io_re-    | GMuted-      -- ^ @MUTED@-      -- label:mute-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable GmailActionRestrictType--instance FromHttpApiData GmailActionRestrictType where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right GUnspecified-        "UNREAD" -> Right GUnread-        "READ" -> Right GRead'-        "REPLIED_TO" -> Right GRepliedTo-        "MUTED" -> Right GMuted-        x -> Left ("Unable to parse GmailActionRestrictType from: " <> x)--instance ToHttpApiData GmailActionRestrictType where-    toQueryParam = \case-        GUnspecified -> "UNSPECIFIED"-        GUnread -> "UNREAD"-        GRead' -> "READ"-        GRepliedTo -> "REPLIED_TO"-        GMuted -> "MUTED"--instance FromJSON GmailActionRestrictType where-    parseJSON = parseJSONText "GmailActionRestrictType"--instance ToJSON GmailActionRestrictType where-    toJSON = toJSONText--data GmailFolderRestrictType-    = GFRTUnspecified-      -- ^ @UNSPECIFIED@-    | GFRTInSent-      -- ^ @IN_SENT@-      -- in:sent-    | GFRTInDraft-      -- ^ @IN_DRAFT@-      -- in:draft-    | GFRTChats-      -- ^ @CHATS@-      -- label:chats-    | GFRTInTrash-      -- ^ @IN_TRASH@-      -- in:trash-    | GFRTUserGeneratedLabel-      -- ^ @USER_GENERATED_LABEL@-      -- label:-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable GmailFolderRestrictType--instance FromHttpApiData GmailFolderRestrictType where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right GFRTUnspecified-        "IN_SENT" -> Right GFRTInSent-        "IN_DRAFT" -> Right GFRTInDraft-        "CHATS" -> Right GFRTChats-        "IN_TRASH" -> Right GFRTInTrash-        "USER_GENERATED_LABEL" -> Right GFRTUserGeneratedLabel-        x -> Left ("Unable to parse GmailFolderRestrictType from: " <> x)--instance ToHttpApiData GmailFolderRestrictType where-    toQueryParam = \case-        GFRTUnspecified -> "UNSPECIFIED"-        GFRTInSent -> "IN_SENT"-        GFRTInDraft -> "IN_DRAFT"-        GFRTChats -> "CHATS"-        GFRTInTrash -> "IN_TRASH"-        GFRTUserGeneratedLabel -> "USER_GENERATED_LABEL"--instance FromJSON GmailFolderRestrictType where-    parseJSON = parseJSONText "GmailFolderRestrictType"--instance ToJSON GmailFolderRestrictType where-    toJSON = toJSONText---- | The resolution status for the external identity.-data UnmAppedIdentityResolutionStatusCode-    = UAIRSCCodeUnspecified-      -- ^ @CODE_UNSPECIFIED@-      -- Input-only value. Used to list all unmapped identities regardless of-      -- status.-    | UAIRSCNotFound-      -- ^ @NOT_FOUND@-      -- The unmapped identity was not found in IDaaS, and needs to be provided-      -- by the user.-    | UAIRSCIdentitySourceNotFound-      -- ^ @IDENTITY_SOURCE_NOT_FOUND@-      -- The identity source associated with the identity was either not found or-      -- deleted.-    | UAIRSCIdentitySourceMisConfigured-      -- ^ @IDENTITY_SOURCE_MISCONFIGURED@-      -- IDaaS does not understand the identity source, probably because the-      -- schema was modified in a non compatible way.-    | UAIRSCTooManyMAppingsFound-      -- ^ @TOO_MANY_MAPPINGS_FOUND@-      -- The number of users associated with the external identity is too large.-    | UAIRSCInternalError-      -- ^ @INTERNAL_ERROR@-      -- Internal error.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable UnmAppedIdentityResolutionStatusCode--instance FromHttpApiData UnmAppedIdentityResolutionStatusCode where-    parseQueryParam = \case-        "CODE_UNSPECIFIED" -> Right UAIRSCCodeUnspecified-        "NOT_FOUND" -> Right UAIRSCNotFound-        "IDENTITY_SOURCE_NOT_FOUND" -> Right UAIRSCIdentitySourceNotFound-        "IDENTITY_SOURCE_MISCONFIGURED" -> Right UAIRSCIdentitySourceMisConfigured-        "TOO_MANY_MAPPINGS_FOUND" -> Right UAIRSCTooManyMAppingsFound-        "INTERNAL_ERROR" -> Right UAIRSCInternalError-        x -> Left ("Unable to parse UnmAppedIdentityResolutionStatusCode from: " <> x)--instance ToHttpApiData UnmAppedIdentityResolutionStatusCode where-    toQueryParam = \case-        UAIRSCCodeUnspecified -> "CODE_UNSPECIFIED"-        UAIRSCNotFound -> "NOT_FOUND"-        UAIRSCIdentitySourceNotFound -> "IDENTITY_SOURCE_NOT_FOUND"-        UAIRSCIdentitySourceMisConfigured -> "IDENTITY_SOURCE_MISCONFIGURED"-        UAIRSCTooManyMAppingsFound -> "TOO_MANY_MAPPINGS_FOUND"-        UAIRSCInternalError -> "INTERNAL_ERROR"--instance FromJSON UnmAppedIdentityResolutionStatusCode where-    parseJSON = parseJSONText "UnmAppedIdentityResolutionStatusCode"--instance ToJSON UnmAppedIdentityResolutionStatusCode where-    toJSON = toJSONText---- | V1 error format.-data Xgafv-    = X1-      -- ^ @1@-      -- v1 error format-    | X2-      -- ^ @2@-      -- v2 error format-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable Xgafv--instance FromHttpApiData Xgafv where-    parseQueryParam = \case-        "1" -> Right X1-        "2" -> Right X2-        x -> Left ("Unable to parse Xgafv from: " <> x)--instance ToHttpApiData Xgafv where-    toQueryParam = \case-        X1 -> "1"-        X2 -> "2"--instance FromJSON Xgafv where-    parseJSON = parseJSONText "Xgafv"--instance ToJSON Xgafv where-    toJSON = toJSONText---- | Type of error.-data RepositoryErrorType-    = Unknown-      -- ^ @UNKNOWN@-      -- Unknown error.-    | NetworkError-      -- ^ @NETWORK_ERROR@-      -- Unknown or unreachable host.-    | DNSError-      -- ^ @DNS_ERROR@-      -- DNS problem, such as the DNS server is not responding.-    | ConnectionError-      -- ^ @CONNECTION_ERROR@-      -- Cannot connect to the repository server.-    | AuthenticationError-      -- ^ @AUTHENTICATION_ERROR@-      -- Failed authentication due to incorrect credentials.-    | AuthorizationError-      -- ^ @AUTHORIZATION_ERROR@-      -- Service account is not authorized for the repository.-    | ServerError-      -- ^ @SERVER_ERROR@-      -- Repository server error.-    | QuotaExceeded-      -- ^ @QUOTA_EXCEEDED@-      -- Quota exceeded.-    | ServiceUnavailable-      -- ^ @SERVICE_UNAVAILABLE@-      -- Server temporarily unavailable.-    | ClientError-      -- ^ @CLIENT_ERROR@-      -- Client-related error, such as an invalid request from the connector to-      -- the repository server.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable RepositoryErrorType--instance FromHttpApiData RepositoryErrorType where-    parseQueryParam = \case-        "UNKNOWN" -> Right Unknown-        "NETWORK_ERROR" -> Right NetworkError-        "DNS_ERROR" -> Right DNSError-        "CONNECTION_ERROR" -> Right ConnectionError-        "AUTHENTICATION_ERROR" -> Right AuthenticationError-        "AUTHORIZATION_ERROR" -> Right AuthorizationError-        "SERVER_ERROR" -> Right ServerError-        "QUOTA_EXCEEDED" -> Right QuotaExceeded-        "SERVICE_UNAVAILABLE" -> Right ServiceUnavailable-        "CLIENT_ERROR" -> Right ClientError-        x -> Left ("Unable to parse RepositoryErrorType from: " <> x)--instance ToHttpApiData RepositoryErrorType where-    toQueryParam = \case-        Unknown -> "UNKNOWN"-        NetworkError -> "NETWORK_ERROR"-        DNSError -> "DNS_ERROR"-        ConnectionError -> "CONNECTION_ERROR"-        AuthenticationError -> "AUTHENTICATION_ERROR"-        AuthorizationError -> "AUTHORIZATION_ERROR"-        ServerError -> "SERVER_ERROR"-        QuotaExceeded -> "QUOTA_EXCEEDED"-        ServiceUnavailable -> "SERVICE_UNAVAILABLE"-        ClientError -> "CLIENT_ERROR"--instance FromJSON RepositoryErrorType where-    parseJSON = parseJSONText "RepositoryErrorType"--instance ToJSON RepositoryErrorType where-    toJSON = toJSONText--data DriveLocationRestrictType-    = DLRTUnspecified-      -- ^ @UNSPECIFIED@-    | DLRTTrashed-      -- ^ @TRASHED@-    | DLRTStarred-      -- ^ @STARRED@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable DriveLocationRestrictType--instance FromHttpApiData DriveLocationRestrictType where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right DLRTUnspecified-        "TRASHED" -> Right DLRTTrashed-        "STARRED" -> Right DLRTStarred-        x -> Left ("Unable to parse DriveLocationRestrictType from: " <> x)--instance ToHttpApiData DriveLocationRestrictType where-    toQueryParam = \case-        DLRTUnspecified -> "UNSPECIFIED"-        DLRTTrashed -> "TRASHED"-        DLRTStarred -> "STARRED"--instance FromJSON DriveLocationRestrictType where-    parseJSON = parseJSONText "DriveLocationRestrictType"--instance ToJSON DriveLocationRestrictType where-    toJSON = toJSONText---- | Type for this item.-data ItemItemType-    = IITUnspecified-      -- ^ @UNSPECIFIED@-    | IITContentItem-      -- ^ @CONTENT_ITEM@-      -- An item that is indexed for the only purpose of serving information.-      -- These items cannot be referred in containerName or inheritAclFrom-      -- fields.-    | IITContainerItem-      -- ^ @CONTAINER_ITEM@-      -- An item that gets indexed and whose purpose is to supply other items-      -- with ACLs and\/or contain other items.-    | IITVirtualContainerItem-      -- ^ @VIRTUAL_CONTAINER_ITEM@-      -- An item that does not get indexed, but otherwise has the same purpose as-      -- CONTAINER_ITEM.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable ItemItemType--instance FromHttpApiData ItemItemType where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right IITUnspecified-        "CONTENT_ITEM" -> Right IITContentItem-        "CONTAINER_ITEM" -> Right IITContainerItem-        "VIRTUAL_CONTAINER_ITEM" -> Right IITVirtualContainerItem-        x -> Left ("Unable to parse ItemItemType from: " <> x)--instance ToHttpApiData ItemItemType where-    toQueryParam = \case-        IITUnspecified -> "UNSPECIFIED"-        IITContentItem -> "CONTENT_ITEM"-        IITContainerItem -> "CONTAINER_ITEM"-        IITVirtualContainerItem -> "VIRTUAL_CONTAINER_ITEM"--instance FromJSON ItemItemType where-    parseJSON = parseJSONText "ItemItemType"--instance ToJSON ItemItemType where-    toJSON = toJSONText---- | Status of the items.-data ItemCountByStatusStatusCode-    = ICBSSCCodeUnspecified-      -- ^ @CODE_UNSPECIFIED@-      -- Input-only value. Used with Items.list to list all items in the queue,-      -- regardless of status.-    | ICBSSCError'-      -- ^ @ERROR@-      -- Error encountered by Cloud Search while processing this item. Details of-      -- the error are in repositoryError.-    | ICBSSCModified-      -- ^ @MODIFIED@-      -- Item has been modified in the repository, and is out of date with the-      -- version previously accepted into Cloud Search.-    | ICBSSCNewItem-      -- ^ @NEW_ITEM@-      -- Item is known to exist in the repository, but is not yet accepted by-      -- Cloud Search. An item can be in this state when Items.push has been-      -- called for an item of this name that did not exist previously.-    | ICBSSCAccepted-      -- ^ @ACCEPTED@-      -- API has accepted the up-to-date data of this item.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable ItemCountByStatusStatusCode--instance FromHttpApiData ItemCountByStatusStatusCode where-    parseQueryParam = \case-        "CODE_UNSPECIFIED" -> Right ICBSSCCodeUnspecified-        "ERROR" -> Right ICBSSCError'-        "MODIFIED" -> Right ICBSSCModified-        "NEW_ITEM" -> Right ICBSSCNewItem-        "ACCEPTED" -> Right ICBSSCAccepted-        x -> Left ("Unable to parse ItemCountByStatusStatusCode from: " <> x)--instance ToHttpApiData ItemCountByStatusStatusCode where-    toQueryParam = \case-        ICBSSCCodeUnspecified -> "CODE_UNSPECIFIED"-        ICBSSCError' -> "ERROR"-        ICBSSCModified -> "MODIFIED"-        ICBSSCNewItem -> "NEW_ITEM"-        ICBSSCAccepted -> "ACCEPTED"--instance FromJSON ItemCountByStatusStatusCode where-    parseJSON = parseJSONText "ItemCountByStatusStatusCode"--instance ToJSON ItemCountByStatusStatusCode where-    toJSON = toJSONText--data ItemContentContentFormat-    = ICCFUnspecified-      -- ^ @UNSPECIFIED@-      -- Invalid value.-    | ICCFHTML-      -- ^ @HTML@-      -- contentFormat is HTML.-    | ICCFText-      -- ^ @TEXT@-      -- contentFormat is free text.-    | ICCFRaw-      -- ^ @RAW@-      -- contentFormat is raw bytes.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable ItemContentContentFormat--instance FromHttpApiData ItemContentContentFormat where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right ICCFUnspecified-        "HTML" -> Right ICCFHTML-        "TEXT" -> Right ICCFText-        "RAW" -> Right ICCFRaw-        x -> Left ("Unable to parse ItemContentContentFormat from: " <> x)--instance ToHttpApiData ItemContentContentFormat where-    toQueryParam = \case-        ICCFUnspecified -> "UNSPECIFIED"-        ICCFHTML -> "HTML"-        ICCFText -> "TEXT"-        ICCFRaw -> "RAW"--instance FromJSON ItemContentContentFormat where-    parseJSON = parseJSONText "ItemContentContentFormat"--instance ToJSON ItemContentContentFormat where-    toJSON = toJSONText---- | Predefined content source for Google Apps.-data SourcePredefinedSource-    = SPSNone-      -- ^ @NONE@-    | SPSQueryHistory-      -- ^ @QUERY_HISTORY@-      -- Suggests queries issued by the user in the past. Only valid when used-      -- with the suggest API. Ignored when used in the query API.-    | SPSPerson-      -- ^ @PERSON@-      -- Suggests people in the organization. Only valid when used with the-      -- suggest API. Results in an error when used in the query API.-    | SPSGoogleDrive-      -- ^ @GOOGLE_DRIVE@-    | SPSGoogleGmail-      -- ^ @GOOGLE_GMAIL@-    | SPSGoogleSites-      -- ^ @GOOGLE_SITES@-    | SPSGoogleGroups-      -- ^ @GOOGLE_GROUPS@-    | SPSGoogleCalendar-      -- ^ @GOOGLE_CALENDAR@-    | SPSGoogleKeep-      -- ^ @GOOGLE_KEEP@-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable SourcePredefinedSource--instance FromHttpApiData SourcePredefinedSource where-    parseQueryParam = \case-        "NONE" -> Right SPSNone-        "QUERY_HISTORY" -> Right SPSQueryHistory-        "PERSON" -> Right SPSPerson-        "GOOGLE_DRIVE" -> Right SPSGoogleDrive-        "GOOGLE_GMAIL" -> Right SPSGoogleGmail-        "GOOGLE_SITES" -> Right SPSGoogleSites-        "GOOGLE_GROUPS" -> Right SPSGoogleGroups-        "GOOGLE_CALENDAR" -> Right SPSGoogleCalendar-        "GOOGLE_KEEP" -> Right SPSGoogleKeep-        x -> Left ("Unable to parse SourcePredefinedSource from: " <> x)--instance ToHttpApiData SourcePredefinedSource where-    toQueryParam = \case-        SPSNone -> "NONE"-        SPSQueryHistory -> "QUERY_HISTORY"-        SPSPerson -> "PERSON"-        SPSGoogleDrive -> "GOOGLE_DRIVE"-        SPSGoogleGmail -> "GOOGLE_GMAIL"-        SPSGoogleSites -> "GOOGLE_SITES"-        SPSGoogleGroups -> "GOOGLE_GROUPS"-        SPSGoogleCalendar -> "GOOGLE_CALENDAR"-        SPSGoogleKeep -> "GOOGLE_KEEP"--instance FromJSON SourcePredefinedSource where-    parseJSON = parseJSONText "SourcePredefinedSource"--instance ToJSON SourcePredefinedSource where-    toJSON = toJSONText--data DriveTimeSpanRestrictType-    = DTSRTUnspecified-      -- ^ @UNSPECIFIED@-    | DTSRTToday-      -- ^ @TODAY@-    | DTSRTYesterday-      -- ^ @YESTERDAY@-    | DTSRTLast7Days-      -- ^ @LAST_7_DAYS@-    | DTSRTLast30Days-      -- ^ @LAST_30_DAYS@-      -- Not Enabled-    | DTSRTLast90Days-      -- ^ @LAST_90_DAYS@-      -- Not Enabled-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable DriveTimeSpanRestrictType--instance FromHttpApiData DriveTimeSpanRestrictType where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right DTSRTUnspecified-        "TODAY" -> Right DTSRTToday-        "YESTERDAY" -> Right DTSRTYesterday-        "LAST_7_DAYS" -> Right DTSRTLast7Days-        "LAST_30_DAYS" -> Right DTSRTLast30Days-        "LAST_90_DAYS" -> Right DTSRTLast90Days-        x -> Left ("Unable to parse DriveTimeSpanRestrictType from: " <> x)--instance ToHttpApiData DriveTimeSpanRestrictType where-    toQueryParam = \case-        DTSRTUnspecified -> "UNSPECIFIED"-        DTSRTToday -> "TODAY"-        DTSRTYesterday -> "YESTERDAY"-        DTSRTLast7Days -> "LAST_7_DAYS"-        DTSRTLast30Days -> "LAST_30_DAYS"-        DTSRTLast90Days -> "LAST_90_DAYS"--instance FromJSON DriveTimeSpanRestrictType where-    parseJSON = parseJSONText "DriveTimeSpanRestrictType"--instance ToJSON DriveTimeSpanRestrictType where-    toJSON = toJSONText---- | Required. The RequestMode for this request.-data IndexItemRequestMode-    = IIRMUnspecified-      -- ^ @UNSPECIFIED@-      -- Priority is not specified in the update request. Leaving priority-      -- unspecified results in an update failure.-    | IIRMSynchronous-      -- ^ @SYNCHRONOUS@-      -- For real-time updates.-    | IIRMAsynchronous-      -- ^ @ASYNCHRONOUS@-      -- For changes that are executed after the response is sent back to the-      -- caller.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable IndexItemRequestMode--instance FromHttpApiData IndexItemRequestMode where-    parseQueryParam = \case-        "UNSPECIFIED" -> Right IIRMUnspecified-        "SYNCHRONOUS" -> Right IIRMSynchronous-        "ASYNCHRONOUS" -> Right IIRMAsynchronous-        x -> Left ("Unable to parse IndexItemRequestMode from: " <> x)--instance ToHttpApiData IndexItemRequestMode where-    toQueryParam = \case-        IIRMUnspecified -> "UNSPECIFIED"-        IIRMSynchronous -> "SYNCHRONOUS"-        IIRMAsynchronous -> "ASYNCHRONOUS"--instance FromJSON IndexItemRequestMode where-    parseJSON = parseJSONText "IndexItemRequestMode"--instance ToJSON IndexItemRequestMode where-    toJSON = toJSONText---- | Sets the type of access rules to apply when an item inherits its ACL--- from a parent. This should always be set in tandem with the--- inheritAclFrom field. Also, when the inheritAclFrom field is set, this--- field should be set to a valid AclInheritanceType.-data ItemACLACLInheritanceType-    = NotApplicable-      -- ^ @NOT_APPLICABLE@-      -- The default value when this item does not inherit an ACL. Use-      -- NOT_APPLICABLE when inheritAclFrom is empty. An item without ACL-      -- inheritance can still have ACLs supplied by its own readers and-      -- deniedReaders fields.-    | ChildOverride-      -- ^ @CHILD_OVERRIDE@-      -- During an authorization conflict, the ACL of the child item determines-      -- its read access.-    | ParentOverride-      -- ^ @PARENT_OVERRIDE@-      -- During an authorization conflict, the ACL of the parent item specified-      -- in the inheritAclFrom field determines read access.-    | BothPermit-      -- ^ @BOTH_PERMIT@-      -- Access is granted only if this item and the parent item specified in the-      -- inheritAclFrom field both permit read access.-      deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)--instance Hashable ItemACLACLInheritanceType--instance FromHttpApiData ItemACLACLInheritanceType where-    parseQueryParam = \case-        "NOT_APPLICABLE" -> Right NotApplicable-        "CHILD_OVERRIDE" -> Right ChildOverride-        "PARENT_OVERRIDE" -> Right ParentOverride-        "BOTH_PERMIT" -> Right BothPermit-        x -> Left ("Unable to parse ItemACLACLInheritanceType from: " <> x)--instance ToHttpApiData ItemACLACLInheritanceType where-    toQueryParam = \case-        NotApplicable -> "NOT_APPLICABLE"-        ChildOverride -> "CHILD_OVERRIDE"-        ParentOverride -> "PARENT_OVERRIDE"-        BothPermit -> "BOTH_PERMIT"--instance FromJSON ItemACLACLInheritanceType where-    parseJSON = parseJSONText "ItemACLACLInheritanceType"--instance ToJSON ItemACLACLInheritanceType where-    toJSON = toJSONText
− gen/Network/Google/Resource/CloudSearch/Debug/Datasources/Items/CheckAccess.hs 
@@ -1,185 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Debug.Datasources.Items.CheckAccess--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Checks whether an item is accessible by specified principal.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.debug.datasources.items.checkAccess@.-module Network.Google.Resource.CloudSearch.Debug.Datasources.Items.CheckAccess-    (-    -- * REST Resource-      DebugDatasourcesItemsCheckAccessResource--    -- * Creating a Request-    , debugDatasourcesItemsCheckAccess-    , DebugDatasourcesItemsCheckAccess--    -- * Request Lenses-    , ddicaXgafv-    , ddicaUploadProtocol-    , ddicaAccessToken-    , ddicaUploadType-    , ddicaPayload-    , ddicaName-    , ddicaDebugOptionsEnableDebugging-    , ddicaCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.debug.datasources.items.checkAccess@ method which the--- 'DebugDatasourcesItemsCheckAccess' request conforms to.-type DebugDatasourcesItemsCheckAccessResource =-     "v1" :>-       "debug" :>-         CaptureMode "name" "checkAccess" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "debugOptions.enableDebugging" Bool :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :>-                         ReqBody '[JSON] Principal :>-                           Post '[JSON] CheckAccessResponse---- | Checks whether an item is accessible by specified principal.------ /See:/ 'debugDatasourcesItemsCheckAccess' smart constructor.-data DebugDatasourcesItemsCheckAccess =-  DebugDatasourcesItemsCheckAccess'-    { _ddicaXgafv                       :: !(Maybe Xgafv)-    , _ddicaUploadProtocol              :: !(Maybe Text)-    , _ddicaAccessToken                 :: !(Maybe Text)-    , _ddicaUploadType                  :: !(Maybe Text)-    , _ddicaPayload                     :: !Principal-    , _ddicaName                        :: !Text-    , _ddicaDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _ddicaCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DebugDatasourcesItemsCheckAccess' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ddicaXgafv'------ * 'ddicaUploadProtocol'------ * 'ddicaAccessToken'------ * 'ddicaUploadType'------ * 'ddicaPayload'------ * 'ddicaName'------ * 'ddicaDebugOptionsEnableDebugging'------ * 'ddicaCallback'-debugDatasourcesItemsCheckAccess-    :: Principal -- ^ 'ddicaPayload'-    -> Text -- ^ 'ddicaName'-    -> DebugDatasourcesItemsCheckAccess-debugDatasourcesItemsCheckAccess pDdicaPayload_ pDdicaName_ =-  DebugDatasourcesItemsCheckAccess'-    { _ddicaXgafv = Nothing-    , _ddicaUploadProtocol = Nothing-    , _ddicaAccessToken = Nothing-    , _ddicaUploadType = Nothing-    , _ddicaPayload = pDdicaPayload_-    , _ddicaName = pDdicaName_-    , _ddicaDebugOptionsEnableDebugging = Nothing-    , _ddicaCallback = Nothing-    }----- | V1 error format.-ddicaXgafv :: Lens' DebugDatasourcesItemsCheckAccess (Maybe Xgafv)-ddicaXgafv-  = lens _ddicaXgafv (\ s a -> s{_ddicaXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-ddicaUploadProtocol :: Lens' DebugDatasourcesItemsCheckAccess (Maybe Text)-ddicaUploadProtocol-  = lens _ddicaUploadProtocol-      (\ s a -> s{_ddicaUploadProtocol = a})---- | OAuth access token.-ddicaAccessToken :: Lens' DebugDatasourcesItemsCheckAccess (Maybe Text)-ddicaAccessToken-  = lens _ddicaAccessToken-      (\ s a -> s{_ddicaAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-ddicaUploadType :: Lens' DebugDatasourcesItemsCheckAccess (Maybe Text)-ddicaUploadType-  = lens _ddicaUploadType-      (\ s a -> s{_ddicaUploadType = a})---- | Multipart request metadata.-ddicaPayload :: Lens' DebugDatasourcesItemsCheckAccess Principal-ddicaPayload-  = lens _ddicaPayload (\ s a -> s{_ddicaPayload = a})---- | Item name, format: datasources\/{source_id}\/items\/{item_id}-ddicaName :: Lens' DebugDatasourcesItemsCheckAccess Text-ddicaName-  = lens _ddicaName (\ s a -> s{_ddicaName = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-ddicaDebugOptionsEnableDebugging :: Lens' DebugDatasourcesItemsCheckAccess (Maybe Bool)-ddicaDebugOptionsEnableDebugging-  = lens _ddicaDebugOptionsEnableDebugging-      (\ s a -> s{_ddicaDebugOptionsEnableDebugging = a})---- | JSONP-ddicaCallback :: Lens' DebugDatasourcesItemsCheckAccess (Maybe Text)-ddicaCallback-  = lens _ddicaCallback-      (\ s a -> s{_ddicaCallback = a})--instance GoogleRequest-           DebugDatasourcesItemsCheckAccess-         where-        type Rs DebugDatasourcesItemsCheckAccess =-             CheckAccessResponse-        type Scopes DebugDatasourcesItemsCheckAccess =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.debug"]-        requestClient DebugDatasourcesItemsCheckAccess'{..}-          = go _ddicaName _ddicaXgafv _ddicaUploadProtocol-              _ddicaAccessToken-              _ddicaUploadType-              _ddicaDebugOptionsEnableDebugging-              _ddicaCallback-              (Just AltJSON)-              _ddicaPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy DebugDatasourcesItemsCheckAccessResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Debug/Datasources/Items/SearchByViewURL.hs 
@@ -1,177 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Debug.Datasources.Items.SearchByViewURL--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Fetches the item whose viewUrl exactly matches that of the URL provided--- in the request.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.debug.datasources.items.searchByViewUrl@.-module Network.Google.Resource.CloudSearch.Debug.Datasources.Items.SearchByViewURL-    (-    -- * REST Resource-      DebugDatasourcesItemsSearchByViewURLResource--    -- * Creating a Request-    , debugDatasourcesItemsSearchByViewURL-    , DebugDatasourcesItemsSearchByViewURL--    -- * Request Lenses-    , ddisbvuXgafv-    , ddisbvuUploadProtocol-    , ddisbvuAccessToken-    , ddisbvuUploadType-    , ddisbvuPayload-    , ddisbvuName-    , ddisbvuCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.debug.datasources.items.searchByViewUrl@ method which the--- 'DebugDatasourcesItemsSearchByViewURL' request conforms to.-type DebugDatasourcesItemsSearchByViewURLResource =-     "v1" :>-       "debug" :>-         Capture "name" Text :>-           "items:searchByViewUrl" :>-             QueryParam "$.xgafv" Xgafv :>-               QueryParam "upload_protocol" Text :>-                 QueryParam "access_token" Text :>-                   QueryParam "uploadType" Text :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :>-                         ReqBody '[JSON] SearchItemsByViewURLRequest :>-                           Post '[JSON] SearchItemsByViewURLResponse---- | Fetches the item whose viewUrl exactly matches that of the URL provided--- in the request.------ /See:/ 'debugDatasourcesItemsSearchByViewURL' smart constructor.-data DebugDatasourcesItemsSearchByViewURL =-  DebugDatasourcesItemsSearchByViewURL'-    { _ddisbvuXgafv          :: !(Maybe Xgafv)-    , _ddisbvuUploadProtocol :: !(Maybe Text)-    , _ddisbvuAccessToken    :: !(Maybe Text)-    , _ddisbvuUploadType     :: !(Maybe Text)-    , _ddisbvuPayload        :: !SearchItemsByViewURLRequest-    , _ddisbvuName           :: !Text-    , _ddisbvuCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DebugDatasourcesItemsSearchByViewURL' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ddisbvuXgafv'------ * 'ddisbvuUploadProtocol'------ * 'ddisbvuAccessToken'------ * 'ddisbvuUploadType'------ * 'ddisbvuPayload'------ * 'ddisbvuName'------ * 'ddisbvuCallback'-debugDatasourcesItemsSearchByViewURL-    :: SearchItemsByViewURLRequest -- ^ 'ddisbvuPayload'-    -> Text -- ^ 'ddisbvuName'-    -> DebugDatasourcesItemsSearchByViewURL-debugDatasourcesItemsSearchByViewURL pDdisbvuPayload_ pDdisbvuName_ =-  DebugDatasourcesItemsSearchByViewURL'-    { _ddisbvuXgafv = Nothing-    , _ddisbvuUploadProtocol = Nothing-    , _ddisbvuAccessToken = Nothing-    , _ddisbvuUploadType = Nothing-    , _ddisbvuPayload = pDdisbvuPayload_-    , _ddisbvuName = pDdisbvuName_-    , _ddisbvuCallback = Nothing-    }----- | V1 error format.-ddisbvuXgafv :: Lens' DebugDatasourcesItemsSearchByViewURL (Maybe Xgafv)-ddisbvuXgafv-  = lens _ddisbvuXgafv (\ s a -> s{_ddisbvuXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-ddisbvuUploadProtocol :: Lens' DebugDatasourcesItemsSearchByViewURL (Maybe Text)-ddisbvuUploadProtocol-  = lens _ddisbvuUploadProtocol-      (\ s a -> s{_ddisbvuUploadProtocol = a})---- | OAuth access token.-ddisbvuAccessToken :: Lens' DebugDatasourcesItemsSearchByViewURL (Maybe Text)-ddisbvuAccessToken-  = lens _ddisbvuAccessToken-      (\ s a -> s{_ddisbvuAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-ddisbvuUploadType :: Lens' DebugDatasourcesItemsSearchByViewURL (Maybe Text)-ddisbvuUploadType-  = lens _ddisbvuUploadType-      (\ s a -> s{_ddisbvuUploadType = a})---- | Multipart request metadata.-ddisbvuPayload :: Lens' DebugDatasourcesItemsSearchByViewURL SearchItemsByViewURLRequest-ddisbvuPayload-  = lens _ddisbvuPayload-      (\ s a -> s{_ddisbvuPayload = a})---- | Source name, format: datasources\/{source_id}-ddisbvuName :: Lens' DebugDatasourcesItemsSearchByViewURL Text-ddisbvuName-  = lens _ddisbvuName (\ s a -> s{_ddisbvuName = a})---- | JSONP-ddisbvuCallback :: Lens' DebugDatasourcesItemsSearchByViewURL (Maybe Text)-ddisbvuCallback-  = lens _ddisbvuCallback-      (\ s a -> s{_ddisbvuCallback = a})--instance GoogleRequest-           DebugDatasourcesItemsSearchByViewURL-         where-        type Rs DebugDatasourcesItemsSearchByViewURL =-             SearchItemsByViewURLResponse-        type Scopes DebugDatasourcesItemsSearchByViewURL =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.debug"]-        requestClient-          DebugDatasourcesItemsSearchByViewURL'{..}-          = go _ddisbvuName _ddisbvuXgafv-              _ddisbvuUploadProtocol-              _ddisbvuAccessToken-              _ddisbvuUploadType-              _ddisbvuCallback-              (Just AltJSON)-              _ddisbvuPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy DebugDatasourcesItemsSearchByViewURLResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Debug/Datasources/Items/UnmAppedids/List.hs 
@@ -1,202 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Debug.Datasources.Items.UnmAppedids.List--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ List all unmapped identities for a specific item.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.debug.datasources.items.unmappedids.list@.-module Network.Google.Resource.CloudSearch.Debug.Datasources.Items.UnmAppedids.List-    (-    -- * REST Resource-      DebugDatasourcesItemsUnmAppedidsListResource--    -- * Creating a Request-    , debugDatasourcesItemsUnmAppedidsList-    , DebugDatasourcesItemsUnmAppedidsList--    -- * Request Lenses-    , ddiualParent-    , ddiualXgafv-    , ddiualUploadProtocol-    , ddiualAccessToken-    , ddiualUploadType-    , ddiualDebugOptionsEnableDebugging-    , ddiualPageToken-    , ddiualPageSize-    , ddiualCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.debug.datasources.items.unmappedids.list@ method which the--- 'DebugDatasourcesItemsUnmAppedidsList' request conforms to.-type DebugDatasourcesItemsUnmAppedidsListResource =-     "v1" :>-       "debug" :>-         Capture "parent" Text :>-           "unmappedids" :>-             QueryParam "$.xgafv" Xgafv :>-               QueryParam "upload_protocol" Text :>-                 QueryParam "access_token" Text :>-                   QueryParam "uploadType" Text :>-                     QueryParam "debugOptions.enableDebugging" Bool :>-                       QueryParam "pageToken" Text :>-                         QueryParam "pageSize" (Textual Int32) :>-                           QueryParam "callback" Text :>-                             QueryParam "alt" AltJSON :>-                               Get '[JSON] ListUnmAppedIdentitiesResponse---- | List all unmapped identities for a specific item.------ /See:/ 'debugDatasourcesItemsUnmAppedidsList' smart constructor.-data DebugDatasourcesItemsUnmAppedidsList =-  DebugDatasourcesItemsUnmAppedidsList'-    { _ddiualParent                      :: !Text-    , _ddiualXgafv                       :: !(Maybe Xgafv)-    , _ddiualUploadProtocol              :: !(Maybe Text)-    , _ddiualAccessToken                 :: !(Maybe Text)-    , _ddiualUploadType                  :: !(Maybe Text)-    , _ddiualDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _ddiualPageToken                   :: !(Maybe Text)-    , _ddiualPageSize                    :: !(Maybe (Textual Int32))-    , _ddiualCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DebugDatasourcesItemsUnmAppedidsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ddiualParent'------ * 'ddiualXgafv'------ * 'ddiualUploadProtocol'------ * 'ddiualAccessToken'------ * 'ddiualUploadType'------ * 'ddiualDebugOptionsEnableDebugging'------ * 'ddiualPageToken'------ * 'ddiualPageSize'------ * 'ddiualCallback'-debugDatasourcesItemsUnmAppedidsList-    :: Text -- ^ 'ddiualParent'-    -> DebugDatasourcesItemsUnmAppedidsList-debugDatasourcesItemsUnmAppedidsList pDdiualParent_ =-  DebugDatasourcesItemsUnmAppedidsList'-    { _ddiualParent = pDdiualParent_-    , _ddiualXgafv = Nothing-    , _ddiualUploadProtocol = Nothing-    , _ddiualAccessToken = Nothing-    , _ddiualUploadType = Nothing-    , _ddiualDebugOptionsEnableDebugging = Nothing-    , _ddiualPageToken = Nothing-    , _ddiualPageSize = Nothing-    , _ddiualCallback = Nothing-    }----- | The name of the item, in the following format:--- datasources\/{source_id}\/items\/{ID}-ddiualParent :: Lens' DebugDatasourcesItemsUnmAppedidsList Text-ddiualParent-  = lens _ddiualParent (\ s a -> s{_ddiualParent = a})---- | V1 error format.-ddiualXgafv :: Lens' DebugDatasourcesItemsUnmAppedidsList (Maybe Xgafv)-ddiualXgafv-  = lens _ddiualXgafv (\ s a -> s{_ddiualXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-ddiualUploadProtocol :: Lens' DebugDatasourcesItemsUnmAppedidsList (Maybe Text)-ddiualUploadProtocol-  = lens _ddiualUploadProtocol-      (\ s a -> s{_ddiualUploadProtocol = a})---- | OAuth access token.-ddiualAccessToken :: Lens' DebugDatasourcesItemsUnmAppedidsList (Maybe Text)-ddiualAccessToken-  = lens _ddiualAccessToken-      (\ s a -> s{_ddiualAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-ddiualUploadType :: Lens' DebugDatasourcesItemsUnmAppedidsList (Maybe Text)-ddiualUploadType-  = lens _ddiualUploadType-      (\ s a -> s{_ddiualUploadType = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-ddiualDebugOptionsEnableDebugging :: Lens' DebugDatasourcesItemsUnmAppedidsList (Maybe Bool)-ddiualDebugOptionsEnableDebugging-  = lens _ddiualDebugOptionsEnableDebugging-      (\ s a -> s{_ddiualDebugOptionsEnableDebugging = a})---- | The next_page_token value returned from a previous List request, if any.-ddiualPageToken :: Lens' DebugDatasourcesItemsUnmAppedidsList (Maybe Text)-ddiualPageToken-  = lens _ddiualPageToken-      (\ s a -> s{_ddiualPageToken = a})---- | Maximum number of items to fetch in a request. Defaults to 100.-ddiualPageSize :: Lens' DebugDatasourcesItemsUnmAppedidsList (Maybe Int32)-ddiualPageSize-  = lens _ddiualPageSize-      (\ s a -> s{_ddiualPageSize = a})-      . mapping _Coerce---- | JSONP-ddiualCallback :: Lens' DebugDatasourcesItemsUnmAppedidsList (Maybe Text)-ddiualCallback-  = lens _ddiualCallback-      (\ s a -> s{_ddiualCallback = a})--instance GoogleRequest-           DebugDatasourcesItemsUnmAppedidsList-         where-        type Rs DebugDatasourcesItemsUnmAppedidsList =-             ListUnmAppedIdentitiesResponse-        type Scopes DebugDatasourcesItemsUnmAppedidsList =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.debug"]-        requestClient-          DebugDatasourcesItemsUnmAppedidsList'{..}-          = go _ddiualParent _ddiualXgafv _ddiualUploadProtocol-              _ddiualAccessToken-              _ddiualUploadType-              _ddiualDebugOptionsEnableDebugging-              _ddiualPageToken-              _ddiualPageSize-              _ddiualCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy DebugDatasourcesItemsUnmAppedidsListResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Debug/Identitysources/Items/ListForunmAppedidentity.hs 
@@ -1,233 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Debug.Identitysources.Items.ListForunmAppedidentity--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Lists names of items associated with an unmapped identity.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.debug.identitysources.items.listForunmappedidentity@.-module Network.Google.Resource.CloudSearch.Debug.Identitysources.Items.ListForunmAppedidentity-    (-    -- * REST Resource-      DebugIdentitysourcesItemsListForunmAppedidentityResource--    -- * Creating a Request-    , debugIdentitysourcesItemsListForunmAppedidentity-    , DebugIdentitysourcesItemsListForunmAppedidentity--    -- * Request Lenses-    , diilfaUserResourceName-    , diilfaParent-    , diilfaXgafv-    , diilfaUploadProtocol-    , diilfaGroupResourceName-    , diilfaAccessToken-    , diilfaUploadType-    , diilfaDebugOptionsEnableDebugging-    , diilfaPageToken-    , diilfaPageSize-    , diilfaCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.debug.identitysources.items.listForunmappedidentity@ method which the--- 'DebugIdentitysourcesItemsListForunmAppedidentity' request conforms to.-type DebugIdentitysourcesItemsListForunmAppedidentityResource-     =-     "v1" :>-       "debug" :>-         Capture "parent" Text :>-           "items:forunmappedidentity" :>-             QueryParam "userResourceName" Text :>-               QueryParam "$.xgafv" Xgafv :>-                 QueryParam "upload_protocol" Text :>-                   QueryParam "groupResourceName" Text :>-                     QueryParam "access_token" Text :>-                       QueryParam "uploadType" Text :>-                         QueryParam "debugOptions.enableDebugging" Bool :>-                           QueryParam "pageToken" Text :>-                             QueryParam "pageSize" (Textual Int32) :>-                               QueryParam "callback" Text :>-                                 QueryParam "alt" AltJSON :>-                                   Get '[JSON]-                                     ListItemNamesForUnmAppedIdentityResponse---- | Lists names of items associated with an unmapped identity.------ /See:/ 'debugIdentitysourcesItemsListForunmAppedidentity' smart constructor.-data DebugIdentitysourcesItemsListForunmAppedidentity =-  DebugIdentitysourcesItemsListForunmAppedidentity'-    { _diilfaUserResourceName            :: !(Maybe Text)-    , _diilfaParent                      :: !Text-    , _diilfaXgafv                       :: !(Maybe Xgafv)-    , _diilfaUploadProtocol              :: !(Maybe Text)-    , _diilfaGroupResourceName           :: !(Maybe Text)-    , _diilfaAccessToken                 :: !(Maybe Text)-    , _diilfaUploadType                  :: !(Maybe Text)-    , _diilfaDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _diilfaPageToken                   :: !(Maybe Text)-    , _diilfaPageSize                    :: !(Maybe (Textual Int32))-    , _diilfaCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DebugIdentitysourcesItemsListForunmAppedidentity' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'diilfaUserResourceName'------ * 'diilfaParent'------ * 'diilfaXgafv'------ * 'diilfaUploadProtocol'------ * 'diilfaGroupResourceName'------ * 'diilfaAccessToken'------ * 'diilfaUploadType'------ * 'diilfaDebugOptionsEnableDebugging'------ * 'diilfaPageToken'------ * 'diilfaPageSize'------ * 'diilfaCallback'-debugIdentitysourcesItemsListForunmAppedidentity-    :: Text -- ^ 'diilfaParent'-    -> DebugIdentitysourcesItemsListForunmAppedidentity-debugIdentitysourcesItemsListForunmAppedidentity pDiilfaParent_ =-  DebugIdentitysourcesItemsListForunmAppedidentity'-    { _diilfaUserResourceName = Nothing-    , _diilfaParent = pDiilfaParent_-    , _diilfaXgafv = Nothing-    , _diilfaUploadProtocol = Nothing-    , _diilfaGroupResourceName = Nothing-    , _diilfaAccessToken = Nothing-    , _diilfaUploadType = Nothing-    , _diilfaDebugOptionsEnableDebugging = Nothing-    , _diilfaPageToken = Nothing-    , _diilfaPageSize = Nothing-    , _diilfaCallback = Nothing-    }---diilfaUserResourceName :: Lens' DebugIdentitysourcesItemsListForunmAppedidentity (Maybe Text)-diilfaUserResourceName-  = lens _diilfaUserResourceName-      (\ s a -> s{_diilfaUserResourceName = a})---- | The name of the identity source, in the following format:--- identitysources\/{source_id}}-diilfaParent :: Lens' DebugIdentitysourcesItemsListForunmAppedidentity Text-diilfaParent-  = lens _diilfaParent (\ s a -> s{_diilfaParent = a})---- | V1 error format.-diilfaXgafv :: Lens' DebugIdentitysourcesItemsListForunmAppedidentity (Maybe Xgafv)-diilfaXgafv-  = lens _diilfaXgafv (\ s a -> s{_diilfaXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-diilfaUploadProtocol :: Lens' DebugIdentitysourcesItemsListForunmAppedidentity (Maybe Text)-diilfaUploadProtocol-  = lens _diilfaUploadProtocol-      (\ s a -> s{_diilfaUploadProtocol = a})--diilfaGroupResourceName :: Lens' DebugIdentitysourcesItemsListForunmAppedidentity (Maybe Text)-diilfaGroupResourceName-  = lens _diilfaGroupResourceName-      (\ s a -> s{_diilfaGroupResourceName = a})---- | OAuth access token.-diilfaAccessToken :: Lens' DebugIdentitysourcesItemsListForunmAppedidentity (Maybe Text)-diilfaAccessToken-  = lens _diilfaAccessToken-      (\ s a -> s{_diilfaAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-diilfaUploadType :: Lens' DebugIdentitysourcesItemsListForunmAppedidentity (Maybe Text)-diilfaUploadType-  = lens _diilfaUploadType-      (\ s a -> s{_diilfaUploadType = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-diilfaDebugOptionsEnableDebugging :: Lens' DebugIdentitysourcesItemsListForunmAppedidentity (Maybe Bool)-diilfaDebugOptionsEnableDebugging-  = lens _diilfaDebugOptionsEnableDebugging-      (\ s a -> s{_diilfaDebugOptionsEnableDebugging = a})---- | The next_page_token value returned from a previous List request, if any.-diilfaPageToken :: Lens' DebugIdentitysourcesItemsListForunmAppedidentity (Maybe Text)-diilfaPageToken-  = lens _diilfaPageToken-      (\ s a -> s{_diilfaPageToken = a})---- | Maximum number of items to fetch in a request. Defaults to 100.-diilfaPageSize :: Lens' DebugIdentitysourcesItemsListForunmAppedidentity (Maybe Int32)-diilfaPageSize-  = lens _diilfaPageSize-      (\ s a -> s{_diilfaPageSize = a})-      . mapping _Coerce---- | JSONP-diilfaCallback :: Lens' DebugIdentitysourcesItemsListForunmAppedidentity (Maybe Text)-diilfaCallback-  = lens _diilfaCallback-      (\ s a -> s{_diilfaCallback = a})--instance GoogleRequest-           DebugIdentitysourcesItemsListForunmAppedidentity-         where-        type Rs-               DebugIdentitysourcesItemsListForunmAppedidentity-             = ListItemNamesForUnmAppedIdentityResponse-        type Scopes-               DebugIdentitysourcesItemsListForunmAppedidentity-             =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.debug"]-        requestClient-          DebugIdentitysourcesItemsListForunmAppedidentity'{..}-          = go _diilfaParent _diilfaUserResourceName-              _diilfaXgafv-              _diilfaUploadProtocol-              _diilfaGroupResourceName-              _diilfaAccessToken-              _diilfaUploadType-              _diilfaDebugOptionsEnableDebugging-              _diilfaPageToken-              _diilfaPageSize-              _diilfaCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy-                           DebugIdentitysourcesItemsListForunmAppedidentityResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Debug/Identitysources/UnmAppedids/List.hs 
@@ -1,216 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Debug.Identitysources.UnmAppedids.List--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Lists unmapped user identities for an identity source.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.debug.identitysources.unmappedids.list@.-module Network.Google.Resource.CloudSearch.Debug.Identitysources.UnmAppedids.List-    (-    -- * REST Resource-      DebugIdentitysourcesUnmAppedidsListResource--    -- * Creating a Request-    , debugIdentitysourcesUnmAppedidsList-    , DebugIdentitysourcesUnmAppedidsList--    -- * Request Lenses-    , diualParent-    , diualXgafv-    , diualResolutionStatusCode-    , diualUploadProtocol-    , diualAccessToken-    , diualUploadType-    , diualDebugOptionsEnableDebugging-    , diualPageToken-    , diualPageSize-    , diualCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.debug.identitysources.unmappedids.list@ method which the--- 'DebugIdentitysourcesUnmAppedidsList' request conforms to.-type DebugIdentitysourcesUnmAppedidsListResource =-     "v1" :>-       "debug" :>-         Capture "parent" Text :>-           "unmappedids" :>-             QueryParam "$.xgafv" Xgafv :>-               QueryParam "resolutionStatusCode" Text :>-                 QueryParam "upload_protocol" Text :>-                   QueryParam "access_token" Text :>-                     QueryParam "uploadType" Text :>-                       QueryParam "debugOptions.enableDebugging" Bool :>-                         QueryParam "pageToken" Text :>-                           QueryParam "pageSize" (Textual Int32) :>-                             QueryParam "callback" Text :>-                               QueryParam "alt" AltJSON :>-                                 Get '[JSON] ListUnmAppedIdentitiesResponse---- | Lists unmapped user identities for an identity source.------ /See:/ 'debugIdentitysourcesUnmAppedidsList' smart constructor.-data DebugIdentitysourcesUnmAppedidsList =-  DebugIdentitysourcesUnmAppedidsList'-    { _diualParent                      :: !Text-    , _diualXgafv                       :: !(Maybe Xgafv)-    , _diualResolutionStatusCode        :: !(Maybe Text)-    , _diualUploadProtocol              :: !(Maybe Text)-    , _diualAccessToken                 :: !(Maybe Text)-    , _diualUploadType                  :: !(Maybe Text)-    , _diualDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _diualPageToken                   :: !(Maybe Text)-    , _diualPageSize                    :: !(Maybe (Textual Int32))-    , _diualCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'DebugIdentitysourcesUnmAppedidsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'diualParent'------ * 'diualXgafv'------ * 'diualResolutionStatusCode'------ * 'diualUploadProtocol'------ * 'diualAccessToken'------ * 'diualUploadType'------ * 'diualDebugOptionsEnableDebugging'------ * 'diualPageToken'------ * 'diualPageSize'------ * 'diualCallback'-debugIdentitysourcesUnmAppedidsList-    :: Text -- ^ 'diualParent'-    -> DebugIdentitysourcesUnmAppedidsList-debugIdentitysourcesUnmAppedidsList pDiualParent_ =-  DebugIdentitysourcesUnmAppedidsList'-    { _diualParent = pDiualParent_-    , _diualXgafv = Nothing-    , _diualResolutionStatusCode = Nothing-    , _diualUploadProtocol = Nothing-    , _diualAccessToken = Nothing-    , _diualUploadType = Nothing-    , _diualDebugOptionsEnableDebugging = Nothing-    , _diualPageToken = Nothing-    , _diualPageSize = Nothing-    , _diualCallback = Nothing-    }----- | The name of the identity source, in the following format:--- identitysources\/{source_id}-diualParent :: Lens' DebugIdentitysourcesUnmAppedidsList Text-diualParent-  = lens _diualParent (\ s a -> s{_diualParent = a})---- | V1 error format.-diualXgafv :: Lens' DebugIdentitysourcesUnmAppedidsList (Maybe Xgafv)-diualXgafv-  = lens _diualXgafv (\ s a -> s{_diualXgafv = a})---- | Limit users selection to this status.-diualResolutionStatusCode :: Lens' DebugIdentitysourcesUnmAppedidsList (Maybe Text)-diualResolutionStatusCode-  = lens _diualResolutionStatusCode-      (\ s a -> s{_diualResolutionStatusCode = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-diualUploadProtocol :: Lens' DebugIdentitysourcesUnmAppedidsList (Maybe Text)-diualUploadProtocol-  = lens _diualUploadProtocol-      (\ s a -> s{_diualUploadProtocol = a})---- | OAuth access token.-diualAccessToken :: Lens' DebugIdentitysourcesUnmAppedidsList (Maybe Text)-diualAccessToken-  = lens _diualAccessToken-      (\ s a -> s{_diualAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-diualUploadType :: Lens' DebugIdentitysourcesUnmAppedidsList (Maybe Text)-diualUploadType-  = lens _diualUploadType-      (\ s a -> s{_diualUploadType = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-diualDebugOptionsEnableDebugging :: Lens' DebugIdentitysourcesUnmAppedidsList (Maybe Bool)-diualDebugOptionsEnableDebugging-  = lens _diualDebugOptionsEnableDebugging-      (\ s a -> s{_diualDebugOptionsEnableDebugging = a})---- | The next_page_token value returned from a previous List request, if any.-diualPageToken :: Lens' DebugIdentitysourcesUnmAppedidsList (Maybe Text)-diualPageToken-  = lens _diualPageToken-      (\ s a -> s{_diualPageToken = a})---- | Maximum number of items to fetch in a request. Defaults to 100.-diualPageSize :: Lens' DebugIdentitysourcesUnmAppedidsList (Maybe Int32)-diualPageSize-  = lens _diualPageSize-      (\ s a -> s{_diualPageSize = a})-      . mapping _Coerce---- | JSONP-diualCallback :: Lens' DebugIdentitysourcesUnmAppedidsList (Maybe Text)-diualCallback-  = lens _diualCallback-      (\ s a -> s{_diualCallback = a})--instance GoogleRequest-           DebugIdentitysourcesUnmAppedidsList-         where-        type Rs DebugIdentitysourcesUnmAppedidsList =-             ListUnmAppedIdentitiesResponse-        type Scopes DebugIdentitysourcesUnmAppedidsList =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.debug"]-        requestClient-          DebugIdentitysourcesUnmAppedidsList'{..}-          = go _diualParent _diualXgafv-              _diualResolutionStatusCode-              _diualUploadProtocol-              _diualAccessToken-              _diualUploadType-              _diualDebugOptionsEnableDebugging-              _diualPageToken-              _diualPageSize-              _diualCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy DebugIdentitysourcesUnmAppedidsListResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/DeleteSchema.hs 
@@ -1,171 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Indexing.Datasources.DeleteSchema--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes the schema of a data source.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.deleteSchema@.-module Network.Google.Resource.CloudSearch.Indexing.Datasources.DeleteSchema-    (-    -- * REST Resource-      IndexingDatasourcesDeleteSchemaResource--    -- * Creating a Request-    , indexingDatasourcesDeleteSchema-    , IndexingDatasourcesDeleteSchema--    -- * Request Lenses-    , iddsXgafv-    , iddsUploadProtocol-    , iddsAccessToken-    , iddsUploadType-    , iddsName-    , iddsDebugOptionsEnableDebugging-    , iddsCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.indexing.datasources.deleteSchema@ method which the--- 'IndexingDatasourcesDeleteSchema' request conforms to.-type IndexingDatasourcesDeleteSchemaResource =-     "v1" :>-       "indexing" :>-         Capture "name" Text :>-           "schema" :>-             QueryParam "$.xgafv" Xgafv :>-               QueryParam "upload_protocol" Text :>-                 QueryParam "access_token" Text :>-                   QueryParam "uploadType" Text :>-                     QueryParam "debugOptions.enableDebugging" Bool :>-                       QueryParam "callback" Text :>-                         QueryParam "alt" AltJSON :> Delete '[JSON] Operation---- | Deletes the schema of a data source.------ /See:/ 'indexingDatasourcesDeleteSchema' smart constructor.-data IndexingDatasourcesDeleteSchema =-  IndexingDatasourcesDeleteSchema'-    { _iddsXgafv                       :: !(Maybe Xgafv)-    , _iddsUploadProtocol              :: !(Maybe Text)-    , _iddsAccessToken                 :: !(Maybe Text)-    , _iddsUploadType                  :: !(Maybe Text)-    , _iddsName                        :: !Text-    , _iddsDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _iddsCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexingDatasourcesDeleteSchema' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'iddsXgafv'------ * 'iddsUploadProtocol'------ * 'iddsAccessToken'------ * 'iddsUploadType'------ * 'iddsName'------ * 'iddsDebugOptionsEnableDebugging'------ * 'iddsCallback'-indexingDatasourcesDeleteSchema-    :: Text -- ^ 'iddsName'-    -> IndexingDatasourcesDeleteSchema-indexingDatasourcesDeleteSchema pIddsName_ =-  IndexingDatasourcesDeleteSchema'-    { _iddsXgafv = Nothing-    , _iddsUploadProtocol = Nothing-    , _iddsAccessToken = Nothing-    , _iddsUploadType = Nothing-    , _iddsName = pIddsName_-    , _iddsDebugOptionsEnableDebugging = Nothing-    , _iddsCallback = Nothing-    }----- | V1 error format.-iddsXgafv :: Lens' IndexingDatasourcesDeleteSchema (Maybe Xgafv)-iddsXgafv-  = lens _iddsXgafv (\ s a -> s{_iddsXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-iddsUploadProtocol :: Lens' IndexingDatasourcesDeleteSchema (Maybe Text)-iddsUploadProtocol-  = lens _iddsUploadProtocol-      (\ s a -> s{_iddsUploadProtocol = a})---- | OAuth access token.-iddsAccessToken :: Lens' IndexingDatasourcesDeleteSchema (Maybe Text)-iddsAccessToken-  = lens _iddsAccessToken-      (\ s a -> s{_iddsAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-iddsUploadType :: Lens' IndexingDatasourcesDeleteSchema (Maybe Text)-iddsUploadType-  = lens _iddsUploadType-      (\ s a -> s{_iddsUploadType = a})---- | Name of the data source to delete Schema. Format:--- datasources\/{source_id}-iddsName :: Lens' IndexingDatasourcesDeleteSchema Text-iddsName = lens _iddsName (\ s a -> s{_iddsName = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-iddsDebugOptionsEnableDebugging :: Lens' IndexingDatasourcesDeleteSchema (Maybe Bool)-iddsDebugOptionsEnableDebugging-  = lens _iddsDebugOptionsEnableDebugging-      (\ s a -> s{_iddsDebugOptionsEnableDebugging = a})---- | JSONP-iddsCallback :: Lens' IndexingDatasourcesDeleteSchema (Maybe Text)-iddsCallback-  = lens _iddsCallback (\ s a -> s{_iddsCallback = a})--instance GoogleRequest-           IndexingDatasourcesDeleteSchema-         where-        type Rs IndexingDatasourcesDeleteSchema = Operation-        type Scopes IndexingDatasourcesDeleteSchema =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.indexing"]-        requestClient IndexingDatasourcesDeleteSchema'{..}-          = go _iddsName _iddsXgafv _iddsUploadProtocol-              _iddsAccessToken-              _iddsUploadType-              _iddsDebugOptionsEnableDebugging-              _iddsCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy IndexingDatasourcesDeleteSchemaResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/GetSchema.hs 
@@ -1,168 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Indexing.Datasources.GetSchema--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets the schema of a data source.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.getSchema@.-module Network.Google.Resource.CloudSearch.Indexing.Datasources.GetSchema-    (-    -- * REST Resource-      IndexingDatasourcesGetSchemaResource--    -- * Creating a Request-    , indexingDatasourcesGetSchema-    , IndexingDatasourcesGetSchema--    -- * Request Lenses-    , idgsXgafv-    , idgsUploadProtocol-    , idgsAccessToken-    , idgsUploadType-    , idgsName-    , idgsDebugOptionsEnableDebugging-    , idgsCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.indexing.datasources.getSchema@ method which the--- 'IndexingDatasourcesGetSchema' request conforms to.-type IndexingDatasourcesGetSchemaResource =-     "v1" :>-       "indexing" :>-         Capture "name" Text :>-           "schema" :>-             QueryParam "$.xgafv" Xgafv :>-               QueryParam "upload_protocol" Text :>-                 QueryParam "access_token" Text :>-                   QueryParam "uploadType" Text :>-                     QueryParam "debugOptions.enableDebugging" Bool :>-                       QueryParam "callback" Text :>-                         QueryParam "alt" AltJSON :> Get '[JSON] Schema---- | Gets the schema of a data source.------ /See:/ 'indexingDatasourcesGetSchema' smart constructor.-data IndexingDatasourcesGetSchema =-  IndexingDatasourcesGetSchema'-    { _idgsXgafv                       :: !(Maybe Xgafv)-    , _idgsUploadProtocol              :: !(Maybe Text)-    , _idgsAccessToken                 :: !(Maybe Text)-    , _idgsUploadType                  :: !(Maybe Text)-    , _idgsName                        :: !Text-    , _idgsDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _idgsCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexingDatasourcesGetSchema' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'idgsXgafv'------ * 'idgsUploadProtocol'------ * 'idgsAccessToken'------ * 'idgsUploadType'------ * 'idgsName'------ * 'idgsDebugOptionsEnableDebugging'------ * 'idgsCallback'-indexingDatasourcesGetSchema-    :: Text -- ^ 'idgsName'-    -> IndexingDatasourcesGetSchema-indexingDatasourcesGetSchema pIdgsName_ =-  IndexingDatasourcesGetSchema'-    { _idgsXgafv = Nothing-    , _idgsUploadProtocol = Nothing-    , _idgsAccessToken = Nothing-    , _idgsUploadType = Nothing-    , _idgsName = pIdgsName_-    , _idgsDebugOptionsEnableDebugging = Nothing-    , _idgsCallback = Nothing-    }----- | V1 error format.-idgsXgafv :: Lens' IndexingDatasourcesGetSchema (Maybe Xgafv)-idgsXgafv-  = lens _idgsXgafv (\ s a -> s{_idgsXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-idgsUploadProtocol :: Lens' IndexingDatasourcesGetSchema (Maybe Text)-idgsUploadProtocol-  = lens _idgsUploadProtocol-      (\ s a -> s{_idgsUploadProtocol = a})---- | OAuth access token.-idgsAccessToken :: Lens' IndexingDatasourcesGetSchema (Maybe Text)-idgsAccessToken-  = lens _idgsAccessToken-      (\ s a -> s{_idgsAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-idgsUploadType :: Lens' IndexingDatasourcesGetSchema (Maybe Text)-idgsUploadType-  = lens _idgsUploadType-      (\ s a -> s{_idgsUploadType = a})---- | Name of the data source to get Schema. Format: datasources\/{source_id}-idgsName :: Lens' IndexingDatasourcesGetSchema Text-idgsName = lens _idgsName (\ s a -> s{_idgsName = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-idgsDebugOptionsEnableDebugging :: Lens' IndexingDatasourcesGetSchema (Maybe Bool)-idgsDebugOptionsEnableDebugging-  = lens _idgsDebugOptionsEnableDebugging-      (\ s a -> s{_idgsDebugOptionsEnableDebugging = a})---- | JSONP-idgsCallback :: Lens' IndexingDatasourcesGetSchema (Maybe Text)-idgsCallback-  = lens _idgsCallback (\ s a -> s{_idgsCallback = a})--instance GoogleRequest IndexingDatasourcesGetSchema-         where-        type Rs IndexingDatasourcesGetSchema = Schema-        type Scopes IndexingDatasourcesGetSchema =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.indexing"]-        requestClient IndexingDatasourcesGetSchema'{..}-          = go _idgsName _idgsXgafv _idgsUploadProtocol-              _idgsAccessToken-              _idgsUploadType-              _idgsDebugOptionsEnableDebugging-              _idgsCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy :: Proxy IndexingDatasourcesGetSchemaResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/Items/Delete.hs 
@@ -1,213 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Delete--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes Item resource for the specified resource name.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.delete@.-module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Delete-    (-    -- * REST Resource-      IndexingDatasourcesItemsDeleteResource--    -- * Creating a Request-    , indexingDatasourcesItemsDelete-    , IndexingDatasourcesItemsDelete--    -- * Request Lenses-    , ididXgafv-    , ididUploadProtocol-    , ididAccessToken-    , ididMode-    , ididUploadType-    , ididConnectorName-    , ididName-    , ididVersion-    , ididDebugOptionsEnableDebugging-    , ididCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.indexing.datasources.items.delete@ method which the--- 'IndexingDatasourcesItemsDelete' request conforms to.-type IndexingDatasourcesItemsDeleteResource =-     "v1" :>-       "indexing" :>-         Capture "name" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "mode" Text :>-                   QueryParam "uploadType" Text :>-                     QueryParam "connectorName" Text :>-                       QueryParam "version" Bytes :>-                         QueryParam "debugOptions.enableDebugging" Bool :>-                           QueryParam "callback" Text :>-                             QueryParam "alt" AltJSON :>-                               Delete '[JSON] Operation---- | Deletes Item resource for the specified resource name.------ /See:/ 'indexingDatasourcesItemsDelete' smart constructor.-data IndexingDatasourcesItemsDelete =-  IndexingDatasourcesItemsDelete'-    { _ididXgafv                       :: !(Maybe Xgafv)-    , _ididUploadProtocol              :: !(Maybe Text)-    , _ididAccessToken                 :: !(Maybe Text)-    , _ididMode                        :: !(Maybe Text)-    , _ididUploadType                  :: !(Maybe Text)-    , _ididConnectorName               :: !(Maybe Text)-    , _ididName                        :: !Text-    , _ididVersion                     :: !(Maybe Bytes)-    , _ididDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _ididCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexingDatasourcesItemsDelete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ididXgafv'------ * 'ididUploadProtocol'------ * 'ididAccessToken'------ * 'ididMode'------ * 'ididUploadType'------ * 'ididConnectorName'------ * 'ididName'------ * 'ididVersion'------ * 'ididDebugOptionsEnableDebugging'------ * 'ididCallback'-indexingDatasourcesItemsDelete-    :: Text -- ^ 'ididName'-    -> IndexingDatasourcesItemsDelete-indexingDatasourcesItemsDelete pIdidName_ =-  IndexingDatasourcesItemsDelete'-    { _ididXgafv = Nothing-    , _ididUploadProtocol = Nothing-    , _ididAccessToken = Nothing-    , _ididMode = Nothing-    , _ididUploadType = Nothing-    , _ididConnectorName = Nothing-    , _ididName = pIdidName_-    , _ididVersion = Nothing-    , _ididDebugOptionsEnableDebugging = Nothing-    , _ididCallback = Nothing-    }----- | V1 error format.-ididXgafv :: Lens' IndexingDatasourcesItemsDelete (Maybe Xgafv)-ididXgafv-  = lens _ididXgafv (\ s a -> s{_ididXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-ididUploadProtocol :: Lens' IndexingDatasourcesItemsDelete (Maybe Text)-ididUploadProtocol-  = lens _ididUploadProtocol-      (\ s a -> s{_ididUploadProtocol = a})---- | OAuth access token.-ididAccessToken :: Lens' IndexingDatasourcesItemsDelete (Maybe Text)-ididAccessToken-  = lens _ididAccessToken-      (\ s a -> s{_ididAccessToken = a})---- | Required. The RequestMode for this request.-ididMode :: Lens' IndexingDatasourcesItemsDelete (Maybe Text)-ididMode = lens _ididMode (\ s a -> s{_ididMode = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-ididUploadType :: Lens' IndexingDatasourcesItemsDelete (Maybe Text)-ididUploadType-  = lens _ididUploadType-      (\ s a -> s{_ididUploadType = a})---- | Name of connector making this call.--- Format: datasources\/{source_id}\/connectors\/{ID}-ididConnectorName :: Lens' IndexingDatasourcesItemsDelete (Maybe Text)-ididConnectorName-  = lens _ididConnectorName-      (\ s a -> s{_ididConnectorName = a})---- | Required. Name of the item to delete. Format:--- datasources\/{source_id}\/items\/{item_id}-ididName :: Lens' IndexingDatasourcesItemsDelete Text-ididName = lens _ididName (\ s a -> s{_ididName = a})---- | Required. The incremented version of the item to delete from the index.--- The indexing system stores the version from the datasource as a byte--- string and compares the Item version in the index to the version of the--- queued Item using lexical ordering.--- Cloud Search Indexing won\'t delete any queued item with a version value--- that is less than or equal to the version of the currently indexed item.--- The maximum length for this field is 1024 bytes.-ididVersion :: Lens' IndexingDatasourcesItemsDelete (Maybe ByteString)-ididVersion-  = lens _ididVersion (\ s a -> s{_ididVersion = a}) .-      mapping _Bytes---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-ididDebugOptionsEnableDebugging :: Lens' IndexingDatasourcesItemsDelete (Maybe Bool)-ididDebugOptionsEnableDebugging-  = lens _ididDebugOptionsEnableDebugging-      (\ s a -> s{_ididDebugOptionsEnableDebugging = a})---- | JSONP-ididCallback :: Lens' IndexingDatasourcesItemsDelete (Maybe Text)-ididCallback-  = lens _ididCallback (\ s a -> s{_ididCallback = a})--instance GoogleRequest IndexingDatasourcesItemsDelete-         where-        type Rs IndexingDatasourcesItemsDelete = Operation-        type Scopes IndexingDatasourcesItemsDelete =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.indexing"]-        requestClient IndexingDatasourcesItemsDelete'{..}-          = go _ididName _ididXgafv _ididUploadProtocol-              _ididAccessToken-              _ididMode-              _ididUploadType-              _ididConnectorName-              _ididVersion-              _ididDebugOptionsEnableDebugging-              _ididCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy IndexingDatasourcesItemsDeleteResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/Items/DeleteQueueItems.hs 
@@ -1,180 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.DeleteQueueItems--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes all items in a queue. This method is useful for deleting stale--- items.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.deleteQueueItems@.-module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.DeleteQueueItems-    (-    -- * REST Resource-      IndexingDatasourcesItemsDeleteQueueItemsResource--    -- * Creating a Request-    , indexingDatasourcesItemsDeleteQueueItems-    , IndexingDatasourcesItemsDeleteQueueItems--    -- * Request Lenses-    , ididqiXgafv-    , ididqiUploadProtocol-    , ididqiAccessToken-    , ididqiUploadType-    , ididqiPayload-    , ididqiName-    , ididqiCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.indexing.datasources.items.deleteQueueItems@ method which the--- 'IndexingDatasourcesItemsDeleteQueueItems' request conforms to.-type IndexingDatasourcesItemsDeleteQueueItemsResource-     =-     "v1" :>-       "indexing" :>-         Capture "name" Text :>-           "items:deleteQueueItems" :>-             QueryParam "$.xgafv" Xgafv :>-               QueryParam "upload_protocol" Text :>-                 QueryParam "access_token" Text :>-                   QueryParam "uploadType" Text :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :>-                         ReqBody '[JSON] DeleteQueueItemsRequest :>-                           Post '[JSON] Operation---- | Deletes all items in a queue. This method is useful for deleting stale--- items.------ /See:/ 'indexingDatasourcesItemsDeleteQueueItems' smart constructor.-data IndexingDatasourcesItemsDeleteQueueItems =-  IndexingDatasourcesItemsDeleteQueueItems'-    { _ididqiXgafv          :: !(Maybe Xgafv)-    , _ididqiUploadProtocol :: !(Maybe Text)-    , _ididqiAccessToken    :: !(Maybe Text)-    , _ididqiUploadType     :: !(Maybe Text)-    , _ididqiPayload        :: !DeleteQueueItemsRequest-    , _ididqiName           :: !Text-    , _ididqiCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexingDatasourcesItemsDeleteQueueItems' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ididqiXgafv'------ * 'ididqiUploadProtocol'------ * 'ididqiAccessToken'------ * 'ididqiUploadType'------ * 'ididqiPayload'------ * 'ididqiName'------ * 'ididqiCallback'-indexingDatasourcesItemsDeleteQueueItems-    :: DeleteQueueItemsRequest -- ^ 'ididqiPayload'-    -> Text -- ^ 'ididqiName'-    -> IndexingDatasourcesItemsDeleteQueueItems-indexingDatasourcesItemsDeleteQueueItems pIdidqiPayload_ pIdidqiName_ =-  IndexingDatasourcesItemsDeleteQueueItems'-    { _ididqiXgafv = Nothing-    , _ididqiUploadProtocol = Nothing-    , _ididqiAccessToken = Nothing-    , _ididqiUploadType = Nothing-    , _ididqiPayload = pIdidqiPayload_-    , _ididqiName = pIdidqiName_-    , _ididqiCallback = Nothing-    }----- | V1 error format.-ididqiXgafv :: Lens' IndexingDatasourcesItemsDeleteQueueItems (Maybe Xgafv)-ididqiXgafv-  = lens _ididqiXgafv (\ s a -> s{_ididqiXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-ididqiUploadProtocol :: Lens' IndexingDatasourcesItemsDeleteQueueItems (Maybe Text)-ididqiUploadProtocol-  = lens _ididqiUploadProtocol-      (\ s a -> s{_ididqiUploadProtocol = a})---- | OAuth access token.-ididqiAccessToken :: Lens' IndexingDatasourcesItemsDeleteQueueItems (Maybe Text)-ididqiAccessToken-  = lens _ididqiAccessToken-      (\ s a -> s{_ididqiAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-ididqiUploadType :: Lens' IndexingDatasourcesItemsDeleteQueueItems (Maybe Text)-ididqiUploadType-  = lens _ididqiUploadType-      (\ s a -> s{_ididqiUploadType = a})---- | Multipart request metadata.-ididqiPayload :: Lens' IndexingDatasourcesItemsDeleteQueueItems DeleteQueueItemsRequest-ididqiPayload-  = lens _ididqiPayload-      (\ s a -> s{_ididqiPayload = a})---- | Name of the Data Source to delete items in a queue. Format:--- datasources\/{source_id}-ididqiName :: Lens' IndexingDatasourcesItemsDeleteQueueItems Text-ididqiName-  = lens _ididqiName (\ s a -> s{_ididqiName = a})---- | JSONP-ididqiCallback :: Lens' IndexingDatasourcesItemsDeleteQueueItems (Maybe Text)-ididqiCallback-  = lens _ididqiCallback-      (\ s a -> s{_ididqiCallback = a})--instance GoogleRequest-           IndexingDatasourcesItemsDeleteQueueItems-         where-        type Rs IndexingDatasourcesItemsDeleteQueueItems =-             Operation-        type Scopes IndexingDatasourcesItemsDeleteQueueItems-             =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.indexing"]-        requestClient-          IndexingDatasourcesItemsDeleteQueueItems'{..}-          = go _ididqiName _ididqiXgafv _ididqiUploadProtocol-              _ididqiAccessToken-              _ididqiUploadType-              _ididqiCallback-              (Just AltJSON)-              _ididqiPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy-                           IndexingDatasourcesItemsDeleteQueueItemsResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/Items/Get.hs 
@@ -1,181 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets Item resource by item name.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.get@.-module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Get-    (-    -- * REST Resource-      IndexingDatasourcesItemsGetResource--    -- * Creating a Request-    , indexingDatasourcesItemsGet-    , IndexingDatasourcesItemsGet--    -- * Request Lenses-    , idigXgafv-    , idigUploadProtocol-    , idigAccessToken-    , idigUploadType-    , idigConnectorName-    , idigName-    , idigDebugOptionsEnableDebugging-    , idigCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.indexing.datasources.items.get@ method which the--- 'IndexingDatasourcesItemsGet' request conforms to.-type IndexingDatasourcesItemsGetResource =-     "v1" :>-       "indexing" :>-         Capture "name" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "connectorName" Text :>-                     QueryParam "debugOptions.enableDebugging" Bool :>-                       QueryParam "callback" Text :>-                         QueryParam "alt" AltJSON :> Get '[JSON] Item---- | Gets Item resource by item name.------ /See:/ 'indexingDatasourcesItemsGet' smart constructor.-data IndexingDatasourcesItemsGet =-  IndexingDatasourcesItemsGet'-    { _idigXgafv                       :: !(Maybe Xgafv)-    , _idigUploadProtocol              :: !(Maybe Text)-    , _idigAccessToken                 :: !(Maybe Text)-    , _idigUploadType                  :: !(Maybe Text)-    , _idigConnectorName               :: !(Maybe Text)-    , _idigName                        :: !Text-    , _idigDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _idigCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexingDatasourcesItemsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'idigXgafv'------ * 'idigUploadProtocol'------ * 'idigAccessToken'------ * 'idigUploadType'------ * 'idigConnectorName'------ * 'idigName'------ * 'idigDebugOptionsEnableDebugging'------ * 'idigCallback'-indexingDatasourcesItemsGet-    :: Text -- ^ 'idigName'-    -> IndexingDatasourcesItemsGet-indexingDatasourcesItemsGet pIdigName_ =-  IndexingDatasourcesItemsGet'-    { _idigXgafv = Nothing-    , _idigUploadProtocol = Nothing-    , _idigAccessToken = Nothing-    , _idigUploadType = Nothing-    , _idigConnectorName = Nothing-    , _idigName = pIdigName_-    , _idigDebugOptionsEnableDebugging = Nothing-    , _idigCallback = Nothing-    }----- | V1 error format.-idigXgafv :: Lens' IndexingDatasourcesItemsGet (Maybe Xgafv)-idigXgafv-  = lens _idigXgafv (\ s a -> s{_idigXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-idigUploadProtocol :: Lens' IndexingDatasourcesItemsGet (Maybe Text)-idigUploadProtocol-  = lens _idigUploadProtocol-      (\ s a -> s{_idigUploadProtocol = a})---- | OAuth access token.-idigAccessToken :: Lens' IndexingDatasourcesItemsGet (Maybe Text)-idigAccessToken-  = lens _idigAccessToken-      (\ s a -> s{_idigAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-idigUploadType :: Lens' IndexingDatasourcesItemsGet (Maybe Text)-idigUploadType-  = lens _idigUploadType-      (\ s a -> s{_idigUploadType = a})---- | Name of connector making this call.--- Format: datasources\/{source_id}\/connectors\/{ID}-idigConnectorName :: Lens' IndexingDatasourcesItemsGet (Maybe Text)-idigConnectorName-  = lens _idigConnectorName-      (\ s a -> s{_idigConnectorName = a})---- | Name of the item to get info. Format:--- datasources\/{source_id}\/items\/{item_id}-idigName :: Lens' IndexingDatasourcesItemsGet Text-idigName = lens _idigName (\ s a -> s{_idigName = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-idigDebugOptionsEnableDebugging :: Lens' IndexingDatasourcesItemsGet (Maybe Bool)-idigDebugOptionsEnableDebugging-  = lens _idigDebugOptionsEnableDebugging-      (\ s a -> s{_idigDebugOptionsEnableDebugging = a})---- | JSONP-idigCallback :: Lens' IndexingDatasourcesItemsGet (Maybe Text)-idigCallback-  = lens _idigCallback (\ s a -> s{_idigCallback = a})--instance GoogleRequest IndexingDatasourcesItemsGet-         where-        type Rs IndexingDatasourcesItemsGet = Item-        type Scopes IndexingDatasourcesItemsGet =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.indexing"]-        requestClient IndexingDatasourcesItemsGet'{..}-          = go _idigName _idigXgafv _idigUploadProtocol-              _idigAccessToken-              _idigUploadType-              _idigConnectorName-              _idigDebugOptionsEnableDebugging-              _idigCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy :: Proxy IndexingDatasourcesItemsGetResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/Items/Index.hs 
@@ -1,172 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Index--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Updates Item ACL, metadata, and content. It will insert the Item if it--- does not exist. This method does not support partial updates. Fields--- with no provided values are cleared out in the Cloud Search index.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.index@.-module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Index-    (-    -- * REST Resource-      IndexingDatasourcesItemsIndexResource--    -- * Creating a Request-    , indexingDatasourcesItemsIndex-    , IndexingDatasourcesItemsIndex--    -- * Request Lenses-    , idiiXgafv-    , idiiUploadProtocol-    , idiiAccessToken-    , idiiUploadType-    , idiiPayload-    , idiiName-    , idiiCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.indexing.datasources.items.index@ method which the--- 'IndexingDatasourcesItemsIndex' request conforms to.-type IndexingDatasourcesItemsIndexResource =-     "v1" :>-       "indexing" :>-         CaptureMode "name" "index" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] IndexItemRequest :>-                         Post '[JSON] Operation---- | Updates Item ACL, metadata, and content. It will insert the Item if it--- does not exist. This method does not support partial updates. Fields--- with no provided values are cleared out in the Cloud Search index.------ /See:/ 'indexingDatasourcesItemsIndex' smart constructor.-data IndexingDatasourcesItemsIndex =-  IndexingDatasourcesItemsIndex'-    { _idiiXgafv          :: !(Maybe Xgafv)-    , _idiiUploadProtocol :: !(Maybe Text)-    , _idiiAccessToken    :: !(Maybe Text)-    , _idiiUploadType     :: !(Maybe Text)-    , _idiiPayload        :: !IndexItemRequest-    , _idiiName           :: !Text-    , _idiiCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexingDatasourcesItemsIndex' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'idiiXgafv'------ * 'idiiUploadProtocol'------ * 'idiiAccessToken'------ * 'idiiUploadType'------ * 'idiiPayload'------ * 'idiiName'------ * 'idiiCallback'-indexingDatasourcesItemsIndex-    :: IndexItemRequest -- ^ 'idiiPayload'-    -> Text -- ^ 'idiiName'-    -> IndexingDatasourcesItemsIndex-indexingDatasourcesItemsIndex pIdiiPayload_ pIdiiName_ =-  IndexingDatasourcesItemsIndex'-    { _idiiXgafv = Nothing-    , _idiiUploadProtocol = Nothing-    , _idiiAccessToken = Nothing-    , _idiiUploadType = Nothing-    , _idiiPayload = pIdiiPayload_-    , _idiiName = pIdiiName_-    , _idiiCallback = Nothing-    }----- | V1 error format.-idiiXgafv :: Lens' IndexingDatasourcesItemsIndex (Maybe Xgafv)-idiiXgafv-  = lens _idiiXgafv (\ s a -> s{_idiiXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-idiiUploadProtocol :: Lens' IndexingDatasourcesItemsIndex (Maybe Text)-idiiUploadProtocol-  = lens _idiiUploadProtocol-      (\ s a -> s{_idiiUploadProtocol = a})---- | OAuth access token.-idiiAccessToken :: Lens' IndexingDatasourcesItemsIndex (Maybe Text)-idiiAccessToken-  = lens _idiiAccessToken-      (\ s a -> s{_idiiAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-idiiUploadType :: Lens' IndexingDatasourcesItemsIndex (Maybe Text)-idiiUploadType-  = lens _idiiUploadType-      (\ s a -> s{_idiiUploadType = a})---- | Multipart request metadata.-idiiPayload :: Lens' IndexingDatasourcesItemsIndex IndexItemRequest-idiiPayload-  = lens _idiiPayload (\ s a -> s{_idiiPayload = a})---- | Name of the Item. Format: datasources\/{source_id}\/items\/{item_id}--- This is a required field. The maximum length is 1536 characters.-idiiName :: Lens' IndexingDatasourcesItemsIndex Text-idiiName = lens _idiiName (\ s a -> s{_idiiName = a})---- | JSONP-idiiCallback :: Lens' IndexingDatasourcesItemsIndex (Maybe Text)-idiiCallback-  = lens _idiiCallback (\ s a -> s{_idiiCallback = a})--instance GoogleRequest IndexingDatasourcesItemsIndex-         where-        type Rs IndexingDatasourcesItemsIndex = Operation-        type Scopes IndexingDatasourcesItemsIndex =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.indexing"]-        requestClient IndexingDatasourcesItemsIndex'{..}-          = go _idiiName _idiiXgafv _idiiUploadProtocol-              _idiiAccessToken-              _idiiUploadType-              _idiiCallback-              (Just AltJSON)-              _idiiPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy IndexingDatasourcesItemsIndexResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/Items/List.hs 
@@ -1,226 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.List--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Lists all or a subset of Item resources.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.list@.-module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.List-    (-    -- * REST Resource-      IndexingDatasourcesItemsListResource--    -- * Creating a Request-    , indexingDatasourcesItemsList-    , IndexingDatasourcesItemsList--    -- * Request Lenses-    , idilXgafv-    , idilUploadProtocol-    , idilAccessToken-    , idilUploadType-    , idilConnectorName-    , idilName-    , idilBrief-    , idilDebugOptionsEnableDebugging-    , idilPageToken-    , idilPageSize-    , idilCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.indexing.datasources.items.list@ method which the--- 'IndexingDatasourcesItemsList' request conforms to.-type IndexingDatasourcesItemsListResource =-     "v1" :>-       "indexing" :>-         Capture "name" Text :>-           "items" :>-             QueryParam "$.xgafv" Xgafv :>-               QueryParam "upload_protocol" Text :>-                 QueryParam "access_token" Text :>-                   QueryParam "uploadType" Text :>-                     QueryParam "connectorName" Text :>-                       QueryParam "brief" Bool :>-                         QueryParam "debugOptions.enableDebugging" Bool :>-                           QueryParam "pageToken" Text :>-                             QueryParam "pageSize" (Textual Int32) :>-                               QueryParam "callback" Text :>-                                 QueryParam "alt" AltJSON :>-                                   Get '[JSON] ListItemsResponse---- | Lists all or a subset of Item resources.------ /See:/ 'indexingDatasourcesItemsList' smart constructor.-data IndexingDatasourcesItemsList =-  IndexingDatasourcesItemsList'-    { _idilXgafv                       :: !(Maybe Xgafv)-    , _idilUploadProtocol              :: !(Maybe Text)-    , _idilAccessToken                 :: !(Maybe Text)-    , _idilUploadType                  :: !(Maybe Text)-    , _idilConnectorName               :: !(Maybe Text)-    , _idilName                        :: !Text-    , _idilBrief                       :: !(Maybe Bool)-    , _idilDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _idilPageToken                   :: !(Maybe Text)-    , _idilPageSize                    :: !(Maybe (Textual Int32))-    , _idilCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexingDatasourcesItemsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'idilXgafv'------ * 'idilUploadProtocol'------ * 'idilAccessToken'------ * 'idilUploadType'------ * 'idilConnectorName'------ * 'idilName'------ * 'idilBrief'------ * 'idilDebugOptionsEnableDebugging'------ * 'idilPageToken'------ * 'idilPageSize'------ * 'idilCallback'-indexingDatasourcesItemsList-    :: Text -- ^ 'idilName'-    -> IndexingDatasourcesItemsList-indexingDatasourcesItemsList pIdilName_ =-  IndexingDatasourcesItemsList'-    { _idilXgafv = Nothing-    , _idilUploadProtocol = Nothing-    , _idilAccessToken = Nothing-    , _idilUploadType = Nothing-    , _idilConnectorName = Nothing-    , _idilName = pIdilName_-    , _idilBrief = Nothing-    , _idilDebugOptionsEnableDebugging = Nothing-    , _idilPageToken = Nothing-    , _idilPageSize = Nothing-    , _idilCallback = Nothing-    }----- | V1 error format.-idilXgafv :: Lens' IndexingDatasourcesItemsList (Maybe Xgafv)-idilXgafv-  = lens _idilXgafv (\ s a -> s{_idilXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-idilUploadProtocol :: Lens' IndexingDatasourcesItemsList (Maybe Text)-idilUploadProtocol-  = lens _idilUploadProtocol-      (\ s a -> s{_idilUploadProtocol = a})---- | OAuth access token.-idilAccessToken :: Lens' IndexingDatasourcesItemsList (Maybe Text)-idilAccessToken-  = lens _idilAccessToken-      (\ s a -> s{_idilAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-idilUploadType :: Lens' IndexingDatasourcesItemsList (Maybe Text)-idilUploadType-  = lens _idilUploadType-      (\ s a -> s{_idilUploadType = a})---- | Name of connector making this call.--- Format: datasources\/{source_id}\/connectors\/{ID}-idilConnectorName :: Lens' IndexingDatasourcesItemsList (Maybe Text)-idilConnectorName-  = lens _idilConnectorName-      (\ s a -> s{_idilConnectorName = a})---- | Name of the Data Source to list Items. Format: datasources\/{source_id}-idilName :: Lens' IndexingDatasourcesItemsList Text-idilName = lens _idilName (\ s a -> s{_idilName = a})---- | When set to true, the indexing system only populates the following--- fields: name, version, metadata.hash, structured_data.hash,--- content.hash.--- If this value is false, then all the fields are populated in Item.-idilBrief :: Lens' IndexingDatasourcesItemsList (Maybe Bool)-idilBrief-  = lens _idilBrief (\ s a -> s{_idilBrief = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-idilDebugOptionsEnableDebugging :: Lens' IndexingDatasourcesItemsList (Maybe Bool)-idilDebugOptionsEnableDebugging-  = lens _idilDebugOptionsEnableDebugging-      (\ s a -> s{_idilDebugOptionsEnableDebugging = a})---- | The next_page_token value returned from a previous List request, if any.-idilPageToken :: Lens' IndexingDatasourcesItemsList (Maybe Text)-idilPageToken-  = lens _idilPageToken-      (\ s a -> s{_idilPageToken = a})---- | Maximum number of items to fetch in a request. The max value is 1000--- when brief is true. The max value is 10 if brief is false.--- The default value is 10-idilPageSize :: Lens' IndexingDatasourcesItemsList (Maybe Int32)-idilPageSize-  = lens _idilPageSize (\ s a -> s{_idilPageSize = a})-      . mapping _Coerce---- | JSONP-idilCallback :: Lens' IndexingDatasourcesItemsList (Maybe Text)-idilCallback-  = lens _idilCallback (\ s a -> s{_idilCallback = a})--instance GoogleRequest IndexingDatasourcesItemsList-         where-        type Rs IndexingDatasourcesItemsList =-             ListItemsResponse-        type Scopes IndexingDatasourcesItemsList =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.indexing"]-        requestClient IndexingDatasourcesItemsList'{..}-          = go _idilName _idilXgafv _idilUploadProtocol-              _idilAccessToken-              _idilUploadType-              _idilConnectorName-              _idilBrief-              _idilDebugOptionsEnableDebugging-              _idilPageToken-              _idilPageSize-              _idilCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy :: Proxy IndexingDatasourcesItemsListResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/Items/Poll.hs 
@@ -1,192 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Poll--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Polls for unreserved items from the indexing queue and marks a set as--- reserved, starting with items that have the oldest timestamp from the--- highest priority ItemStatus. The priority order is as follows:--- ERROR--- MODIFIED--- NEW_ITEM--- ACCEPTED--- Reserving items ensures that polling from other threads cannot create--- overlapping sets. After handling the reserved items, the client should--- put items back into the unreserved state, either by calling index, or by--- calling push with the type REQUEUE. Items automatically become available--- (unreserved) after 4 hours even if no update or push method is called.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.poll@.-module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Poll-    (-    -- * REST Resource-      IndexingDatasourcesItemsPollResource--    -- * Creating a Request-    , indexingDatasourcesItemsPoll-    , IndexingDatasourcesItemsPoll--    -- * Request Lenses-    , idipdXgafv-    , idipdUploadProtocol-    , idipdAccessToken-    , idipdUploadType-    , idipdPayload-    , idipdName-    , idipdCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.indexing.datasources.items.poll@ method which the--- 'IndexingDatasourcesItemsPoll' request conforms to.-type IndexingDatasourcesItemsPollResource =-     "v1" :>-       "indexing" :>-         Capture "name" Text :>-           "items:poll" :>-             QueryParam "$.xgafv" Xgafv :>-               QueryParam "upload_protocol" Text :>-                 QueryParam "access_token" Text :>-                   QueryParam "uploadType" Text :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :>-                         ReqBody '[JSON] PollItemsRequest :>-                           Post '[JSON] PollItemsResponse---- | Polls for unreserved items from the indexing queue and marks a set as--- reserved, starting with items that have the oldest timestamp from the--- highest priority ItemStatus. The priority order is as follows:--- ERROR--- MODIFIED--- NEW_ITEM--- ACCEPTED--- Reserving items ensures that polling from other threads cannot create--- overlapping sets. After handling the reserved items, the client should--- put items back into the unreserved state, either by calling index, or by--- calling push with the type REQUEUE. Items automatically become available--- (unreserved) after 4 hours even if no update or push method is called.------ /See:/ 'indexingDatasourcesItemsPoll' smart constructor.-data IndexingDatasourcesItemsPoll =-  IndexingDatasourcesItemsPoll'-    { _idipdXgafv          :: !(Maybe Xgafv)-    , _idipdUploadProtocol :: !(Maybe Text)-    , _idipdAccessToken    :: !(Maybe Text)-    , _idipdUploadType     :: !(Maybe Text)-    , _idipdPayload        :: !PollItemsRequest-    , _idipdName           :: !Text-    , _idipdCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexingDatasourcesItemsPoll' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'idipdXgafv'------ * 'idipdUploadProtocol'------ * 'idipdAccessToken'------ * 'idipdUploadType'------ * 'idipdPayload'------ * 'idipdName'------ * 'idipdCallback'-indexingDatasourcesItemsPoll-    :: PollItemsRequest -- ^ 'idipdPayload'-    -> Text -- ^ 'idipdName'-    -> IndexingDatasourcesItemsPoll-indexingDatasourcesItemsPoll pIdipdPayload_ pIdipdName_ =-  IndexingDatasourcesItemsPoll'-    { _idipdXgafv = Nothing-    , _idipdUploadProtocol = Nothing-    , _idipdAccessToken = Nothing-    , _idipdUploadType = Nothing-    , _idipdPayload = pIdipdPayload_-    , _idipdName = pIdipdName_-    , _idipdCallback = Nothing-    }----- | V1 error format.-idipdXgafv :: Lens' IndexingDatasourcesItemsPoll (Maybe Xgafv)-idipdXgafv-  = lens _idipdXgafv (\ s a -> s{_idipdXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-idipdUploadProtocol :: Lens' IndexingDatasourcesItemsPoll (Maybe Text)-idipdUploadProtocol-  = lens _idipdUploadProtocol-      (\ s a -> s{_idipdUploadProtocol = a})---- | OAuth access token.-idipdAccessToken :: Lens' IndexingDatasourcesItemsPoll (Maybe Text)-idipdAccessToken-  = lens _idipdAccessToken-      (\ s a -> s{_idipdAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-idipdUploadType :: Lens' IndexingDatasourcesItemsPoll (Maybe Text)-idipdUploadType-  = lens _idipdUploadType-      (\ s a -> s{_idipdUploadType = a})---- | Multipart request metadata.-idipdPayload :: Lens' IndexingDatasourcesItemsPoll PollItemsRequest-idipdPayload-  = lens _idipdPayload (\ s a -> s{_idipdPayload = a})---- | Name of the Data Source to poll items. Format: datasources\/{source_id}-idipdName :: Lens' IndexingDatasourcesItemsPoll Text-idipdName-  = lens _idipdName (\ s a -> s{_idipdName = a})---- | JSONP-idipdCallback :: Lens' IndexingDatasourcesItemsPoll (Maybe Text)-idipdCallback-  = lens _idipdCallback-      (\ s a -> s{_idipdCallback = a})--instance GoogleRequest IndexingDatasourcesItemsPoll-         where-        type Rs IndexingDatasourcesItemsPoll =-             PollItemsResponse-        type Scopes IndexingDatasourcesItemsPoll =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.indexing"]-        requestClient IndexingDatasourcesItemsPoll'{..}-          = go _idipdName _idipdXgafv _idipdUploadProtocol-              _idipdAccessToken-              _idipdUploadType-              _idipdCallback-              (Just AltJSON)-              _idipdPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy :: Proxy IndexingDatasourcesItemsPollResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/Items/Push.hs 
@@ -1,167 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Push--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Pushes an item onto a queue for later polling and updating.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.push@.-module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Push-    (-    -- * REST Resource-      IndexingDatasourcesItemsPushResource--    -- * Creating a Request-    , indexingDatasourcesItemsPush-    , IndexingDatasourcesItemsPush--    -- * Request Lenses-    , idipXgafv-    , idipUploadProtocol-    , idipAccessToken-    , idipUploadType-    , idipPayload-    , idipName-    , idipCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.indexing.datasources.items.push@ method which the--- 'IndexingDatasourcesItemsPush' request conforms to.-type IndexingDatasourcesItemsPushResource =-     "v1" :>-       "indexing" :>-         CaptureMode "name" "push" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] PushItemRequest :> Post '[JSON] Item---- | Pushes an item onto a queue for later polling and updating.------ /See:/ 'indexingDatasourcesItemsPush' smart constructor.-data IndexingDatasourcesItemsPush =-  IndexingDatasourcesItemsPush'-    { _idipXgafv          :: !(Maybe Xgafv)-    , _idipUploadProtocol :: !(Maybe Text)-    , _idipAccessToken    :: !(Maybe Text)-    , _idipUploadType     :: !(Maybe Text)-    , _idipPayload        :: !PushItemRequest-    , _idipName           :: !Text-    , _idipCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexingDatasourcesItemsPush' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'idipXgafv'------ * 'idipUploadProtocol'------ * 'idipAccessToken'------ * 'idipUploadType'------ * 'idipPayload'------ * 'idipName'------ * 'idipCallback'-indexingDatasourcesItemsPush-    :: PushItemRequest -- ^ 'idipPayload'-    -> Text -- ^ 'idipName'-    -> IndexingDatasourcesItemsPush-indexingDatasourcesItemsPush pIdipPayload_ pIdipName_ =-  IndexingDatasourcesItemsPush'-    { _idipXgafv = Nothing-    , _idipUploadProtocol = Nothing-    , _idipAccessToken = Nothing-    , _idipUploadType = Nothing-    , _idipPayload = pIdipPayload_-    , _idipName = pIdipName_-    , _idipCallback = Nothing-    }----- | V1 error format.-idipXgafv :: Lens' IndexingDatasourcesItemsPush (Maybe Xgafv)-idipXgafv-  = lens _idipXgafv (\ s a -> s{_idipXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-idipUploadProtocol :: Lens' IndexingDatasourcesItemsPush (Maybe Text)-idipUploadProtocol-  = lens _idipUploadProtocol-      (\ s a -> s{_idipUploadProtocol = a})---- | OAuth access token.-idipAccessToken :: Lens' IndexingDatasourcesItemsPush (Maybe Text)-idipAccessToken-  = lens _idipAccessToken-      (\ s a -> s{_idipAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-idipUploadType :: Lens' IndexingDatasourcesItemsPush (Maybe Text)-idipUploadType-  = lens _idipUploadType-      (\ s a -> s{_idipUploadType = a})---- | Multipart request metadata.-idipPayload :: Lens' IndexingDatasourcesItemsPush PushItemRequest-idipPayload-  = lens _idipPayload (\ s a -> s{_idipPayload = a})---- | Name of the item to push into the indexing queue.--- Format: datasources\/{source_id}\/items\/{ID}--- This is a required field. The maximum length is 1536 characters.-idipName :: Lens' IndexingDatasourcesItemsPush Text-idipName = lens _idipName (\ s a -> s{_idipName = a})---- | JSONP-idipCallback :: Lens' IndexingDatasourcesItemsPush (Maybe Text)-idipCallback-  = lens _idipCallback (\ s a -> s{_idipCallback = a})--instance GoogleRequest IndexingDatasourcesItemsPush-         where-        type Rs IndexingDatasourcesItemsPush = Item-        type Scopes IndexingDatasourcesItemsPush =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.indexing"]-        requestClient IndexingDatasourcesItemsPush'{..}-          = go _idipName _idipXgafv _idipUploadProtocol-              _idipAccessToken-              _idipUploadType-              _idipCallback-              (Just AltJSON)-              _idipPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy :: Proxy IndexingDatasourcesItemsPushResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/Items/Unreserve.hs 
@@ -1,174 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Unreserve--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Unreserves all items from a queue, making them all eligible to be--- polled. This method is useful for resetting the indexing queue after a--- connector has been restarted.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.unreserve@.-module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Unreserve-    (-    -- * REST Resource-      IndexingDatasourcesItemsUnreserveResource--    -- * Creating a Request-    , indexingDatasourcesItemsUnreserve-    , IndexingDatasourcesItemsUnreserve--    -- * Request Lenses-    , idiuXgafv-    , idiuUploadProtocol-    , idiuAccessToken-    , idiuUploadType-    , idiuPayload-    , idiuName-    , idiuCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.indexing.datasources.items.unreserve@ method which the--- 'IndexingDatasourcesItemsUnreserve' request conforms to.-type IndexingDatasourcesItemsUnreserveResource =-     "v1" :>-       "indexing" :>-         Capture "name" Text :>-           "items:unreserve" :>-             QueryParam "$.xgafv" Xgafv :>-               QueryParam "upload_protocol" Text :>-                 QueryParam "access_token" Text :>-                   QueryParam "uploadType" Text :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :>-                         ReqBody '[JSON] UnreserveItemsRequest :>-                           Post '[JSON] Operation---- | Unreserves all items from a queue, making them all eligible to be--- polled. This method is useful for resetting the indexing queue after a--- connector has been restarted.------ /See:/ 'indexingDatasourcesItemsUnreserve' smart constructor.-data IndexingDatasourcesItemsUnreserve =-  IndexingDatasourcesItemsUnreserve'-    { _idiuXgafv          :: !(Maybe Xgafv)-    , _idiuUploadProtocol :: !(Maybe Text)-    , _idiuAccessToken    :: !(Maybe Text)-    , _idiuUploadType     :: !(Maybe Text)-    , _idiuPayload        :: !UnreserveItemsRequest-    , _idiuName           :: !Text-    , _idiuCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexingDatasourcesItemsUnreserve' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'idiuXgafv'------ * 'idiuUploadProtocol'------ * 'idiuAccessToken'------ * 'idiuUploadType'------ * 'idiuPayload'------ * 'idiuName'------ * 'idiuCallback'-indexingDatasourcesItemsUnreserve-    :: UnreserveItemsRequest -- ^ 'idiuPayload'-    -> Text -- ^ 'idiuName'-    -> IndexingDatasourcesItemsUnreserve-indexingDatasourcesItemsUnreserve pIdiuPayload_ pIdiuName_ =-  IndexingDatasourcesItemsUnreserve'-    { _idiuXgafv = Nothing-    , _idiuUploadProtocol = Nothing-    , _idiuAccessToken = Nothing-    , _idiuUploadType = Nothing-    , _idiuPayload = pIdiuPayload_-    , _idiuName = pIdiuName_-    , _idiuCallback = Nothing-    }----- | V1 error format.-idiuXgafv :: Lens' IndexingDatasourcesItemsUnreserve (Maybe Xgafv)-idiuXgafv-  = lens _idiuXgafv (\ s a -> s{_idiuXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-idiuUploadProtocol :: Lens' IndexingDatasourcesItemsUnreserve (Maybe Text)-idiuUploadProtocol-  = lens _idiuUploadProtocol-      (\ s a -> s{_idiuUploadProtocol = a})---- | OAuth access token.-idiuAccessToken :: Lens' IndexingDatasourcesItemsUnreserve (Maybe Text)-idiuAccessToken-  = lens _idiuAccessToken-      (\ s a -> s{_idiuAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-idiuUploadType :: Lens' IndexingDatasourcesItemsUnreserve (Maybe Text)-idiuUploadType-  = lens _idiuUploadType-      (\ s a -> s{_idiuUploadType = a})---- | Multipart request metadata.-idiuPayload :: Lens' IndexingDatasourcesItemsUnreserve UnreserveItemsRequest-idiuPayload-  = lens _idiuPayload (\ s a -> s{_idiuPayload = a})---- | Name of the Data Source to unreserve all items. Format:--- datasources\/{source_id}-idiuName :: Lens' IndexingDatasourcesItemsUnreserve Text-idiuName = lens _idiuName (\ s a -> s{_idiuName = a})---- | JSONP-idiuCallback :: Lens' IndexingDatasourcesItemsUnreserve (Maybe Text)-idiuCallback-  = lens _idiuCallback (\ s a -> s{_idiuCallback = a})--instance GoogleRequest-           IndexingDatasourcesItemsUnreserve-         where-        type Rs IndexingDatasourcesItemsUnreserve = Operation-        type Scopes IndexingDatasourcesItemsUnreserve =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.indexing"]-        requestClient IndexingDatasourcesItemsUnreserve'{..}-          = go _idiuName _idiuXgafv _idiuUploadProtocol-              _idiuAccessToken-              _idiuUploadType-              _idiuCallback-              (Just AltJSON)-              _idiuPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy IndexingDatasourcesItemsUnreserveResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/Items/Upload.hs 
@@ -1,170 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Upload--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates an upload session for uploading item content. For items smaller--- than 100 KiB, it\'s easier to embed the content inline within update.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.items.upload@.-module Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Upload-    (-    -- * REST Resource-      IndexingDatasourcesItemsUploadResource--    -- * Creating a Request-    , indexingDatasourcesItemsUpload-    , IndexingDatasourcesItemsUpload--    -- * Request Lenses-    , indXgafv-    , indUploadProtocol-    , indAccessToken-    , indUploadType-    , indPayload-    , indName-    , indCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.indexing.datasources.items.upload@ method which the--- 'IndexingDatasourcesItemsUpload' request conforms to.-type IndexingDatasourcesItemsUploadResource =-     "v1" :>-       "indexing" :>-         CaptureMode "name" "upload" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] StartUploadItemRequest :>-                         Post '[JSON] UploadItemRef---- | Creates an upload session for uploading item content. For items smaller--- than 100 KiB, it\'s easier to embed the content inline within update.------ /See:/ 'indexingDatasourcesItemsUpload' smart constructor.-data IndexingDatasourcesItemsUpload =-  IndexingDatasourcesItemsUpload'-    { _indXgafv          :: !(Maybe Xgafv)-    , _indUploadProtocol :: !(Maybe Text)-    , _indAccessToken    :: !(Maybe Text)-    , _indUploadType     :: !(Maybe Text)-    , _indPayload        :: !StartUploadItemRequest-    , _indName           :: !Text-    , _indCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexingDatasourcesItemsUpload' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'indXgafv'------ * 'indUploadProtocol'------ * 'indAccessToken'------ * 'indUploadType'------ * 'indPayload'------ * 'indName'------ * 'indCallback'-indexingDatasourcesItemsUpload-    :: StartUploadItemRequest -- ^ 'indPayload'-    -> Text -- ^ 'indName'-    -> IndexingDatasourcesItemsUpload-indexingDatasourcesItemsUpload pIndPayload_ pIndName_ =-  IndexingDatasourcesItemsUpload'-    { _indXgafv = Nothing-    , _indUploadProtocol = Nothing-    , _indAccessToken = Nothing-    , _indUploadType = Nothing-    , _indPayload = pIndPayload_-    , _indName = pIndName_-    , _indCallback = Nothing-    }----- | V1 error format.-indXgafv :: Lens' IndexingDatasourcesItemsUpload (Maybe Xgafv)-indXgafv = lens _indXgafv (\ s a -> s{_indXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-indUploadProtocol :: Lens' IndexingDatasourcesItemsUpload (Maybe Text)-indUploadProtocol-  = lens _indUploadProtocol-      (\ s a -> s{_indUploadProtocol = a})---- | OAuth access token.-indAccessToken :: Lens' IndexingDatasourcesItemsUpload (Maybe Text)-indAccessToken-  = lens _indAccessToken-      (\ s a -> s{_indAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-indUploadType :: Lens' IndexingDatasourcesItemsUpload (Maybe Text)-indUploadType-  = lens _indUploadType-      (\ s a -> s{_indUploadType = a})---- | Multipart request metadata.-indPayload :: Lens' IndexingDatasourcesItemsUpload StartUploadItemRequest-indPayload-  = lens _indPayload (\ s a -> s{_indPayload = a})---- | Name of the Item to start a resumable upload. Format:--- datasources\/{source_id}\/items\/{item_id}.-indName :: Lens' IndexingDatasourcesItemsUpload Text-indName = lens _indName (\ s a -> s{_indName = a})---- | JSONP-indCallback :: Lens' IndexingDatasourcesItemsUpload (Maybe Text)-indCallback-  = lens _indCallback (\ s a -> s{_indCallback = a})--instance GoogleRequest IndexingDatasourcesItemsUpload-         where-        type Rs IndexingDatasourcesItemsUpload =-             UploadItemRef-        type Scopes IndexingDatasourcesItemsUpload =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.indexing"]-        requestClient IndexingDatasourcesItemsUpload'{..}-          = go _indName _indXgafv _indUploadProtocol-              _indAccessToken-              _indUploadType-              _indCallback-              (Just AltJSON)-              _indPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy IndexingDatasourcesItemsUploadResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Indexing/Datasources/UpdateSchema.hs 
@@ -1,171 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Indexing.Datasources.UpdateSchema--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Updates the schema of a data source.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.indexing.datasources.updateSchema@.-module Network.Google.Resource.CloudSearch.Indexing.Datasources.UpdateSchema-    (-    -- * REST Resource-      IndexingDatasourcesUpdateSchemaResource--    -- * Creating a Request-    , indexingDatasourcesUpdateSchema-    , IndexingDatasourcesUpdateSchema--    -- * Request Lenses-    , idusXgafv-    , idusUploadProtocol-    , idusAccessToken-    , idusUploadType-    , idusPayload-    , idusName-    , idusCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.indexing.datasources.updateSchema@ method which the--- 'IndexingDatasourcesUpdateSchema' request conforms to.-type IndexingDatasourcesUpdateSchemaResource =-     "v1" :>-       "indexing" :>-         Capture "name" Text :>-           "schema" :>-             QueryParam "$.xgafv" Xgafv :>-               QueryParam "upload_protocol" Text :>-                 QueryParam "access_token" Text :>-                   QueryParam "uploadType" Text :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :>-                         ReqBody '[JSON] UpdateSchemaRequest :>-                           Put '[JSON] Operation---- | Updates the schema of a data source.------ /See:/ 'indexingDatasourcesUpdateSchema' smart constructor.-data IndexingDatasourcesUpdateSchema =-  IndexingDatasourcesUpdateSchema'-    { _idusXgafv          :: !(Maybe Xgafv)-    , _idusUploadProtocol :: !(Maybe Text)-    , _idusAccessToken    :: !(Maybe Text)-    , _idusUploadType     :: !(Maybe Text)-    , _idusPayload        :: !UpdateSchemaRequest-    , _idusName           :: !Text-    , _idusCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'IndexingDatasourcesUpdateSchema' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'idusXgafv'------ * 'idusUploadProtocol'------ * 'idusAccessToken'------ * 'idusUploadType'------ * 'idusPayload'------ * 'idusName'------ * 'idusCallback'-indexingDatasourcesUpdateSchema-    :: UpdateSchemaRequest -- ^ 'idusPayload'-    -> Text -- ^ 'idusName'-    -> IndexingDatasourcesUpdateSchema-indexingDatasourcesUpdateSchema pIdusPayload_ pIdusName_ =-  IndexingDatasourcesUpdateSchema'-    { _idusXgafv = Nothing-    , _idusUploadProtocol = Nothing-    , _idusAccessToken = Nothing-    , _idusUploadType = Nothing-    , _idusPayload = pIdusPayload_-    , _idusName = pIdusName_-    , _idusCallback = Nothing-    }----- | V1 error format.-idusXgafv :: Lens' IndexingDatasourcesUpdateSchema (Maybe Xgafv)-idusXgafv-  = lens _idusXgafv (\ s a -> s{_idusXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-idusUploadProtocol :: Lens' IndexingDatasourcesUpdateSchema (Maybe Text)-idusUploadProtocol-  = lens _idusUploadProtocol-      (\ s a -> s{_idusUploadProtocol = a})---- | OAuth access token.-idusAccessToken :: Lens' IndexingDatasourcesUpdateSchema (Maybe Text)-idusAccessToken-  = lens _idusAccessToken-      (\ s a -> s{_idusAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-idusUploadType :: Lens' IndexingDatasourcesUpdateSchema (Maybe Text)-idusUploadType-  = lens _idusUploadType-      (\ s a -> s{_idusUploadType = a})---- | Multipart request metadata.-idusPayload :: Lens' IndexingDatasourcesUpdateSchema UpdateSchemaRequest-idusPayload-  = lens _idusPayload (\ s a -> s{_idusPayload = a})---- | Name of the data source to update Schema. Format:--- datasources\/{source_id}-idusName :: Lens' IndexingDatasourcesUpdateSchema Text-idusName = lens _idusName (\ s a -> s{_idusName = a})---- | JSONP-idusCallback :: Lens' IndexingDatasourcesUpdateSchema (Maybe Text)-idusCallback-  = lens _idusCallback (\ s a -> s{_idusCallback = a})--instance GoogleRequest-           IndexingDatasourcesUpdateSchema-         where-        type Rs IndexingDatasourcesUpdateSchema = Operation-        type Scopes IndexingDatasourcesUpdateSchema =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.indexing"]-        requestClient IndexingDatasourcesUpdateSchema'{..}-          = go _idusName _idusXgafv _idusUploadProtocol-              _idusAccessToken-              _idusUploadType-              _idusCallback-              (Just AltJSON)-              _idusPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy IndexingDatasourcesUpdateSchemaResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Media/Upload.hs 
@@ -1,211 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Media.Upload--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Uploads media for indexing. The upload endpoint supports direct and--- resumable upload protocols and is intended for large items that can not--- be inlined during index requests. To index large content: 1. Call upload--- to begin a session and get the item reference. 1. Upload the content--- using the item reference\'s resource name. 1. Call index with the item--- reference as the content. For additional information, see [Create a--- content connector using the REST--- API](https:\/\/developers.google.com\/cloud-search\/docs\/guides\/content-connector#rest).------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.media.upload@.-module Network.Google.Resource.CloudSearch.Media.Upload-    (-    -- * REST Resource-      MediaUploadResource--    -- * Creating a Request-    , mediaUpload-    , MediaUpload'--    -- * Request Lenses-    , muXgafv-    , muUploadProtocol-    , muResourceName-    , muAccessToken-    , muUploadType-    , muPayload-    , muCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.media.upload@ method which the--- 'MediaUpload'' request conforms to.-type MediaUploadResource =-     "v1" :>-       "media" :>-         Capture "resourceName" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] Media :> Post '[JSON] Media-       :<|>-       "upload" :>-         "v1" :>-           "media" :>-             Capture "resourceName" Text :>-               QueryParam "$.xgafv" Xgafv :>-                 QueryParam "upload_protocol" Text :>-                   QueryParam "access_token" Text :>-                     QueryParam "uploadType" Text :>-                       QueryParam "callback" Text :>-                         QueryParam "alt" AltJSON :>-                           QueryParam "uploadType" Multipart :>-                             MultipartRelated '[JSON] Media :>-                               Post '[JSON] Media---- | Uploads media for indexing. The upload endpoint supports direct and--- resumable upload protocols and is intended for large items that can not--- be inlined during index requests. To index large content: 1. Call upload--- to begin a session and get the item reference. 1. Upload the content--- using the item reference\'s resource name. 1. Call index with the item--- reference as the content. For additional information, see [Create a--- content connector using the REST--- API](https:\/\/developers.google.com\/cloud-search\/docs\/guides\/content-connector#rest).------ /See:/ 'mediaUpload' smart constructor.-data MediaUpload' =-  MediaUpload''-    { _muXgafv          :: !(Maybe Xgafv)-    , _muUploadProtocol :: !(Maybe Text)-    , _muResourceName   :: !Text-    , _muAccessToken    :: !(Maybe Text)-    , _muUploadType     :: !(Maybe Text)-    , _muPayload        :: !Media-    , _muCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'MediaUpload' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'muXgafv'------ * 'muUploadProtocol'------ * 'muResourceName'------ * 'muAccessToken'------ * 'muUploadType'------ * 'muPayload'------ * 'muCallback'-mediaUpload-    :: Text -- ^ 'muResourceName'-    -> Media -- ^ 'muPayload'-    -> MediaUpload'-mediaUpload pMuResourceName_ pMuPayload_ =-  MediaUpload''-    { _muXgafv = Nothing-    , _muUploadProtocol = Nothing-    , _muResourceName = pMuResourceName_-    , _muAccessToken = Nothing-    , _muUploadType = Nothing-    , _muPayload = pMuPayload_-    , _muCallback = Nothing-    }----- | V1 error format.-muXgafv :: Lens' MediaUpload' (Maybe Xgafv)-muXgafv = lens _muXgafv (\ s a -> s{_muXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-muUploadProtocol :: Lens' MediaUpload' (Maybe Text)-muUploadProtocol-  = lens _muUploadProtocol-      (\ s a -> s{_muUploadProtocol = a})---- | Name of the media that is being downloaded. See--- ReadRequest.resource_name.-muResourceName :: Lens' MediaUpload' Text-muResourceName-  = lens _muResourceName-      (\ s a -> s{_muResourceName = a})---- | OAuth access token.-muAccessToken :: Lens' MediaUpload' (Maybe Text)-muAccessToken-  = lens _muAccessToken-      (\ s a -> s{_muAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-muUploadType :: Lens' MediaUpload' (Maybe Text)-muUploadType-  = lens _muUploadType (\ s a -> s{_muUploadType = a})---- | Multipart request metadata.-muPayload :: Lens' MediaUpload' Media-muPayload-  = lens _muPayload (\ s a -> s{_muPayload = a})---- | JSONP-muCallback :: Lens' MediaUpload' (Maybe Text)-muCallback-  = lens _muCallback (\ s a -> s{_muCallback = a})--instance GoogleRequest MediaUpload' where-        type Rs MediaUpload' = Media-        type Scopes MediaUpload' =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.indexing"]-        requestClient MediaUpload''{..}-          = go _muResourceName _muXgafv _muUploadProtocol-              _muAccessToken-              _muUploadType-              _muCallback-              (Just AltJSON)-              _muPayload-              cloudSearchService-          where go :<|> _-                  = buildClient (Proxy :: Proxy MediaUploadResource)-                      mempty--instance GoogleRequest (MediaUpload MediaUpload')-         where-        type Rs (MediaUpload MediaUpload') = Media-        type Scopes (MediaUpload MediaUpload') =-             Scopes MediaUpload'-        requestClient (MediaUpload MediaUpload''{..} body)-          = go _muResourceName _muXgafv _muUploadProtocol-              _muAccessToken-              _muUploadType-              _muCallback-              (Just AltJSON)-              (Just Multipart)-              _muPayload-              body-              cloudSearchService-          where _ :<|> go-                  = buildClient (Proxy :: Proxy MediaUploadResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Operations/Get.hs 
@@ -1,155 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Operations.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets the latest state of a long-running operation. Clients can use this--- method to poll the operation result at intervals as recommended by the--- API service.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.operations.get@.-module Network.Google.Resource.CloudSearch.Operations.Get-    (-    -- * REST Resource-      OperationsGetResource--    -- * Creating a Request-    , operationsGet-    , OperationsGet--    -- * Request Lenses-    , ogXgafv-    , ogUploadProtocol-    , ogAccessToken-    , ogUploadType-    , ogName-    , ogCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.operations.get@ method which the--- 'OperationsGet' request conforms to.-type OperationsGetResource =-     "v1" :>-       Capture "name" Text :>-         QueryParam "$.xgafv" Xgafv :>-           QueryParam "upload_protocol" Text :>-             QueryParam "access_token" Text :>-               QueryParam "uploadType" Text :>-                 QueryParam "callback" Text :>-                   QueryParam "alt" AltJSON :> Get '[JSON] Operation---- | Gets the latest state of a long-running operation. Clients can use this--- method to poll the operation result at intervals as recommended by the--- API service.------ /See:/ 'operationsGet' smart constructor.-data OperationsGet =-  OperationsGet'-    { _ogXgafv          :: !(Maybe Xgafv)-    , _ogUploadProtocol :: !(Maybe Text)-    , _ogAccessToken    :: !(Maybe Text)-    , _ogUploadType     :: !(Maybe Text)-    , _ogName           :: !Text-    , _ogCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'OperationsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ogXgafv'------ * 'ogUploadProtocol'------ * 'ogAccessToken'------ * 'ogUploadType'------ * 'ogName'------ * 'ogCallback'-operationsGet-    :: Text -- ^ 'ogName'-    -> OperationsGet-operationsGet pOgName_ =-  OperationsGet'-    { _ogXgafv = Nothing-    , _ogUploadProtocol = Nothing-    , _ogAccessToken = Nothing-    , _ogUploadType = Nothing-    , _ogName = pOgName_-    , _ogCallback = Nothing-    }----- | V1 error format.-ogXgafv :: Lens' OperationsGet (Maybe Xgafv)-ogXgafv = lens _ogXgafv (\ s a -> s{_ogXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-ogUploadProtocol :: Lens' OperationsGet (Maybe Text)-ogUploadProtocol-  = lens _ogUploadProtocol-      (\ s a -> s{_ogUploadProtocol = a})---- | OAuth access token.-ogAccessToken :: Lens' OperationsGet (Maybe Text)-ogAccessToken-  = lens _ogAccessToken-      (\ s a -> s{_ogAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-ogUploadType :: Lens' OperationsGet (Maybe Text)-ogUploadType-  = lens _ogUploadType (\ s a -> s{_ogUploadType = a})---- | The name of the operation resource.-ogName :: Lens' OperationsGet Text-ogName = lens _ogName (\ s a -> s{_ogName = a})---- | JSONP-ogCallback :: Lens' OperationsGet (Maybe Text)-ogCallback-  = lens _ogCallback (\ s a -> s{_ogCallback = a})--instance GoogleRequest OperationsGet where-        type Rs OperationsGet = Operation-        type Scopes OperationsGet =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.debug",-               "https://www.googleapis.com/auth/cloud_search.indexing",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.indexing",-               "https://www.googleapis.com/auth/cloud_search.settings.query"]-        requestClient OperationsGet'{..}-          = go _ogName _ogXgafv _ogUploadProtocol-              _ogAccessToken-              _ogUploadType-              _ogCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient (Proxy :: Proxy OperationsGetResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Query/Search.hs 
@@ -1,155 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Query.Search--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ The Cloud Search Query API provides the search method, which returns the--- most relevant results from a user query. The results can come from G--- Suite Apps, such as Gmail or Google Drive, or they can come from data--- that you have indexed from a third party.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.query.search@.-module Network.Google.Resource.CloudSearch.Query.Search-    (-    -- * REST Resource-      QuerySearchResource--    -- * Creating a Request-    , querySearch-    , QuerySearch--    -- * Request Lenses-    , qXgafv-    , qUploadProtocol-    , qAccessToken-    , qUploadType-    , qPayload-    , qCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.query.search@ method which the--- 'QuerySearch' request conforms to.-type QuerySearchResource =-     "v1" :>-       "query" :>-         "search" :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] SearchRequest :>-                         Post '[JSON] SearchResponse---- | The Cloud Search Query API provides the search method, which returns the--- most relevant results from a user query. The results can come from G--- Suite Apps, such as Gmail or Google Drive, or they can come from data--- that you have indexed from a third party.------ /See:/ 'querySearch' smart constructor.-data QuerySearch =-  QuerySearch'-    { _qXgafv          :: !(Maybe Xgafv)-    , _qUploadProtocol :: !(Maybe Text)-    , _qAccessToken    :: !(Maybe Text)-    , _qUploadType     :: !(Maybe Text)-    , _qPayload        :: !SearchRequest-    , _qCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'QuerySearch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'qXgafv'------ * 'qUploadProtocol'------ * 'qAccessToken'------ * 'qUploadType'------ * 'qPayload'------ * 'qCallback'-querySearch-    :: SearchRequest -- ^ 'qPayload'-    -> QuerySearch-querySearch pQPayload_ =-  QuerySearch'-    { _qXgafv = Nothing-    , _qUploadProtocol = Nothing-    , _qAccessToken = Nothing-    , _qUploadType = Nothing-    , _qPayload = pQPayload_-    , _qCallback = Nothing-    }----- | V1 error format.-qXgafv :: Lens' QuerySearch (Maybe Xgafv)-qXgafv = lens _qXgafv (\ s a -> s{_qXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-qUploadProtocol :: Lens' QuerySearch (Maybe Text)-qUploadProtocol-  = lens _qUploadProtocol-      (\ s a -> s{_qUploadProtocol = a})---- | OAuth access token.-qAccessToken :: Lens' QuerySearch (Maybe Text)-qAccessToken-  = lens _qAccessToken (\ s a -> s{_qAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-qUploadType :: Lens' QuerySearch (Maybe Text)-qUploadType-  = lens _qUploadType (\ s a -> s{_qUploadType = a})---- | Multipart request metadata.-qPayload :: Lens' QuerySearch SearchRequest-qPayload = lens _qPayload (\ s a -> s{_qPayload = a})---- | JSONP-qCallback :: Lens' QuerySearch (Maybe Text)-qCallback-  = lens _qCallback (\ s a -> s{_qCallback = a})--instance GoogleRequest QuerySearch where-        type Rs QuerySearch = SearchResponse-        type Scopes QuerySearch =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.query"]-        requestClient QuerySearch'{..}-          = go _qXgafv _qUploadProtocol _qAccessToken-              _qUploadType-              _qCallback-              (Just AltJSON)-              _qPayload-              cloudSearchService-          where go-                  = buildClient (Proxy :: Proxy QuerySearchResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Query/Sources/List.hs 
@@ -1,221 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Query.Sources.List--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Returns list of sources that user can use for Search and Suggest APIs.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.query.sources.list@.-module Network.Google.Resource.CloudSearch.Query.Sources.List-    (-    -- * REST Resource-      QuerySourcesListResource--    -- * Creating a Request-    , querySourcesList-    , QuerySourcesList--    -- * Request Lenses-    , qslXgafv-    , qslRequestOptionsTimeZone-    , qslRequestOptionsDebugOptionsEnableDebugging-    , qslUploadProtocol-    , qslAccessToken-    , qslUploadType-    , qslRequestOptionsSearchApplicationId-    , qslRequestOptionsLanguageCode-    , qslPageToken-    , qslCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.query.sources.list@ method which the--- 'QuerySourcesList' request conforms to.-type QuerySourcesListResource =-     "v1" :>-       "query" :>-         "sources" :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "requestOptions.timeZone" Text :>-               QueryParam-                 "requestOptions.debugOptions.enableDebugging"-                 Bool-                 :>-                 QueryParam "upload_protocol" Text :>-                   QueryParam "access_token" Text :>-                     QueryParam "uploadType" Text :>-                       QueryParam "requestOptions.searchApplicationId" Text-                         :>-                         QueryParam "requestOptions.languageCode" Text :>-                           QueryParam "pageToken" Text :>-                             QueryParam "callback" Text :>-                               QueryParam "alt" AltJSON :>-                                 Get '[JSON] ListQuerySourcesResponse---- | Returns list of sources that user can use for Search and Suggest APIs.------ /See:/ 'querySourcesList' smart constructor.-data QuerySourcesList =-  QuerySourcesList'-    { _qslXgafv                                     :: !(Maybe Xgafv)-    , _qslRequestOptionsTimeZone                    :: !(Maybe Text)-    , _qslRequestOptionsDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _qslUploadProtocol                            :: !(Maybe Text)-    , _qslAccessToken                               :: !(Maybe Text)-    , _qslUploadType                                :: !(Maybe Text)-    , _qslRequestOptionsSearchApplicationId         :: !(Maybe Text)-    , _qslRequestOptionsLanguageCode                :: !(Maybe Text)-    , _qslPageToken                                 :: !(Maybe Text)-    , _qslCallback                                  :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'QuerySourcesList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'qslXgafv'------ * 'qslRequestOptionsTimeZone'------ * 'qslRequestOptionsDebugOptionsEnableDebugging'------ * 'qslUploadProtocol'------ * 'qslAccessToken'------ * 'qslUploadType'------ * 'qslRequestOptionsSearchApplicationId'------ * 'qslRequestOptionsLanguageCode'------ * 'qslPageToken'------ * 'qslCallback'-querySourcesList-    :: QuerySourcesList-querySourcesList =-  QuerySourcesList'-    { _qslXgafv = Nothing-    , _qslRequestOptionsTimeZone = Nothing-    , _qslRequestOptionsDebugOptionsEnableDebugging = Nothing-    , _qslUploadProtocol = Nothing-    , _qslAccessToken = Nothing-    , _qslUploadType = Nothing-    , _qslRequestOptionsSearchApplicationId = Nothing-    , _qslRequestOptionsLanguageCode = Nothing-    , _qslPageToken = Nothing-    , _qslCallback = Nothing-    }----- | V1 error format.-qslXgafv :: Lens' QuerySourcesList (Maybe Xgafv)-qslXgafv = lens _qslXgafv (\ s a -> s{_qslXgafv = a})---- | Current user\'s time zone id, such as \"America\/Los_Angeles\" or--- \"Australia\/Sydney\". These IDs are defined by [Unicode Common Locale--- Data Repository (CLDR)](http:\/\/cldr.unicode.org\/) project, and--- currently available in the file--- [timezone.xml](http:\/\/unicode.org\/repos\/cldr\/trunk\/common\/bcp47\/timezone.xml)-qslRequestOptionsTimeZone :: Lens' QuerySourcesList (Maybe Text)-qslRequestOptionsTimeZone-  = lens _qslRequestOptionsTimeZone-      (\ s a -> s{_qslRequestOptionsTimeZone = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-qslRequestOptionsDebugOptionsEnableDebugging :: Lens' QuerySourcesList (Maybe Bool)-qslRequestOptionsDebugOptionsEnableDebugging-  = lens _qslRequestOptionsDebugOptionsEnableDebugging-      (\ s a ->-         s{_qslRequestOptionsDebugOptionsEnableDebugging = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-qslUploadProtocol :: Lens' QuerySourcesList (Maybe Text)-qslUploadProtocol-  = lens _qslUploadProtocol-      (\ s a -> s{_qslUploadProtocol = a})---- | OAuth access token.-qslAccessToken :: Lens' QuerySourcesList (Maybe Text)-qslAccessToken-  = lens _qslAccessToken-      (\ s a -> s{_qslAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-qslUploadType :: Lens' QuerySourcesList (Maybe Text)-qslUploadType-  = lens _qslUploadType-      (\ s a -> s{_qslUploadType = a})---- | Id of the application created using SearchApplicationsService.-qslRequestOptionsSearchApplicationId :: Lens' QuerySourcesList (Maybe Text)-qslRequestOptionsSearchApplicationId-  = lens _qslRequestOptionsSearchApplicationId-      (\ s a ->-         s{_qslRequestOptionsSearchApplicationId = a})---- | The BCP-47 language code, such as \"en-US\" or \"sr-Latn\". For more--- information, see--- http:\/\/www.unicode.org\/reports\/tr35\/#Unicode_locale_identifier. For--- translations. When specified, the documents in search results are biased--- towards the specified language. Suggest API does not use this parameter.--- It autocompletes only based on characters in the query.-qslRequestOptionsLanguageCode :: Lens' QuerySourcesList (Maybe Text)-qslRequestOptionsLanguageCode-  = lens _qslRequestOptionsLanguageCode-      (\ s a -> s{_qslRequestOptionsLanguageCode = a})---- | Number of sources to return in the response.-qslPageToken :: Lens' QuerySourcesList (Maybe Text)-qslPageToken-  = lens _qslPageToken (\ s a -> s{_qslPageToken = a})---- | JSONP-qslCallback :: Lens' QuerySourcesList (Maybe Text)-qslCallback-  = lens _qslCallback (\ s a -> s{_qslCallback = a})--instance GoogleRequest QuerySourcesList where-        type Rs QuerySourcesList = ListQuerySourcesResponse-        type Scopes QuerySourcesList =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.query"]-        requestClient QuerySourcesList'{..}-          = go _qslXgafv _qslRequestOptionsTimeZone-              _qslRequestOptionsDebugOptionsEnableDebugging-              _qslUploadProtocol-              _qslAccessToken-              _qslUploadType-              _qslRequestOptionsSearchApplicationId-              _qslRequestOptionsLanguageCode-              _qslPageToken-              _qslCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy :: Proxy QuerySourcesListResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Query/Suggest.hs 
@@ -1,151 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Query.Suggest--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Provides suggestions for autocompleting the query.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.query.suggest@.-module Network.Google.Resource.CloudSearch.Query.Suggest-    (-    -- * REST Resource-      QuerySuggestResource--    -- * Creating a Request-    , querySuggest-    , QuerySuggest--    -- * Request Lenses-    , qsXgafv-    , qsUploadProtocol-    , qsAccessToken-    , qsUploadType-    , qsPayload-    , qsCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.query.suggest@ method which the--- 'QuerySuggest' request conforms to.-type QuerySuggestResource =-     "v1" :>-       "query" :>-         "suggest" :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] SuggestRequest :>-                         Post '[JSON] SuggestResponse---- | Provides suggestions for autocompleting the query.------ /See:/ 'querySuggest' smart constructor.-data QuerySuggest =-  QuerySuggest'-    { _qsXgafv          :: !(Maybe Xgafv)-    , _qsUploadProtocol :: !(Maybe Text)-    , _qsAccessToken    :: !(Maybe Text)-    , _qsUploadType     :: !(Maybe Text)-    , _qsPayload        :: !SuggestRequest-    , _qsCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'QuerySuggest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'qsXgafv'------ * 'qsUploadProtocol'------ * 'qsAccessToken'------ * 'qsUploadType'------ * 'qsPayload'------ * 'qsCallback'-querySuggest-    :: SuggestRequest -- ^ 'qsPayload'-    -> QuerySuggest-querySuggest pQsPayload_ =-  QuerySuggest'-    { _qsXgafv = Nothing-    , _qsUploadProtocol = Nothing-    , _qsAccessToken = Nothing-    , _qsUploadType = Nothing-    , _qsPayload = pQsPayload_-    , _qsCallback = Nothing-    }----- | V1 error format.-qsXgafv :: Lens' QuerySuggest (Maybe Xgafv)-qsXgafv = lens _qsXgafv (\ s a -> s{_qsXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-qsUploadProtocol :: Lens' QuerySuggest (Maybe Text)-qsUploadProtocol-  = lens _qsUploadProtocol-      (\ s a -> s{_qsUploadProtocol = a})---- | OAuth access token.-qsAccessToken :: Lens' QuerySuggest (Maybe Text)-qsAccessToken-  = lens _qsAccessToken-      (\ s a -> s{_qsAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-qsUploadType :: Lens' QuerySuggest (Maybe Text)-qsUploadType-  = lens _qsUploadType (\ s a -> s{_qsUploadType = a})---- | Multipart request metadata.-qsPayload :: Lens' QuerySuggest SuggestRequest-qsPayload-  = lens _qsPayload (\ s a -> s{_qsPayload = a})---- | JSONP-qsCallback :: Lens' QuerySuggest (Maybe Text)-qsCallback-  = lens _qsCallback (\ s a -> s{_qsCallback = a})--instance GoogleRequest QuerySuggest where-        type Rs QuerySuggest = SuggestResponse-        type Scopes QuerySuggest =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.query"]-        requestClient QuerySuggest'{..}-          = go _qsXgafv _qsUploadProtocol _qsAccessToken-              _qsUploadType-              _qsCallback-              (Just AltJSON)-              _qsPayload-              cloudSearchService-          where go-                  = buildClient (Proxy :: Proxy QuerySuggestResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Settings/Datasources/Create.hs 
@@ -1,154 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Settings.Datasources.Create--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a datasource.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.settings.datasources.create@.-module Network.Google.Resource.CloudSearch.Settings.Datasources.Create-    (-    -- * REST Resource-      SettingsDatasourcesCreateResource--    -- * Creating a Request-    , settingsDatasourcesCreate-    , SettingsDatasourcesCreate--    -- * Request Lenses-    , sdcXgafv-    , sdcUploadProtocol-    , sdcAccessToken-    , sdcUploadType-    , sdcPayload-    , sdcCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.settings.datasources.create@ method which the--- 'SettingsDatasourcesCreate' request conforms to.-type SettingsDatasourcesCreateResource =-     "v1" :>-       "settings" :>-         "datasources" :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] DataSource :> Post '[JSON] Operation---- | Creates a datasource.------ /See:/ 'settingsDatasourcesCreate' smart constructor.-data SettingsDatasourcesCreate =-  SettingsDatasourcesCreate'-    { _sdcXgafv          :: !(Maybe Xgafv)-    , _sdcUploadProtocol :: !(Maybe Text)-    , _sdcAccessToken    :: !(Maybe Text)-    , _sdcUploadType     :: !(Maybe Text)-    , _sdcPayload        :: !DataSource-    , _sdcCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SettingsDatasourcesCreate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sdcXgafv'------ * 'sdcUploadProtocol'------ * 'sdcAccessToken'------ * 'sdcUploadType'------ * 'sdcPayload'------ * 'sdcCallback'-settingsDatasourcesCreate-    :: DataSource -- ^ 'sdcPayload'-    -> SettingsDatasourcesCreate-settingsDatasourcesCreate pSdcPayload_ =-  SettingsDatasourcesCreate'-    { _sdcXgafv = Nothing-    , _sdcUploadProtocol = Nothing-    , _sdcAccessToken = Nothing-    , _sdcUploadType = Nothing-    , _sdcPayload = pSdcPayload_-    , _sdcCallback = Nothing-    }----- | V1 error format.-sdcXgafv :: Lens' SettingsDatasourcesCreate (Maybe Xgafv)-sdcXgafv = lens _sdcXgafv (\ s a -> s{_sdcXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-sdcUploadProtocol :: Lens' SettingsDatasourcesCreate (Maybe Text)-sdcUploadProtocol-  = lens _sdcUploadProtocol-      (\ s a -> s{_sdcUploadProtocol = a})---- | OAuth access token.-sdcAccessToken :: Lens' SettingsDatasourcesCreate (Maybe Text)-sdcAccessToken-  = lens _sdcAccessToken-      (\ s a -> s{_sdcAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-sdcUploadType :: Lens' SettingsDatasourcesCreate (Maybe Text)-sdcUploadType-  = lens _sdcUploadType-      (\ s a -> s{_sdcUploadType = a})---- | Multipart request metadata.-sdcPayload :: Lens' SettingsDatasourcesCreate DataSource-sdcPayload-  = lens _sdcPayload (\ s a -> s{_sdcPayload = a})---- | JSONP-sdcCallback :: Lens' SettingsDatasourcesCreate (Maybe Text)-sdcCallback-  = lens _sdcCallback (\ s a -> s{_sdcCallback = a})--instance GoogleRequest SettingsDatasourcesCreate-         where-        type Rs SettingsDatasourcesCreate = Operation-        type Scopes SettingsDatasourcesCreate =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.indexing"]-        requestClient SettingsDatasourcesCreate'{..}-          = go _sdcXgafv _sdcUploadProtocol _sdcAccessToken-              _sdcUploadType-              _sdcCallback-              (Just AltJSON)-              _sdcPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy :: Proxy SettingsDatasourcesCreateResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Settings/Datasources/Delete.hs 
@@ -1,166 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Settings.Datasources.Delete--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes a datasource.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.settings.datasources.delete@.-module Network.Google.Resource.CloudSearch.Settings.Datasources.Delete-    (-    -- * REST Resource-      SettingsDatasourcesDeleteResource--    -- * Creating a Request-    , settingsDatasourcesDelete-    , SettingsDatasourcesDelete--    -- * Request Lenses-    , sddXgafv-    , sddUploadProtocol-    , sddAccessToken-    , sddUploadType-    , sddName-    , sddDebugOptionsEnableDebugging-    , sddCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.settings.datasources.delete@ method which the--- 'SettingsDatasourcesDelete' request conforms to.-type SettingsDatasourcesDeleteResource =-     "v1" :>-       "settings" :>-         Capture "name" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "debugOptions.enableDebugging" Bool :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :> Delete '[JSON] Operation---- | Deletes a datasource.------ /See:/ 'settingsDatasourcesDelete' smart constructor.-data SettingsDatasourcesDelete =-  SettingsDatasourcesDelete'-    { _sddXgafv                       :: !(Maybe Xgafv)-    , _sddUploadProtocol              :: !(Maybe Text)-    , _sddAccessToken                 :: !(Maybe Text)-    , _sddUploadType                  :: !(Maybe Text)-    , _sddName                        :: !Text-    , _sddDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _sddCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SettingsDatasourcesDelete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sddXgafv'------ * 'sddUploadProtocol'------ * 'sddAccessToken'------ * 'sddUploadType'------ * 'sddName'------ * 'sddDebugOptionsEnableDebugging'------ * 'sddCallback'-settingsDatasourcesDelete-    :: Text -- ^ 'sddName'-    -> SettingsDatasourcesDelete-settingsDatasourcesDelete pSddName_ =-  SettingsDatasourcesDelete'-    { _sddXgafv = Nothing-    , _sddUploadProtocol = Nothing-    , _sddAccessToken = Nothing-    , _sddUploadType = Nothing-    , _sddName = pSddName_-    , _sddDebugOptionsEnableDebugging = Nothing-    , _sddCallback = Nothing-    }----- | V1 error format.-sddXgafv :: Lens' SettingsDatasourcesDelete (Maybe Xgafv)-sddXgafv = lens _sddXgafv (\ s a -> s{_sddXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-sddUploadProtocol :: Lens' SettingsDatasourcesDelete (Maybe Text)-sddUploadProtocol-  = lens _sddUploadProtocol-      (\ s a -> s{_sddUploadProtocol = a})---- | OAuth access token.-sddAccessToken :: Lens' SettingsDatasourcesDelete (Maybe Text)-sddAccessToken-  = lens _sddAccessToken-      (\ s a -> s{_sddAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-sddUploadType :: Lens' SettingsDatasourcesDelete (Maybe Text)-sddUploadType-  = lens _sddUploadType-      (\ s a -> s{_sddUploadType = a})---- | Name of the datasource. Format: datasources\/{source_id}.-sddName :: Lens' SettingsDatasourcesDelete Text-sddName = lens _sddName (\ s a -> s{_sddName = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-sddDebugOptionsEnableDebugging :: Lens' SettingsDatasourcesDelete (Maybe Bool)-sddDebugOptionsEnableDebugging-  = lens _sddDebugOptionsEnableDebugging-      (\ s a -> s{_sddDebugOptionsEnableDebugging = a})---- | JSONP-sddCallback :: Lens' SettingsDatasourcesDelete (Maybe Text)-sddCallback-  = lens _sddCallback (\ s a -> s{_sddCallback = a})--instance GoogleRequest SettingsDatasourcesDelete-         where-        type Rs SettingsDatasourcesDelete = Operation-        type Scopes SettingsDatasourcesDelete =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.indexing"]-        requestClient SettingsDatasourcesDelete'{..}-          = go _sddName _sddXgafv _sddUploadProtocol-              _sddAccessToken-              _sddUploadType-              _sddDebugOptionsEnableDebugging-              _sddCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy :: Proxy SettingsDatasourcesDeleteResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Settings/Datasources/Get.hs 
@@ -1,165 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Settings.Datasources.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets a datasource.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.settings.datasources.get@.-module Network.Google.Resource.CloudSearch.Settings.Datasources.Get-    (-    -- * REST Resource-      SettingsDatasourcesGetResource--    -- * Creating a Request-    , settingsDatasourcesGet-    , SettingsDatasourcesGet--    -- * Request Lenses-    , sdgXgafv-    , sdgUploadProtocol-    , sdgAccessToken-    , sdgUploadType-    , sdgName-    , sdgDebugOptionsEnableDebugging-    , sdgCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.settings.datasources.get@ method which the--- 'SettingsDatasourcesGet' request conforms to.-type SettingsDatasourcesGetResource =-     "v1" :>-       "settings" :>-         Capture "name" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "debugOptions.enableDebugging" Bool :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :> Get '[JSON] DataSource---- | Gets a datasource.------ /See:/ 'settingsDatasourcesGet' smart constructor.-data SettingsDatasourcesGet =-  SettingsDatasourcesGet'-    { _sdgXgafv                       :: !(Maybe Xgafv)-    , _sdgUploadProtocol              :: !(Maybe Text)-    , _sdgAccessToken                 :: !(Maybe Text)-    , _sdgUploadType                  :: !(Maybe Text)-    , _sdgName                        :: !Text-    , _sdgDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _sdgCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SettingsDatasourcesGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sdgXgafv'------ * 'sdgUploadProtocol'------ * 'sdgAccessToken'------ * 'sdgUploadType'------ * 'sdgName'------ * 'sdgDebugOptionsEnableDebugging'------ * 'sdgCallback'-settingsDatasourcesGet-    :: Text -- ^ 'sdgName'-    -> SettingsDatasourcesGet-settingsDatasourcesGet pSdgName_ =-  SettingsDatasourcesGet'-    { _sdgXgafv = Nothing-    , _sdgUploadProtocol = Nothing-    , _sdgAccessToken = Nothing-    , _sdgUploadType = Nothing-    , _sdgName = pSdgName_-    , _sdgDebugOptionsEnableDebugging = Nothing-    , _sdgCallback = Nothing-    }----- | V1 error format.-sdgXgafv :: Lens' SettingsDatasourcesGet (Maybe Xgafv)-sdgXgafv = lens _sdgXgafv (\ s a -> s{_sdgXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-sdgUploadProtocol :: Lens' SettingsDatasourcesGet (Maybe Text)-sdgUploadProtocol-  = lens _sdgUploadProtocol-      (\ s a -> s{_sdgUploadProtocol = a})---- | OAuth access token.-sdgAccessToken :: Lens' SettingsDatasourcesGet (Maybe Text)-sdgAccessToken-  = lens _sdgAccessToken-      (\ s a -> s{_sdgAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-sdgUploadType :: Lens' SettingsDatasourcesGet (Maybe Text)-sdgUploadType-  = lens _sdgUploadType-      (\ s a -> s{_sdgUploadType = a})---- | Name of the datasource resource. Format: datasources\/{source_id}.-sdgName :: Lens' SettingsDatasourcesGet Text-sdgName = lens _sdgName (\ s a -> s{_sdgName = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-sdgDebugOptionsEnableDebugging :: Lens' SettingsDatasourcesGet (Maybe Bool)-sdgDebugOptionsEnableDebugging-  = lens _sdgDebugOptionsEnableDebugging-      (\ s a -> s{_sdgDebugOptionsEnableDebugging = a})---- | JSONP-sdgCallback :: Lens' SettingsDatasourcesGet (Maybe Text)-sdgCallback-  = lens _sdgCallback (\ s a -> s{_sdgCallback = a})--instance GoogleRequest SettingsDatasourcesGet where-        type Rs SettingsDatasourcesGet = DataSource-        type Scopes SettingsDatasourcesGet =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.indexing"]-        requestClient SettingsDatasourcesGet'{..}-          = go _sdgName _sdgXgafv _sdgUploadProtocol-              _sdgAccessToken-              _sdgUploadType-              _sdgDebugOptionsEnableDebugging-              _sdgCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy :: Proxy SettingsDatasourcesGetResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Settings/Datasources/List.hs 
@@ -1,183 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Settings.Datasources.List--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Lists datasources.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.settings.datasources.list@.-module Network.Google.Resource.CloudSearch.Settings.Datasources.List-    (-    -- * REST Resource-      SettingsDatasourcesListResource--    -- * Creating a Request-    , settingsDatasourcesList-    , SettingsDatasourcesList--    -- * Request Lenses-    , sdlXgafv-    , sdlUploadProtocol-    , sdlAccessToken-    , sdlUploadType-    , sdlDebugOptionsEnableDebugging-    , sdlPageToken-    , sdlPageSize-    , sdlCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.settings.datasources.list@ method which the--- 'SettingsDatasourcesList' request conforms to.-type SettingsDatasourcesListResource =-     "v1" :>-       "settings" :>-         "datasources" :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "debugOptions.enableDebugging" Bool :>-                     QueryParam "pageToken" Text :>-                       QueryParam "pageSize" (Textual Int32) :>-                         QueryParam "callback" Text :>-                           QueryParam "alt" AltJSON :>-                             Get '[JSON] ListDataSourceResponse---- | Lists datasources.------ /See:/ 'settingsDatasourcesList' smart constructor.-data SettingsDatasourcesList =-  SettingsDatasourcesList'-    { _sdlXgafv                       :: !(Maybe Xgafv)-    , _sdlUploadProtocol              :: !(Maybe Text)-    , _sdlAccessToken                 :: !(Maybe Text)-    , _sdlUploadType                  :: !(Maybe Text)-    , _sdlDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _sdlPageToken                   :: !(Maybe Text)-    , _sdlPageSize                    :: !(Maybe (Textual Int32))-    , _sdlCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SettingsDatasourcesList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sdlXgafv'------ * 'sdlUploadProtocol'------ * 'sdlAccessToken'------ * 'sdlUploadType'------ * 'sdlDebugOptionsEnableDebugging'------ * 'sdlPageToken'------ * 'sdlPageSize'------ * 'sdlCallback'-settingsDatasourcesList-    :: SettingsDatasourcesList-settingsDatasourcesList =-  SettingsDatasourcesList'-    { _sdlXgafv = Nothing-    , _sdlUploadProtocol = Nothing-    , _sdlAccessToken = Nothing-    , _sdlUploadType = Nothing-    , _sdlDebugOptionsEnableDebugging = Nothing-    , _sdlPageToken = Nothing-    , _sdlPageSize = Nothing-    , _sdlCallback = Nothing-    }----- | V1 error format.-sdlXgafv :: Lens' SettingsDatasourcesList (Maybe Xgafv)-sdlXgafv = lens _sdlXgafv (\ s a -> s{_sdlXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-sdlUploadProtocol :: Lens' SettingsDatasourcesList (Maybe Text)-sdlUploadProtocol-  = lens _sdlUploadProtocol-      (\ s a -> s{_sdlUploadProtocol = a})---- | OAuth access token.-sdlAccessToken :: Lens' SettingsDatasourcesList (Maybe Text)-sdlAccessToken-  = lens _sdlAccessToken-      (\ s a -> s{_sdlAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-sdlUploadType :: Lens' SettingsDatasourcesList (Maybe Text)-sdlUploadType-  = lens _sdlUploadType-      (\ s a -> s{_sdlUploadType = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-sdlDebugOptionsEnableDebugging :: Lens' SettingsDatasourcesList (Maybe Bool)-sdlDebugOptionsEnableDebugging-  = lens _sdlDebugOptionsEnableDebugging-      (\ s a -> s{_sdlDebugOptionsEnableDebugging = a})---- | Starting index of the results.-sdlPageToken :: Lens' SettingsDatasourcesList (Maybe Text)-sdlPageToken-  = lens _sdlPageToken (\ s a -> s{_sdlPageToken = a})---- | Maximum number of datasources to fetch in a request. The max value is--- 100.--- The default value is 10-sdlPageSize :: Lens' SettingsDatasourcesList (Maybe Int32)-sdlPageSize-  = lens _sdlPageSize (\ s a -> s{_sdlPageSize = a}) .-      mapping _Coerce---- | JSONP-sdlCallback :: Lens' SettingsDatasourcesList (Maybe Text)-sdlCallback-  = lens _sdlCallback (\ s a -> s{_sdlCallback = a})--instance GoogleRequest SettingsDatasourcesList where-        type Rs SettingsDatasourcesList =-             ListDataSourceResponse-        type Scopes SettingsDatasourcesList =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.indexing"]-        requestClient SettingsDatasourcesList'{..}-          = go _sdlXgafv _sdlUploadProtocol _sdlAccessToken-              _sdlUploadType-              _sdlDebugOptionsEnableDebugging-              _sdlPageToken-              _sdlPageSize-              _sdlCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy :: Proxy SettingsDatasourcesListResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Settings/Datasources/Update.hs 
@@ -1,167 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Settings.Datasources.Update--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Updates a datasource.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.settings.datasources.update@.-module Network.Google.Resource.CloudSearch.Settings.Datasources.Update-    (-    -- * REST Resource-      SettingsDatasourcesUpdateResource--    -- * Creating a Request-    , settingsDatasourcesUpdate-    , SettingsDatasourcesUpdate--    -- * Request Lenses-    , sduXgafv-    , sduUploadProtocol-    , sduAccessToken-    , sduUploadType-    , sduPayload-    , sduName-    , sduCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.settings.datasources.update@ method which the--- 'SettingsDatasourcesUpdate' request conforms to.-type SettingsDatasourcesUpdateResource =-     "v1" :>-       "settings" :>-         Capture "name" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] UpdateDataSourceRequest :>-                         Put '[JSON] Operation---- | Updates a datasource.------ /See:/ 'settingsDatasourcesUpdate' smart constructor.-data SettingsDatasourcesUpdate =-  SettingsDatasourcesUpdate'-    { _sduXgafv          :: !(Maybe Xgafv)-    , _sduUploadProtocol :: !(Maybe Text)-    , _sduAccessToken    :: !(Maybe Text)-    , _sduUploadType     :: !(Maybe Text)-    , _sduPayload        :: !UpdateDataSourceRequest-    , _sduName           :: !Text-    , _sduCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SettingsDatasourcesUpdate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sduXgafv'------ * 'sduUploadProtocol'------ * 'sduAccessToken'------ * 'sduUploadType'------ * 'sduPayload'------ * 'sduName'------ * 'sduCallback'-settingsDatasourcesUpdate-    :: UpdateDataSourceRequest -- ^ 'sduPayload'-    -> Text -- ^ 'sduName'-    -> SettingsDatasourcesUpdate-settingsDatasourcesUpdate pSduPayload_ pSduName_ =-  SettingsDatasourcesUpdate'-    { _sduXgafv = Nothing-    , _sduUploadProtocol = Nothing-    , _sduAccessToken = Nothing-    , _sduUploadType = Nothing-    , _sduPayload = pSduPayload_-    , _sduName = pSduName_-    , _sduCallback = Nothing-    }----- | V1 error format.-sduXgafv :: Lens' SettingsDatasourcesUpdate (Maybe Xgafv)-sduXgafv = lens _sduXgafv (\ s a -> s{_sduXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-sduUploadProtocol :: Lens' SettingsDatasourcesUpdate (Maybe Text)-sduUploadProtocol-  = lens _sduUploadProtocol-      (\ s a -> s{_sduUploadProtocol = a})---- | OAuth access token.-sduAccessToken :: Lens' SettingsDatasourcesUpdate (Maybe Text)-sduAccessToken-  = lens _sduAccessToken-      (\ s a -> s{_sduAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-sduUploadType :: Lens' SettingsDatasourcesUpdate (Maybe Text)-sduUploadType-  = lens _sduUploadType-      (\ s a -> s{_sduUploadType = a})---- | Multipart request metadata.-sduPayload :: Lens' SettingsDatasourcesUpdate UpdateDataSourceRequest-sduPayload-  = lens _sduPayload (\ s a -> s{_sduPayload = a})---- | Name of the datasource resource. Format: datasources\/{source_id}.--- The name is ignored when creating a datasource.-sduName :: Lens' SettingsDatasourcesUpdate Text-sduName = lens _sduName (\ s a -> s{_sduName = a})---- | JSONP-sduCallback :: Lens' SettingsDatasourcesUpdate (Maybe Text)-sduCallback-  = lens _sduCallback (\ s a -> s{_sduCallback = a})--instance GoogleRequest SettingsDatasourcesUpdate-         where-        type Rs SettingsDatasourcesUpdate = Operation-        type Scopes SettingsDatasourcesUpdate =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.indexing"]-        requestClient SettingsDatasourcesUpdate'{..}-          = go _sduName _sduXgafv _sduUploadProtocol-              _sduAccessToken-              _sduUploadType-              _sduCallback-              (Just AltJSON)-              _sduPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy :: Proxy SettingsDatasourcesUpdateResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Settings/SearchApplications/Create.hs 
@@ -1,158 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Settings.SearchApplications.Create--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Creates a search application.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.settings.searchapplications.create@.-module Network.Google.Resource.CloudSearch.Settings.SearchApplications.Create-    (-    -- * REST Resource-      SettingsSearchApplicationsCreateResource--    -- * Creating a Request-    , settingsSearchApplicationsCreate-    , SettingsSearchApplicationsCreate--    -- * Request Lenses-    , ssacXgafv-    , ssacUploadProtocol-    , ssacAccessToken-    , ssacUploadType-    , ssacPayload-    , ssacCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.settings.searchapplications.create@ method which the--- 'SettingsSearchApplicationsCreate' request conforms to.-type SettingsSearchApplicationsCreateResource =-     "v1" :>-       "settings" :>-         "searchapplications" :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] SearchApplication :>-                         Post '[JSON] Operation---- | Creates a search application.------ /See:/ 'settingsSearchApplicationsCreate' smart constructor.-data SettingsSearchApplicationsCreate =-  SettingsSearchApplicationsCreate'-    { _ssacXgafv          :: !(Maybe Xgafv)-    , _ssacUploadProtocol :: !(Maybe Text)-    , _ssacAccessToken    :: !(Maybe Text)-    , _ssacUploadType     :: !(Maybe Text)-    , _ssacPayload        :: !SearchApplication-    , _ssacCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SettingsSearchApplicationsCreate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ssacXgafv'------ * 'ssacUploadProtocol'------ * 'ssacAccessToken'------ * 'ssacUploadType'------ * 'ssacPayload'------ * 'ssacCallback'-settingsSearchApplicationsCreate-    :: SearchApplication -- ^ 'ssacPayload'-    -> SettingsSearchApplicationsCreate-settingsSearchApplicationsCreate pSsacPayload_ =-  SettingsSearchApplicationsCreate'-    { _ssacXgafv = Nothing-    , _ssacUploadProtocol = Nothing-    , _ssacAccessToken = Nothing-    , _ssacUploadType = Nothing-    , _ssacPayload = pSsacPayload_-    , _ssacCallback = Nothing-    }----- | V1 error format.-ssacXgafv :: Lens' SettingsSearchApplicationsCreate (Maybe Xgafv)-ssacXgafv-  = lens _ssacXgafv (\ s a -> s{_ssacXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-ssacUploadProtocol :: Lens' SettingsSearchApplicationsCreate (Maybe Text)-ssacUploadProtocol-  = lens _ssacUploadProtocol-      (\ s a -> s{_ssacUploadProtocol = a})---- | OAuth access token.-ssacAccessToken :: Lens' SettingsSearchApplicationsCreate (Maybe Text)-ssacAccessToken-  = lens _ssacAccessToken-      (\ s a -> s{_ssacAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-ssacUploadType :: Lens' SettingsSearchApplicationsCreate (Maybe Text)-ssacUploadType-  = lens _ssacUploadType-      (\ s a -> s{_ssacUploadType = a})---- | Multipart request metadata.-ssacPayload :: Lens' SettingsSearchApplicationsCreate SearchApplication-ssacPayload-  = lens _ssacPayload (\ s a -> s{_ssacPayload = a})---- | JSONP-ssacCallback :: Lens' SettingsSearchApplicationsCreate (Maybe Text)-ssacCallback-  = lens _ssacCallback (\ s a -> s{_ssacCallback = a})--instance GoogleRequest-           SettingsSearchApplicationsCreate-         where-        type Rs SettingsSearchApplicationsCreate = Operation-        type Scopes SettingsSearchApplicationsCreate =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.query"]-        requestClient SettingsSearchApplicationsCreate'{..}-          = go _ssacXgafv _ssacUploadProtocol _ssacAccessToken-              _ssacUploadType-              _ssacCallback-              (Just AltJSON)-              _ssacPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy SettingsSearchApplicationsCreateResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Settings/SearchApplications/Delete.hs 
@@ -1,170 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Settings.SearchApplications.Delete--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Deletes a search application.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.settings.searchapplications.delete@.-module Network.Google.Resource.CloudSearch.Settings.SearchApplications.Delete-    (-    -- * REST Resource-      SettingsSearchApplicationsDeleteResource--    -- * Creating a Request-    , settingsSearchApplicationsDelete-    , SettingsSearchApplicationsDelete--    -- * Request Lenses-    , ssadXgafv-    , ssadUploadProtocol-    , ssadAccessToken-    , ssadUploadType-    , ssadName-    , ssadDebugOptionsEnableDebugging-    , ssadCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.settings.searchapplications.delete@ method which the--- 'SettingsSearchApplicationsDelete' request conforms to.-type SettingsSearchApplicationsDeleteResource =-     "v1" :>-       "settings" :>-         Capture "name" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "debugOptions.enableDebugging" Bool :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :> Delete '[JSON] Operation---- | Deletes a search application.------ /See:/ 'settingsSearchApplicationsDelete' smart constructor.-data SettingsSearchApplicationsDelete =-  SettingsSearchApplicationsDelete'-    { _ssadXgafv                       :: !(Maybe Xgafv)-    , _ssadUploadProtocol              :: !(Maybe Text)-    , _ssadAccessToken                 :: !(Maybe Text)-    , _ssadUploadType                  :: !(Maybe Text)-    , _ssadName                        :: !Text-    , _ssadDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _ssadCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SettingsSearchApplicationsDelete' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ssadXgafv'------ * 'ssadUploadProtocol'------ * 'ssadAccessToken'------ * 'ssadUploadType'------ * 'ssadName'------ * 'ssadDebugOptionsEnableDebugging'------ * 'ssadCallback'-settingsSearchApplicationsDelete-    :: Text -- ^ 'ssadName'-    -> SettingsSearchApplicationsDelete-settingsSearchApplicationsDelete pSsadName_ =-  SettingsSearchApplicationsDelete'-    { _ssadXgafv = Nothing-    , _ssadUploadProtocol = Nothing-    , _ssadAccessToken = Nothing-    , _ssadUploadType = Nothing-    , _ssadName = pSsadName_-    , _ssadDebugOptionsEnableDebugging = Nothing-    , _ssadCallback = Nothing-    }----- | V1 error format.-ssadXgafv :: Lens' SettingsSearchApplicationsDelete (Maybe Xgafv)-ssadXgafv-  = lens _ssadXgafv (\ s a -> s{_ssadXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-ssadUploadProtocol :: Lens' SettingsSearchApplicationsDelete (Maybe Text)-ssadUploadProtocol-  = lens _ssadUploadProtocol-      (\ s a -> s{_ssadUploadProtocol = a})---- | OAuth access token.-ssadAccessToken :: Lens' SettingsSearchApplicationsDelete (Maybe Text)-ssadAccessToken-  = lens _ssadAccessToken-      (\ s a -> s{_ssadAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-ssadUploadType :: Lens' SettingsSearchApplicationsDelete (Maybe Text)-ssadUploadType-  = lens _ssadUploadType-      (\ s a -> s{_ssadUploadType = a})---- | The name of the search application to be deleted.--- Format: applications\/{application_id}.-ssadName :: Lens' SettingsSearchApplicationsDelete Text-ssadName = lens _ssadName (\ s a -> s{_ssadName = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-ssadDebugOptionsEnableDebugging :: Lens' SettingsSearchApplicationsDelete (Maybe Bool)-ssadDebugOptionsEnableDebugging-  = lens _ssadDebugOptionsEnableDebugging-      (\ s a -> s{_ssadDebugOptionsEnableDebugging = a})---- | JSONP-ssadCallback :: Lens' SettingsSearchApplicationsDelete (Maybe Text)-ssadCallback-  = lens _ssadCallback (\ s a -> s{_ssadCallback = a})--instance GoogleRequest-           SettingsSearchApplicationsDelete-         where-        type Rs SettingsSearchApplicationsDelete = Operation-        type Scopes SettingsSearchApplicationsDelete =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.query"]-        requestClient SettingsSearchApplicationsDelete'{..}-          = go _ssadName _ssadXgafv _ssadUploadProtocol-              _ssadAccessToken-              _ssadUploadType-              _ssadDebugOptionsEnableDebugging-              _ssadCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy SettingsSearchApplicationsDeleteResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Settings/SearchApplications/Get.hs 
@@ -1,171 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Settings.SearchApplications.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets the specified search application.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.settings.searchapplications.get@.-module Network.Google.Resource.CloudSearch.Settings.SearchApplications.Get-    (-    -- * REST Resource-      SettingsSearchApplicationsGetResource--    -- * Creating a Request-    , settingsSearchApplicationsGet-    , SettingsSearchApplicationsGet--    -- * Request Lenses-    , ssagXgafv-    , ssagUploadProtocol-    , ssagAccessToken-    , ssagUploadType-    , ssagName-    , ssagDebugOptionsEnableDebugging-    , ssagCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.settings.searchapplications.get@ method which the--- 'SettingsSearchApplicationsGet' request conforms to.-type SettingsSearchApplicationsGetResource =-     "v1" :>-       "settings" :>-         Capture "name" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "debugOptions.enableDebugging" Bool :>-                     QueryParam "callback" Text :>-                       QueryParam "alt" AltJSON :>-                         Get '[JSON] SearchApplication---- | Gets the specified search application.------ /See:/ 'settingsSearchApplicationsGet' smart constructor.-data SettingsSearchApplicationsGet =-  SettingsSearchApplicationsGet'-    { _ssagXgafv                       :: !(Maybe Xgafv)-    , _ssagUploadProtocol              :: !(Maybe Text)-    , _ssagAccessToken                 :: !(Maybe Text)-    , _ssagUploadType                  :: !(Maybe Text)-    , _ssagName                        :: !Text-    , _ssagDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _ssagCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SettingsSearchApplicationsGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ssagXgafv'------ * 'ssagUploadProtocol'------ * 'ssagAccessToken'------ * 'ssagUploadType'------ * 'ssagName'------ * 'ssagDebugOptionsEnableDebugging'------ * 'ssagCallback'-settingsSearchApplicationsGet-    :: Text -- ^ 'ssagName'-    -> SettingsSearchApplicationsGet-settingsSearchApplicationsGet pSsagName_ =-  SettingsSearchApplicationsGet'-    { _ssagXgafv = Nothing-    , _ssagUploadProtocol = Nothing-    , _ssagAccessToken = Nothing-    , _ssagUploadType = Nothing-    , _ssagName = pSsagName_-    , _ssagDebugOptionsEnableDebugging = Nothing-    , _ssagCallback = Nothing-    }----- | V1 error format.-ssagXgafv :: Lens' SettingsSearchApplicationsGet (Maybe Xgafv)-ssagXgafv-  = lens _ssagXgafv (\ s a -> s{_ssagXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-ssagUploadProtocol :: Lens' SettingsSearchApplicationsGet (Maybe Text)-ssagUploadProtocol-  = lens _ssagUploadProtocol-      (\ s a -> s{_ssagUploadProtocol = a})---- | OAuth access token.-ssagAccessToken :: Lens' SettingsSearchApplicationsGet (Maybe Text)-ssagAccessToken-  = lens _ssagAccessToken-      (\ s a -> s{_ssagAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-ssagUploadType :: Lens' SettingsSearchApplicationsGet (Maybe Text)-ssagUploadType-  = lens _ssagUploadType-      (\ s a -> s{_ssagUploadType = a})---- | Name of the search application.--- Format: applications\/{application_id}.-ssagName :: Lens' SettingsSearchApplicationsGet Text-ssagName = lens _ssagName (\ s a -> s{_ssagName = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-ssagDebugOptionsEnableDebugging :: Lens' SettingsSearchApplicationsGet (Maybe Bool)-ssagDebugOptionsEnableDebugging-  = lens _ssagDebugOptionsEnableDebugging-      (\ s a -> s{_ssagDebugOptionsEnableDebugging = a})---- | JSONP-ssagCallback :: Lens' SettingsSearchApplicationsGet (Maybe Text)-ssagCallback-  = lens _ssagCallback (\ s a -> s{_ssagCallback = a})--instance GoogleRequest SettingsSearchApplicationsGet-         where-        type Rs SettingsSearchApplicationsGet =-             SearchApplication-        type Scopes SettingsSearchApplicationsGet =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.query"]-        requestClient SettingsSearchApplicationsGet'{..}-          = go _ssagName _ssagXgafv _ssagUploadProtocol-              _ssagAccessToken-              _ssagUploadType-              _ssagDebugOptionsEnableDebugging-              _ssagCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy SettingsSearchApplicationsGetResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Settings/SearchApplications/List.hs 
@@ -1,186 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Settings.SearchApplications.List--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Lists all search applications.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.settings.searchapplications.list@.-module Network.Google.Resource.CloudSearch.Settings.SearchApplications.List-    (-    -- * REST Resource-      SettingsSearchApplicationsListResource--    -- * Creating a Request-    , settingsSearchApplicationsList-    , SettingsSearchApplicationsList--    -- * Request Lenses-    , ssalXgafv-    , ssalUploadProtocol-    , ssalAccessToken-    , ssalUploadType-    , ssalDebugOptionsEnableDebugging-    , ssalPageToken-    , ssalPageSize-    , ssalCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.settings.searchapplications.list@ method which the--- 'SettingsSearchApplicationsList' request conforms to.-type SettingsSearchApplicationsListResource =-     "v1" :>-       "settings" :>-         "searchapplications" :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "debugOptions.enableDebugging" Bool :>-                     QueryParam "pageToken" Text :>-                       QueryParam "pageSize" (Textual Int32) :>-                         QueryParam "callback" Text :>-                           QueryParam "alt" AltJSON :>-                             Get '[JSON] ListSearchApplicationsResponse---- | Lists all search applications.------ /See:/ 'settingsSearchApplicationsList' smart constructor.-data SettingsSearchApplicationsList =-  SettingsSearchApplicationsList'-    { _ssalXgafv                       :: !(Maybe Xgafv)-    , _ssalUploadProtocol              :: !(Maybe Text)-    , _ssalAccessToken                 :: !(Maybe Text)-    , _ssalUploadType                  :: !(Maybe Text)-    , _ssalDebugOptionsEnableDebugging :: !(Maybe Bool)-    , _ssalPageToken                   :: !(Maybe Text)-    , _ssalPageSize                    :: !(Maybe (Textual Int32))-    , _ssalCallback                    :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SettingsSearchApplicationsList' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ssalXgafv'------ * 'ssalUploadProtocol'------ * 'ssalAccessToken'------ * 'ssalUploadType'------ * 'ssalDebugOptionsEnableDebugging'------ * 'ssalPageToken'------ * 'ssalPageSize'------ * 'ssalCallback'-settingsSearchApplicationsList-    :: SettingsSearchApplicationsList-settingsSearchApplicationsList =-  SettingsSearchApplicationsList'-    { _ssalXgafv = Nothing-    , _ssalUploadProtocol = Nothing-    , _ssalAccessToken = Nothing-    , _ssalUploadType = Nothing-    , _ssalDebugOptionsEnableDebugging = Nothing-    , _ssalPageToken = Nothing-    , _ssalPageSize = Nothing-    , _ssalCallback = Nothing-    }----- | V1 error format.-ssalXgafv :: Lens' SettingsSearchApplicationsList (Maybe Xgafv)-ssalXgafv-  = lens _ssalXgafv (\ s a -> s{_ssalXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-ssalUploadProtocol :: Lens' SettingsSearchApplicationsList (Maybe Text)-ssalUploadProtocol-  = lens _ssalUploadProtocol-      (\ s a -> s{_ssalUploadProtocol = a})---- | OAuth access token.-ssalAccessToken :: Lens' SettingsSearchApplicationsList (Maybe Text)-ssalAccessToken-  = lens _ssalAccessToken-      (\ s a -> s{_ssalAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-ssalUploadType :: Lens' SettingsSearchApplicationsList (Maybe Text)-ssalUploadType-  = lens _ssalUploadType-      (\ s a -> s{_ssalUploadType = a})---- | If you are asked by Google to help with debugging, set this field.--- Otherwise, ignore this field.-ssalDebugOptionsEnableDebugging :: Lens' SettingsSearchApplicationsList (Maybe Bool)-ssalDebugOptionsEnableDebugging-  = lens _ssalDebugOptionsEnableDebugging-      (\ s a -> s{_ssalDebugOptionsEnableDebugging = a})---- | The next_page_token value returned from a previous List request, if any.--- The default value is 10-ssalPageToken :: Lens' SettingsSearchApplicationsList (Maybe Text)-ssalPageToken-  = lens _ssalPageToken-      (\ s a -> s{_ssalPageToken = a})---- | The maximum number of items to return.-ssalPageSize :: Lens' SettingsSearchApplicationsList (Maybe Int32)-ssalPageSize-  = lens _ssalPageSize (\ s a -> s{_ssalPageSize = a})-      . mapping _Coerce---- | JSONP-ssalCallback :: Lens' SettingsSearchApplicationsList (Maybe Text)-ssalCallback-  = lens _ssalCallback (\ s a -> s{_ssalCallback = a})--instance GoogleRequest SettingsSearchApplicationsList-         where-        type Rs SettingsSearchApplicationsList =-             ListSearchApplicationsResponse-        type Scopes SettingsSearchApplicationsList =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.query"]-        requestClient SettingsSearchApplicationsList'{..}-          = go _ssalXgafv _ssalUploadProtocol _ssalAccessToken-              _ssalUploadType-              _ssalDebugOptionsEnableDebugging-              _ssalPageToken-              _ssalPageSize-              _ssalCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy SettingsSearchApplicationsListResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Settings/SearchApplications/Reset.hs 
@@ -1,172 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Settings.SearchApplications.Reset--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Resets a search application to default settings. This will return an--- empty response.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.settings.searchapplications.reset@.-module Network.Google.Resource.CloudSearch.Settings.SearchApplications.Reset-    (-    -- * REST Resource-      SettingsSearchApplicationsResetResource--    -- * Creating a Request-    , settingsSearchApplicationsReset-    , SettingsSearchApplicationsReset--    -- * Request Lenses-    , ssarXgafv-    , ssarUploadProtocol-    , ssarAccessToken-    , ssarUploadType-    , ssarPayload-    , ssarName-    , ssarCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.settings.searchapplications.reset@ method which the--- 'SettingsSearchApplicationsReset' request conforms to.-type SettingsSearchApplicationsResetResource =-     "v1" :>-       "settings" :>-         CaptureMode "name" "reset" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] ResetSearchApplicationRequest :>-                         Post '[JSON] Operation---- | Resets a search application to default settings. This will return an--- empty response.------ /See:/ 'settingsSearchApplicationsReset' smart constructor.-data SettingsSearchApplicationsReset =-  SettingsSearchApplicationsReset'-    { _ssarXgafv          :: !(Maybe Xgafv)-    , _ssarUploadProtocol :: !(Maybe Text)-    , _ssarAccessToken    :: !(Maybe Text)-    , _ssarUploadType     :: !(Maybe Text)-    , _ssarPayload        :: !ResetSearchApplicationRequest-    , _ssarName           :: !Text-    , _ssarCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SettingsSearchApplicationsReset' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ssarXgafv'------ * 'ssarUploadProtocol'------ * 'ssarAccessToken'------ * 'ssarUploadType'------ * 'ssarPayload'------ * 'ssarName'------ * 'ssarCallback'-settingsSearchApplicationsReset-    :: ResetSearchApplicationRequest -- ^ 'ssarPayload'-    -> Text -- ^ 'ssarName'-    -> SettingsSearchApplicationsReset-settingsSearchApplicationsReset pSsarPayload_ pSsarName_ =-  SettingsSearchApplicationsReset'-    { _ssarXgafv = Nothing-    , _ssarUploadProtocol = Nothing-    , _ssarAccessToken = Nothing-    , _ssarUploadType = Nothing-    , _ssarPayload = pSsarPayload_-    , _ssarName = pSsarName_-    , _ssarCallback = Nothing-    }----- | V1 error format.-ssarXgafv :: Lens' SettingsSearchApplicationsReset (Maybe Xgafv)-ssarXgafv-  = lens _ssarXgafv (\ s a -> s{_ssarXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-ssarUploadProtocol :: Lens' SettingsSearchApplicationsReset (Maybe Text)-ssarUploadProtocol-  = lens _ssarUploadProtocol-      (\ s a -> s{_ssarUploadProtocol = a})---- | OAuth access token.-ssarAccessToken :: Lens' SettingsSearchApplicationsReset (Maybe Text)-ssarAccessToken-  = lens _ssarAccessToken-      (\ s a -> s{_ssarAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-ssarUploadType :: Lens' SettingsSearchApplicationsReset (Maybe Text)-ssarUploadType-  = lens _ssarUploadType-      (\ s a -> s{_ssarUploadType = a})---- | Multipart request metadata.-ssarPayload :: Lens' SettingsSearchApplicationsReset ResetSearchApplicationRequest-ssarPayload-  = lens _ssarPayload (\ s a -> s{_ssarPayload = a})---- | The name of the search application to be reset.--- Format: applications\/{application_id}.-ssarName :: Lens' SettingsSearchApplicationsReset Text-ssarName = lens _ssarName (\ s a -> s{_ssarName = a})---- | JSONP-ssarCallback :: Lens' SettingsSearchApplicationsReset (Maybe Text)-ssarCallback-  = lens _ssarCallback (\ s a -> s{_ssarCallback = a})--instance GoogleRequest-           SettingsSearchApplicationsReset-         where-        type Rs SettingsSearchApplicationsReset = Operation-        type Scopes SettingsSearchApplicationsReset =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.query"]-        requestClient SettingsSearchApplicationsReset'{..}-          = go _ssarName _ssarXgafv _ssarUploadProtocol-              _ssarAccessToken-              _ssarUploadType-              _ssarCallback-              (Just AltJSON)-              _ssarPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy SettingsSearchApplicationsResetResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Settings/SearchApplications/Update.hs 
@@ -1,170 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Settings.SearchApplications.Update--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Updates a search application.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.settings.searchapplications.update@.-module Network.Google.Resource.CloudSearch.Settings.SearchApplications.Update-    (-    -- * REST Resource-      SettingsSearchApplicationsUpdateResource--    -- * Creating a Request-    , settingsSearchApplicationsUpdate-    , SettingsSearchApplicationsUpdate--    -- * Request Lenses-    , ssauXgafv-    , ssauUploadProtocol-    , ssauAccessToken-    , ssauUploadType-    , ssauPayload-    , ssauName-    , ssauCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.settings.searchapplications.update@ method which the--- 'SettingsSearchApplicationsUpdate' request conforms to.-type SettingsSearchApplicationsUpdateResource =-     "v1" :>-       "settings" :>-         Capture "name" Text :>-           QueryParam "$.xgafv" Xgafv :>-             QueryParam "upload_protocol" Text :>-               QueryParam "access_token" Text :>-                 QueryParam "uploadType" Text :>-                   QueryParam "callback" Text :>-                     QueryParam "alt" AltJSON :>-                       ReqBody '[JSON] SearchApplication :>-                         Put '[JSON] Operation---- | Updates a search application.------ /See:/ 'settingsSearchApplicationsUpdate' smart constructor.-data SettingsSearchApplicationsUpdate =-  SettingsSearchApplicationsUpdate'-    { _ssauXgafv          :: !(Maybe Xgafv)-    , _ssauUploadProtocol :: !(Maybe Text)-    , _ssauAccessToken    :: !(Maybe Text)-    , _ssauUploadType     :: !(Maybe Text)-    , _ssauPayload        :: !SearchApplication-    , _ssauName           :: !Text-    , _ssauCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'SettingsSearchApplicationsUpdate' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'ssauXgafv'------ * 'ssauUploadProtocol'------ * 'ssauAccessToken'------ * 'ssauUploadType'------ * 'ssauPayload'------ * 'ssauName'------ * 'ssauCallback'-settingsSearchApplicationsUpdate-    :: SearchApplication -- ^ 'ssauPayload'-    -> Text -- ^ 'ssauName'-    -> SettingsSearchApplicationsUpdate-settingsSearchApplicationsUpdate pSsauPayload_ pSsauName_ =-  SettingsSearchApplicationsUpdate'-    { _ssauXgafv = Nothing-    , _ssauUploadProtocol = Nothing-    , _ssauAccessToken = Nothing-    , _ssauUploadType = Nothing-    , _ssauPayload = pSsauPayload_-    , _ssauName = pSsauName_-    , _ssauCallback = Nothing-    }----- | V1 error format.-ssauXgafv :: Lens' SettingsSearchApplicationsUpdate (Maybe Xgafv)-ssauXgafv-  = lens _ssauXgafv (\ s a -> s{_ssauXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-ssauUploadProtocol :: Lens' SettingsSearchApplicationsUpdate (Maybe Text)-ssauUploadProtocol-  = lens _ssauUploadProtocol-      (\ s a -> s{_ssauUploadProtocol = a})---- | OAuth access token.-ssauAccessToken :: Lens' SettingsSearchApplicationsUpdate (Maybe Text)-ssauAccessToken-  = lens _ssauAccessToken-      (\ s a -> s{_ssauAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-ssauUploadType :: Lens' SettingsSearchApplicationsUpdate (Maybe Text)-ssauUploadType-  = lens _ssauUploadType-      (\ s a -> s{_ssauUploadType = a})---- | Multipart request metadata.-ssauPayload :: Lens' SettingsSearchApplicationsUpdate SearchApplication-ssauPayload-  = lens _ssauPayload (\ s a -> s{_ssauPayload = a})---- | Name of the Search Application.--- Format: searchapplications\/{application_id}.-ssauName :: Lens' SettingsSearchApplicationsUpdate Text-ssauName = lens _ssauName (\ s a -> s{_ssauName = a})---- | JSONP-ssauCallback :: Lens' SettingsSearchApplicationsUpdate (Maybe Text)-ssauCallback-  = lens _ssauCallback (\ s a -> s{_ssauCallback = a})--instance GoogleRequest-           SettingsSearchApplicationsUpdate-         where-        type Rs SettingsSearchApplicationsUpdate = Operation-        type Scopes SettingsSearchApplicationsUpdate =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.settings",-               "https://www.googleapis.com/auth/cloud_search.settings.query"]-        requestClient SettingsSearchApplicationsUpdate'{..}-          = go _ssauName _ssauXgafv _ssauUploadProtocol-              _ssauAccessToken-              _ssauUploadType-              _ssauCallback-              (Just AltJSON)-              _ssauPayload-              cloudSearchService-          where go-                  = buildClient-                      (Proxy ::-                         Proxy SettingsSearchApplicationsUpdateResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Stats/GetIndex.hs 
@@ -1,227 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Stats.GetIndex--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets indexed item statistics aggreggated across all data sources. This--- API only returns statistics for previous dates; it doesn\'t return--- statistics for the current day.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.stats.getIndex@.-module Network.Google.Resource.CloudSearch.Stats.GetIndex-    (-    -- * REST Resource-      StatsGetIndexResource--    -- * Creating a Request-    , statsGetIndex-    , StatsGetIndex--    -- * Request Lenses-    , sgiFromDateMonth-    , sgiXgafv-    , sgiUploadProtocol-    , sgiFromDateDay-    , sgiAccessToken-    , sgiUploadType-    , sgiFromDateYear-    , sgiToDateDay-    , sgiToDateYear-    , sgiToDateMonth-    , sgiCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.stats.getIndex@ method which the--- 'StatsGetIndex' request conforms to.-type StatsGetIndexResource =-     "v1" :>-       "stats" :>-         "index" :>-           QueryParam "fromDate.month" (Textual Int32) :>-             QueryParam "$.xgafv" Xgafv :>-               QueryParam "upload_protocol" Text :>-                 QueryParam "fromDate.day" (Textual Int32) :>-                   QueryParam "access_token" Text :>-                     QueryParam "uploadType" Text :>-                       QueryParam "fromDate.year" (Textual Int32) :>-                         QueryParam "toDate.day" (Textual Int32) :>-                           QueryParam "toDate.year" (Textual Int32) :>-                             QueryParam "toDate.month" (Textual Int32) :>-                               QueryParam "callback" Text :>-                                 QueryParam "alt" AltJSON :>-                                   Get '[JSON] GetCustomerIndexStatsResponse---- | Gets indexed item statistics aggreggated across all data sources. This--- API only returns statistics for previous dates; it doesn\'t return--- statistics for the current day.------ /See:/ 'statsGetIndex' smart constructor.-data StatsGetIndex =-  StatsGetIndex'-    { _sgiFromDateMonth  :: !(Maybe (Textual Int32))-    , _sgiXgafv          :: !(Maybe Xgafv)-    , _sgiUploadProtocol :: !(Maybe Text)-    , _sgiFromDateDay    :: !(Maybe (Textual Int32))-    , _sgiAccessToken    :: !(Maybe Text)-    , _sgiUploadType     :: !(Maybe Text)-    , _sgiFromDateYear   :: !(Maybe (Textual Int32))-    , _sgiToDateDay      :: !(Maybe (Textual Int32))-    , _sgiToDateYear     :: !(Maybe (Textual Int32))-    , _sgiToDateMonth    :: !(Maybe (Textual Int32))-    , _sgiCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'StatsGetIndex' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sgiFromDateMonth'------ * 'sgiXgafv'------ * 'sgiUploadProtocol'------ * 'sgiFromDateDay'------ * 'sgiAccessToken'------ * 'sgiUploadType'------ * 'sgiFromDateYear'------ * 'sgiToDateDay'------ * 'sgiToDateYear'------ * 'sgiToDateMonth'------ * 'sgiCallback'-statsGetIndex-    :: StatsGetIndex-statsGetIndex =-  StatsGetIndex'-    { _sgiFromDateMonth = Nothing-    , _sgiXgafv = Nothing-    , _sgiUploadProtocol = Nothing-    , _sgiFromDateDay = Nothing-    , _sgiAccessToken = Nothing-    , _sgiUploadType = Nothing-    , _sgiFromDateYear = Nothing-    , _sgiToDateDay = Nothing-    , _sgiToDateYear = Nothing-    , _sgiToDateMonth = Nothing-    , _sgiCallback = Nothing-    }----- | Month of date. Must be from 1 to 12.-sgiFromDateMonth :: Lens' StatsGetIndex (Maybe Int32)-sgiFromDateMonth-  = lens _sgiFromDateMonth-      (\ s a -> s{_sgiFromDateMonth = a})-      . mapping _Coerce---- | V1 error format.-sgiXgafv :: Lens' StatsGetIndex (Maybe Xgafv)-sgiXgafv = lens _sgiXgafv (\ s a -> s{_sgiXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-sgiUploadProtocol :: Lens' StatsGetIndex (Maybe Text)-sgiUploadProtocol-  = lens _sgiUploadProtocol-      (\ s a -> s{_sgiUploadProtocol = a})---- | Day of month. Must be from 1 to 31 and valid for the year and month.-sgiFromDateDay :: Lens' StatsGetIndex (Maybe Int32)-sgiFromDateDay-  = lens _sgiFromDateDay-      (\ s a -> s{_sgiFromDateDay = a})-      . mapping _Coerce---- | OAuth access token.-sgiAccessToken :: Lens' StatsGetIndex (Maybe Text)-sgiAccessToken-  = lens _sgiAccessToken-      (\ s a -> s{_sgiAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-sgiUploadType :: Lens' StatsGetIndex (Maybe Text)-sgiUploadType-  = lens _sgiUploadType-      (\ s a -> s{_sgiUploadType = a})---- | Year of date. Must be from 1 to 9999.-sgiFromDateYear :: Lens' StatsGetIndex (Maybe Int32)-sgiFromDateYear-  = lens _sgiFromDateYear-      (\ s a -> s{_sgiFromDateYear = a})-      . mapping _Coerce---- | Day of month. Must be from 1 to 31 and valid for the year and month.-sgiToDateDay :: Lens' StatsGetIndex (Maybe Int32)-sgiToDateDay-  = lens _sgiToDateDay (\ s a -> s{_sgiToDateDay = a})-      . mapping _Coerce---- | Year of date. Must be from 1 to 9999.-sgiToDateYear :: Lens' StatsGetIndex (Maybe Int32)-sgiToDateYear-  = lens _sgiToDateYear-      (\ s a -> s{_sgiToDateYear = a})-      . mapping _Coerce---- | Month of date. Must be from 1 to 12.-sgiToDateMonth :: Lens' StatsGetIndex (Maybe Int32)-sgiToDateMonth-  = lens _sgiToDateMonth-      (\ s a -> s{_sgiToDateMonth = a})-      . mapping _Coerce---- | JSONP-sgiCallback :: Lens' StatsGetIndex (Maybe Text)-sgiCallback-  = lens _sgiCallback (\ s a -> s{_sgiCallback = a})--instance GoogleRequest StatsGetIndex where-        type Rs StatsGetIndex = GetCustomerIndexStatsResponse-        type Scopes StatsGetIndex =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.stats",-               "https://www.googleapis.com/auth/cloud_search.stats.indexing"]-        requestClient StatsGetIndex'{..}-          = go _sgiFromDateMonth _sgiXgafv _sgiUploadProtocol-              _sgiFromDateDay-              _sgiAccessToken-              _sgiUploadType-              _sgiFromDateYear-              _sgiToDateDay-              _sgiToDateYear-              _sgiToDateMonth-              _sgiCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient (Proxy :: Proxy StatsGetIndexResource)-                      mempty
− gen/Network/Google/Resource/CloudSearch/Stats/Index/Datasources/Get.hs 
@@ -1,240 +0,0 @@-{-# LANGUAGE DataKinds          #-}-{-# LANGUAGE DeriveDataTypeable #-}-{-# LANGUAGE DeriveGeneric      #-}-{-# LANGUAGE FlexibleInstances  #-}-{-# LANGUAGE NoImplicitPrelude  #-}-{-# LANGUAGE OverloadedStrings  #-}-{-# LANGUAGE RecordWildCards    #-}-{-# LANGUAGE TypeFamilies       #-}-{-# LANGUAGE TypeOperators      #-}--{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}-{-# OPTIONS_GHC -fno-warn-unused-binds      #-}-{-# OPTIONS_GHC -fno-warn-unused-imports    #-}---- |--- Module      : Network.Google.Resource.CloudSearch.Stats.Index.Datasources.Get--- Copyright   : (c) 2015-2016 Brendan Hay--- License     : Mozilla Public License, v. 2.0.--- Maintainer  : Brendan Hay <brendan.g.hay@gmail.com>--- Stability   : auto-generated--- Portability : non-portable (GHC extensions)------ Gets indexed item statistics for a single data source.------ /See:/ <https://gsuite.google.com/products/cloud-search/ Cloud Search API Reference> for @cloudsearch.stats.index.datasources.get@.-module Network.Google.Resource.CloudSearch.Stats.Index.Datasources.Get-    (-    -- * REST Resource-      StatsIndexDatasourcesGetResource--    -- * Creating a Request-    , statsIndexDatasourcesGet-    , StatsIndexDatasourcesGet--    -- * Request Lenses-    , sidgFromDateMonth-    , sidgXgafv-    , sidgUploadProtocol-    , sidgFromDateDay-    , sidgAccessToken-    , sidgUploadType-    , sidgFromDateYear-    , sidgName-    , sidgToDateDay-    , sidgToDateYear-    , sidgToDateMonth-    , sidgCallback-    ) where--import           Network.Google.CloudSearch.Types-import           Network.Google.Prelude---- | A resource alias for @cloudsearch.stats.index.datasources.get@ method which the--- 'StatsIndexDatasourcesGet' request conforms to.-type StatsIndexDatasourcesGetResource =-     "v1" :>-       "stats" :>-         "index" :>-           Capture "name" Text :>-             QueryParam "fromDate.month" (Textual Int32) :>-               QueryParam "$.xgafv" Xgafv :>-                 QueryParam "upload_protocol" Text :>-                   QueryParam "fromDate.day" (Textual Int32) :>-                     QueryParam "access_token" Text :>-                       QueryParam "uploadType" Text :>-                         QueryParam "fromDate.year" (Textual Int32) :>-                           QueryParam "toDate.day" (Textual Int32) :>-                             QueryParam "toDate.year" (Textual Int32) :>-                               QueryParam "toDate.month" (Textual Int32) :>-                                 QueryParam "callback" Text :>-                                   QueryParam "alt" AltJSON :>-                                     Get '[JSON] GetDataSourceIndexStatsResponse---- | Gets indexed item statistics for a single data source.------ /See:/ 'statsIndexDatasourcesGet' smart constructor.-data StatsIndexDatasourcesGet =-  StatsIndexDatasourcesGet'-    { _sidgFromDateMonth  :: !(Maybe (Textual Int32))-    , _sidgXgafv          :: !(Maybe Xgafv)-    , _sidgUploadProtocol :: !(Maybe Text)-    , _sidgFromDateDay    :: !(Maybe (Textual Int32))-    , _sidgAccessToken    :: !(Maybe Text)-    , _sidgUploadType     :: !(Maybe Text)-    , _sidgFromDateYear   :: !(Maybe (Textual Int32))-    , _sidgName           :: !Text-    , _sidgToDateDay      :: !(Maybe (Textual Int32))-    , _sidgToDateYear     :: !(Maybe (Textual Int32))-    , _sidgToDateMonth    :: !(Maybe (Textual Int32))-    , _sidgCallback       :: !(Maybe Text)-    }-  deriving (Eq, Show, Data, Typeable, Generic)----- | Creates a value of 'StatsIndexDatasourcesGet' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'sidgFromDateMonth'------ * 'sidgXgafv'------ * 'sidgUploadProtocol'------ * 'sidgFromDateDay'------ * 'sidgAccessToken'------ * 'sidgUploadType'------ * 'sidgFromDateYear'------ * 'sidgName'------ * 'sidgToDateDay'------ * 'sidgToDateYear'------ * 'sidgToDateMonth'------ * 'sidgCallback'-statsIndexDatasourcesGet-    :: Text -- ^ 'sidgName'-    -> StatsIndexDatasourcesGet-statsIndexDatasourcesGet pSidgName_ =-  StatsIndexDatasourcesGet'-    { _sidgFromDateMonth = Nothing-    , _sidgXgafv = Nothing-    , _sidgUploadProtocol = Nothing-    , _sidgFromDateDay = Nothing-    , _sidgAccessToken = Nothing-    , _sidgUploadType = Nothing-    , _sidgFromDateYear = Nothing-    , _sidgName = pSidgName_-    , _sidgToDateDay = Nothing-    , _sidgToDateYear = Nothing-    , _sidgToDateMonth = Nothing-    , _sidgCallback = Nothing-    }----- | Month of date. Must be from 1 to 12.-sidgFromDateMonth :: Lens' StatsIndexDatasourcesGet (Maybe Int32)-sidgFromDateMonth-  = lens _sidgFromDateMonth-      (\ s a -> s{_sidgFromDateMonth = a})-      . mapping _Coerce---- | V1 error format.-sidgXgafv :: Lens' StatsIndexDatasourcesGet (Maybe Xgafv)-sidgXgafv-  = lens _sidgXgafv (\ s a -> s{_sidgXgafv = a})---- | Upload protocol for media (e.g. \"raw\", \"multipart\").-sidgUploadProtocol :: Lens' StatsIndexDatasourcesGet (Maybe Text)-sidgUploadProtocol-  = lens _sidgUploadProtocol-      (\ s a -> s{_sidgUploadProtocol = a})---- | Day of month. Must be from 1 to 31 and valid for the year and month.-sidgFromDateDay :: Lens' StatsIndexDatasourcesGet (Maybe Int32)-sidgFromDateDay-  = lens _sidgFromDateDay-      (\ s a -> s{_sidgFromDateDay = a})-      . mapping _Coerce---- | OAuth access token.-sidgAccessToken :: Lens' StatsIndexDatasourcesGet (Maybe Text)-sidgAccessToken-  = lens _sidgAccessToken-      (\ s a -> s{_sidgAccessToken = a})---- | Legacy upload protocol for media (e.g. \"media\", \"multipart\").-sidgUploadType :: Lens' StatsIndexDatasourcesGet (Maybe Text)-sidgUploadType-  = lens _sidgUploadType-      (\ s a -> s{_sidgUploadType = a})---- | Year of date. Must be from 1 to 9999.-sidgFromDateYear :: Lens' StatsIndexDatasourcesGet (Maybe Int32)-sidgFromDateYear-  = lens _sidgFromDateYear-      (\ s a -> s{_sidgFromDateYear = a})-      . mapping _Coerce---- | The resource id of the data source to retrieve statistics for, in the--- following format: \"datasources\/{source_id}\"-sidgName :: Lens' StatsIndexDatasourcesGet Text-sidgName = lens _sidgName (\ s a -> s{_sidgName = a})---- | Day of month. Must be from 1 to 31 and valid for the year and month.-sidgToDateDay :: Lens' StatsIndexDatasourcesGet (Maybe Int32)-sidgToDateDay-  = lens _sidgToDateDay-      (\ s a -> s{_sidgToDateDay = a})-      . mapping _Coerce---- | Year of date. Must be from 1 to 9999.-sidgToDateYear :: Lens' StatsIndexDatasourcesGet (Maybe Int32)-sidgToDateYear-  = lens _sidgToDateYear-      (\ s a -> s{_sidgToDateYear = a})-      . mapping _Coerce---- | Month of date. Must be from 1 to 12.-sidgToDateMonth :: Lens' StatsIndexDatasourcesGet (Maybe Int32)-sidgToDateMonth-  = lens _sidgToDateMonth-      (\ s a -> s{_sidgToDateMonth = a})-      . mapping _Coerce---- | JSONP-sidgCallback :: Lens' StatsIndexDatasourcesGet (Maybe Text)-sidgCallback-  = lens _sidgCallback (\ s a -> s{_sidgCallback = a})--instance GoogleRequest StatsIndexDatasourcesGet where-        type Rs StatsIndexDatasourcesGet =-             GetDataSourceIndexStatsResponse-        type Scopes StatsIndexDatasourcesGet =-             '["https://www.googleapis.com/auth/cloud_search",-               "https://www.googleapis.com/auth/cloud_search.stats",-               "https://www.googleapis.com/auth/cloud_search.stats.indexing"]-        requestClient StatsIndexDatasourcesGet'{..}-          = go _sidgName _sidgFromDateMonth _sidgXgafv-              _sidgUploadProtocol-              _sidgFromDateDay-              _sidgAccessToken-              _sidgUploadType-              _sidgFromDateYear-              _sidgToDateDay-              _sidgToDateYear-              _sidgToDateMonth-              _sidgCallback-              (Just AltJSON)-              cloudSearchService-          where go-                  = buildClient-                      (Proxy :: Proxy StatsIndexDatasourcesGetResource)-                      mempty
gogol-cloudsearch.cabal view
@@ -1,82 +1,110 @@-name:                  gogol-cloudsearch-version:               0.5.0-synopsis:              Google Cloud Search SDK.-homepage:              https://github.com/brendanhay/gogol-bug-reports:           https://github.com/brendanhay/gogol/issues-license:               OtherLicense-license-file:          LICENSE-author:                Brendan Hay-maintainer:            Brendan Hay <brendan.g.hay@gmail.com>-copyright:             Copyright (c) 2015-2016 Brendan Hay-category:              Network, Google, Cloud-build-type:            Simple-cabal-version:         >= 1.10-extra-source-files:    README.md src/.gitkeep+cabal-version:      2.2+name:               gogol-cloudsearch+version:            1.0.0+synopsis:           Google Cloud Search SDK.+homepage:           https://github.com/brendanhay/gogol+bug-reports:        https://github.com/brendanhay/gogol/issues+license:            MPL-2.0+license-file:       LICENSE+author:             Brendan Hay+maintainer:+  Brendan Hay <brendan.g.hay+gogol@gmail.com>, Toni Cebrián <toni@tonicebrian.com> +copyright:          Copyright (c) 2015-2025 Brendan Hay+category:           Google+build-type:         Simple+extra-source-files:+  README.md+  src/.gitkeep+ description:-    Cloud Search provides cloud-based search capabilities over G Suite data.-    The Cloud Search API allows indexing of non-G Suite data into Cloud-    Search.-    .-    /Warning:/ This is an experimental prototype/preview release which is still-    under exploratory development and not intended for public use, caveat emptor!-    .-    This library is compatible with version @v1@-    of the API.+  Cloud Search provides cloud-based search capabilities over Google Workspace data. The Cloud Search API allows indexing of non-Google Workspace data into Cloud Search.+  .+  /Warning:/ This is an experimental prototype/preview release which is still+  under exploratory development and not intended for public use, caveat emptor!+  .+  This library is compatible with version @v1@+  of the API.  source-repository head-    type:     git-    location: git://github.com/brendanhay/gogol.git+  type:     git+  location: git://github.com/brendanhay/gogol.git+  subdir:   gogol-cloudsearch +flag field-selectors+  description:+    If record field selectors should be enabled. Disabling this requires GHC >=9.2 and the NoFieldSelectors extension.++  default:     False+  manual:      True+ library-    default-language:  Haskell2010-    hs-source-dirs:    src gen+  default-language: GHC2021+  hs-source-dirs:   src gen+  ghc-options:+    -Wall -fwarn-incomplete-uni-patterns+    -fwarn-incomplete-record-updates -funbox-strict-fields+    -fwarn-unused-packages -    ghc-options:       -Wall+  if (!flag(field-selectors) && impl(ghc >=9.2))+    default-extensions: NoFieldSelectors -    exposed-modules:-          Network.Google.CloudSearch-        , Network.Google.CloudSearch.Types-        , Network.Google.Resource.CloudSearch.Debug.Datasources.Items.CheckAccess-        , Network.Google.Resource.CloudSearch.Debug.Datasources.Items.SearchByViewURL-        , Network.Google.Resource.CloudSearch.Debug.Datasources.Items.UnmAppedids.List-        , Network.Google.Resource.CloudSearch.Debug.Identitysources.Items.ListForunmAppedidentity-        , Network.Google.Resource.CloudSearch.Debug.Identitysources.UnmAppedids.List-        , Network.Google.Resource.CloudSearch.Indexing.Datasources.DeleteSchema-        , Network.Google.Resource.CloudSearch.Indexing.Datasources.GetSchema-        , Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Delete-        , Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.DeleteQueueItems-        , Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Get-        , Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Index-        , Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.List-        , Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Poll-        , Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Push-        , Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Unreserve-        , Network.Google.Resource.CloudSearch.Indexing.Datasources.Items.Upload-        , Network.Google.Resource.CloudSearch.Indexing.Datasources.UpdateSchema-        , Network.Google.Resource.CloudSearch.Media.Upload-        , Network.Google.Resource.CloudSearch.Operations.Get-        , Network.Google.Resource.CloudSearch.Query.Search-        , Network.Google.Resource.CloudSearch.Query.Sources.List-        , Network.Google.Resource.CloudSearch.Query.Suggest-        , Network.Google.Resource.CloudSearch.Settings.Datasources.Create-        , Network.Google.Resource.CloudSearch.Settings.Datasources.Delete-        , Network.Google.Resource.CloudSearch.Settings.Datasources.Get-        , Network.Google.Resource.CloudSearch.Settings.Datasources.List-        , Network.Google.Resource.CloudSearch.Settings.Datasources.Update-        , Network.Google.Resource.CloudSearch.Settings.SearchApplications.Create-        , Network.Google.Resource.CloudSearch.Settings.SearchApplications.Delete-        , Network.Google.Resource.CloudSearch.Settings.SearchApplications.Get-        , Network.Google.Resource.CloudSearch.Settings.SearchApplications.List-        , Network.Google.Resource.CloudSearch.Settings.SearchApplications.Reset-        , Network.Google.Resource.CloudSearch.Settings.SearchApplications.Update-        , Network.Google.Resource.CloudSearch.Stats.GetIndex-        , Network.Google.Resource.CloudSearch.Stats.Index.Datasources.Get+  exposed-modules:+    Gogol.CloudSearch+    Gogol.CloudSearch.Debug.Datasources.Items.CheckAccess+    Gogol.CloudSearch.Debug.Datasources.Items.SearchByViewUrl+    Gogol.CloudSearch.Debug.Datasources.Items.Unmappedids.List+    Gogol.CloudSearch.Debug.Identitysources.Items.ListForunmappedidentity+    Gogol.CloudSearch.Debug.Identitysources.Unmappedids.List+    Gogol.CloudSearch.Indexing.Datasources.DeleteSchema+    Gogol.CloudSearch.Indexing.Datasources.GetSchema+    Gogol.CloudSearch.Indexing.Datasources.Items.Delete+    Gogol.CloudSearch.Indexing.Datasources.Items.DeleteQueueItems+    Gogol.CloudSearch.Indexing.Datasources.Items.Get+    Gogol.CloudSearch.Indexing.Datasources.Items.Index+    Gogol.CloudSearch.Indexing.Datasources.Items.List+    Gogol.CloudSearch.Indexing.Datasources.Items.Poll+    Gogol.CloudSearch.Indexing.Datasources.Items.Push+    Gogol.CloudSearch.Indexing.Datasources.Items.Unreserve+    Gogol.CloudSearch.Indexing.Datasources.Items.Upload+    Gogol.CloudSearch.Indexing.Datasources.UpdateSchema+    Gogol.CloudSearch.InitializeCustomer+    Gogol.CloudSearch.Media.Upload+    Gogol.CloudSearch.Operations.Get+    Gogol.CloudSearch.Operations.Lro.List+    Gogol.CloudSearch.Query.DebugSearch+    Gogol.CloudSearch.Query.RemoveActivity+    Gogol.CloudSearch.Query.Search+    Gogol.CloudSearch.Query.Sources.List+    Gogol.CloudSearch.Query.Suggest+    Gogol.CloudSearch.Settings.Datasources.Create+    Gogol.CloudSearch.Settings.Datasources.Delete+    Gogol.CloudSearch.Settings.Datasources.Get+    Gogol.CloudSearch.Settings.Datasources.List+    Gogol.CloudSearch.Settings.Datasources.Patch+    Gogol.CloudSearch.Settings.Datasources.Update+    Gogol.CloudSearch.Settings.GetCustomer+    Gogol.CloudSearch.Settings.Searchapplications.Create+    Gogol.CloudSearch.Settings.Searchapplications.Delete+    Gogol.CloudSearch.Settings.Searchapplications.Get+    Gogol.CloudSearch.Settings.Searchapplications.List+    Gogol.CloudSearch.Settings.Searchapplications.Patch+    Gogol.CloudSearch.Settings.Searchapplications.Reset+    Gogol.CloudSearch.Settings.Searchapplications.Update+    Gogol.CloudSearch.Settings.UpdateCustomer+    Gogol.CloudSearch.Stats.GetIndex+    Gogol.CloudSearch.Stats.GetQuery+    Gogol.CloudSearch.Stats.GetSearchapplication+    Gogol.CloudSearch.Stats.GetSession+    Gogol.CloudSearch.Stats.GetUser+    Gogol.CloudSearch.Stats.Index.Datasources.Get+    Gogol.CloudSearch.Stats.Query.Searchapplications.Get+    Gogol.CloudSearch.Stats.Session.Searchapplications.Get+    Gogol.CloudSearch.Stats.User.Searchapplications.Get+    Gogol.CloudSearch.Types -    other-modules:-          Network.Google.CloudSearch.Types.Product-        , Network.Google.CloudSearch.Types.Sum+  other-modules:+    Gogol.CloudSearch.Internal.Product+    Gogol.CloudSearch.Internal.Sum -    build-depends:-          gogol-core == 0.5.0.*-        , base       >= 4.7 && < 5+  build-depends:    gogol-core ^>=1.0.0