gogol-dialogflow 0.4.0 → 0.5.0

raw patch · 42 files changed

+10752/−9328 lines, 42 filesdep ~gogol-corePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: gogol-core

API changes (from Hackage documentation)

Files

• README.md +1/−1
• gen/Network/Google/DialogFlow.hs +57/−4
• gen/Network/Google/DialogFlow/Types.hs +59/−6
• gen/Network/Google/DialogFlow/Types/Product.hs +10156/−9149
• gen/Network/Google/DialogFlow/Types/Sum.hs +150/−2
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/BatchDelete.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/BatchUpdate.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/Create.hs +11/−7
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/Delete.hs +7/−3
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/Entities/BatchCreate.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/Entities/BatchDelete.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/Entities/BatchUpdate.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/Get.hs +11/−7
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/List.hs +11/−7
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/EntityTypes/Patch.hs +14/−10
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Export.hs +7/−3
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Import.hs +7/−3
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Intents/BatchDelete.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Intents/BatchUpdate.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Intents/Create.hs +11/−7
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Intents/Delete.hs +7/−3
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Intents/Get.hs +11/−7
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Intents/List.hs +11/−7
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Intents/Patch.hs +13/−9
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Restore.hs +7/−3
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Search.hs +7/−3
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Sessions/Contexts/Create.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Sessions/Contexts/Delete.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Sessions/Contexts/Get.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Sessions/Contexts/List.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Sessions/Contexts/Patch.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Sessions/DeleteContexts.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Sessions/DetectIntent.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Sessions/EntityTypes/Create.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Sessions/EntityTypes/Delete.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Sessions/EntityTypes/Get.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Sessions/EntityTypes/List.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Sessions/EntityTypes/Patch.hs +9/−4
• gen/Network/Google/Resource/DialogFlow/Projects/Agent/Train.hs +7/−3
• gen/Network/Google/Resource/DialogFlow/Projects/GetAgent.hs +7/−3
• gen/Network/Google/Resource/DialogFlow/Projects/Operations/Get.hs +7/−3
• gogol-dialogflow.cabal +2/−2

@@ -8,7 +8,7 @@  ## Version -`0.3.0`+`0.5.0`   ## Description

@@ -165,12 +165,22 @@     -- ** GoogleCloudDialogflowV2beta1IntentTrainingPhraseType     , GoogleCloudDialogflowV2beta1IntentTrainingPhraseType (..) +    -- ** GoogleCloudDialogflowV2SynthesizeSpeechConfig+    , GoogleCloudDialogflowV2SynthesizeSpeechConfig+    , googleCloudDialogflowV2SynthesizeSpeechConfig+    , gcdvsscVolumeGainDB+    , gcdvsscEffectsProFileId+    , gcdvsscVoice+    , gcdvsscSpeakingRate+    , gcdvsscPitch+     -- ** GoogleCloudDialogflowV2InputAudioConfig     , GoogleCloudDialogflowV2InputAudioConfig     , googleCloudDialogflowV2InputAudioConfig     , gcdviacLanguageCode     , gcdviacPhraseHints     , gcdviacSampleRateHertz+    , gcdviacModelVariant     , gcdviacAudioEncoding      -- ** GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse@@ -213,6 +223,9 @@     , gcdvimsrSsml     , gcdvimsrTextToSpeech +    -- ** GoogleCloudDialogflowV2InputAudioConfigModelVariant+    , GoogleCloudDialogflowV2InputAudioConfigModelVariant (..)+     -- ** GoogleLongrunningOperationMetadata     , GoogleLongrunningOperationMetadata     , googleLongrunningOperationMetadata@@ -272,12 +285,20 @@     , gcdviMlDisabled     , gcdviResetContexts +    -- ** GoogleCloudDialogflowV2VoiceSelectionParamsSsmlGender+    , GoogleCloudDialogflowV2VoiceSelectionParamsSsmlGender (..)+     -- ** GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton     , GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton     , googleCloudDialogflowV2beta1IntentMessageBasicCardButton     , gcdvimbcbOpenURIAction     , gcdvimbcbTitle +    -- ** GoogleCloudDialogflowV2SentimentAnalysisResult+    , GoogleCloudDialogflowV2SentimentAnalysisResult+    , googleCloudDialogflowV2SentimentAnalysisResult+    , gcdvsarQueryTextSentiment+     -- ** GoogleCloudDialogflowV2BatchCreateEntitiesRequest     , GoogleCloudDialogflowV2BatchCreateEntitiesRequest     , googleCloudDialogflowV2BatchCreateEntitiesRequest@@ -307,6 +328,7 @@     , gcdvqrSpeechRecognitionConfidence     , gcdvqrAction     , gcdvqrIntent+    , gcdvqrSentimentAnalysisResult     , gcdvqrQueryText     , gcdvqrFulfillmentText     , gcdvqrParameters@@ -389,6 +411,11 @@     , googleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio     , gcdvimtpaAudioURI +    -- ** GoogleCloudDialogflowV2SentimentAnalysisRequestConfig+    , GoogleCloudDialogflowV2SentimentAnalysisRequestConfig+    , googleCloudDialogflowV2SentimentAnalysisRequestConfig+    , gcdvsarcAnalyzeQueryTextSentiment+     -- ** GoogleCloudDialogflowV2IntentTrainingPhrasePart     , GoogleCloudDialogflowV2IntentTrainingPhrasePart     , googleCloudDialogflowV2IntentTrainingPhrasePart@@ -482,6 +509,7 @@     , GoogleCloudDialogflowV2QueryParameters     , googleCloudDialogflowV2QueryParameters     , gcdvqpContexts+    , gcdvqpSentimentAnalysisRequestConfig     , gcdvqpPayload     , gcdvqpGeoLocation     , gcdvqpTimeZone@@ -511,7 +539,9 @@     -- ** GoogleCloudDialogflowV2DetectIntentResponse     , GoogleCloudDialogflowV2DetectIntentResponse     , googleCloudDialogflowV2DetectIntentResponse+    , gcdvdirOutputAudioConfig     , gcdvdirResponseId+    , gcdvdirOutputAudio     , gcdvdirWebhookStatus     , gcdvdirQueryResult @@ -526,13 +556,19 @@     -- ** GoogleCloudDialogflowV2beta1SentimentAnalysisResult     , GoogleCloudDialogflowV2beta1SentimentAnalysisResult     , googleCloudDialogflowV2beta1SentimentAnalysisResult-    , gcdvsarQueryTextSentiment+    , gQueryTextSentiment      -- ** GoogleCloudDialogflowV2EntityTypeBatch     , GoogleCloudDialogflowV2EntityTypeBatch     , googleCloudDialogflowV2EntityTypeBatch     , gcdvetbEntityTypes +    -- ** GoogleCloudDialogflowV2VoiceSelectionParams+    , GoogleCloudDialogflowV2VoiceSelectionParams+    , googleCloudDialogflowV2VoiceSelectionParams+    , gcdvvspSsmlGender+    , gcdvvspName+     -- ** GoogleCloudDialogflowV2QueryResultDiagnosticInfo     , GoogleCloudDialogflowV2QueryResultDiagnosticInfo     , googleCloudDialogflowV2QueryResultDiagnosticInfo@@ -546,9 +582,10 @@     -- ** GoogleCloudDialogflowV2DetectIntentRequest     , GoogleCloudDialogflowV2DetectIntentRequest     , googleCloudDialogflowV2DetectIntentRequest-    , gcdvdirQueryInput-    , gcdvdirInputAudio-    , gcdvdirQueryParams+    , gQueryInput+    , gOutputAudioConfig+    , gInputAudio+    , gQueryParams      -- ** GoogleCloudDialogflowV2beta1QueryResultParameters     , GoogleCloudDialogflowV2beta1QueryResultParameters@@ -831,6 +868,13 @@     , gcdvimiAccessibilityText     , gcdvimiImageURI +    -- ** GoogleCloudDialogflowV2OutputAudioConfig+    , GoogleCloudDialogflowV2OutputAudioConfig+    , googleCloudDialogflowV2OutputAudioConfig+    , gcdvoacSampleRateHertz+    , gcdvoacSynthesizeSpeechConfig+    , gcdvoacAudioEncoding+     -- ** GoogleCloudDialogflowV2ExportAgentResponse     , GoogleCloudDialogflowV2ExportAgentResponse     , googleCloudDialogflowV2ExportAgentResponse@@ -876,6 +920,9 @@     , gcdvipIsList     , gcdvipEntityTypeDisplayName +    -- ** GoogleCloudDialogflowV2OutputAudioConfigAudioEncoding+    , GoogleCloudDialogflowV2OutputAudioConfigAudioEncoding (..)+     -- ** GoogleCloudDialogflowV2EntityTypeAutoExpansionMode     , GoogleCloudDialogflowV2EntityTypeAutoExpansionMode (..) @@ -1043,6 +1090,12 @@     , GoogleCloudDialogflowV2IntentMessageCarouselSelect     , googleCloudDialogflowV2IntentMessageCarouselSelect     , gItems++    -- ** GoogleCloudDialogflowV2Sentiment+    , GoogleCloudDialogflowV2Sentiment+    , googleCloudDialogflowV2Sentiment+    , gScore+    , gMagnitude      -- ** GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo     , GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo

@@ -47,12 +47,22 @@     -- * GoogleCloudDialogflowV2beta1IntentTrainingPhraseType     , GoogleCloudDialogflowV2beta1IntentTrainingPhraseType (..) +    -- * GoogleCloudDialogflowV2SynthesizeSpeechConfig+    , GoogleCloudDialogflowV2SynthesizeSpeechConfig+    , googleCloudDialogflowV2SynthesizeSpeechConfig+    , gcdvsscVolumeGainDB+    , gcdvsscEffectsProFileId+    , gcdvsscVoice+    , gcdvsscSpeakingRate+    , gcdvsscPitch+     -- * GoogleCloudDialogflowV2InputAudioConfig     , GoogleCloudDialogflowV2InputAudioConfig     , googleCloudDialogflowV2InputAudioConfig     , gcdviacLanguageCode     , gcdviacPhraseHints     , gcdviacSampleRateHertz+    , gcdviacModelVariant     , gcdviacAudioEncoding      -- * GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse@@ -95,6 +105,9 @@     , gcdvimsrSsml     , gcdvimsrTextToSpeech +    -- * GoogleCloudDialogflowV2InputAudioConfigModelVariant+    , GoogleCloudDialogflowV2InputAudioConfigModelVariant (..)+     -- * GoogleLongrunningOperationMetadata     , GoogleLongrunningOperationMetadata     , googleLongrunningOperationMetadata@@ -154,12 +167,20 @@     , gcdviMlDisabled     , gcdviResetContexts +    -- * GoogleCloudDialogflowV2VoiceSelectionParamsSsmlGender+    , GoogleCloudDialogflowV2VoiceSelectionParamsSsmlGender (..)+     -- * GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton     , GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton     , googleCloudDialogflowV2beta1IntentMessageBasicCardButton     , gcdvimbcbOpenURIAction     , gcdvimbcbTitle +    -- * GoogleCloudDialogflowV2SentimentAnalysisResult+    , GoogleCloudDialogflowV2SentimentAnalysisResult+    , googleCloudDialogflowV2SentimentAnalysisResult+    , gcdvsarQueryTextSentiment+     -- * GoogleCloudDialogflowV2BatchCreateEntitiesRequest     , GoogleCloudDialogflowV2BatchCreateEntitiesRequest     , googleCloudDialogflowV2BatchCreateEntitiesRequest@@ -189,6 +210,7 @@     , gcdvqrSpeechRecognitionConfidence     , gcdvqrAction     , gcdvqrIntent+    , gcdvqrSentimentAnalysisResult     , gcdvqrQueryText     , gcdvqrFulfillmentText     , gcdvqrParameters@@ -271,6 +293,11 @@     , googleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio     , gcdvimtpaAudioURI +    -- * GoogleCloudDialogflowV2SentimentAnalysisRequestConfig+    , GoogleCloudDialogflowV2SentimentAnalysisRequestConfig+    , googleCloudDialogflowV2SentimentAnalysisRequestConfig+    , gcdvsarcAnalyzeQueryTextSentiment+     -- * GoogleCloudDialogflowV2IntentTrainingPhrasePart     , GoogleCloudDialogflowV2IntentTrainingPhrasePart     , googleCloudDialogflowV2IntentTrainingPhrasePart@@ -364,6 +391,7 @@     , GoogleCloudDialogflowV2QueryParameters     , googleCloudDialogflowV2QueryParameters     , gcdvqpContexts+    , gcdvqpSentimentAnalysisRequestConfig     , gcdvqpPayload     , gcdvqpGeoLocation     , gcdvqpTimeZone@@ -393,7 +421,9 @@     -- * GoogleCloudDialogflowV2DetectIntentResponse     , GoogleCloudDialogflowV2DetectIntentResponse     , googleCloudDialogflowV2DetectIntentResponse+    , gcdvdirOutputAudioConfig     , gcdvdirResponseId+    , gcdvdirOutputAudio     , gcdvdirWebhookStatus     , gcdvdirQueryResult @@ -408,13 +438,19 @@     -- * GoogleCloudDialogflowV2beta1SentimentAnalysisResult     , GoogleCloudDialogflowV2beta1SentimentAnalysisResult     , googleCloudDialogflowV2beta1SentimentAnalysisResult-    , gcdvsarQueryTextSentiment+    , gQueryTextSentiment      -- * GoogleCloudDialogflowV2EntityTypeBatch     , GoogleCloudDialogflowV2EntityTypeBatch     , googleCloudDialogflowV2EntityTypeBatch     , gcdvetbEntityTypes +    -- * GoogleCloudDialogflowV2VoiceSelectionParams+    , GoogleCloudDialogflowV2VoiceSelectionParams+    , googleCloudDialogflowV2VoiceSelectionParams+    , gcdvvspSsmlGender+    , gcdvvspName+     -- * GoogleCloudDialogflowV2QueryResultDiagnosticInfo     , GoogleCloudDialogflowV2QueryResultDiagnosticInfo     , googleCloudDialogflowV2QueryResultDiagnosticInfo@@ -428,9 +464,10 @@     -- * GoogleCloudDialogflowV2DetectIntentRequest     , GoogleCloudDialogflowV2DetectIntentRequest     , googleCloudDialogflowV2DetectIntentRequest-    , gcdvdirQueryInput-    , gcdvdirInputAudio-    , gcdvdirQueryParams+    , gQueryInput+    , gOutputAudioConfig+    , gInputAudio+    , gQueryParams      -- * GoogleCloudDialogflowV2beta1QueryResultParameters     , GoogleCloudDialogflowV2beta1QueryResultParameters@@ -713,6 +750,13 @@     , gcdvimiAccessibilityText     , gcdvimiImageURI +    -- * GoogleCloudDialogflowV2OutputAudioConfig+    , GoogleCloudDialogflowV2OutputAudioConfig+    , googleCloudDialogflowV2OutputAudioConfig+    , gcdvoacSampleRateHertz+    , gcdvoacSynthesizeSpeechConfig+    , gcdvoacAudioEncoding+     -- * GoogleCloudDialogflowV2ExportAgentResponse     , GoogleCloudDialogflowV2ExportAgentResponse     , googleCloudDialogflowV2ExportAgentResponse@@ -758,6 +802,9 @@     , gcdvipIsList     , gcdvipEntityTypeDisplayName +    -- * GoogleCloudDialogflowV2OutputAudioConfigAudioEncoding+    , GoogleCloudDialogflowV2OutputAudioConfigAudioEncoding (..)+     -- * GoogleCloudDialogflowV2EntityTypeAutoExpansionMode     , GoogleCloudDialogflowV2EntityTypeAutoExpansionMode (..) @@ -926,6 +973,12 @@     , googleCloudDialogflowV2IntentMessageCarouselSelect     , gItems +    -- * GoogleCloudDialogflowV2Sentiment+    , GoogleCloudDialogflowV2Sentiment+    , googleCloudDialogflowV2Sentiment+    , gScore+    , gMagnitude+     -- * GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo     , GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo     , googleCloudDialogflowV2beta1IntentMessageSelectItemInfo@@ -985,8 +1038,8 @@  -- | View, manage and query your Dialogflow agents dialogFlowScope :: Proxy '["https://www.googleapis.com/auth/dialogflow"]-dialogFlowScope = Proxy;+dialogFlowScope = Proxy  -- | View and manage your data across Google Cloud Platform services cloudPlatformScope :: Proxy '["https://www.googleapis.com/auth/cloud-platform"]-cloudPlatformScope = Proxy;+cloudPlatformScope = Proxy

@@ -57,9155 +57,10162 @@ -- security\/privacy reasons. -- -- /See:/ 'googleRpcStatus' smart constructor.-data GoogleRpcStatus = GoogleRpcStatus'-    { _grsDetails :: !(Maybe [GoogleRpcStatusDetailsItem])-    , _grsCode    :: !(Maybe (Textual Int32))-    , _grsMessage :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleRpcStatus' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'grsDetails'------ * 'grsCode'------ * 'grsMessage'-googleRpcStatus-    :: GoogleRpcStatus-googleRpcStatus =-    GoogleRpcStatus'-    { _grsDetails = Nothing-    , _grsCode = Nothing-    , _grsMessage = Nothing-    }---- | A list of messages that carry the error details. There is a common set--- of message types for APIs to use.-grsDetails :: Lens' GoogleRpcStatus [GoogleRpcStatusDetailsItem]-grsDetails-  = lens _grsDetails (\ s a -> s{_grsDetails = a}) .-      _Default-      . _Coerce---- | The status code, which should be an enum value of google.rpc.Code.-grsCode :: Lens' GoogleRpcStatus (Maybe Int32)-grsCode-  = lens _grsCode (\ s a -> s{_grsCode = 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.-grsMessage :: Lens' GoogleRpcStatus (Maybe Text)-grsMessage-  = lens _grsMessage (\ s a -> s{_grsMessage = a})--instance FromJSON GoogleRpcStatus where-        parseJSON-          = withObject "GoogleRpcStatus"-              (\ o ->-                 GoogleRpcStatus' <$>-                   (o .:? "details" .!= mempty) <*> (o .:? "code") <*>-                     (o .:? "message"))--instance ToJSON GoogleRpcStatus where-        toJSON GoogleRpcStatus'{..}-          = object-              (catMaybes-                 [("details" .=) <$> _grsDetails,-                  ("code" .=) <$> _grsCode,-                  ("message" .=) <$> _grsMessage])---- | Represents a single followup intent in the chain.------ /See:/ 'googleCloudDialogflowV2IntentFollowupIntentInfo' smart constructor.-data GoogleCloudDialogflowV2IntentFollowupIntentInfo = GoogleCloudDialogflowV2IntentFollowupIntentInfo'-    { _gcdvifiiFollowupIntentName       :: !(Maybe Text)-    , _gcdvifiiParentFollowupIntentName :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentFollowupIntentInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvifiiFollowupIntentName'------ * 'gcdvifiiParentFollowupIntentName'-googleCloudDialogflowV2IntentFollowupIntentInfo-    :: GoogleCloudDialogflowV2IntentFollowupIntentInfo-googleCloudDialogflowV2IntentFollowupIntentInfo =-    GoogleCloudDialogflowV2IntentFollowupIntentInfo'-    { _gcdvifiiFollowupIntentName = Nothing-    , _gcdvifiiParentFollowupIntentName = Nothing-    }---- | The unique identifier of the followup intent. Format:--- \`projects\/\/agent\/intents\/\`.-gcdvifiiFollowupIntentName :: Lens' GoogleCloudDialogflowV2IntentFollowupIntentInfo (Maybe Text)-gcdvifiiFollowupIntentName-  = lens _gcdvifiiFollowupIntentName-      (\ s a -> s{_gcdvifiiFollowupIntentName = a})---- | The unique identifier of the followup intent\'s parent. Format:--- \`projects\/\/agent\/intents\/\`.-gcdvifiiParentFollowupIntentName :: Lens' GoogleCloudDialogflowV2IntentFollowupIntentInfo (Maybe Text)-gcdvifiiParentFollowupIntentName-  = lens _gcdvifiiParentFollowupIntentName-      (\ s a -> s{_gcdvifiiParentFollowupIntentName = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentFollowupIntentInfo where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentFollowupIntentInfo"-              (\ o ->-                 GoogleCloudDialogflowV2IntentFollowupIntentInfo' <$>-                   (o .:? "followupIntentName") <*>-                     (o .:? "parentFollowupIntentName"))--instance ToJSON-         GoogleCloudDialogflowV2IntentFollowupIntentInfo where-        toJSON-          GoogleCloudDialogflowV2IntentFollowupIntentInfo'{..}-          = object-              (catMaybes-                 [("followupIntentName" .=) <$>-                    _gcdvifiiFollowupIntentName,-                  ("parentFollowupIntentName" .=) <$>-                    _gcdvifiiParentFollowupIntentName])---- | The collection of simple response candidates. This message in--- \`QueryResult.fulfillment_messages\` and--- \`WebhookResponse.fulfillment_messages\` should contain only one--- \`SimpleResponse\`.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageSimpleResponses' smart constructor.-newtype GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses = GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses'-    { _gcdvimsrSimpleResponses :: Maybe [GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimsrSimpleResponses'-googleCloudDialogflowV2beta1IntentMessageSimpleResponses-    :: GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses-googleCloudDialogflowV2beta1IntentMessageSimpleResponses =-    GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses'-    { _gcdvimsrSimpleResponses = Nothing-    }---- | Required. The list of simple responses.-gcdvimsrSimpleResponses :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses [GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse]-gcdvimsrSimpleResponses-  = lens _gcdvimsrSimpleResponses-      (\ s a -> s{_gcdvimsrSimpleResponses = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses'-                   <$> (o .:? "simpleResponses" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses'{..}-          = object-              (catMaybes-                 [("simpleResponses" .=) <$>-                    _gcdvimsrSimpleResponses])---- | Instructs the speech recognizer how to process the audio content.------ /See:/ 'googleCloudDialogflowV2InputAudioConfig' smart constructor.-data GoogleCloudDialogflowV2InputAudioConfig = GoogleCloudDialogflowV2InputAudioConfig'-    { _gcdviacLanguageCode    :: !(Maybe Text)-    , _gcdviacPhraseHints     :: !(Maybe [Text])-    , _gcdviacSampleRateHertz :: !(Maybe (Textual Int32))-    , _gcdviacAudioEncoding   :: !(Maybe GoogleCloudDialogflowV2InputAudioConfigAudioEncoding)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2InputAudioConfig' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdviacLanguageCode'------ * 'gcdviacPhraseHints'------ * 'gcdviacSampleRateHertz'------ * 'gcdviacAudioEncoding'-googleCloudDialogflowV2InputAudioConfig-    :: GoogleCloudDialogflowV2InputAudioConfig-googleCloudDialogflowV2InputAudioConfig =-    GoogleCloudDialogflowV2InputAudioConfig'-    { _gcdviacLanguageCode = Nothing-    , _gcdviacPhraseHints = Nothing-    , _gcdviacSampleRateHertz = Nothing-    , _gcdviacAudioEncoding = Nothing-    }---- | Required. The language of the supplied audio. Dialogflow does not do--- translations. See [Language--- Support](https:\/\/dialogflow.com\/docs\/languages) for a list of the--- currently supported language codes. Note that queries in the same--- session do not necessarily need to specify the same language.-gcdviacLanguageCode :: Lens' GoogleCloudDialogflowV2InputAudioConfig (Maybe Text)-gcdviacLanguageCode-  = lens _gcdviacLanguageCode-      (\ s a -> s{_gcdviacLanguageCode = a})---- | Optional. The collection of phrase hints which are used to boost--- accuracy of speech recognition. Refer to [Cloud Speech API--- documentation](https:\/\/cloud.google.com\/speech-to-text\/docs\/basics#phrase-hints)--- for more details.-gcdviacPhraseHints :: Lens' GoogleCloudDialogflowV2InputAudioConfig [Text]-gcdviacPhraseHints-  = lens _gcdviacPhraseHints-      (\ s a -> s{_gcdviacPhraseHints = a})-      . _Default-      . _Coerce---- | Required. Sample rate (in Hertz) of the audio content sent in the query.--- Refer to [Cloud Speech API--- documentation](https:\/\/cloud.google.com\/speech-to-text\/docs\/basics)--- for more details.-gcdviacSampleRateHertz :: Lens' GoogleCloudDialogflowV2InputAudioConfig (Maybe Int32)-gcdviacSampleRateHertz-  = lens _gcdviacSampleRateHertz-      (\ s a -> s{_gcdviacSampleRateHertz = a})-      . mapping _Coerce---- | Required. Audio encoding of the audio content to process.-gcdviacAudioEncoding :: Lens' GoogleCloudDialogflowV2InputAudioConfig (Maybe GoogleCloudDialogflowV2InputAudioConfigAudioEncoding)-gcdviacAudioEncoding-  = lens _gcdviacAudioEncoding-      (\ s a -> s{_gcdviacAudioEncoding = a})--instance FromJSON-         GoogleCloudDialogflowV2InputAudioConfig where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2InputAudioConfig"-              (\ o ->-                 GoogleCloudDialogflowV2InputAudioConfig' <$>-                   (o .:? "languageCode") <*>-                     (o .:? "phraseHints" .!= mempty)-                     <*> (o .:? "sampleRateHertz")-                     <*> (o .:? "audioEncoding"))--instance ToJSON-         GoogleCloudDialogflowV2InputAudioConfig where-        toJSON GoogleCloudDialogflowV2InputAudioConfig'{..}-          = object-              (catMaybes-                 [("languageCode" .=) <$> _gcdviacLanguageCode,-                  ("phraseHints" .=) <$> _gcdviacPhraseHints,-                  ("sampleRateHertz" .=) <$> _gcdviacSampleRateHertz,-                  ("audioEncoding" .=) <$> _gcdviacAudioEncoding])---- | The response message for Intents.BatchUpdateIntents.------ /See:/ 'googleCloudDialogflowV2beta1BatchUpdateIntentsResponse' smart constructor.-newtype GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse = GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse'-    { _gcdvbuirIntents :: Maybe [GoogleCloudDialogflowV2beta1Intent]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvbuirIntents'-googleCloudDialogflowV2beta1BatchUpdateIntentsResponse-    :: GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse-googleCloudDialogflowV2beta1BatchUpdateIntentsResponse =-    GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse'-    { _gcdvbuirIntents = Nothing-    }---- | The collection of updated or created intents.-gcdvbuirIntents :: Lens' GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse [GoogleCloudDialogflowV2beta1Intent]-gcdvbuirIntents-  = lens _gcdvbuirIntents-      (\ s a -> s{_gcdvbuirIntents = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse"-              (\ o ->-                 GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse'-                   <$> (o .:? "intents" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse-         where-        toJSON-          GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse'{..}-          = object-              (catMaybes [("intents" .=) <$> _gcdvbuirIntents])---- | Returns a response containing a custom, platform-specific payload. See--- the Intent.Message.Platform type for a description of the structure that--- may be required for your platform.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessagePayload' smart constructor.-newtype GoogleCloudDialogflowV2beta1IntentMessagePayload = GoogleCloudDialogflowV2beta1IntentMessagePayload'-    { _gcdvimpAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessagePayload' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimpAddtional'-googleCloudDialogflowV2beta1IntentMessagePayload-    :: HashMap Text JSONValue -- ^ 'gcdvimpAddtional'-    -> GoogleCloudDialogflowV2beta1IntentMessagePayload-googleCloudDialogflowV2beta1IntentMessagePayload pGcdvimpAddtional_ =-    GoogleCloudDialogflowV2beta1IntentMessagePayload'-    { _gcdvimpAddtional = _Coerce # pGcdvimpAddtional_-    }---- | Properties of the object.-gcdvimpAddtional :: Lens' GoogleCloudDialogflowV2beta1IntentMessagePayload (HashMap Text JSONValue)-gcdvimpAddtional-  = lens _gcdvimpAddtional-      (\ s a -> s{_gcdvimpAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessagePayload-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessagePayload"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessagePayload' <$>-                   (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessagePayload-         where-        toJSON = toJSON . _gcdvimpAddtional---- | The request message for a webhook call.------ /See:/ 'googleCloudDialogflowV2WebhookRequest' smart constructor.-data GoogleCloudDialogflowV2WebhookRequest = GoogleCloudDialogflowV2WebhookRequest'-    { _gcdvwrOriginalDetectIntentRequest :: !(Maybe GoogleCloudDialogflowV2OriginalDetectIntentRequest)-    , _gcdvwrResponseId                  :: !(Maybe Text)-    , _gcdvwrQueryResult                 :: !(Maybe GoogleCloudDialogflowV2QueryResult)-    , _gcdvwrSession                     :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2WebhookRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvwrOriginalDetectIntentRequest'------ * 'gcdvwrResponseId'------ * 'gcdvwrQueryResult'------ * 'gcdvwrSession'-googleCloudDialogflowV2WebhookRequest-    :: GoogleCloudDialogflowV2WebhookRequest-googleCloudDialogflowV2WebhookRequest =-    GoogleCloudDialogflowV2WebhookRequest'-    { _gcdvwrOriginalDetectIntentRequest = Nothing-    , _gcdvwrResponseId = Nothing-    , _gcdvwrQueryResult = Nothing-    , _gcdvwrSession = Nothing-    }---- | Optional. The contents of the original request that was passed to--- \`[Streaming]DetectIntent\` call.-gcdvwrOriginalDetectIntentRequest :: Lens' GoogleCloudDialogflowV2WebhookRequest (Maybe GoogleCloudDialogflowV2OriginalDetectIntentRequest)-gcdvwrOriginalDetectIntentRequest-  = lens _gcdvwrOriginalDetectIntentRequest-      (\ s a -> s{_gcdvwrOriginalDetectIntentRequest = a})---- | The unique identifier of the response. Contains the same value as--- \`[Streaming]DetectIntentResponse.response_id\`.-gcdvwrResponseId :: Lens' GoogleCloudDialogflowV2WebhookRequest (Maybe Text)-gcdvwrResponseId-  = lens _gcdvwrResponseId-      (\ s a -> s{_gcdvwrResponseId = a})---- | The result of the conversational query or event processing. Contains the--- same value as \`[Streaming]DetectIntentResponse.query_result\`.-gcdvwrQueryResult :: Lens' GoogleCloudDialogflowV2WebhookRequest (Maybe GoogleCloudDialogflowV2QueryResult)-gcdvwrQueryResult-  = lens _gcdvwrQueryResult-      (\ s a -> s{_gcdvwrQueryResult = a})---- | The unique identifier of detectIntent request session. Can be used to--- identify end-user inside webhook implementation. Format:--- \`projects\/\/agent\/sessions\/\`, or--- \`projects\/\/agent\/environments\/\/users\/\/sessions\/\`.-gcdvwrSession :: Lens' GoogleCloudDialogflowV2WebhookRequest (Maybe Text)-gcdvwrSession-  = lens _gcdvwrSession-      (\ s a -> s{_gcdvwrSession = a})--instance FromJSON-         GoogleCloudDialogflowV2WebhookRequest where-        parseJSON-          = withObject "GoogleCloudDialogflowV2WebhookRequest"-              (\ o ->-                 GoogleCloudDialogflowV2WebhookRequest' <$>-                   (o .:? "originalDetectIntentRequest") <*>-                     (o .:? "responseId")-                     <*> (o .:? "queryResult")-                     <*> (o .:? "session"))--instance ToJSON GoogleCloudDialogflowV2WebhookRequest-         where-        toJSON GoogleCloudDialogflowV2WebhookRequest'{..}-          = object-              (catMaybes-                 [("originalDetectIntentRequest" .=) <$>-                    _gcdvwrOriginalDetectIntentRequest,-                  ("responseId" .=) <$> _gcdvwrResponseId,-                  ("queryResult" .=) <$> _gcdvwrQueryResult,-                  ("session" .=) <$> _gcdvwrSession])---- | An item in the carousel.------ /See:/ 'googleCloudDialogflowV2IntentMessageCarouselSelectItem' smart constructor.-data GoogleCloudDialogflowV2IntentMessageCarouselSelectItem = GoogleCloudDialogflowV2IntentMessageCarouselSelectItem'-    { _gcdvimcsiImage       :: !(Maybe GoogleCloudDialogflowV2IntentMessageImage)-    , _gcdvimcsiTitle       :: !(Maybe Text)-    , _gcdvimcsiDescription :: !(Maybe Text)-    , _gcdvimcsiInfo        :: !(Maybe GoogleCloudDialogflowV2IntentMessageSelectItemInfo)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageCarouselSelectItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimcsiImage'------ * 'gcdvimcsiTitle'------ * 'gcdvimcsiDescription'------ * 'gcdvimcsiInfo'-googleCloudDialogflowV2IntentMessageCarouselSelectItem-    :: GoogleCloudDialogflowV2IntentMessageCarouselSelectItem-googleCloudDialogflowV2IntentMessageCarouselSelectItem =-    GoogleCloudDialogflowV2IntentMessageCarouselSelectItem'-    { _gcdvimcsiImage = Nothing-    , _gcdvimcsiTitle = Nothing-    , _gcdvimcsiDescription = Nothing-    , _gcdvimcsiInfo = Nothing-    }---- | Optional. The image to display.-gcdvimcsiImage :: Lens' GoogleCloudDialogflowV2IntentMessageCarouselSelectItem (Maybe GoogleCloudDialogflowV2IntentMessageImage)-gcdvimcsiImage-  = lens _gcdvimcsiImage-      (\ s a -> s{_gcdvimcsiImage = a})---- | Required. Title of the carousel item.-gcdvimcsiTitle :: Lens' GoogleCloudDialogflowV2IntentMessageCarouselSelectItem (Maybe Text)-gcdvimcsiTitle-  = lens _gcdvimcsiTitle-      (\ s a -> s{_gcdvimcsiTitle = a})---- | Optional. The body text of the card.-gcdvimcsiDescription :: Lens' GoogleCloudDialogflowV2IntentMessageCarouselSelectItem (Maybe Text)-gcdvimcsiDescription-  = lens _gcdvimcsiDescription-      (\ s a -> s{_gcdvimcsiDescription = a})---- | Required. Additional info about the option item.-gcdvimcsiInfo :: Lens' GoogleCloudDialogflowV2IntentMessageCarouselSelectItem (Maybe GoogleCloudDialogflowV2IntentMessageSelectItemInfo)-gcdvimcsiInfo-  = lens _gcdvimcsiInfo-      (\ s a -> s{_gcdvimcsiInfo = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageCarouselSelectItem-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageCarouselSelectItem"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageCarouselSelectItem'-                   <$>-                   (o .:? "image") <*> (o .:? "title") <*>-                     (o .:? "description")-                     <*> (o .:? "info"))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageCarouselSelectItem-         where-        toJSON-          GoogleCloudDialogflowV2IntentMessageCarouselSelectItem'{..}-          = object-              (catMaybes-                 [("image" .=) <$> _gcdvimcsiImage,-                  ("title" .=) <$> _gcdvimcsiTitle,-                  ("description" .=) <$> _gcdvimcsiDescription,-                  ("info" .=) <$> _gcdvimcsiInfo])---- | Events allow for matching intents by event name instead of the natural--- language input. For instance, input \`\` can trigger a personalized--- welcome response. The parameter \`name\` may be used by the agent in the--- response: \`“Hello #welcome_event.name! What can I do for you today?”\`.------ /See:/ 'googleCloudDialogflowV2EventInput' smart constructor.-data GoogleCloudDialogflowV2EventInput = GoogleCloudDialogflowV2EventInput'-    { _gcdveiLanguageCode :: !(Maybe Text)-    , _gcdveiName         :: !(Maybe Text)-    , _gcdveiParameters   :: !(Maybe GoogleCloudDialogflowV2EventInputParameters)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2EventInput' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdveiLanguageCode'------ * 'gcdveiName'------ * 'gcdveiParameters'-googleCloudDialogflowV2EventInput-    :: GoogleCloudDialogflowV2EventInput-googleCloudDialogflowV2EventInput =-    GoogleCloudDialogflowV2EventInput'-    { _gcdveiLanguageCode = Nothing-    , _gcdveiName = Nothing-    , _gcdveiParameters = Nothing-    }---- | Required. The language of this query. See [Language--- Support](https:\/\/dialogflow.com\/docs\/languages) for a list of the--- currently supported language codes. Note that queries in the same--- session do not necessarily need to specify the same language.-gcdveiLanguageCode :: Lens' GoogleCloudDialogflowV2EventInput (Maybe Text)-gcdveiLanguageCode-  = lens _gcdveiLanguageCode-      (\ s a -> s{_gcdveiLanguageCode = a})---- | Required. The unique identifier of the event.-gcdveiName :: Lens' GoogleCloudDialogflowV2EventInput (Maybe Text)-gcdveiName-  = lens _gcdveiName (\ s a -> s{_gcdveiName = a})---- | Optional. The collection of parameters associated with the event.-gcdveiParameters :: Lens' GoogleCloudDialogflowV2EventInput (Maybe GoogleCloudDialogflowV2EventInputParameters)-gcdveiParameters-  = lens _gcdveiParameters-      (\ s a -> s{_gcdveiParameters = a})--instance FromJSON GoogleCloudDialogflowV2EventInput-         where-        parseJSON-          = withObject "GoogleCloudDialogflowV2EventInput"-              (\ o ->-                 GoogleCloudDialogflowV2EventInput' <$>-                   (o .:? "languageCode") <*> (o .:? "name") <*>-                     (o .:? "parameters"))--instance ToJSON GoogleCloudDialogflowV2EventInput-         where-        toJSON GoogleCloudDialogflowV2EventInput'{..}-          = object-              (catMaybes-                 [("languageCode" .=) <$> _gcdveiLanguageCode,-                  ("name" .=) <$> _gcdveiName,-                  ("parameters" .=) <$> _gcdveiParameters])---- | The simple response message containing speech or text.------ /See:/ 'googleCloudDialogflowV2IntentMessageSimpleResponse' smart constructor.-data GoogleCloudDialogflowV2IntentMessageSimpleResponse = GoogleCloudDialogflowV2IntentMessageSimpleResponse'-    { _gcdvimsrDisplayText  :: !(Maybe Text)-    , _gcdvimsrSsml         :: !(Maybe Text)-    , _gcdvimsrTextToSpeech :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageSimpleResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimsrDisplayText'------ * 'gcdvimsrSsml'------ * 'gcdvimsrTextToSpeech'-googleCloudDialogflowV2IntentMessageSimpleResponse-    :: GoogleCloudDialogflowV2IntentMessageSimpleResponse-googleCloudDialogflowV2IntentMessageSimpleResponse =-    GoogleCloudDialogflowV2IntentMessageSimpleResponse'-    { _gcdvimsrDisplayText = Nothing-    , _gcdvimsrSsml = Nothing-    , _gcdvimsrTextToSpeech = Nothing-    }---- | Optional. The text to display.-gcdvimsrDisplayText :: Lens' GoogleCloudDialogflowV2IntentMessageSimpleResponse (Maybe Text)-gcdvimsrDisplayText-  = lens _gcdvimsrDisplayText-      (\ s a -> s{_gcdvimsrDisplayText = a})---- | One of text_to_speech or ssml must be provided. Structured spoken--- response to the user in the SSML format. Mutually exclusive with--- text_to_speech.-gcdvimsrSsml :: Lens' GoogleCloudDialogflowV2IntentMessageSimpleResponse (Maybe Text)-gcdvimsrSsml-  = lens _gcdvimsrSsml (\ s a -> s{_gcdvimsrSsml = a})---- | One of text_to_speech or ssml must be provided. The plain text of the--- speech output. Mutually exclusive with ssml.-gcdvimsrTextToSpeech :: Lens' GoogleCloudDialogflowV2IntentMessageSimpleResponse (Maybe Text)-gcdvimsrTextToSpeech-  = lens _gcdvimsrTextToSpeech-      (\ s a -> s{_gcdvimsrTextToSpeech = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageSimpleResponse-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageSimpleResponse"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageSimpleResponse'-                   <$>-                   (o .:? "displayText") <*> (o .:? "ssml") <*>-                     (o .:? "textToSpeech"))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageSimpleResponse-         where-        toJSON-          GoogleCloudDialogflowV2IntentMessageSimpleResponse'{..}-          = object-              (catMaybes-                 [("displayText" .=) <$> _gcdvimsrDisplayText,-                  ("ssml" .=) <$> _gcdvimsrSsml,-                  ("textToSpeech" .=) <$> _gcdvimsrTextToSpeech])---- | 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:/ 'googleLongrunningOperationMetadata' smart constructor.-newtype GoogleLongrunningOperationMetadata = GoogleLongrunningOperationMetadata'-    { _glomAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleLongrunningOperationMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'glomAddtional'-googleLongrunningOperationMetadata-    :: HashMap Text JSONValue -- ^ 'glomAddtional'-    -> GoogleLongrunningOperationMetadata-googleLongrunningOperationMetadata pGlomAddtional_ =-    GoogleLongrunningOperationMetadata'-    { _glomAddtional = _Coerce # pGlomAddtional_-    }---- | Properties of the object. Contains field \'type with type URL.-glomAddtional :: Lens' GoogleLongrunningOperationMetadata (HashMap Text JSONValue)-glomAddtional-  = lens _glomAddtional-      (\ s a -> s{_glomAddtional = a})-      . _Coerce--instance FromJSON GoogleLongrunningOperationMetadata-         where-        parseJSON-          = withObject "GoogleLongrunningOperationMetadata"-              (\ o ->-                 GoogleLongrunningOperationMetadata' <$>-                   (parseJSONObject o))--instance ToJSON GoogleLongrunningOperationMetadata-         where-        toJSON = toJSON . _glomAddtional---- | Represents an example or template that the agent is trained on.------ /See:/ 'googleCloudDialogflowV2IntentTrainingPhrase' smart constructor.-data GoogleCloudDialogflowV2IntentTrainingPhrase = GoogleCloudDialogflowV2IntentTrainingPhrase'-    { _gcdvitpParts           :: !(Maybe [GoogleCloudDialogflowV2IntentTrainingPhrasePart])-    , _gcdvitpName            :: !(Maybe Text)-    , _gcdvitpTimesAddedCount :: !(Maybe (Textual Int32))-    , _gcdvitpType            :: !(Maybe GoogleCloudDialogflowV2IntentTrainingPhraseType)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentTrainingPhrase' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvitpParts'------ * 'gcdvitpName'------ * 'gcdvitpTimesAddedCount'------ * 'gcdvitpType'-googleCloudDialogflowV2IntentTrainingPhrase-    :: GoogleCloudDialogflowV2IntentTrainingPhrase-googleCloudDialogflowV2IntentTrainingPhrase =-    GoogleCloudDialogflowV2IntentTrainingPhrase'-    { _gcdvitpParts = Nothing-    , _gcdvitpName = Nothing-    , _gcdvitpTimesAddedCount = Nothing-    , _gcdvitpType = Nothing-    }---- | Required. The collection of training phrase parts (can be annotated).--- Fields: \`entity_type\`, \`alias\` and \`user_defined\` should be--- populated only for the annotated parts of the training phrase.-gcdvitpParts :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrase [GoogleCloudDialogflowV2IntentTrainingPhrasePart]-gcdvitpParts-  = lens _gcdvitpParts (\ s a -> s{_gcdvitpParts = a})-      . _Default-      . _Coerce---- | Output only. The unique identifier of this training phrase.-gcdvitpName :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrase (Maybe Text)-gcdvitpName-  = lens _gcdvitpName (\ s a -> s{_gcdvitpName = a})---- | Optional. Indicates how many times this example or template was added to--- the intent. Each time a developer adds an existing sample by editing an--- intent or training, this counter is increased.-gcdvitpTimesAddedCount :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrase (Maybe Int32)-gcdvitpTimesAddedCount-  = lens _gcdvitpTimesAddedCount-      (\ s a -> s{_gcdvitpTimesAddedCount = a})-      . mapping _Coerce---- | Required. The type of the training phrase.-gcdvitpType :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrase (Maybe GoogleCloudDialogflowV2IntentTrainingPhraseType)-gcdvitpType-  = lens _gcdvitpType (\ s a -> s{_gcdvitpType = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentTrainingPhrase where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentTrainingPhrase"-              (\ o ->-                 GoogleCloudDialogflowV2IntentTrainingPhrase' <$>-                   (o .:? "parts" .!= mempty) <*> (o .:? "name") <*>-                     (o .:? "timesAddedCount")-                     <*> (o .:? "type"))--instance ToJSON-         GoogleCloudDialogflowV2IntentTrainingPhrase where-        toJSON-          GoogleCloudDialogflowV2IntentTrainingPhrase'{..}-          = object-              (catMaybes-                 [("parts" .=) <$> _gcdvitpParts,-                  ("name" .=) <$> _gcdvitpName,-                  ("timesAddedCount" .=) <$> _gcdvitpTimesAddedCount,-                  ("type" .=) <$> _gcdvitpType])---- | An item in the carousel.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageCarouselSelectItem' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem = GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem'-    { _gImage       :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)-    , _gTitle       :: !(Maybe Text)-    , _gDescription :: !(Maybe Text)-    , _gInfo        :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gImage'------ * 'gTitle'------ * 'gDescription'------ * 'gInfo'-googleCloudDialogflowV2beta1IntentMessageCarouselSelectItem-    :: GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem-googleCloudDialogflowV2beta1IntentMessageCarouselSelectItem =-    GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem'-    { _gImage = Nothing-    , _gTitle = Nothing-    , _gDescription = Nothing-    , _gInfo = Nothing-    }---- | Optional. The image to display.-gImage :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem (Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)-gImage = lens _gImage (\ s a -> s{_gImage = a})---- | Required. Title of the carousel item.-gTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem (Maybe Text)-gTitle = lens _gTitle (\ s a -> s{_gTitle = a})---- | Optional. The body text of the card.-gDescription :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem (Maybe Text)-gDescription-  = lens _gDescription (\ s a -> s{_gDescription = a})---- | Required. Additional info about the option item.-gInfo :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem (Maybe GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo)-gInfo = lens _gInfo (\ s a -> s{_gInfo = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem'-                   <$>-                   (o .:? "image") <*> (o .:? "title") <*>-                     (o .:? "description")-                     <*> (o .:? "info"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem'{..}-          = object-              (catMaybes-                 [("image" .=) <$> _gImage, ("title" .=) <$> _gTitle,-                  ("description" .=) <$> _gDescription,-                  ("info" .=) <$> _gInfo])---- | The basic card message. Useful for displaying information.------ /See:/ 'googleCloudDialogflowV2IntentMessageBasicCard' smart constructor.-data GoogleCloudDialogflowV2IntentMessageBasicCard = GoogleCloudDialogflowV2IntentMessageBasicCard'-    { _gcdvimbcImage         :: !(Maybe GoogleCloudDialogflowV2IntentMessageImage)-    , _gcdvimbcButtons       :: !(Maybe [GoogleCloudDialogflowV2IntentMessageBasicCardButton])-    , _gcdvimbcSubtitle      :: !(Maybe Text)-    , _gcdvimbcTitle         :: !(Maybe Text)-    , _gcdvimbcFormattedText :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageBasicCard' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimbcImage'------ * 'gcdvimbcButtons'------ * 'gcdvimbcSubtitle'------ * 'gcdvimbcTitle'------ * 'gcdvimbcFormattedText'-googleCloudDialogflowV2IntentMessageBasicCard-    :: GoogleCloudDialogflowV2IntentMessageBasicCard-googleCloudDialogflowV2IntentMessageBasicCard =-    GoogleCloudDialogflowV2IntentMessageBasicCard'-    { _gcdvimbcImage = Nothing-    , _gcdvimbcButtons = Nothing-    , _gcdvimbcSubtitle = Nothing-    , _gcdvimbcTitle = Nothing-    , _gcdvimbcFormattedText = Nothing-    }---- | Optional. The image for the card.-gcdvimbcImage :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCard (Maybe GoogleCloudDialogflowV2IntentMessageImage)-gcdvimbcImage-  = lens _gcdvimbcImage-      (\ s a -> s{_gcdvimbcImage = a})---- | Optional. The collection of card buttons.-gcdvimbcButtons :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCard [GoogleCloudDialogflowV2IntentMessageBasicCardButton]-gcdvimbcButtons-  = lens _gcdvimbcButtons-      (\ s a -> s{_gcdvimbcButtons = a})-      . _Default-      . _Coerce---- | Optional. The subtitle of the card.-gcdvimbcSubtitle :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCard (Maybe Text)-gcdvimbcSubtitle-  = lens _gcdvimbcSubtitle-      (\ s a -> s{_gcdvimbcSubtitle = a})---- | Optional. The title of the card.-gcdvimbcTitle :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCard (Maybe Text)-gcdvimbcTitle-  = lens _gcdvimbcTitle-      (\ s a -> s{_gcdvimbcTitle = a})---- | Required, unless image is present. The body text of the card.-gcdvimbcFormattedText :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCard (Maybe Text)-gcdvimbcFormattedText-  = lens _gcdvimbcFormattedText-      (\ s a -> s{_gcdvimbcFormattedText = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageBasicCard where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageBasicCard"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageBasicCard' <$>-                   (o .:? "image") <*> (o .:? "buttons" .!= mempty) <*>-                     (o .:? "subtitle")-                     <*> (o .:? "title")-                     <*> (o .:? "formattedText"))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageBasicCard where-        toJSON-          GoogleCloudDialogflowV2IntentMessageBasicCard'{..}-          = object-              (catMaybes-                 [("image" .=) <$> _gcdvimbcImage,-                  ("buttons" .=) <$> _gcdvimbcButtons,-                  ("subtitle" .=) <$> _gcdvimbcSubtitle,-                  ("title" .=) <$> _gcdvimbcTitle,-                  ("formattedText" .=) <$> _gcdvimbcFormattedText])---- | The simple response message containing speech or text.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageSimpleResponse' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse = GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse'-    { _gDisplayText  :: !(Maybe Text)-    , _gSsml         :: !(Maybe Text)-    , _gTextToSpeech :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gDisplayText'------ * 'gSsml'------ * 'gTextToSpeech'-googleCloudDialogflowV2beta1IntentMessageSimpleResponse-    :: GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse-googleCloudDialogflowV2beta1IntentMessageSimpleResponse =-    GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse'-    { _gDisplayText = Nothing-    , _gSsml = Nothing-    , _gTextToSpeech = Nothing-    }---- | Optional. The text to display.-gDisplayText :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse (Maybe Text)-gDisplayText-  = lens _gDisplayText (\ s a -> s{_gDisplayText = a})---- | One of text_to_speech or ssml must be provided. Structured spoken--- response to the user in the SSML format. Mutually exclusive with--- text_to_speech.-gSsml :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse (Maybe Text)-gSsml = lens _gSsml (\ s a -> s{_gSsml = a})---- | One of text_to_speech or ssml must be provided. The plain text of the--- speech output. Mutually exclusive with ssml.-gTextToSpeech :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse (Maybe Text)-gTextToSpeech-  = lens _gTextToSpeech-      (\ s a -> s{_gTextToSpeech = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse'-                   <$>-                   (o .:? "displayText") <*> (o .:? "ssml") <*>-                     (o .:? "textToSpeech"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse'{..}-          = object-              (catMaybes-                 [("displayText" .=) <$> _gDisplayText,-                  ("ssml" .=) <$> _gSsml,-                  ("textToSpeech" .=) <$> _gTextToSpeech])---- | Represents an intent. Intents convert a number of user expressions or--- patterns into an action. An action is an extraction of a user command or--- sentence semantics.------ /See:/ 'googleCloudDialogflowV2Intent' smart constructor.-data GoogleCloudDialogflowV2Intent = GoogleCloudDialogflowV2Intent'-    { _gcdviDefaultResponsePlatforms :: !(Maybe [Text])-    , _gcdviWebhookState             :: !(Maybe GoogleCloudDialogflowV2IntentWebhookState)-    , _gcdviPriority                 :: !(Maybe (Textual Int32))-    , _gcdviAction                   :: !(Maybe Text)-    , _gcdviRootFollowupIntentName   :: !(Maybe Text)-    , _gcdviName                     :: !(Maybe Text)-    , _gcdviEvents                   :: !(Maybe [Text])-    , _gcdviParameters               :: !(Maybe [GoogleCloudDialogflowV2IntentParameter])-    , _gcdviDisplayName              :: !(Maybe Text)-    , _gcdviInputContextNames        :: !(Maybe [Text])-    , _gcdviMessages                 :: !(Maybe [GoogleCloudDialogflowV2IntentMessage])-    , _gcdviParentFollowupIntentName :: !(Maybe Text)-    , _gcdviOutputContexts           :: !(Maybe [GoogleCloudDialogflowV2Context])-    , _gcdviTrainingPhrases          :: !(Maybe [GoogleCloudDialogflowV2IntentTrainingPhrase])-    , _gcdviFollowupIntentInfo       :: !(Maybe [GoogleCloudDialogflowV2IntentFollowupIntentInfo])-    , _gcdviIsFallback               :: !(Maybe Bool)-    , _gcdviMlDisabled               :: !(Maybe Bool)-    , _gcdviResetContexts            :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2Intent' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdviDefaultResponsePlatforms'------ * 'gcdviWebhookState'------ * 'gcdviPriority'------ * 'gcdviAction'------ * 'gcdviRootFollowupIntentName'------ * 'gcdviName'------ * 'gcdviEvents'------ * 'gcdviParameters'------ * 'gcdviDisplayName'------ * 'gcdviInputContextNames'------ * 'gcdviMessages'------ * 'gcdviParentFollowupIntentName'------ * 'gcdviOutputContexts'------ * 'gcdviTrainingPhrases'------ * 'gcdviFollowupIntentInfo'------ * 'gcdviIsFallback'------ * 'gcdviMlDisabled'------ * 'gcdviResetContexts'-googleCloudDialogflowV2Intent-    :: GoogleCloudDialogflowV2Intent-googleCloudDialogflowV2Intent =-    GoogleCloudDialogflowV2Intent'-    { _gcdviDefaultResponsePlatforms = Nothing-    , _gcdviWebhookState = Nothing-    , _gcdviPriority = Nothing-    , _gcdviAction = Nothing-    , _gcdviRootFollowupIntentName = Nothing-    , _gcdviName = Nothing-    , _gcdviEvents = Nothing-    , _gcdviParameters = Nothing-    , _gcdviDisplayName = Nothing-    , _gcdviInputContextNames = Nothing-    , _gcdviMessages = Nothing-    , _gcdviParentFollowupIntentName = Nothing-    , _gcdviOutputContexts = Nothing-    , _gcdviTrainingPhrases = Nothing-    , _gcdviFollowupIntentInfo = Nothing-    , _gcdviIsFallback = Nothing-    , _gcdviMlDisabled = Nothing-    , _gcdviResetContexts = Nothing-    }---- | Optional. The list of platforms for which the first response will be--- taken from among the messages assigned to the DEFAULT_PLATFORM.-gcdviDefaultResponsePlatforms :: Lens' GoogleCloudDialogflowV2Intent [Text]-gcdviDefaultResponsePlatforms-  = lens _gcdviDefaultResponsePlatforms-      (\ s a -> s{_gcdviDefaultResponsePlatforms = a})-      . _Default-      . _Coerce---- | Optional. Indicates whether webhooks are enabled for the intent.-gcdviWebhookState :: Lens' GoogleCloudDialogflowV2Intent (Maybe GoogleCloudDialogflowV2IntentWebhookState)-gcdviWebhookState-  = lens _gcdviWebhookState-      (\ s a -> s{_gcdviWebhookState = a})---- | Optional. The priority of this intent. Higher numbers represent higher--- priorities. If this is zero or unspecified, we use the default priority--- 500000. Negative numbers mean that the intent is disabled.-gcdviPriority :: Lens' GoogleCloudDialogflowV2Intent (Maybe Int32)-gcdviPriority-  = lens _gcdviPriority-      (\ s a -> s{_gcdviPriority = a})-      . mapping _Coerce---- | Optional. The name of the action associated with the intent. Note: The--- action name must not contain whitespaces.-gcdviAction :: Lens' GoogleCloudDialogflowV2Intent (Maybe Text)-gcdviAction-  = lens _gcdviAction (\ s a -> s{_gcdviAction = a})---- | Read-only. The unique identifier of the root intent in the chain of--- followup intents. It identifies the correct followup intents chain for--- this intent. We populate this field only in the output. Format:--- \`projects\/\/agent\/intents\/\`.-gcdviRootFollowupIntentName :: Lens' GoogleCloudDialogflowV2Intent (Maybe Text)-gcdviRootFollowupIntentName-  = lens _gcdviRootFollowupIntentName-      (\ s a -> s{_gcdviRootFollowupIntentName = a})---- | Required for all methods except \`create\` (\`create\` populates the--- name automatically. The unique identifier of this intent. Format:--- \`projects\/\/agent\/intents\/\`.-gcdviName :: Lens' GoogleCloudDialogflowV2Intent (Maybe Text)-gcdviName-  = lens _gcdviName (\ s a -> s{_gcdviName = a})---- | Optional. The collection of event names that trigger the intent. If the--- collection of input contexts is not empty, all of the contexts must be--- present in the active user session for an event to trigger this intent.-gcdviEvents :: Lens' GoogleCloudDialogflowV2Intent [Text]-gcdviEvents-  = lens _gcdviEvents (\ s a -> s{_gcdviEvents = a}) .-      _Default-      . _Coerce---- | Optional. The collection of parameters associated with the intent.-gcdviParameters :: Lens' GoogleCloudDialogflowV2Intent [GoogleCloudDialogflowV2IntentParameter]-gcdviParameters-  = lens _gcdviParameters-      (\ s a -> s{_gcdviParameters = a})-      . _Default-      . _Coerce---- | Required. The name of this intent.-gcdviDisplayName :: Lens' GoogleCloudDialogflowV2Intent (Maybe Text)-gcdviDisplayName-  = lens _gcdviDisplayName-      (\ s a -> s{_gcdviDisplayName = a})---- | Optional. The list of context names required for this intent to be--- triggered. Format: \`projects\/\/agent\/sessions\/-\/contexts\/\`.-gcdviInputContextNames :: Lens' GoogleCloudDialogflowV2Intent [Text]-gcdviInputContextNames-  = lens _gcdviInputContextNames-      (\ s a -> s{_gcdviInputContextNames = a})-      . _Default-      . _Coerce---- | Optional. The collection of rich messages corresponding to the--- \`Response\` field in the Dialogflow console.-gcdviMessages :: Lens' GoogleCloudDialogflowV2Intent [GoogleCloudDialogflowV2IntentMessage]-gcdviMessages-  = lens _gcdviMessages-      (\ s a -> s{_gcdviMessages = a})-      . _Default-      . _Coerce---- | Read-only after creation. The unique identifier of the parent intent in--- the chain of followup intents. You can set this field when creating an--- intent, for example with CreateIntent or BatchUpdateIntents, in order to--- make this intent a followup intent. It identifies the parent followup--- intent. Format: \`projects\/\/agent\/intents\/\`.-gcdviParentFollowupIntentName :: Lens' GoogleCloudDialogflowV2Intent (Maybe Text)-gcdviParentFollowupIntentName-  = lens _gcdviParentFollowupIntentName-      (\ s a -> s{_gcdviParentFollowupIntentName = a})---- | Optional. The collection of contexts that are activated when the intent--- is matched. Context messages in this collection should not set the--- parameters field. Setting the \`lifespan_count\` to 0 will reset the--- context when the intent is matched. Format:--- \`projects\/\/agent\/sessions\/-\/contexts\/\`.-gcdviOutputContexts :: Lens' GoogleCloudDialogflowV2Intent [GoogleCloudDialogflowV2Context]-gcdviOutputContexts-  = lens _gcdviOutputContexts-      (\ s a -> s{_gcdviOutputContexts = a})-      . _Default-      . _Coerce---- | Optional. The collection of examples\/templates that the agent is--- trained on.-gcdviTrainingPhrases :: Lens' GoogleCloudDialogflowV2Intent [GoogleCloudDialogflowV2IntentTrainingPhrase]-gcdviTrainingPhrases-  = lens _gcdviTrainingPhrases-      (\ s a -> s{_gcdviTrainingPhrases = a})-      . _Default-      . _Coerce---- | Read-only. Information about all followup intents that have this intent--- as a direct or indirect parent. We populate this field only in the--- output.-gcdviFollowupIntentInfo :: Lens' GoogleCloudDialogflowV2Intent [GoogleCloudDialogflowV2IntentFollowupIntentInfo]-gcdviFollowupIntentInfo-  = lens _gcdviFollowupIntentInfo-      (\ s a -> s{_gcdviFollowupIntentInfo = a})-      . _Default-      . _Coerce---- | Optional. Indicates whether this is a fallback intent.-gcdviIsFallback :: Lens' GoogleCloudDialogflowV2Intent (Maybe Bool)-gcdviIsFallback-  = lens _gcdviIsFallback-      (\ s a -> s{_gcdviIsFallback = a})---- | Optional. Indicates whether Machine Learning is disabled for the intent.--- Note: If \`ml_diabled\` setting is set to true, then this intent is not--- taken into account during inference in \`ML ONLY\` match mode. Also,--- auto-markup in the UI is turned off.-gcdviMlDisabled :: Lens' GoogleCloudDialogflowV2Intent (Maybe Bool)-gcdviMlDisabled-  = lens _gcdviMlDisabled-      (\ s a -> s{_gcdviMlDisabled = a})---- | Optional. Indicates whether to delete all contexts in the current--- session when this intent is matched.-gcdviResetContexts :: Lens' GoogleCloudDialogflowV2Intent (Maybe Bool)-gcdviResetContexts-  = lens _gcdviResetContexts-      (\ s a -> s{_gcdviResetContexts = a})--instance FromJSON GoogleCloudDialogflowV2Intent where-        parseJSON-          = withObject "GoogleCloudDialogflowV2Intent"-              (\ o ->-                 GoogleCloudDialogflowV2Intent' <$>-                   (o .:? "defaultResponsePlatforms" .!= mempty) <*>-                     (o .:? "webhookState")-                     <*> (o .:? "priority")-                     <*> (o .:? "action")-                     <*> (o .:? "rootFollowupIntentName")-                     <*> (o .:? "name")-                     <*> (o .:? "events" .!= mempty)-                     <*> (o .:? "parameters" .!= mempty)-                     <*> (o .:? "displayName")-                     <*> (o .:? "inputContextNames" .!= mempty)-                     <*> (o .:? "messages" .!= mempty)-                     <*> (o .:? "parentFollowupIntentName")-                     <*> (o .:? "outputContexts" .!= mempty)-                     <*> (o .:? "trainingPhrases" .!= mempty)-                     <*> (o .:? "followupIntentInfo" .!= mempty)-                     <*> (o .:? "isFallback")-                     <*> (o .:? "mlDisabled")-                     <*> (o .:? "resetContexts"))--instance ToJSON GoogleCloudDialogflowV2Intent where-        toJSON GoogleCloudDialogflowV2Intent'{..}-          = object-              (catMaybes-                 [("defaultResponsePlatforms" .=) <$>-                    _gcdviDefaultResponsePlatforms,-                  ("webhookState" .=) <$> _gcdviWebhookState,-                  ("priority" .=) <$> _gcdviPriority,-                  ("action" .=) <$> _gcdviAction,-                  ("rootFollowupIntentName" .=) <$>-                    _gcdviRootFollowupIntentName,-                  ("name" .=) <$> _gcdviName,-                  ("events" .=) <$> _gcdviEvents,-                  ("parameters" .=) <$> _gcdviParameters,-                  ("displayName" .=) <$> _gcdviDisplayName,-                  ("inputContextNames" .=) <$> _gcdviInputContextNames,-                  ("messages" .=) <$> _gcdviMessages,-                  ("parentFollowupIntentName" .=) <$>-                    _gcdviParentFollowupIntentName,-                  ("outputContexts" .=) <$> _gcdviOutputContexts,-                  ("trainingPhrases" .=) <$> _gcdviTrainingPhrases,-                  ("followupIntentInfo" .=) <$>-                    _gcdviFollowupIntentInfo,-                  ("isFallback" .=) <$> _gcdviIsFallback,-                  ("mlDisabled" .=) <$> _gcdviMlDisabled,-                  ("resetContexts" .=) <$> _gcdviResetContexts])---- | The button object that appears at the bottom of a card.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageBasicCardButton' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton = GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton'-    { _gcdvimbcbOpenURIAction :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction)-    , _gcdvimbcbTitle         :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimbcbOpenURIAction'------ * 'gcdvimbcbTitle'-googleCloudDialogflowV2beta1IntentMessageBasicCardButton-    :: GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton-googleCloudDialogflowV2beta1IntentMessageBasicCardButton =-    GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton'-    { _gcdvimbcbOpenURIAction = Nothing-    , _gcdvimbcbTitle = Nothing-    }---- | Required. Action to take when a user taps on the button.-gcdvimbcbOpenURIAction :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton (Maybe GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction)-gcdvimbcbOpenURIAction-  = lens _gcdvimbcbOpenURIAction-      (\ s a -> s{_gcdvimbcbOpenURIAction = a})---- | Required. The title of the button.-gcdvimbcbTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton (Maybe Text)-gcdvimbcbTitle-  = lens _gcdvimbcbTitle-      (\ s a -> s{_gcdvimbcbTitle = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton'-                   <$> (o .:? "openUriAction") <*> (o .:? "title"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton'{..}-          = object-              (catMaybes-                 [("openUriAction" .=) <$> _gcdvimbcbOpenURIAction,-                  ("title" .=) <$> _gcdvimbcbTitle])---- | The request message for EntityTypes.BatchCreateEntities.------ /See:/ 'googleCloudDialogflowV2BatchCreateEntitiesRequest' smart constructor.-data GoogleCloudDialogflowV2BatchCreateEntitiesRequest = GoogleCloudDialogflowV2BatchCreateEntitiesRequest'-    { _gcdvbcerLanguageCode :: !(Maybe Text)-    , _gcdvbcerEntities     :: !(Maybe [GoogleCloudDialogflowV2EntityTypeEntity])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2BatchCreateEntitiesRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvbcerLanguageCode'------ * 'gcdvbcerEntities'-googleCloudDialogflowV2BatchCreateEntitiesRequest-    :: GoogleCloudDialogflowV2BatchCreateEntitiesRequest-googleCloudDialogflowV2BatchCreateEntitiesRequest =-    GoogleCloudDialogflowV2BatchCreateEntitiesRequest'-    { _gcdvbcerLanguageCode = Nothing-    , _gcdvbcerEntities = Nothing-    }---- | Optional. The language of entity synonyms defined in \`entities\`. If--- not specified, the agent\'s default language is used. [More than a dozen--- languages](https:\/\/dialogflow.com\/docs\/reference\/language) are--- supported. Note: languages must be enabled in the agent, before they can--- be used.-gcdvbcerLanguageCode :: Lens' GoogleCloudDialogflowV2BatchCreateEntitiesRequest (Maybe Text)-gcdvbcerLanguageCode-  = lens _gcdvbcerLanguageCode-      (\ s a -> s{_gcdvbcerLanguageCode = a})---- | Required. The entities to create.-gcdvbcerEntities :: Lens' GoogleCloudDialogflowV2BatchCreateEntitiesRequest [GoogleCloudDialogflowV2EntityTypeEntity]-gcdvbcerEntities-  = lens _gcdvbcerEntities-      (\ s a -> s{_gcdvbcerEntities = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2BatchCreateEntitiesRequest-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2BatchCreateEntitiesRequest"-              (\ o ->-                 GoogleCloudDialogflowV2BatchCreateEntitiesRequest'-                   <$>-                   (o .:? "languageCode") <*>-                     (o .:? "entities" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2BatchCreateEntitiesRequest-         where-        toJSON-          GoogleCloudDialogflowV2BatchCreateEntitiesRequest'{..}-          = object-              (catMaybes-                 [("languageCode" .=) <$> _gcdvbcerLanguageCode,-                  ("entities" .=) <$> _gcdvbcerEntities])---- | The collection of suggestions.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageSuggestions' smart constructor.-newtype GoogleCloudDialogflowV2beta1IntentMessageSuggestions = GoogleCloudDialogflowV2beta1IntentMessageSuggestions'-    { _gcdvimsSuggestions :: Maybe [GoogleCloudDialogflowV2beta1IntentMessageSuggestion]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageSuggestions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimsSuggestions'-googleCloudDialogflowV2beta1IntentMessageSuggestions-    :: GoogleCloudDialogflowV2beta1IntentMessageSuggestions-googleCloudDialogflowV2beta1IntentMessageSuggestions =-    GoogleCloudDialogflowV2beta1IntentMessageSuggestions'-    { _gcdvimsSuggestions = Nothing-    }---- | Required. The list of suggested replies.-gcdvimsSuggestions :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSuggestions [GoogleCloudDialogflowV2beta1IntentMessageSuggestion]-gcdvimsSuggestions-  = lens _gcdvimsSuggestions-      (\ s a -> s{_gcdvimsSuggestions = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageSuggestions-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageSuggestions"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageSuggestions'-                   <$> (o .:? "suggestions" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageSuggestions-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageSuggestions'{..}-          = object-              (catMaybes-                 [("suggestions" .=) <$> _gcdvimsSuggestions])---- | The request message for Intents.BatchDeleteIntents.------ /See:/ 'googleCloudDialogflowV2BatchDeleteIntentsRequest' smart constructor.-newtype GoogleCloudDialogflowV2BatchDeleteIntentsRequest = GoogleCloudDialogflowV2BatchDeleteIntentsRequest'-    { _gcdvbdirIntents :: Maybe [GoogleCloudDialogflowV2Intent]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2BatchDeleteIntentsRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvbdirIntents'-googleCloudDialogflowV2BatchDeleteIntentsRequest-    :: GoogleCloudDialogflowV2BatchDeleteIntentsRequest-googleCloudDialogflowV2BatchDeleteIntentsRequest =-    GoogleCloudDialogflowV2BatchDeleteIntentsRequest'-    { _gcdvbdirIntents = Nothing-    }---- | Required. The collection of intents to delete. Only intent \`name\` must--- be filled in.-gcdvbdirIntents :: Lens' GoogleCloudDialogflowV2BatchDeleteIntentsRequest [GoogleCloudDialogflowV2Intent]-gcdvbdirIntents-  = lens _gcdvbdirIntents-      (\ s a -> s{_gcdvbdirIntents = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2BatchDeleteIntentsRequest-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2BatchDeleteIntentsRequest"-              (\ o ->-                 GoogleCloudDialogflowV2BatchDeleteIntentsRequest' <$>-                   (o .:? "intents" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2BatchDeleteIntentsRequest-         where-        toJSON-          GoogleCloudDialogflowV2BatchDeleteIntentsRequest'{..}-          = object-              (catMaybes [("intents" .=) <$> _gcdvbdirIntents])---- | Represents the result of conversational query or event processing.------ /See:/ 'googleCloudDialogflowV2QueryResult' smart constructor.-data GoogleCloudDialogflowV2QueryResult = GoogleCloudDialogflowV2QueryResult'-    { _gcdvqrLanguageCode                :: !(Maybe Text)-    , _gcdvqrAllRequiredParamsPresent    :: !(Maybe Bool)-    , _gcdvqrIntentDetectionConfidence   :: !(Maybe (Textual Double))-    , _gcdvqrFulfillmentMessages         :: !(Maybe [GoogleCloudDialogflowV2IntentMessage])-    , _gcdvqrSpeechRecognitionConfidence :: !(Maybe (Textual Double))-    , _gcdvqrAction                      :: !(Maybe Text)-    , _gcdvqrIntent                      :: !(Maybe GoogleCloudDialogflowV2Intent)-    , _gcdvqrQueryText                   :: !(Maybe Text)-    , _gcdvqrFulfillmentText             :: !(Maybe Text)-    , _gcdvqrParameters                  :: !(Maybe GoogleCloudDialogflowV2QueryResultParameters)-    , _gcdvqrWebhookPayload              :: !(Maybe GoogleCloudDialogflowV2QueryResultWebhookPayload)-    , _gcdvqrOutputContexts              :: !(Maybe [GoogleCloudDialogflowV2Context])-    , _gcdvqrWebhookSource               :: !(Maybe Text)-    , _gcdvqrDiagnosticInfo              :: !(Maybe GoogleCloudDialogflowV2QueryResultDiagnosticInfo)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2QueryResult' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvqrLanguageCode'------ * 'gcdvqrAllRequiredParamsPresent'------ * 'gcdvqrIntentDetectionConfidence'------ * 'gcdvqrFulfillmentMessages'------ * 'gcdvqrSpeechRecognitionConfidence'------ * 'gcdvqrAction'------ * 'gcdvqrIntent'------ * 'gcdvqrQueryText'------ * 'gcdvqrFulfillmentText'------ * 'gcdvqrParameters'------ * 'gcdvqrWebhookPayload'------ * 'gcdvqrOutputContexts'------ * 'gcdvqrWebhookSource'------ * 'gcdvqrDiagnosticInfo'-googleCloudDialogflowV2QueryResult-    :: GoogleCloudDialogflowV2QueryResult-googleCloudDialogflowV2QueryResult =-    GoogleCloudDialogflowV2QueryResult'-    { _gcdvqrLanguageCode = Nothing-    , _gcdvqrAllRequiredParamsPresent = Nothing-    , _gcdvqrIntentDetectionConfidence = Nothing-    , _gcdvqrFulfillmentMessages = Nothing-    , _gcdvqrSpeechRecognitionConfidence = Nothing-    , _gcdvqrAction = Nothing-    , _gcdvqrIntent = Nothing-    , _gcdvqrQueryText = Nothing-    , _gcdvqrFulfillmentText = Nothing-    , _gcdvqrParameters = Nothing-    , _gcdvqrWebhookPayload = Nothing-    , _gcdvqrOutputContexts = Nothing-    , _gcdvqrWebhookSource = Nothing-    , _gcdvqrDiagnosticInfo = Nothing-    }---- | The language that was triggered during intent detection. See [Language--- Support](https:\/\/dialogflow.com\/docs\/reference\/language) for a list--- of the currently supported language codes.-gcdvqrLanguageCode :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Text)-gcdvqrLanguageCode-  = lens _gcdvqrLanguageCode-      (\ s a -> s{_gcdvqrLanguageCode = a})---- | This field is set to: - \`false\` if the matched intent has required--- parameters and not all of the required parameter values have been--- collected. - \`true\` if all required parameter values have been--- collected, or if the matched intent doesn\'t contain any required--- parameters.-gcdvqrAllRequiredParamsPresent :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Bool)-gcdvqrAllRequiredParamsPresent-  = lens _gcdvqrAllRequiredParamsPresent-      (\ s a -> s{_gcdvqrAllRequiredParamsPresent = a})---- | The intent detection confidence. Values range from 0.0 (completely--- uncertain) to 1.0 (completely certain). If there are \`multiple--- knowledge_answers\` messages, this value is set to the greatest--- \`knowledgeAnswers.match_confidence\` value in the list.-gcdvqrIntentDetectionConfidence :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Double)-gcdvqrIntentDetectionConfidence-  = lens _gcdvqrIntentDetectionConfidence-      (\ s a -> s{_gcdvqrIntentDetectionConfidence = a})-      . mapping _Coerce---- | The collection of rich messages to present to the user.-gcdvqrFulfillmentMessages :: Lens' GoogleCloudDialogflowV2QueryResult [GoogleCloudDialogflowV2IntentMessage]-gcdvqrFulfillmentMessages-  = lens _gcdvqrFulfillmentMessages-      (\ s a -> s{_gcdvqrFulfillmentMessages = a})-      . _Default-      . _Coerce---- | The Speech recognition confidence between 0.0 and 1.0. A higher number--- indicates an estimated greater likelihood that the recognized words are--- correct. The default of 0.0 is a sentinel value indicating that--- confidence was not set. This field is not guaranteed to be accurate or--- set. In particular this field isn\'t set for StreamingDetectIntent since--- the streaming endpoint has separate confidence estimates per portion of--- the audio in StreamingRecognitionResult.-gcdvqrSpeechRecognitionConfidence :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Double)-gcdvqrSpeechRecognitionConfidence-  = lens _gcdvqrSpeechRecognitionConfidence-      (\ s a -> s{_gcdvqrSpeechRecognitionConfidence = a})-      . mapping _Coerce---- | The action name from the matched intent.-gcdvqrAction :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Text)-gcdvqrAction-  = lens _gcdvqrAction (\ s a -> s{_gcdvqrAction = a})---- | The intent that matched the conversational query. Some, not all fields--- are filled in this message, including but not limited to: \`name\`,--- \`display_name\` and \`webhook_state\`.-gcdvqrIntent :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe GoogleCloudDialogflowV2Intent)-gcdvqrIntent-  = lens _gcdvqrIntent (\ s a -> s{_gcdvqrIntent = a})---- | The original conversational query text: - If natural language text was--- provided as input, \`query_text\` contains a copy of the input. - If--- natural language speech audio was provided as input, \`query_text\`--- contains the speech recognition result. If speech recognizer produced--- multiple alternatives, a particular one is picked. - If an event was--- provided as input, \`query_text\` is not set.-gcdvqrQueryText :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Text)-gcdvqrQueryText-  = lens _gcdvqrQueryText-      (\ s a -> s{_gcdvqrQueryText = a})---- | The text to be pronounced to the user or shown on the screen.-gcdvqrFulfillmentText :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Text)-gcdvqrFulfillmentText-  = lens _gcdvqrFulfillmentText-      (\ s a -> s{_gcdvqrFulfillmentText = a})---- | The collection of extracted parameters.-gcdvqrParameters :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe GoogleCloudDialogflowV2QueryResultParameters)-gcdvqrParameters-  = lens _gcdvqrParameters-      (\ s a -> s{_gcdvqrParameters = a})---- | If the query was fulfilled by a webhook call, this field is set to the--- value of the \`payload\` field returned in the webhook response.-gcdvqrWebhookPayload :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe GoogleCloudDialogflowV2QueryResultWebhookPayload)-gcdvqrWebhookPayload-  = lens _gcdvqrWebhookPayload-      (\ s a -> s{_gcdvqrWebhookPayload = a})---- | The collection of output contexts. If applicable,--- \`output_contexts.parameters\` contains entries with name \`.original\`--- containing the original parameter values before the query.-gcdvqrOutputContexts :: Lens' GoogleCloudDialogflowV2QueryResult [GoogleCloudDialogflowV2Context]-gcdvqrOutputContexts-  = lens _gcdvqrOutputContexts-      (\ s a -> s{_gcdvqrOutputContexts = a})-      . _Default-      . _Coerce---- | If the query was fulfilled by a webhook call, this field is set to the--- value of the \`source\` field returned in the webhook response.-gcdvqrWebhookSource :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Text)-gcdvqrWebhookSource-  = lens _gcdvqrWebhookSource-      (\ s a -> s{_gcdvqrWebhookSource = a})---- | The free-form diagnostic info. For example, this field could contain--- webhook call latency. The string keys of the Struct\'s fields map can--- change without notice.-gcdvqrDiagnosticInfo :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe GoogleCloudDialogflowV2QueryResultDiagnosticInfo)-gcdvqrDiagnosticInfo-  = lens _gcdvqrDiagnosticInfo-      (\ s a -> s{_gcdvqrDiagnosticInfo = a})--instance FromJSON GoogleCloudDialogflowV2QueryResult-         where-        parseJSON-          = withObject "GoogleCloudDialogflowV2QueryResult"-              (\ o ->-                 GoogleCloudDialogflowV2QueryResult' <$>-                   (o .:? "languageCode") <*>-                     (o .:? "allRequiredParamsPresent")-                     <*> (o .:? "intentDetectionConfidence")-                     <*> (o .:? "fulfillmentMessages" .!= mempty)-                     <*> (o .:? "speechRecognitionConfidence")-                     <*> (o .:? "action")-                     <*> (o .:? "intent")-                     <*> (o .:? "queryText")-                     <*> (o .:? "fulfillmentText")-                     <*> (o .:? "parameters")-                     <*> (o .:? "webhookPayload")-                     <*> (o .:? "outputContexts" .!= mempty)-                     <*> (o .:? "webhookSource")-                     <*> (o .:? "diagnosticInfo"))--instance ToJSON GoogleCloudDialogflowV2QueryResult-         where-        toJSON GoogleCloudDialogflowV2QueryResult'{..}-          = object-              (catMaybes-                 [("languageCode" .=) <$> _gcdvqrLanguageCode,-                  ("allRequiredParamsPresent" .=) <$>-                    _gcdvqrAllRequiredParamsPresent,-                  ("intentDetectionConfidence" .=) <$>-                    _gcdvqrIntentDetectionConfidence,-                  ("fulfillmentMessages" .=) <$>-                    _gcdvqrFulfillmentMessages,-                  ("speechRecognitionConfidence" .=) <$>-                    _gcdvqrSpeechRecognitionConfidence,-                  ("action" .=) <$> _gcdvqrAction,-                  ("intent" .=) <$> _gcdvqrIntent,-                  ("queryText" .=) <$> _gcdvqrQueryText,-                  ("fulfillmentText" .=) <$> _gcdvqrFulfillmentText,-                  ("parameters" .=) <$> _gcdvqrParameters,-                  ("webhookPayload" .=) <$> _gcdvqrWebhookPayload,-                  ("outputContexts" .=) <$> _gcdvqrOutputContexts,-                  ("webhookSource" .=) <$> _gcdvqrWebhookSource,-                  ("diagnosticInfo" .=) <$> _gcdvqrDiagnosticInfo])---- | The request message for Intents.BatchUpdateIntents.------ /See:/ 'googleCloudDialogflowV2BatchUpdateIntentsRequest' smart constructor.-data GoogleCloudDialogflowV2BatchUpdateIntentsRequest = GoogleCloudDialogflowV2BatchUpdateIntentsRequest'-    { _gcdvbuirLanguageCode      :: !(Maybe Text)-    , _gcdvbuirUpdateMask        :: !(Maybe GFieldMask)-    , _gcdvbuirIntentView        :: !(Maybe GoogleCloudDialogflowV2BatchUpdateIntentsRequestIntentView)-    , _gcdvbuirIntentBatchURI    :: !(Maybe Text)-    , _gcdvbuirIntentBatchInline :: !(Maybe GoogleCloudDialogflowV2IntentBatch)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2BatchUpdateIntentsRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvbuirLanguageCode'------ * 'gcdvbuirUpdateMask'------ * 'gcdvbuirIntentView'------ * 'gcdvbuirIntentBatchURI'------ * 'gcdvbuirIntentBatchInline'-googleCloudDialogflowV2BatchUpdateIntentsRequest-    :: GoogleCloudDialogflowV2BatchUpdateIntentsRequest-googleCloudDialogflowV2BatchUpdateIntentsRequest =-    GoogleCloudDialogflowV2BatchUpdateIntentsRequest'-    { _gcdvbuirLanguageCode = Nothing-    , _gcdvbuirUpdateMask = Nothing-    , _gcdvbuirIntentView = Nothing-    , _gcdvbuirIntentBatchURI = Nothing-    , _gcdvbuirIntentBatchInline = Nothing-    }---- | Optional. The language of training phrases, parameters and rich messages--- defined in \`intents\`. If not specified, the agent\'s default language--- is used. [More than a dozen--- languages](https:\/\/dialogflow.com\/docs\/reference\/language) are--- supported. Note: languages must be enabled in the agent, before they can--- be used.-gcdvbuirLanguageCode :: Lens' GoogleCloudDialogflowV2BatchUpdateIntentsRequest (Maybe Text)-gcdvbuirLanguageCode-  = lens _gcdvbuirLanguageCode-      (\ s a -> s{_gcdvbuirLanguageCode = a})---- | Optional. The mask to control which fields get updated.-gcdvbuirUpdateMask :: Lens' GoogleCloudDialogflowV2BatchUpdateIntentsRequest (Maybe GFieldMask)-gcdvbuirUpdateMask-  = lens _gcdvbuirUpdateMask-      (\ s a -> s{_gcdvbuirUpdateMask = a})---- | Optional. The resource view to apply to the returned intent.-gcdvbuirIntentView :: Lens' GoogleCloudDialogflowV2BatchUpdateIntentsRequest (Maybe GoogleCloudDialogflowV2BatchUpdateIntentsRequestIntentView)-gcdvbuirIntentView-  = lens _gcdvbuirIntentView-      (\ s a -> s{_gcdvbuirIntentView = a})---- | The URI to a Google Cloud Storage file containing intents to update or--- create. The file format can either be a serialized proto (of IntentBatch--- type) or JSON object. Note: The URI must start with \"gs:\/\/\".-gcdvbuirIntentBatchURI :: Lens' GoogleCloudDialogflowV2BatchUpdateIntentsRequest (Maybe Text)-gcdvbuirIntentBatchURI-  = lens _gcdvbuirIntentBatchURI-      (\ s a -> s{_gcdvbuirIntentBatchURI = a})---- | The collection of intents to update or create.-gcdvbuirIntentBatchInline :: Lens' GoogleCloudDialogflowV2BatchUpdateIntentsRequest (Maybe GoogleCloudDialogflowV2IntentBatch)-gcdvbuirIntentBatchInline-  = lens _gcdvbuirIntentBatchInline-      (\ s a -> s{_gcdvbuirIntentBatchInline = a})--instance FromJSON-         GoogleCloudDialogflowV2BatchUpdateIntentsRequest-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2BatchUpdateIntentsRequest"-              (\ o ->-                 GoogleCloudDialogflowV2BatchUpdateIntentsRequest' <$>-                   (o .:? "languageCode") <*> (o .:? "updateMask") <*>-                     (o .:? "intentView")-                     <*> (o .:? "intentBatchUri")-                     <*> (o .:? "intentBatchInline"))--instance ToJSON-         GoogleCloudDialogflowV2BatchUpdateIntentsRequest-         where-        toJSON-          GoogleCloudDialogflowV2BatchUpdateIntentsRequest'{..}-          = object-              (catMaybes-                 [("languageCode" .=) <$> _gcdvbuirLanguageCode,-                  ("updateMask" .=) <$> _gcdvbuirUpdateMask,-                  ("intentView" .=) <$> _gcdvbuirIntentView,-                  ("intentBatchUri" .=) <$> _gcdvbuirIntentBatchURI,-                  ("intentBatchInline" .=) <$>-                    _gcdvbuirIntentBatchInline])---- | An object representing a latitude\/longitude pair. This is expressed as--- a pair of doubles representing degrees latitude and degrees longitude.--- Unless specified otherwise, this must conform to the--- <http://www.unoosa.org/pdf/icg/2012/template/WGS_84.pdf WGS84 standard>.--- Values must be within normalized ranges.------ /See:/ 'googleTypeLatLng' smart constructor.-data GoogleTypeLatLng = GoogleTypeLatLng'-    { _gtllLatitude  :: !(Maybe (Textual Double))-    , _gtllLongitude :: !(Maybe (Textual Double))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleTypeLatLng' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gtllLatitude'------ * 'gtllLongitude'-googleTypeLatLng-    :: GoogleTypeLatLng-googleTypeLatLng =-    GoogleTypeLatLng'-    { _gtllLatitude = Nothing-    , _gtllLongitude = Nothing-    }---- | The latitude in degrees. It must be in the range [-90.0, +90.0].-gtllLatitude :: Lens' GoogleTypeLatLng (Maybe Double)-gtllLatitude-  = lens _gtllLatitude (\ s a -> s{_gtllLatitude = a})-      . mapping _Coerce---- | The longitude in degrees. It must be in the range [-180.0, +180.0].-gtllLongitude :: Lens' GoogleTypeLatLng (Maybe Double)-gtllLongitude-  = lens _gtllLongitude-      (\ s a -> s{_gtllLongitude = a})-      . mapping _Coerce--instance FromJSON GoogleTypeLatLng where-        parseJSON-          = withObject "GoogleTypeLatLng"-              (\ o ->-                 GoogleTypeLatLng' <$>-                   (o .:? "latitude") <*> (o .:? "longitude"))--instance ToJSON GoogleTypeLatLng where-        toJSON GoogleTypeLatLng'{..}-          = object-              (catMaybes-                 [("latitude" .=) <$> _gtllLatitude,-                  ("longitude" .=) <$> _gtllLongitude])---- | The response message for a webhook call.------ /See:/ 'googleCloudDialogflowV2beta1WebhookResponse' smart constructor.-data GoogleCloudDialogflowV2beta1WebhookResponse = GoogleCloudDialogflowV2beta1WebhookResponse'-    { _gcdvwrFulfillmentMessages :: !(Maybe [GoogleCloudDialogflowV2beta1IntentMessage])-    , _gcdvwrPayload             :: !(Maybe GoogleCloudDialogflowV2beta1WebhookResponsePayload)-    , _gcdvwrFulfillmentText     :: !(Maybe Text)-    , _gcdvwrSource              :: !(Maybe Text)-    , _gcdvwrEndInteraction      :: !(Maybe Bool)-    , _gcdvwrOutputContexts      :: !(Maybe [GoogleCloudDialogflowV2beta1Context])-    , _gcdvwrFollowupEventInput  :: !(Maybe GoogleCloudDialogflowV2beta1EventInput)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1WebhookResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvwrFulfillmentMessages'------ * 'gcdvwrPayload'------ * 'gcdvwrFulfillmentText'------ * 'gcdvwrSource'------ * 'gcdvwrEndInteraction'------ * 'gcdvwrOutputContexts'------ * 'gcdvwrFollowupEventInput'-googleCloudDialogflowV2beta1WebhookResponse-    :: GoogleCloudDialogflowV2beta1WebhookResponse-googleCloudDialogflowV2beta1WebhookResponse =-    GoogleCloudDialogflowV2beta1WebhookResponse'-    { _gcdvwrFulfillmentMessages = Nothing-    , _gcdvwrPayload = Nothing-    , _gcdvwrFulfillmentText = Nothing-    , _gcdvwrSource = Nothing-    , _gcdvwrEndInteraction = Nothing-    , _gcdvwrOutputContexts = Nothing-    , _gcdvwrFollowupEventInput = Nothing-    }---- | Optional. The collection of rich messages to present to the user. This--- value is passed directly to \`QueryResult.fulfillment_messages\`.-gcdvwrFulfillmentMessages :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse [GoogleCloudDialogflowV2beta1IntentMessage]-gcdvwrFulfillmentMessages-  = lens _gcdvwrFulfillmentMessages-      (\ s a -> s{_gcdvwrFulfillmentMessages = a})-      . _Default-      . _Coerce---- | Optional. This value is passed directly to--- \`QueryResult.webhook_payload\`. See the related--- \`fulfillment_messages[i].payload field\`, which may be used as an--- alternative to this field. This field can be used for Actions on Google--- responses. It should have a structure similar to the JSON message shown--- here. For more information, see [Actions on Google Webhook--- Format](https:\/\/developers.google.com\/actions\/dialogflow\/webhook)------ > {--- >   "google": {--- >     "expectUserResponse": true,--- >     "richResponse": {--- >       "items": [--- >         {--- >           "simpleResponse": {--- >             "textToSpeech": "this is a simple response"--- >           }--- >         }--- >       ]--- >     }--- >   }--- > }-gcdvwrPayload :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse (Maybe GoogleCloudDialogflowV2beta1WebhookResponsePayload)-gcdvwrPayload-  = lens _gcdvwrPayload-      (\ s a -> s{_gcdvwrPayload = a})---- | Optional. The text to be shown on the screen. This value is passed--- directly to \`QueryResult.fulfillment_text\`.-gcdvwrFulfillmentText :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse (Maybe Text)-gcdvwrFulfillmentText-  = lens _gcdvwrFulfillmentText-      (\ s a -> s{_gcdvwrFulfillmentText = a})---- | Optional. This value is passed directly to--- \`QueryResult.webhook_source\`.-gcdvwrSource :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse (Maybe Text)-gcdvwrSource-  = lens _gcdvwrSource (\ s a -> s{_gcdvwrSource = a})---- | Optional. Indicates that this intent ends an interaction. Some--- integrations (e.g., Actions on Google or Dialogflow phone gateway) use--- this information to close interaction with an end user. Default is--- false.-gcdvwrEndInteraction :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse (Maybe Bool)-gcdvwrEndInteraction-  = lens _gcdvwrEndInteraction-      (\ s a -> s{_gcdvwrEndInteraction = a})---- | Optional. The collection of output contexts. This value is passed--- directly to \`QueryResult.output_contexts\`.-gcdvwrOutputContexts :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse [GoogleCloudDialogflowV2beta1Context]-gcdvwrOutputContexts-  = lens _gcdvwrOutputContexts-      (\ s a -> s{_gcdvwrOutputContexts = a})-      . _Default-      . _Coerce---- | Optional. Makes the platform immediately invoke another \`DetectIntent\`--- call internally with the specified event as input.-gcdvwrFollowupEventInput :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse (Maybe GoogleCloudDialogflowV2beta1EventInput)-gcdvwrFollowupEventInput-  = lens _gcdvwrFollowupEventInput-      (\ s a -> s{_gcdvwrFollowupEventInput = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1WebhookResponse where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1WebhookResponse"-              (\ o ->-                 GoogleCloudDialogflowV2beta1WebhookResponse' <$>-                   (o .:? "fulfillmentMessages" .!= mempty) <*>-                     (o .:? "payload")-                     <*> (o .:? "fulfillmentText")-                     <*> (o .:? "source")-                     <*> (o .:? "endInteraction")-                     <*> (o .:? "outputContexts" .!= mempty)-                     <*> (o .:? "followupEventInput"))--instance ToJSON-         GoogleCloudDialogflowV2beta1WebhookResponse where-        toJSON-          GoogleCloudDialogflowV2beta1WebhookResponse'{..}-          = object-              (catMaybes-                 [("fulfillmentMessages" .=) <$>-                    _gcdvwrFulfillmentMessages,-                  ("payload" .=) <$> _gcdvwrPayload,-                  ("fulfillmentText" .=) <$> _gcdvwrFulfillmentText,-                  ("source" .=) <$> _gcdvwrSource,-                  ("endInteraction" .=) <$> _gcdvwrEndInteraction,-                  ("outputContexts" .=) <$> _gcdvwrOutputContexts,-                  ("followupEventInput" .=) <$>-                    _gcdvwrFollowupEventInput])---- | Optional. The collection of parameters associated with the event.------ /See:/ 'googleCloudDialogflowV2beta1EventInputParameters' smart constructor.-newtype GoogleCloudDialogflowV2beta1EventInputParameters = GoogleCloudDialogflowV2beta1EventInputParameters'-    { _gcdveipAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1EventInputParameters' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdveipAddtional'-googleCloudDialogflowV2beta1EventInputParameters-    :: HashMap Text JSONValue -- ^ 'gcdveipAddtional'-    -> GoogleCloudDialogflowV2beta1EventInputParameters-googleCloudDialogflowV2beta1EventInputParameters pGcdveipAddtional_ =-    GoogleCloudDialogflowV2beta1EventInputParameters'-    { _gcdveipAddtional = _Coerce # pGcdveipAddtional_-    }---- | Properties of the object.-gcdveipAddtional :: Lens' GoogleCloudDialogflowV2beta1EventInputParameters (HashMap Text JSONValue)-gcdveipAddtional-  = lens _gcdveipAddtional-      (\ s a -> s{_gcdveipAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1EventInputParameters-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1EventInputParameters"-              (\ o ->-                 GoogleCloudDialogflowV2beta1EventInputParameters' <$>-                   (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2beta1EventInputParameters-         where-        toJSON = toJSON . _gcdveipAddtional---- | Optional. This field is set to the value of the--- \`QueryParameters.payload\` field passed in the request. Some--- integrations that query a Dialogflow agent may provide additional--- information in the payload. In particular for the Telephony Gateway this--- field has the form:------ > {--- >  "telephony": {--- >    "caller_id": "+18558363987"--- >  }--- > }------ Note: The caller ID field (\`caller_id\`) will be redacted for Standard--- Edition agents and populated with the caller ID in [E.164--- format](https:\/\/en.wikipedia.org\/wiki\/E.164) for Enterprise Edition--- agents.------ /See:/ 'googleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload' smart constructor.-newtype GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload = GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload'-    { _gcdvodirpAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvodirpAddtional'-googleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload-    :: HashMap Text JSONValue -- ^ 'gcdvodirpAddtional'-    -> GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload-googleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload pGcdvodirpAddtional_ =-    GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload'-    { _gcdvodirpAddtional = _Coerce # pGcdvodirpAddtional_-    }---- | Properties of the object.-gcdvodirpAddtional :: Lens' GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload (HashMap Text JSONValue)-gcdvodirpAddtional-  = lens _gcdvodirpAddtional-      (\ s a -> s{_gcdvodirpAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload"-              (\ o ->-                 GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload'-                   <$> (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload-         where-        toJSON = toJSON . _gcdvodirpAddtional---- | The quick replies response message.------ /See:/ 'googleCloudDialogflowV2IntentMessageQuickReplies' smart constructor.-data GoogleCloudDialogflowV2IntentMessageQuickReplies = GoogleCloudDialogflowV2IntentMessageQuickReplies'-    { _gcdvimqrTitle        :: !(Maybe Text)-    , _gcdvimqrQuickReplies :: !(Maybe [Text])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageQuickReplies' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimqrTitle'------ * 'gcdvimqrQuickReplies'-googleCloudDialogflowV2IntentMessageQuickReplies-    :: GoogleCloudDialogflowV2IntentMessageQuickReplies-googleCloudDialogflowV2IntentMessageQuickReplies =-    GoogleCloudDialogflowV2IntentMessageQuickReplies'-    { _gcdvimqrTitle = Nothing-    , _gcdvimqrQuickReplies = Nothing-    }---- | Optional. The title of the collection of quick replies.-gcdvimqrTitle :: Lens' GoogleCloudDialogflowV2IntentMessageQuickReplies (Maybe Text)-gcdvimqrTitle-  = lens _gcdvimqrTitle-      (\ s a -> s{_gcdvimqrTitle = a})---- | Optional. The collection of quick replies.-gcdvimqrQuickReplies :: Lens' GoogleCloudDialogflowV2IntentMessageQuickReplies [Text]-gcdvimqrQuickReplies-  = lens _gcdvimqrQuickReplies-      (\ s a -> s{_gcdvimqrQuickReplies = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageQuickReplies-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageQuickReplies"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageQuickReplies' <$>-                   (o .:? "title") <*>-                     (o .:? "quickReplies" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageQuickReplies-         where-        toJSON-          GoogleCloudDialogflowV2IntentMessageQuickReplies'{..}-          = object-              (catMaybes-                 [("title" .=) <$> _gcdvimqrTitle,-                  ("quickReplies" .=) <$> _gcdvimqrQuickReplies])---- | Represents the result of querying a Knowledge base.------ /See:/ 'googleCloudDialogflowV2beta1KnowledgeAnswers' smart constructor.-newtype GoogleCloudDialogflowV2beta1KnowledgeAnswers = GoogleCloudDialogflowV2beta1KnowledgeAnswers'-    { _gcdvkaAnswers :: Maybe [GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1KnowledgeAnswers' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvkaAnswers'-googleCloudDialogflowV2beta1KnowledgeAnswers-    :: GoogleCloudDialogflowV2beta1KnowledgeAnswers-googleCloudDialogflowV2beta1KnowledgeAnswers =-    GoogleCloudDialogflowV2beta1KnowledgeAnswers'-    { _gcdvkaAnswers = Nothing-    }---- | A list of answers from Knowledge Connector.-gcdvkaAnswers :: Lens' GoogleCloudDialogflowV2beta1KnowledgeAnswers [GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer]-gcdvkaAnswers-  = lens _gcdvkaAnswers-      (\ s a -> s{_gcdvkaAnswers = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1KnowledgeAnswers where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1KnowledgeAnswers"-              (\ o ->-                 GoogleCloudDialogflowV2beta1KnowledgeAnswers' <$>-                   (o .:? "answers" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2beta1KnowledgeAnswers where-        toJSON-          GoogleCloudDialogflowV2beta1KnowledgeAnswers'{..}-          = object-              (catMaybes [("answers" .=) <$> _gcdvkaAnswers])---- | Optional. Contains information about a button.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageCardButton' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessageCardButton = GoogleCloudDialogflowV2beta1IntentMessageCardButton'-    { _gcdvimcbText     :: !(Maybe Text)-    , _gcdvimcbPostback :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageCardButton' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimcbText'------ * 'gcdvimcbPostback'-googleCloudDialogflowV2beta1IntentMessageCardButton-    :: GoogleCloudDialogflowV2beta1IntentMessageCardButton-googleCloudDialogflowV2beta1IntentMessageCardButton =-    GoogleCloudDialogflowV2beta1IntentMessageCardButton'-    { _gcdvimcbText = Nothing-    , _gcdvimcbPostback = Nothing-    }---- | Optional. The text to show on the button.-gcdvimcbText :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCardButton (Maybe Text)-gcdvimcbText-  = lens _gcdvimcbText (\ s a -> s{_gcdvimcbText = a})---- | Optional. The text to send back to the Dialogflow API or a URI to open.-gcdvimcbPostback :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCardButton (Maybe Text)-gcdvimcbPostback-  = lens _gcdvimcbPostback-      (\ s a -> s{_gcdvimcbPostback = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageCardButton-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageCardButton"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageCardButton'-                   <$> (o .:? "text") <*> (o .:? "postback"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageCardButton-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageCardButton'{..}-          = object-              (catMaybes-                 [("text" .=) <$> _gcdvimcbText,-                  ("postback" .=) <$> _gcdvimcbPostback])---- | Optional. The collection of parameters associated with this context.--- Refer to [this--- doc](https:\/\/dialogflow.com\/docs\/actions-and-parameters) for syntax.------ /See:/ 'googleCloudDialogflowV2beta1ContextParameters' smart constructor.-newtype GoogleCloudDialogflowV2beta1ContextParameters = GoogleCloudDialogflowV2beta1ContextParameters'-    { _gcdvcpAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1ContextParameters' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvcpAddtional'-googleCloudDialogflowV2beta1ContextParameters-    :: HashMap Text JSONValue -- ^ 'gcdvcpAddtional'-    -> GoogleCloudDialogflowV2beta1ContextParameters-googleCloudDialogflowV2beta1ContextParameters pGcdvcpAddtional_ =-    GoogleCloudDialogflowV2beta1ContextParameters'-    { _gcdvcpAddtional = _Coerce # pGcdvcpAddtional_-    }---- | Properties of the object.-gcdvcpAddtional :: Lens' GoogleCloudDialogflowV2beta1ContextParameters (HashMap Text JSONValue)-gcdvcpAddtional-  = lens _gcdvcpAddtional-      (\ s a -> s{_gcdvcpAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1ContextParameters where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1ContextParameters"-              (\ o ->-                 GoogleCloudDialogflowV2beta1ContextParameters' <$>-                   (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2beta1ContextParameters where-        toJSON = toJSON . _gcdvcpAddtional---- | Optional. This field can be used to pass custom data into the webhook--- associated with the agent. Arbitrary JSON objects are supported.------ /See:/ 'googleCloudDialogflowV2QueryParametersPayload' smart constructor.-newtype GoogleCloudDialogflowV2QueryParametersPayload = GoogleCloudDialogflowV2QueryParametersPayload'-    { _gcdvqppAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2QueryParametersPayload' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvqppAddtional'-googleCloudDialogflowV2QueryParametersPayload-    :: HashMap Text JSONValue -- ^ 'gcdvqppAddtional'-    -> GoogleCloudDialogflowV2QueryParametersPayload-googleCloudDialogflowV2QueryParametersPayload pGcdvqppAddtional_ =-    GoogleCloudDialogflowV2QueryParametersPayload'-    { _gcdvqppAddtional = _Coerce # pGcdvqppAddtional_-    }---- | Properties of the object.-gcdvqppAddtional :: Lens' GoogleCloudDialogflowV2QueryParametersPayload (HashMap Text JSONValue)-gcdvqppAddtional-  = lens _gcdvqppAddtional-      (\ s a -> s{_gcdvqppAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2QueryParametersPayload where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2QueryParametersPayload"-              (\ o ->-                 GoogleCloudDialogflowV2QueryParametersPayload' <$>-                   (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2QueryParametersPayload where-        toJSON = toJSON . _gcdvqppAddtional---- | The card for presenting a list of options to select from.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageListSelect' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessageListSelect = GoogleCloudDialogflowV2beta1IntentMessageListSelect'-    { _gcdvimlsItems :: !(Maybe [GoogleCloudDialogflowV2beta1IntentMessageListSelectItem])-    , _gcdvimlsTitle :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageListSelect' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimlsItems'------ * 'gcdvimlsTitle'-googleCloudDialogflowV2beta1IntentMessageListSelect-    :: GoogleCloudDialogflowV2beta1IntentMessageListSelect-googleCloudDialogflowV2beta1IntentMessageListSelect =-    GoogleCloudDialogflowV2beta1IntentMessageListSelect'-    { _gcdvimlsItems = Nothing-    , _gcdvimlsTitle = Nothing-    }---- | Required. List items.-gcdvimlsItems :: Lens' GoogleCloudDialogflowV2beta1IntentMessageListSelect [GoogleCloudDialogflowV2beta1IntentMessageListSelectItem]-gcdvimlsItems-  = lens _gcdvimlsItems-      (\ s a -> s{_gcdvimlsItems = a})-      . _Default-      . _Coerce---- | Optional. The overall title of the list.-gcdvimlsTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageListSelect (Maybe Text)-gcdvimlsTitle-  = lens _gcdvimlsTitle-      (\ s a -> s{_gcdvimlsTitle = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageListSelect-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageListSelect"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageListSelect'-                   <$> (o .:? "items" .!= mempty) <*> (o .:? "title"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageListSelect-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageListSelect'{..}-          = object-              (catMaybes-                 [("items" .=) <$> _gcdvimlsItems,-                  ("title" .=) <$> _gcdvimlsTitle])---- | Plays audio from a file in Telephony Gateway.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio' smart constructor.-newtype GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio = GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio'-    { _gcdvimtpaAudioURI :: Maybe Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimtpaAudioURI'-googleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio-    :: GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio-googleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio =-    GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio'-    { _gcdvimtpaAudioURI = Nothing-    }---- | Required. URI to a Google Cloud Storage object containing the audio to--- play, e.g., \"gs:\/\/bucket\/object\". The object must contain a single--- channel (mono) of linear PCM audio (2 bytes \/ sample) at 8kHz. This--- object must be readable by the--- \`service-\'gcp-sa-dialogflow.iam.gserviceaccount.com\` service account--- where is the number of the Telephony Gateway project (usually the same--- as the Dialogflow agent project). If the Google Cloud Storage bucket is--- in the Telephony Gateway project, this permission is added by default--- when enabling the Dialogflow V2 API. For audio from other sources,--- consider using the \`TelephonySynthesizeSpeech\` message with SSML.-gcdvimtpaAudioURI :: Lens' GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio (Maybe Text)-gcdvimtpaAudioURI-  = lens _gcdvimtpaAudioURI-      (\ s a -> s{_gcdvimtpaAudioURI = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio'-                   <$> (o .:? "audioUri"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio'{..}-          = object-              (catMaybes [("audioUri" .=) <$> _gcdvimtpaAudioURI])---- | Represents a part of a training phrase.------ /See:/ 'googleCloudDialogflowV2IntentTrainingPhrasePart' smart constructor.-data GoogleCloudDialogflowV2IntentTrainingPhrasePart = GoogleCloudDialogflowV2IntentTrainingPhrasePart'-    { _gcdvitppText        :: !(Maybe Text)-    , _gcdvitppUserDefined :: !(Maybe Bool)-    , _gcdvitppEntityType  :: !(Maybe Text)-    , _gcdvitppAlias       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentTrainingPhrasePart' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvitppText'------ * 'gcdvitppUserDefined'------ * 'gcdvitppEntityType'------ * 'gcdvitppAlias'-googleCloudDialogflowV2IntentTrainingPhrasePart-    :: GoogleCloudDialogflowV2IntentTrainingPhrasePart-googleCloudDialogflowV2IntentTrainingPhrasePart =-    GoogleCloudDialogflowV2IntentTrainingPhrasePart'-    { _gcdvitppText = Nothing-    , _gcdvitppUserDefined = Nothing-    , _gcdvitppEntityType = Nothing-    , _gcdvitppAlias = Nothing-    }---- | Required. The text corresponding to the example or template, if there--- are no annotations. For annotated examples, it is the text for one of--- the example\'s parts.-gcdvitppText :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrasePart (Maybe Text)-gcdvitppText-  = lens _gcdvitppText (\ s a -> s{_gcdvitppText = a})---- | Optional. Indicates whether the text was manually annotated by the--- developer.-gcdvitppUserDefined :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrasePart (Maybe Bool)-gcdvitppUserDefined-  = lens _gcdvitppUserDefined-      (\ s a -> s{_gcdvitppUserDefined = a})---- | Optional. The entity type name prefixed with \`\'\`. This field is--- required for the annotated part of the text and applies only to--- examples.-gcdvitppEntityType :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrasePart (Maybe Text)-gcdvitppEntityType-  = lens _gcdvitppEntityType-      (\ s a -> s{_gcdvitppEntityType = a})---- | Optional. The parameter name for the value extracted from the annotated--- part of the example.-gcdvitppAlias :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrasePart (Maybe Text)-gcdvitppAlias-  = lens _gcdvitppAlias-      (\ s a -> s{_gcdvitppAlias = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentTrainingPhrasePart where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentTrainingPhrasePart"-              (\ o ->-                 GoogleCloudDialogflowV2IntentTrainingPhrasePart' <$>-                   (o .:? "text") <*> (o .:? "userDefined") <*>-                     (o .:? "entityType")-                     <*> (o .:? "alias"))--instance ToJSON-         GoogleCloudDialogflowV2IntentTrainingPhrasePart where-        toJSON-          GoogleCloudDialogflowV2IntentTrainingPhrasePart'{..}-          = object-              (catMaybes-                 [("text" .=) <$> _gcdvitppText,-                  ("userDefined" .=) <$> _gcdvitppUserDefined,-                  ("entityType" .=) <$> _gcdvitppEntityType,-                  ("alias" .=) <$> _gcdvitppAlias])---- | A generic empty message that you can re-use to avoid defining duplicated--- empty messages in your APIs. A typical example is to use it as the--- request or the response type of an API method. For instance: service Foo--- { rpc Bar(google.protobuf.Empty) returns (google.protobuf.Empty); } The--- JSON representation for \`Empty\` is empty JSON object \`{}\`.------ /See:/ 'googleProtobufEmpty' smart constructor.-data GoogleProtobufEmpty =-    GoogleProtobufEmpty'-    deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleProtobufEmpty' with the minimum fields required to make a request.----googleProtobufEmpty-    :: GoogleProtobufEmpty-googleProtobufEmpty = GoogleProtobufEmpty'--instance FromJSON GoogleProtobufEmpty where-        parseJSON-          = withObject "GoogleProtobufEmpty"-              (\ o -> pure GoogleProtobufEmpty')--instance ToJSON GoogleProtobufEmpty where-        toJSON = const emptyObject---- | Optional. This value is passed directly to--- \`QueryResult.webhook_payload\`. See the related--- \`fulfillment_messages[i].payload field\`, which may be used as an--- alternative to this field. This field can be used for Actions on Google--- responses. It should have a structure similar to the JSON message shown--- here. For more information, see [Actions on Google Webhook--- Format](https:\/\/developers.google.com\/actions\/dialogflow\/webhook)------ > {--- >   "google": {--- >     "expectUserResponse": true,--- >     "richResponse": {--- >       "items": [--- >         {--- >           "simpleResponse": {--- >             "textToSpeech": "this is a simple response"--- >           }--- >         }--- >       ]--- >     }--- >   }--- > }------ /See:/ 'googleCloudDialogflowV2beta1WebhookResponsePayload' smart constructor.-newtype GoogleCloudDialogflowV2beta1WebhookResponsePayload = GoogleCloudDialogflowV2beta1WebhookResponsePayload'-    { _gcdvwrpAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1WebhookResponsePayload' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvwrpAddtional'-googleCloudDialogflowV2beta1WebhookResponsePayload-    :: HashMap Text JSONValue -- ^ 'gcdvwrpAddtional'-    -> GoogleCloudDialogflowV2beta1WebhookResponsePayload-googleCloudDialogflowV2beta1WebhookResponsePayload pGcdvwrpAddtional_ =-    GoogleCloudDialogflowV2beta1WebhookResponsePayload'-    { _gcdvwrpAddtional = _Coerce # pGcdvwrpAddtional_-    }---- | Properties of the object.-gcdvwrpAddtional :: Lens' GoogleCloudDialogflowV2beta1WebhookResponsePayload (HashMap Text JSONValue)-gcdvwrpAddtional-  = lens _gcdvwrpAddtional-      (\ s a -> s{_gcdvwrpAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1WebhookResponsePayload-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1WebhookResponsePayload"-              (\ o ->-                 GoogleCloudDialogflowV2beta1WebhookResponsePayload'-                   <$> (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2beta1WebhookResponsePayload-         where-        toJSON = toJSON . _gcdvwrpAddtional---- | The quick replies response message.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageQuickReplies' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessageQuickReplies = GoogleCloudDialogflowV2beta1IntentMessageQuickReplies'-    { _gcdvimqrsTitle        :: !(Maybe Text)-    , _gcdvimqrsQuickReplies :: !(Maybe [Text])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageQuickReplies' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimqrsTitle'------ * 'gcdvimqrsQuickReplies'-googleCloudDialogflowV2beta1IntentMessageQuickReplies-    :: GoogleCloudDialogflowV2beta1IntentMessageQuickReplies-googleCloudDialogflowV2beta1IntentMessageQuickReplies =-    GoogleCloudDialogflowV2beta1IntentMessageQuickReplies'-    { _gcdvimqrsTitle = Nothing-    , _gcdvimqrsQuickReplies = Nothing-    }---- | Optional. The title of the collection of quick replies.-gcdvimqrsTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageQuickReplies (Maybe Text)-gcdvimqrsTitle-  = lens _gcdvimqrsTitle-      (\ s a -> s{_gcdvimqrsTitle = a})---- | Optional. The collection of quick replies.-gcdvimqrsQuickReplies :: Lens' GoogleCloudDialogflowV2beta1IntentMessageQuickReplies [Text]-gcdvimqrsQuickReplies-  = lens _gcdvimqrsQuickReplies-      (\ s a -> s{_gcdvimqrsQuickReplies = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageQuickReplies-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageQuickReplies"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageQuickReplies'-                   <$>-                   (o .:? "title") <*>-                     (o .:? "quickReplies" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageQuickReplies-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageQuickReplies'{..}-          = object-              (catMaybes-                 [("title" .=) <$> _gcdvimqrsTitle,-                  ("quickReplies" .=) <$> _gcdvimqrsQuickReplies])---- | The suggestion chip message that allows the user to jump out to the app--- or website associated with this agent.------ /See:/ 'googleCloudDialogflowV2IntentMessageLinkOutSuggestion' smart constructor.-data GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion = GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion'-    { _gcdvimlosURI             :: !(Maybe Text)-    , _gcdvimlosDestinationName :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimlosURI'------ * 'gcdvimlosDestinationName'-googleCloudDialogflowV2IntentMessageLinkOutSuggestion-    :: GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion-googleCloudDialogflowV2IntentMessageLinkOutSuggestion =-    GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion'-    { _gcdvimlosURI = Nothing-    , _gcdvimlosDestinationName = Nothing-    }---- | Required. The URI of the app or site to open when the user taps the--- suggestion chip.-gcdvimlosURI :: Lens' GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion (Maybe Text)-gcdvimlosURI-  = lens _gcdvimlosURI (\ s a -> s{_gcdvimlosURI = a})---- | Required. The name of the app or site this chip is linking to.-gcdvimlosDestinationName :: Lens' GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion (Maybe Text)-gcdvimlosDestinationName-  = lens _gcdvimlosDestinationName-      (\ s a -> s{_gcdvimlosDestinationName = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion'-                   <$> (o .:? "uri") <*> (o .:? "destinationName"))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion-         where-        toJSON-          GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion'{..}-          = object-              (catMaybes-                 [("uri" .=) <$> _gcdvimlosURI,-                  ("destinationName" .=) <$>-                    _gcdvimlosDestinationName])---- | The request message for Agents.ImportAgent.------ /See:/ 'googleCloudDialogflowV2ImportAgentRequest' smart constructor.-data GoogleCloudDialogflowV2ImportAgentRequest = GoogleCloudDialogflowV2ImportAgentRequest'-    { _gcdviarAgentURI     :: !(Maybe Text)-    , _gcdviarAgentContent :: !(Maybe Bytes)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2ImportAgentRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdviarAgentURI'------ * 'gcdviarAgentContent'-googleCloudDialogflowV2ImportAgentRequest-    :: GoogleCloudDialogflowV2ImportAgentRequest-googleCloudDialogflowV2ImportAgentRequest =-    GoogleCloudDialogflowV2ImportAgentRequest'-    { _gcdviarAgentURI = Nothing-    , _gcdviarAgentContent = Nothing-    }---- | The URI to a Google Cloud Storage file containing the agent to import.--- Note: The URI must start with \"gs:\/\/\".-gcdviarAgentURI :: Lens' GoogleCloudDialogflowV2ImportAgentRequest (Maybe Text)-gcdviarAgentURI-  = lens _gcdviarAgentURI-      (\ s a -> s{_gcdviarAgentURI = a})---- | The agent to import. Example for how to import an agent via the command--- line:------ > curl \--- >   'https://dialogflow.googleapis.com/v2/projects/<project_name>/agent:import\--- >    -X POST \--- >    -H 'Authorization: Bearer '$(gcloud auth application-default--- >    print-access-token) \--- >    -H 'Accept: application/json' \--- >    -H 'Content-Type: application/json' \--- >    --compressed \--- >    --data-binary "{--- >       'agentContent': '$(cat <agent zip file> | base64 -w 0)'--- >    }"-gcdviarAgentContent :: Lens' GoogleCloudDialogflowV2ImportAgentRequest (Maybe ByteString)-gcdviarAgentContent-  = lens _gcdviarAgentContent-      (\ s a -> s{_gcdviarAgentContent = a})-      . mapping _Bytes--instance FromJSON-         GoogleCloudDialogflowV2ImportAgentRequest where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2ImportAgentRequest"-              (\ o ->-                 GoogleCloudDialogflowV2ImportAgentRequest' <$>-                   (o .:? "agentUri") <*> (o .:? "agentContent"))--instance ToJSON-         GoogleCloudDialogflowV2ImportAgentRequest where-        toJSON GoogleCloudDialogflowV2ImportAgentRequest'{..}-          = object-              (catMaybes-                 [("agentUri" .=) <$> _gcdviarAgentURI,-                  ("agentContent" .=) <$> _gcdviarAgentContent])------- /See:/ 'googleRpcStatusDetailsItem' smart constructor.-newtype GoogleRpcStatusDetailsItem = GoogleRpcStatusDetailsItem'-    { _grsdiAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleRpcStatusDetailsItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'grsdiAddtional'-googleRpcStatusDetailsItem-    :: HashMap Text JSONValue -- ^ 'grsdiAddtional'-    -> GoogleRpcStatusDetailsItem-googleRpcStatusDetailsItem pGrsdiAddtional_ =-    GoogleRpcStatusDetailsItem'-    { _grsdiAddtional = _Coerce # pGrsdiAddtional_-    }---- | Properties of the object. Contains field \'type with type URL.-grsdiAddtional :: Lens' GoogleRpcStatusDetailsItem (HashMap Text JSONValue)-grsdiAddtional-  = lens _grsdiAddtional-      (\ s a -> s{_grsdiAddtional = a})-      . _Coerce--instance FromJSON GoogleRpcStatusDetailsItem where-        parseJSON-          = withObject "GoogleRpcStatusDetailsItem"-              (\ o ->-                 GoogleRpcStatusDetailsItem' <$> (parseJSONObject o))--instance ToJSON GoogleRpcStatusDetailsItem where-        toJSON = toJSON . _grsdiAddtional---- | The response message for EntityTypes.BatchUpdateEntityTypes.------ /See:/ 'googleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse' smart constructor.-newtype GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse = GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse'-    { _gcdvbuetrEntityTypes :: Maybe [GoogleCloudDialogflowV2beta1EntityType]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvbuetrEntityTypes'-googleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse-    :: GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse-googleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse =-    GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse'-    { _gcdvbuetrEntityTypes = Nothing-    }---- | The collection of updated or created entity types.-gcdvbuetrEntityTypes :: Lens' GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse [GoogleCloudDialogflowV2beta1EntityType]-gcdvbuetrEntityTypes-  = lens _gcdvbuetrEntityTypes-      (\ s a -> s{_gcdvbuetrEntityTypes = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse"-              (\ o ->-                 GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse'-                   <$> (o .:? "entityTypes" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse-         where-        toJSON-          GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse'{..}-          = object-              (catMaybes-                 [("entityTypes" .=) <$> _gcdvbuetrEntityTypes])---- | Optional. The collection of parameters associated with this context.--- Refer to [this--- doc](https:\/\/dialogflow.com\/docs\/actions-and-parameters) for syntax.------ /See:/ 'googleCloudDialogflowV2ContextParameters' smart constructor.-newtype GoogleCloudDialogflowV2ContextParameters = GoogleCloudDialogflowV2ContextParameters'-    { _gAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2ContextParameters' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gAddtional'-googleCloudDialogflowV2ContextParameters-    :: HashMap Text JSONValue -- ^ 'gAddtional'-    -> GoogleCloudDialogflowV2ContextParameters-googleCloudDialogflowV2ContextParameters pGAddtional_ =-    GoogleCloudDialogflowV2ContextParameters'-    { _gAddtional = _Coerce # pGAddtional_-    }---- | Properties of the object.-gAddtional :: Lens' GoogleCloudDialogflowV2ContextParameters (HashMap Text JSONValue)-gAddtional-  = lens _gAddtional (\ s a -> s{_gAddtional = a}) .-      _Coerce--instance FromJSON-         GoogleCloudDialogflowV2ContextParameters where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2ContextParameters"-              (\ o ->-                 GoogleCloudDialogflowV2ContextParameters' <$>-                   (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2ContextParameters where-        toJSON = toJSON . _gAddtional---- | Optional. Contains information about a button.------ /See:/ 'googleCloudDialogflowV2IntentMessageCardButton' smart constructor.-data GoogleCloudDialogflowV2IntentMessageCardButton = GoogleCloudDialogflowV2IntentMessageCardButton'-    { _gText     :: !(Maybe Text)-    , _gPostback :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageCardButton' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gText'------ * 'gPostback'-googleCloudDialogflowV2IntentMessageCardButton-    :: GoogleCloudDialogflowV2IntentMessageCardButton-googleCloudDialogflowV2IntentMessageCardButton =-    GoogleCloudDialogflowV2IntentMessageCardButton'-    { _gText = Nothing-    , _gPostback = Nothing-    }---- | Optional. The text to show on the button.-gText :: Lens' GoogleCloudDialogflowV2IntentMessageCardButton (Maybe Text)-gText = lens _gText (\ s a -> s{_gText = a})---- | Optional. The text to send back to the Dialogflow API or a URI to open.-gPostback :: Lens' GoogleCloudDialogflowV2IntentMessageCardButton (Maybe Text)-gPostback-  = lens _gPostback (\ s a -> s{_gPostback = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageCardButton where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageCardButton"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageCardButton' <$>-                   (o .:? "text") <*> (o .:? "postback"))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageCardButton where-        toJSON-          GoogleCloudDialogflowV2IntentMessageCardButton'{..}-          = object-              (catMaybes-                 [("text" .=) <$> _gText,-                  ("postback" .=) <$> _gPostback])---- | The card for presenting a list of options to select from.------ /See:/ 'googleCloudDialogflowV2IntentMessageListSelect' smart constructor.-data GoogleCloudDialogflowV2IntentMessageListSelect = GoogleCloudDialogflowV2IntentMessageListSelect'-    { _gooItems :: !(Maybe [GoogleCloudDialogflowV2IntentMessageListSelectItem])-    , _gooTitle :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageListSelect' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gooItems'------ * 'gooTitle'-googleCloudDialogflowV2IntentMessageListSelect-    :: GoogleCloudDialogflowV2IntentMessageListSelect-googleCloudDialogflowV2IntentMessageListSelect =-    GoogleCloudDialogflowV2IntentMessageListSelect'-    { _gooItems = Nothing-    , _gooTitle = Nothing-    }---- | Required. List items.-gooItems :: Lens' GoogleCloudDialogflowV2IntentMessageListSelect [GoogleCloudDialogflowV2IntentMessageListSelectItem]-gooItems-  = lens _gooItems (\ s a -> s{_gooItems = a}) .-      _Default-      . _Coerce---- | Optional. The overall title of the list.-gooTitle :: Lens' GoogleCloudDialogflowV2IntentMessageListSelect (Maybe Text)-gooTitle = lens _gooTitle (\ s a -> s{_gooTitle = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageListSelect where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageListSelect"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageListSelect' <$>-                   (o .:? "items" .!= mempty) <*> (o .:? "title"))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageListSelect where-        toJSON-          GoogleCloudDialogflowV2IntentMessageListSelect'{..}-          = object-              (catMaybes-                 [("items" .=) <$> _gooItems,-                  ("title" .=) <$> _gooTitle])---- | The card response message.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageCard' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessageCard = GoogleCloudDialogflowV2beta1IntentMessageCard'-    { _gcdvimcButtons  :: !(Maybe [GoogleCloudDialogflowV2beta1IntentMessageCardButton])-    , _gcdvimcImageURI :: !(Maybe Text)-    , _gcdvimcSubtitle :: !(Maybe Text)-    , _gcdvimcTitle    :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageCard' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimcButtons'------ * 'gcdvimcImageURI'------ * 'gcdvimcSubtitle'------ * 'gcdvimcTitle'-googleCloudDialogflowV2beta1IntentMessageCard-    :: GoogleCloudDialogflowV2beta1IntentMessageCard-googleCloudDialogflowV2beta1IntentMessageCard =-    GoogleCloudDialogflowV2beta1IntentMessageCard'-    { _gcdvimcButtons = Nothing-    , _gcdvimcImageURI = Nothing-    , _gcdvimcSubtitle = Nothing-    , _gcdvimcTitle = Nothing-    }---- | Optional. The collection of card buttons.-gcdvimcButtons :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCard [GoogleCloudDialogflowV2beta1IntentMessageCardButton]-gcdvimcButtons-  = lens _gcdvimcButtons-      (\ s a -> s{_gcdvimcButtons = a})-      . _Default-      . _Coerce---- | Optional. The public URI to an image file for the card.-gcdvimcImageURI :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCard (Maybe Text)-gcdvimcImageURI-  = lens _gcdvimcImageURI-      (\ s a -> s{_gcdvimcImageURI = a})---- | Optional. The subtitle of the card.-gcdvimcSubtitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCard (Maybe Text)-gcdvimcSubtitle-  = lens _gcdvimcSubtitle-      (\ s a -> s{_gcdvimcSubtitle = a})---- | Optional. The title of the card.-gcdvimcTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCard (Maybe Text)-gcdvimcTitle-  = lens _gcdvimcTitle (\ s a -> s{_gcdvimcTitle = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageCard where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageCard"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageCard' <$>-                   (o .:? "buttons" .!= mempty) <*> (o .:? "imageUri")-                     <*> (o .:? "subtitle")-                     <*> (o .:? "title"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageCard where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageCard'{..}-          = object-              (catMaybes-                 [("buttons" .=) <$> _gcdvimcButtons,-                  ("imageUri" .=) <$> _gcdvimcImageURI,-                  ("subtitle" .=) <$> _gcdvimcSubtitle,-                  ("title" .=) <$> _gcdvimcTitle])---- | The request message for Agents.RestoreAgent.------ /See:/ 'googleCloudDialogflowV2RestoreAgentRequest' smart constructor.-data GoogleCloudDialogflowV2RestoreAgentRequest = GoogleCloudDialogflowV2RestoreAgentRequest'-    { _gcdvrarAgentURI     :: !(Maybe Text)-    , _gcdvrarAgentContent :: !(Maybe Bytes)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2RestoreAgentRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvrarAgentURI'------ * 'gcdvrarAgentContent'-googleCloudDialogflowV2RestoreAgentRequest-    :: GoogleCloudDialogflowV2RestoreAgentRequest-googleCloudDialogflowV2RestoreAgentRequest =-    GoogleCloudDialogflowV2RestoreAgentRequest'-    { _gcdvrarAgentURI = Nothing-    , _gcdvrarAgentContent = Nothing-    }---- | The URI to a Google Cloud Storage file containing the agent to restore.--- Note: The URI must start with \"gs:\/\/\".-gcdvrarAgentURI :: Lens' GoogleCloudDialogflowV2RestoreAgentRequest (Maybe Text)-gcdvrarAgentURI-  = lens _gcdvrarAgentURI-      (\ s a -> s{_gcdvrarAgentURI = a})---- | The agent to restore. Example for how to restore an agent via the--- command line:------ > curl \--- >   'https://dialogflow.googleapis.com/v2/projects/<project_name>/agent:restore\--- >    -X POST \--- >    -H 'Authorization: Bearer '$(gcloud auth application-default--- >    print-access-token) \--- >    -H 'Accept: application/json' \--- >    -H 'Content-Type: application/json' \--- >    --compressed \--- >    --data-binary "{--- >        'agentContent': '$(cat <agent zip file> | base64 -w 0)'--- >    }"-gcdvrarAgentContent :: Lens' GoogleCloudDialogflowV2RestoreAgentRequest (Maybe ByteString)-gcdvrarAgentContent-  = lens _gcdvrarAgentContent-      (\ s a -> s{_gcdvrarAgentContent = a})-      . mapping _Bytes--instance FromJSON-         GoogleCloudDialogflowV2RestoreAgentRequest where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2RestoreAgentRequest"-              (\ o ->-                 GoogleCloudDialogflowV2RestoreAgentRequest' <$>-                   (o .:? "agentUri") <*> (o .:? "agentContent"))--instance ToJSON-         GoogleCloudDialogflowV2RestoreAgentRequest where-        toJSON-          GoogleCloudDialogflowV2RestoreAgentRequest'{..}-          = object-              (catMaybes-                 [("agentUri" .=) <$> _gcdvrarAgentURI,-                  ("agentContent" .=) <$> _gcdvrarAgentContent])---- | The collection of suggestions.------ /See:/ 'googleCloudDialogflowV2IntentMessageSuggestions' smart constructor.-newtype GoogleCloudDialogflowV2IntentMessageSuggestions = GoogleCloudDialogflowV2IntentMessageSuggestions'-    { _gSuggestions :: Maybe [GoogleCloudDialogflowV2IntentMessageSuggestion]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageSuggestions' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gSuggestions'-googleCloudDialogflowV2IntentMessageSuggestions-    :: GoogleCloudDialogflowV2IntentMessageSuggestions-googleCloudDialogflowV2IntentMessageSuggestions =-    GoogleCloudDialogflowV2IntentMessageSuggestions'-    { _gSuggestions = Nothing-    }---- | Required. The list of suggested replies.-gSuggestions :: Lens' GoogleCloudDialogflowV2IntentMessageSuggestions [GoogleCloudDialogflowV2IntentMessageSuggestion]-gSuggestions-  = lens _gSuggestions (\ s a -> s{_gSuggestions = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageSuggestions where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageSuggestions"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageSuggestions' <$>-                   (o .:? "suggestions" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageSuggestions where-        toJSON-          GoogleCloudDialogflowV2IntentMessageSuggestions'{..}-          = object-              (catMaybes [("suggestions" .=) <$> _gSuggestions])---- | Opens the given URI.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction' smart constructor.-newtype GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction = GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction'-    { _gcdvimbcbouaURI :: Maybe Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimbcbouaURI'-googleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction-    :: GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction-googleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction =-    GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction'-    { _gcdvimbcbouaURI = Nothing-    }---- | Required. The HTTP or HTTPS scheme URI.-gcdvimbcbouaURI :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction (Maybe Text)-gcdvimbcbouaURI-  = lens _gcdvimbcbouaURI-      (\ s a -> s{_gcdvimbcbouaURI = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction'-                   <$> (o .:? "uri"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction'{..}-          = object-              (catMaybes [("uri" .=) <$> _gcdvimbcbouaURI])---- | Represents the parameters of the conversational query.------ /See:/ 'googleCloudDialogflowV2QueryParameters' smart constructor.-data GoogleCloudDialogflowV2QueryParameters = GoogleCloudDialogflowV2QueryParameters'-    { _gcdvqpContexts           :: !(Maybe [GoogleCloudDialogflowV2Context])-    , _gcdvqpPayload            :: !(Maybe GoogleCloudDialogflowV2QueryParametersPayload)-    , _gcdvqpGeoLocation        :: !(Maybe GoogleTypeLatLng)-    , _gcdvqpTimeZone           :: !(Maybe Text)-    , _gcdvqpSessionEntityTypes :: !(Maybe [GoogleCloudDialogflowV2SessionEntityType])-    , _gcdvqpResetContexts      :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2QueryParameters' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvqpContexts'------ * 'gcdvqpPayload'------ * 'gcdvqpGeoLocation'------ * 'gcdvqpTimeZone'------ * 'gcdvqpSessionEntityTypes'------ * 'gcdvqpResetContexts'-googleCloudDialogflowV2QueryParameters-    :: GoogleCloudDialogflowV2QueryParameters-googleCloudDialogflowV2QueryParameters =-    GoogleCloudDialogflowV2QueryParameters'-    { _gcdvqpContexts = Nothing-    , _gcdvqpPayload = Nothing-    , _gcdvqpGeoLocation = Nothing-    , _gcdvqpTimeZone = Nothing-    , _gcdvqpSessionEntityTypes = Nothing-    , _gcdvqpResetContexts = Nothing-    }---- | Optional. The collection of contexts to be activated before this query--- is executed.-gcdvqpContexts :: Lens' GoogleCloudDialogflowV2QueryParameters [GoogleCloudDialogflowV2Context]-gcdvqpContexts-  = lens _gcdvqpContexts-      (\ s a -> s{_gcdvqpContexts = a})-      . _Default-      . _Coerce---- | Optional. This field can be used to pass custom data into the webhook--- associated with the agent. Arbitrary JSON objects are supported.-gcdvqpPayload :: Lens' GoogleCloudDialogflowV2QueryParameters (Maybe GoogleCloudDialogflowV2QueryParametersPayload)-gcdvqpPayload-  = lens _gcdvqpPayload-      (\ s a -> s{_gcdvqpPayload = a})---- | Optional. The geo location of this conversational query.-gcdvqpGeoLocation :: Lens' GoogleCloudDialogflowV2QueryParameters (Maybe GoogleTypeLatLng)-gcdvqpGeoLocation-  = lens _gcdvqpGeoLocation-      (\ s a -> s{_gcdvqpGeoLocation = a})---- | Optional. The time zone of this conversational query from the [time zone--- database](https:\/\/www.iana.org\/time-zones), e.g., America\/New_York,--- Europe\/Paris. If not provided, the time zone specified in agent--- settings is used.-gcdvqpTimeZone :: Lens' GoogleCloudDialogflowV2QueryParameters (Maybe Text)-gcdvqpTimeZone-  = lens _gcdvqpTimeZone-      (\ s a -> s{_gcdvqpTimeZone = a})---- | Optional. Additional session entity types to replace or extend developer--- entity types with. The entity synonyms apply to all languages and--- persist for the session of this query.-gcdvqpSessionEntityTypes :: Lens' GoogleCloudDialogflowV2QueryParameters [GoogleCloudDialogflowV2SessionEntityType]-gcdvqpSessionEntityTypes-  = lens _gcdvqpSessionEntityTypes-      (\ s a -> s{_gcdvqpSessionEntityTypes = a})-      . _Default-      . _Coerce---- | Optional. Specifies whether to delete all contexts in the current--- session before the new ones are activated.-gcdvqpResetContexts :: Lens' GoogleCloudDialogflowV2QueryParameters (Maybe Bool)-gcdvqpResetContexts-  = lens _gcdvqpResetContexts-      (\ s a -> s{_gcdvqpResetContexts = a})--instance FromJSON-         GoogleCloudDialogflowV2QueryParameters where-        parseJSON-          = withObject "GoogleCloudDialogflowV2QueryParameters"-              (\ o ->-                 GoogleCloudDialogflowV2QueryParameters' <$>-                   (o .:? "contexts" .!= mempty) <*> (o .:? "payload")-                     <*> (o .:? "geoLocation")-                     <*> (o .:? "timeZone")-                     <*> (o .:? "sessionEntityTypes" .!= mempty)-                     <*> (o .:? "resetContexts"))--instance ToJSON-         GoogleCloudDialogflowV2QueryParameters where-        toJSON GoogleCloudDialogflowV2QueryParameters'{..}-          = object-              (catMaybes-                 [("contexts" .=) <$> _gcdvqpContexts,-                  ("payload" .=) <$> _gcdvqpPayload,-                  ("geoLocation" .=) <$> _gcdvqpGeoLocation,-                  ("timeZone" .=) <$> _gcdvqpTimeZone,-                  ("sessionEntityTypes" .=) <$>-                    _gcdvqpSessionEntityTypes,-                  ("resetContexts" .=) <$> _gcdvqpResetContexts])---- | The suggestion chip message that the user can tap to quickly post a--- reply to the conversation.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageSuggestion' smart constructor.-newtype GoogleCloudDialogflowV2beta1IntentMessageSuggestion = GoogleCloudDialogflowV2beta1IntentMessageSuggestion'-    { _gcdvimsTitle :: Maybe Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageSuggestion' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimsTitle'-googleCloudDialogflowV2beta1IntentMessageSuggestion-    :: GoogleCloudDialogflowV2beta1IntentMessageSuggestion-googleCloudDialogflowV2beta1IntentMessageSuggestion =-    GoogleCloudDialogflowV2beta1IntentMessageSuggestion'-    { _gcdvimsTitle = Nothing-    }---- | Required. The text shown the in the suggestion chip.-gcdvimsTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSuggestion (Maybe Text)-gcdvimsTitle-  = lens _gcdvimsTitle (\ s a -> s{_gcdvimsTitle = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageSuggestion-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageSuggestion"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageSuggestion'-                   <$> (o .:? "title"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageSuggestion-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageSuggestion'{..}-          = object (catMaybes [("title" .=) <$> _gcdvimsTitle])---- | Represents the contents of the original request that was passed to the--- \`[Streaming]DetectIntent\` call.------ /See:/ 'googleCloudDialogflowV2beta1OriginalDetectIntentRequest' smart constructor.-data GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest = GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest'-    { _gcdvodirPayload :: !(Maybe GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload)-    , _gcdvodirVersion :: !(Maybe Text)-    , _gcdvodirSource  :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvodirPayload'------ * 'gcdvodirVersion'------ * 'gcdvodirSource'-googleCloudDialogflowV2beta1OriginalDetectIntentRequest-    :: GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest-googleCloudDialogflowV2beta1OriginalDetectIntentRequest =-    GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest'-    { _gcdvodirPayload = Nothing-    , _gcdvodirVersion = Nothing-    , _gcdvodirSource = Nothing-    }---- | Optional. This field is set to the value of the--- \`QueryParameters.payload\` field passed in the request. Some--- integrations that query a Dialogflow agent may provide additional--- information in the payload. In particular for the Telephony Gateway this--- field has the form:------ > {--- >  "telephony": {--- >    "caller_id": "+18558363987"--- >  }--- > }------ Note: The caller ID field (\`caller_id\`) will be redacted for Standard--- Edition agents and populated with the caller ID in [E.164--- format](https:\/\/en.wikipedia.org\/wiki\/E.164) for Enterprise Edition--- agents.-gcdvodirPayload :: Lens' GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest (Maybe GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload)-gcdvodirPayload-  = lens _gcdvodirPayload-      (\ s a -> s{_gcdvodirPayload = a})---- | Optional. The version of the protocol used for this request. This field--- is AoG-specific.-gcdvodirVersion :: Lens' GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest (Maybe Text)-gcdvodirVersion-  = lens _gcdvodirVersion-      (\ s a -> s{_gcdvodirVersion = a})---- | The source of this request, e.g., \`google\`, \`facebook\`, \`slack\`.--- It is set by Dialogflow-owned servers.-gcdvodirSource :: Lens' GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest (Maybe Text)-gcdvodirSource-  = lens _gcdvodirSource-      (\ s a -> s{_gcdvodirSource = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest"-              (\ o ->-                 GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest'-                   <$>-                   (o .:? "payload") <*> (o .:? "version") <*>-                     (o .:? "source"))--instance ToJSON-         GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest-         where-        toJSON-          GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest'{..}-          = object-              (catMaybes-                 [("payload" .=) <$> _gcdvodirPayload,-                  ("version" .=) <$> _gcdvodirVersion,-                  ("source" .=) <$> _gcdvodirSource])---- | Optional. The collection of parameters associated with the event.------ /See:/ 'googleCloudDialogflowV2EventInputParameters' smart constructor.-newtype GoogleCloudDialogflowV2EventInputParameters = GoogleCloudDialogflowV2EventInputParameters'-    { _gcdveipsAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2EventInputParameters' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdveipsAddtional'-googleCloudDialogflowV2EventInputParameters-    :: HashMap Text JSONValue -- ^ 'gcdveipsAddtional'-    -> GoogleCloudDialogflowV2EventInputParameters-googleCloudDialogflowV2EventInputParameters pGcdveipsAddtional_ =-    GoogleCloudDialogflowV2EventInputParameters'-    { _gcdveipsAddtional = _Coerce # pGcdveipsAddtional_-    }---- | Properties of the object.-gcdveipsAddtional :: Lens' GoogleCloudDialogflowV2EventInputParameters (HashMap Text JSONValue)-gcdveipsAddtional-  = lens _gcdveipsAddtional-      (\ s a -> s{_gcdveipsAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2EventInputParameters where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2EventInputParameters"-              (\ o ->-                 GoogleCloudDialogflowV2EventInputParameters' <$>-                   (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2EventInputParameters where-        toJSON = toJSON . _gcdveipsAddtional---- | The message returned from the DetectIntent method.------ /See:/ 'googleCloudDialogflowV2DetectIntentResponse' smart constructor.-data GoogleCloudDialogflowV2DetectIntentResponse = GoogleCloudDialogflowV2DetectIntentResponse'-    { _gcdvdirResponseId    :: !(Maybe Text)-    , _gcdvdirWebhookStatus :: !(Maybe GoogleRpcStatus)-    , _gcdvdirQueryResult   :: !(Maybe GoogleCloudDialogflowV2QueryResult)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2DetectIntentResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvdirResponseId'------ * 'gcdvdirWebhookStatus'------ * 'gcdvdirQueryResult'-googleCloudDialogflowV2DetectIntentResponse-    :: GoogleCloudDialogflowV2DetectIntentResponse-googleCloudDialogflowV2DetectIntentResponse =-    GoogleCloudDialogflowV2DetectIntentResponse'-    { _gcdvdirResponseId = Nothing-    , _gcdvdirWebhookStatus = Nothing-    , _gcdvdirQueryResult = Nothing-    }---- | The unique identifier of the response. It can be used to locate a--- response in the training example set or for reporting issues.-gcdvdirResponseId :: Lens' GoogleCloudDialogflowV2DetectIntentResponse (Maybe Text)-gcdvdirResponseId-  = lens _gcdvdirResponseId-      (\ s a -> s{_gcdvdirResponseId = a})---- | Specifies the status of the webhook request.-gcdvdirWebhookStatus :: Lens' GoogleCloudDialogflowV2DetectIntentResponse (Maybe GoogleRpcStatus)-gcdvdirWebhookStatus-  = lens _gcdvdirWebhookStatus-      (\ s a -> s{_gcdvdirWebhookStatus = a})---- | The selected results of the conversational query or event processing.--- See \`alternative_query_results\` for additional potential results.-gcdvdirQueryResult :: Lens' GoogleCloudDialogflowV2DetectIntentResponse (Maybe GoogleCloudDialogflowV2QueryResult)-gcdvdirQueryResult-  = lens _gcdvdirQueryResult-      (\ s a -> s{_gcdvdirQueryResult = a})--instance FromJSON-         GoogleCloudDialogflowV2DetectIntentResponse where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2DetectIntentResponse"-              (\ o ->-                 GoogleCloudDialogflowV2DetectIntentResponse' <$>-                   (o .:? "responseId") <*> (o .:? "webhookStatus") <*>-                     (o .:? "queryResult"))--instance ToJSON-         GoogleCloudDialogflowV2DetectIntentResponse where-        toJSON-          GoogleCloudDialogflowV2DetectIntentResponse'{..}-          = object-              (catMaybes-                 [("responseId" .=) <$> _gcdvdirResponseId,-                  ("webhookStatus" .=) <$> _gcdvdirWebhookStatus,-                  ("queryResult" .=) <$> _gcdvdirQueryResult])---- | An item in the list.------ /See:/ 'googleCloudDialogflowV2IntentMessageListSelectItem' smart constructor.-data GoogleCloudDialogflowV2IntentMessageListSelectItem = GoogleCloudDialogflowV2IntentMessageListSelectItem'-    { _gcdvimlsiImage       :: !(Maybe GoogleCloudDialogflowV2IntentMessageImage)-    , _gcdvimlsiTitle       :: !(Maybe Text)-    , _gcdvimlsiDescription :: !(Maybe Text)-    , _gcdvimlsiInfo        :: !(Maybe GoogleCloudDialogflowV2IntentMessageSelectItemInfo)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageListSelectItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimlsiImage'------ * 'gcdvimlsiTitle'------ * 'gcdvimlsiDescription'------ * 'gcdvimlsiInfo'-googleCloudDialogflowV2IntentMessageListSelectItem-    :: GoogleCloudDialogflowV2IntentMessageListSelectItem-googleCloudDialogflowV2IntentMessageListSelectItem =-    GoogleCloudDialogflowV2IntentMessageListSelectItem'-    { _gcdvimlsiImage = Nothing-    , _gcdvimlsiTitle = Nothing-    , _gcdvimlsiDescription = Nothing-    , _gcdvimlsiInfo = Nothing-    }---- | Optional. The image to display.-gcdvimlsiImage :: Lens' GoogleCloudDialogflowV2IntentMessageListSelectItem (Maybe GoogleCloudDialogflowV2IntentMessageImage)-gcdvimlsiImage-  = lens _gcdvimlsiImage-      (\ s a -> s{_gcdvimlsiImage = a})---- | Required. The title of the list item.-gcdvimlsiTitle :: Lens' GoogleCloudDialogflowV2IntentMessageListSelectItem (Maybe Text)-gcdvimlsiTitle-  = lens _gcdvimlsiTitle-      (\ s a -> s{_gcdvimlsiTitle = a})---- | Optional. The main text describing the item.-gcdvimlsiDescription :: Lens' GoogleCloudDialogflowV2IntentMessageListSelectItem (Maybe Text)-gcdvimlsiDescription-  = lens _gcdvimlsiDescription-      (\ s a -> s{_gcdvimlsiDescription = a})---- | Required. Additional information about this option.-gcdvimlsiInfo :: Lens' GoogleCloudDialogflowV2IntentMessageListSelectItem (Maybe GoogleCloudDialogflowV2IntentMessageSelectItemInfo)-gcdvimlsiInfo-  = lens _gcdvimlsiInfo-      (\ s a -> s{_gcdvimlsiInfo = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageListSelectItem-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageListSelectItem"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageListSelectItem'-                   <$>-                   (o .:? "image") <*> (o .:? "title") <*>-                     (o .:? "description")-                     <*> (o .:? "info"))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageListSelectItem-         where-        toJSON-          GoogleCloudDialogflowV2IntentMessageListSelectItem'{..}-          = object-              (catMaybes-                 [("image" .=) <$> _gcdvimlsiImage,-                  ("title" .=) <$> _gcdvimlsiTitle,-                  ("description" .=) <$> _gcdvimlsiDescription,-                  ("info" .=) <$> _gcdvimlsiInfo])---- | The result of sentiment analysis as configured by--- \`sentiment_analysis_request_config\`.------ /See:/ 'googleCloudDialogflowV2beta1SentimentAnalysisResult' smart constructor.-newtype GoogleCloudDialogflowV2beta1SentimentAnalysisResult = GoogleCloudDialogflowV2beta1SentimentAnalysisResult'-    { _gcdvsarQueryTextSentiment :: Maybe GoogleCloudDialogflowV2beta1Sentiment-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1SentimentAnalysisResult' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvsarQueryTextSentiment'-googleCloudDialogflowV2beta1SentimentAnalysisResult-    :: GoogleCloudDialogflowV2beta1SentimentAnalysisResult-googleCloudDialogflowV2beta1SentimentAnalysisResult =-    GoogleCloudDialogflowV2beta1SentimentAnalysisResult'-    { _gcdvsarQueryTextSentiment = Nothing-    }---- | The sentiment analysis result for \`query_text\`.-gcdvsarQueryTextSentiment :: Lens' GoogleCloudDialogflowV2beta1SentimentAnalysisResult (Maybe GoogleCloudDialogflowV2beta1Sentiment)-gcdvsarQueryTextSentiment-  = lens _gcdvsarQueryTextSentiment-      (\ s a -> s{_gcdvsarQueryTextSentiment = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1SentimentAnalysisResult-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1SentimentAnalysisResult"-              (\ o ->-                 GoogleCloudDialogflowV2beta1SentimentAnalysisResult'-                   <$> (o .:? "queryTextSentiment"))--instance ToJSON-         GoogleCloudDialogflowV2beta1SentimentAnalysisResult-         where-        toJSON-          GoogleCloudDialogflowV2beta1SentimentAnalysisResult'{..}-          = object-              (catMaybes-                 [("queryTextSentiment" .=) <$>-                    _gcdvsarQueryTextSentiment])---- | This message is a wrapper around a collection of entity types.------ /See:/ 'googleCloudDialogflowV2EntityTypeBatch' smart constructor.-newtype GoogleCloudDialogflowV2EntityTypeBatch = GoogleCloudDialogflowV2EntityTypeBatch'-    { _gcdvetbEntityTypes :: Maybe [GoogleCloudDialogflowV2EntityType]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2EntityTypeBatch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvetbEntityTypes'-googleCloudDialogflowV2EntityTypeBatch-    :: GoogleCloudDialogflowV2EntityTypeBatch-googleCloudDialogflowV2EntityTypeBatch =-    GoogleCloudDialogflowV2EntityTypeBatch'-    { _gcdvetbEntityTypes = Nothing-    }---- | A collection of entity types.-gcdvetbEntityTypes :: Lens' GoogleCloudDialogflowV2EntityTypeBatch [GoogleCloudDialogflowV2EntityType]-gcdvetbEntityTypes-  = lens _gcdvetbEntityTypes-      (\ s a -> s{_gcdvetbEntityTypes = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2EntityTypeBatch where-        parseJSON-          = withObject "GoogleCloudDialogflowV2EntityTypeBatch"-              (\ o ->-                 GoogleCloudDialogflowV2EntityTypeBatch' <$>-                   (o .:? "entityTypes" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2EntityTypeBatch where-        toJSON GoogleCloudDialogflowV2EntityTypeBatch'{..}-          = object-              (catMaybes-                 [("entityTypes" .=) <$> _gcdvetbEntityTypes])---- | The free-form diagnostic info. For example, this field could contain--- webhook call latency. The string keys of the Struct\'s fields map can--- change without notice.------ /See:/ 'googleCloudDialogflowV2QueryResultDiagnosticInfo' smart constructor.-newtype GoogleCloudDialogflowV2QueryResultDiagnosticInfo = GoogleCloudDialogflowV2QueryResultDiagnosticInfo'-    { _gcdvqrdiAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2QueryResultDiagnosticInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvqrdiAddtional'-googleCloudDialogflowV2QueryResultDiagnosticInfo-    :: HashMap Text JSONValue -- ^ 'gcdvqrdiAddtional'-    -> GoogleCloudDialogflowV2QueryResultDiagnosticInfo-googleCloudDialogflowV2QueryResultDiagnosticInfo pGcdvqrdiAddtional_ =-    GoogleCloudDialogflowV2QueryResultDiagnosticInfo'-    { _gcdvqrdiAddtional = _Coerce # pGcdvqrdiAddtional_-    }---- | Properties of the object.-gcdvqrdiAddtional :: Lens' GoogleCloudDialogflowV2QueryResultDiagnosticInfo (HashMap Text JSONValue)-gcdvqrdiAddtional-  = lens _gcdvqrdiAddtional-      (\ s a -> s{_gcdvqrdiAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2QueryResultDiagnosticInfo-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2QueryResultDiagnosticInfo"-              (\ o ->-                 GoogleCloudDialogflowV2QueryResultDiagnosticInfo' <$>-                   (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2QueryResultDiagnosticInfo-         where-        toJSON = toJSON . _gcdvqrdiAddtional---- | The text response message.------ /See:/ 'googleCloudDialogflowV2IntentMessageText' smart constructor.-newtype GoogleCloudDialogflowV2IntentMessageText = GoogleCloudDialogflowV2IntentMessageText'-    { _gcdvimtText :: Maybe [Text]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageText' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimtText'-googleCloudDialogflowV2IntentMessageText-    :: GoogleCloudDialogflowV2IntentMessageText-googleCloudDialogflowV2IntentMessageText =-    GoogleCloudDialogflowV2IntentMessageText'-    { _gcdvimtText = Nothing-    }---- | Optional. The collection of the agent\'s responses.-gcdvimtText :: Lens' GoogleCloudDialogflowV2IntentMessageText [Text]-gcdvimtText-  = lens _gcdvimtText (\ s a -> s{_gcdvimtText = a}) .-      _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageText where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageText"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageText' <$>-                   (o .:? "text" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageText where-        toJSON GoogleCloudDialogflowV2IntentMessageText'{..}-          = object (catMaybes [("text" .=) <$> _gcdvimtText])---- | The request to detect user\'s intent.------ /See:/ 'googleCloudDialogflowV2DetectIntentRequest' smart constructor.-data GoogleCloudDialogflowV2DetectIntentRequest = GoogleCloudDialogflowV2DetectIntentRequest'-    { _gcdvdirQueryInput  :: !(Maybe GoogleCloudDialogflowV2QueryInput)-    , _gcdvdirInputAudio  :: !(Maybe Bytes)-    , _gcdvdirQueryParams :: !(Maybe GoogleCloudDialogflowV2QueryParameters)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2DetectIntentRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvdirQueryInput'------ * 'gcdvdirInputAudio'------ * 'gcdvdirQueryParams'-googleCloudDialogflowV2DetectIntentRequest-    :: GoogleCloudDialogflowV2DetectIntentRequest-googleCloudDialogflowV2DetectIntentRequest =-    GoogleCloudDialogflowV2DetectIntentRequest'-    { _gcdvdirQueryInput = Nothing-    , _gcdvdirInputAudio = Nothing-    , _gcdvdirQueryParams = Nothing-    }---- | Required. The input specification. It can be set to: 1. an audio config--- which instructs the speech recognizer how to process the speech audio,--- 2. a conversational query in the form of text, or 3. an event that--- specifies which intent to trigger.-gcdvdirQueryInput :: Lens' GoogleCloudDialogflowV2DetectIntentRequest (Maybe GoogleCloudDialogflowV2QueryInput)-gcdvdirQueryInput-  = lens _gcdvdirQueryInput-      (\ s a -> s{_gcdvdirQueryInput = a})---- | Optional. The natural language speech audio to be processed. This field--- should be populated iff \`query_input\` is set to an input audio config.--- A single request can contain up to 1 minute of speech audio data.-gcdvdirInputAudio :: Lens' GoogleCloudDialogflowV2DetectIntentRequest (Maybe ByteString)-gcdvdirInputAudio-  = lens _gcdvdirInputAudio-      (\ s a -> s{_gcdvdirInputAudio = a})-      . mapping _Bytes---- | Optional. The parameters of this query.-gcdvdirQueryParams :: Lens' GoogleCloudDialogflowV2DetectIntentRequest (Maybe GoogleCloudDialogflowV2QueryParameters)-gcdvdirQueryParams-  = lens _gcdvdirQueryParams-      (\ s a -> s{_gcdvdirQueryParams = a})--instance FromJSON-         GoogleCloudDialogflowV2DetectIntentRequest where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2DetectIntentRequest"-              (\ o ->-                 GoogleCloudDialogflowV2DetectIntentRequest' <$>-                   (o .:? "queryInput") <*> (o .:? "inputAudio") <*>-                     (o .:? "queryParams"))--instance ToJSON-         GoogleCloudDialogflowV2DetectIntentRequest where-        toJSON-          GoogleCloudDialogflowV2DetectIntentRequest'{..}-          = object-              (catMaybes-                 [("queryInput" .=) <$> _gcdvdirQueryInput,-                  ("inputAudio" .=) <$> _gcdvdirInputAudio,-                  ("queryParams" .=) <$> _gcdvdirQueryParams])---- | The collection of extracted parameters.------ /See:/ 'googleCloudDialogflowV2beta1QueryResultParameters' smart constructor.-newtype GoogleCloudDialogflowV2beta1QueryResultParameters = GoogleCloudDialogflowV2beta1QueryResultParameters'-    { _gcdvqrpAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1QueryResultParameters' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvqrpAddtional'-googleCloudDialogflowV2beta1QueryResultParameters-    :: HashMap Text JSONValue -- ^ 'gcdvqrpAddtional'-    -> GoogleCloudDialogflowV2beta1QueryResultParameters-googleCloudDialogflowV2beta1QueryResultParameters pGcdvqrpAddtional_ =-    GoogleCloudDialogflowV2beta1QueryResultParameters'-    { _gcdvqrpAddtional = _Coerce # pGcdvqrpAddtional_-    }---- | Properties of the object.-gcdvqrpAddtional :: Lens' GoogleCloudDialogflowV2beta1QueryResultParameters (HashMap Text JSONValue)-gcdvqrpAddtional-  = lens _gcdvqrpAddtional-      (\ s a -> s{_gcdvqrpAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1QueryResultParameters-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1QueryResultParameters"-              (\ o ->-                 GoogleCloudDialogflowV2beta1QueryResultParameters'-                   <$> (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2beta1QueryResultParameters-         where-        toJSON = toJSON . _gcdvqrpAddtional---- | The basic card message. Useful for displaying information.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageBasicCard' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessageBasicCard = GoogleCloudDialogflowV2beta1IntentMessageBasicCard'-    { _gcdvimbccImage         :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)-    , _gcdvimbccButtons       :: !(Maybe [GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton])-    , _gcdvimbccSubtitle      :: !(Maybe Text)-    , _gcdvimbccTitle         :: !(Maybe Text)-    , _gcdvimbccFormattedText :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageBasicCard' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimbccImage'------ * 'gcdvimbccButtons'------ * 'gcdvimbccSubtitle'------ * 'gcdvimbccTitle'------ * 'gcdvimbccFormattedText'-googleCloudDialogflowV2beta1IntentMessageBasicCard-    :: GoogleCloudDialogflowV2beta1IntentMessageBasicCard-googleCloudDialogflowV2beta1IntentMessageBasicCard =-    GoogleCloudDialogflowV2beta1IntentMessageBasicCard'-    { _gcdvimbccImage = Nothing-    , _gcdvimbccButtons = Nothing-    , _gcdvimbccSubtitle = Nothing-    , _gcdvimbccTitle = Nothing-    , _gcdvimbccFormattedText = Nothing-    }---- | Optional. The image for the card.-gcdvimbccImage :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCard (Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)-gcdvimbccImage-  = lens _gcdvimbccImage-      (\ s a -> s{_gcdvimbccImage = a})---- | Optional. The collection of card buttons.-gcdvimbccButtons :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCard [GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton]-gcdvimbccButtons-  = lens _gcdvimbccButtons-      (\ s a -> s{_gcdvimbccButtons = a})-      . _Default-      . _Coerce---- | Optional. The subtitle of the card.-gcdvimbccSubtitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCard (Maybe Text)-gcdvimbccSubtitle-  = lens _gcdvimbccSubtitle-      (\ s a -> s{_gcdvimbccSubtitle = a})---- | Optional. The title of the card.-gcdvimbccTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCard (Maybe Text)-gcdvimbccTitle-  = lens _gcdvimbccTitle-      (\ s a -> s{_gcdvimbccTitle = a})---- | Required, unless image is present. The body text of the card.-gcdvimbccFormattedText :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCard (Maybe Text)-gcdvimbccFormattedText-  = lens _gcdvimbccFormattedText-      (\ s a -> s{_gcdvimbccFormattedText = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageBasicCard-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageBasicCard"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageBasicCard'-                   <$>-                   (o .:? "image") <*> (o .:? "buttons" .!= mempty) <*>-                     (o .:? "subtitle")-                     <*> (o .:? "title")-                     <*> (o .:? "formattedText"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageBasicCard-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageBasicCard'{..}-          = object-              (catMaybes-                 [("image" .=) <$> _gcdvimbccImage,-                  ("buttons" .=) <$> _gcdvimbccButtons,-                  ("subtitle" .=) <$> _gcdvimbccSubtitle,-                  ("title" .=) <$> _gcdvimbccTitle,-                  ("formattedText" .=) <$> _gcdvimbccFormattedText])---- | Represents an example or template that the agent is trained on.------ /See:/ 'googleCloudDialogflowV2beta1IntentTrainingPhrase' smart constructor.-data GoogleCloudDialogflowV2beta1IntentTrainingPhrase = GoogleCloudDialogflowV2beta1IntentTrainingPhrase'-    { _gParts           :: !(Maybe [GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart])-    , _gName            :: !(Maybe Text)-    , _gTimesAddedCount :: !(Maybe (Textual Int32))-    , _gType            :: !(Maybe GoogleCloudDialogflowV2beta1IntentTrainingPhraseType)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentTrainingPhrase' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gParts'------ * 'gName'------ * 'gTimesAddedCount'------ * 'gType'-googleCloudDialogflowV2beta1IntentTrainingPhrase-    :: GoogleCloudDialogflowV2beta1IntentTrainingPhrase-googleCloudDialogflowV2beta1IntentTrainingPhrase =-    GoogleCloudDialogflowV2beta1IntentTrainingPhrase'-    { _gParts = Nothing-    , _gName = Nothing-    , _gTimesAddedCount = Nothing-    , _gType = Nothing-    }---- | Required. The collection of training phrase parts (can be annotated).--- Fields: \`entity_type\`, \`alias\` and \`user_defined\` should be--- populated only for the annotated parts of the training phrase.-gParts :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrase [GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart]-gParts-  = lens _gParts (\ s a -> s{_gParts = a}) . _Default .-      _Coerce---- | Output only. The unique identifier of this training phrase.-gName :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrase (Maybe Text)-gName = lens _gName (\ s a -> s{_gName = a})---- | Optional. Indicates how many times this example or template was added to--- the intent. Each time a developer adds an existing sample by editing an--- intent or training, this counter is increased.-gTimesAddedCount :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrase (Maybe Int32)-gTimesAddedCount-  = lens _gTimesAddedCount-      (\ s a -> s{_gTimesAddedCount = a})-      . mapping _Coerce---- | Required. The type of the training phrase.-gType :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrase (Maybe GoogleCloudDialogflowV2beta1IntentTrainingPhraseType)-gType = lens _gType (\ s a -> s{_gType = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentTrainingPhrase-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentTrainingPhrase"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentTrainingPhrase' <$>-                   (o .:? "parts" .!= mempty) <*> (o .:? "name") <*>-                     (o .:? "timesAddedCount")-                     <*> (o .:? "type"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentTrainingPhrase-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentTrainingPhrase'{..}-          = object-              (catMaybes-                 [("parts" .=) <$> _gParts, ("name" .=) <$> _gName,-                  ("timesAddedCount" .=) <$> _gTimesAddedCount,-                  ("type" .=) <$> _gType])---- | An answer from Knowledge Connector.------ /See:/ 'googleCloudDialogflowV2beta1KnowledgeAnswersAnswer' smart constructor.-data GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer = GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer'-    { _gcdvkaaMatchConfidence      :: !(Maybe (Textual Double))-    , _gcdvkaaAnswer               :: !(Maybe Text)-    , _gcdvkaaSource               :: !(Maybe Text)-    , _gcdvkaaFaqQuestion          :: !(Maybe Text)-    , _gcdvkaaMatchConfidenceLevel :: !(Maybe GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswerMatchConfidenceLevel)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvkaaMatchConfidence'------ * 'gcdvkaaAnswer'------ * 'gcdvkaaSource'------ * 'gcdvkaaFaqQuestion'------ * 'gcdvkaaMatchConfidenceLevel'-googleCloudDialogflowV2beta1KnowledgeAnswersAnswer-    :: GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer-googleCloudDialogflowV2beta1KnowledgeAnswersAnswer =-    GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer'-    { _gcdvkaaMatchConfidence = Nothing-    , _gcdvkaaAnswer = Nothing-    , _gcdvkaaSource = Nothing-    , _gcdvkaaFaqQuestion = Nothing-    , _gcdvkaaMatchConfidenceLevel = Nothing-    }---- | The system\'s confidence score that this Knowledge answer is a good--- match for this conversational query. The range is from 0.0 (completely--- uncertain) to 1.0 (completely certain). Note: The confidence score is--- likely to vary somewhat (possibly even for identical requests), as the--- underlying model is under constant improvement. It may be deprecated in--- the future. We recommend using \`match_confidence_level\` which should--- be generally more stable.-gcdvkaaMatchConfidence :: Lens' GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer (Maybe Double)-gcdvkaaMatchConfidence-  = lens _gcdvkaaMatchConfidence-      (\ s a -> s{_gcdvkaaMatchConfidence = a})-      . mapping _Coerce---- | The piece of text from the \`source\` knowledge base document that--- answers this conversational query.-gcdvkaaAnswer :: Lens' GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer (Maybe Text)-gcdvkaaAnswer-  = lens _gcdvkaaAnswer-      (\ s a -> s{_gcdvkaaAnswer = a})---- | Indicates which Knowledge Document this answer was extracted from.--- Format: \`projects\/\/knowledgeBases\/\/documents\/\`.-gcdvkaaSource :: Lens' GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer (Maybe Text)-gcdvkaaSource-  = lens _gcdvkaaSource-      (\ s a -> s{_gcdvkaaSource = a})---- | The corresponding FAQ question if the answer was extracted from a FAQ--- Document, empty otherwise.-gcdvkaaFaqQuestion :: Lens' GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer (Maybe Text)-gcdvkaaFaqQuestion-  = lens _gcdvkaaFaqQuestion-      (\ s a -> s{_gcdvkaaFaqQuestion = a})---- | The system\'s confidence level that this knowledge answer is a good--- match for this conversational query. NOTE: The confidence level for a--- given \`\` pair may change without notice, as it depends on models that--- are constantly being improved. However, it will change less frequently--- than the confidence score below, and should be preferred for referencing--- the quality of an answer.-gcdvkaaMatchConfidenceLevel :: Lens' GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer (Maybe GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswerMatchConfidenceLevel)-gcdvkaaMatchConfidenceLevel-  = lens _gcdvkaaMatchConfidenceLevel-      (\ s a -> s{_gcdvkaaMatchConfidenceLevel = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer"-              (\ o ->-                 GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer'-                   <$>-                   (o .:? "matchConfidence") <*> (o .:? "answer") <*>-                     (o .:? "source")-                     <*> (o .:? "faqQuestion")-                     <*> (o .:? "matchConfidenceLevel"))--instance ToJSON-         GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer-         where-        toJSON-          GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer'{..}-          = object-              (catMaybes-                 [("matchConfidence" .=) <$> _gcdvkaaMatchConfidence,-                  ("answer" .=) <$> _gcdvkaaAnswer,-                  ("source" .=) <$> _gcdvkaaSource,-                  ("faqQuestion" .=) <$> _gcdvkaaFaqQuestion,-                  ("matchConfidenceLevel" .=) <$>-                    _gcdvkaaMatchConfidenceLevel])---- | Events allow for matching intents by event name instead of the natural--- language input. For instance, input \`\` can trigger a personalized--- welcome response. The parameter \`name\` may be used by the agent in the--- response: \`“Hello #welcome_event.name! What can I do for you today?”\`.------ /See:/ 'googleCloudDialogflowV2beta1EventInput' smart constructor.-data GoogleCloudDialogflowV2beta1EventInput = GoogleCloudDialogflowV2beta1EventInput'-    { _gooLanguageCode :: !(Maybe Text)-    , _gooName         :: !(Maybe Text)-    , _gooParameters   :: !(Maybe GoogleCloudDialogflowV2beta1EventInputParameters)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1EventInput' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gooLanguageCode'------ * 'gooName'------ * 'gooParameters'-googleCloudDialogflowV2beta1EventInput-    :: GoogleCloudDialogflowV2beta1EventInput-googleCloudDialogflowV2beta1EventInput =-    GoogleCloudDialogflowV2beta1EventInput'-    { _gooLanguageCode = Nothing-    , _gooName = Nothing-    , _gooParameters = Nothing-    }---- | Required. The language of this query. See [Language--- Support](https:\/\/dialogflow.com\/docs\/languages) for a list of the--- currently supported language codes. Note that queries in the same--- session do not necessarily need to specify the same language.-gooLanguageCode :: Lens' GoogleCloudDialogflowV2beta1EventInput (Maybe Text)-gooLanguageCode-  = lens _gooLanguageCode-      (\ s a -> s{_gooLanguageCode = a})---- | Required. The unique identifier of the event.-gooName :: Lens' GoogleCloudDialogflowV2beta1EventInput (Maybe Text)-gooName = lens _gooName (\ s a -> s{_gooName = a})---- | Optional. The collection of parameters associated with the event.-gooParameters :: Lens' GoogleCloudDialogflowV2beta1EventInput (Maybe GoogleCloudDialogflowV2beta1EventInputParameters)-gooParameters-  = lens _gooParameters-      (\ s a -> s{_gooParameters = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1EventInput where-        parseJSON-          = withObject "GoogleCloudDialogflowV2beta1EventInput"-              (\ o ->-                 GoogleCloudDialogflowV2beta1EventInput' <$>-                   (o .:? "languageCode") <*> (o .:? "name") <*>-                     (o .:? "parameters"))--instance ToJSON-         GoogleCloudDialogflowV2beta1EventInput where-        toJSON GoogleCloudDialogflowV2beta1EventInput'{..}-          = object-              (catMaybes-                 [("languageCode" .=) <$> _gooLanguageCode,-                  ("name" .=) <$> _gooName,-                  ("parameters" .=) <$> _gooParameters])---- | The request message for EntityTypes.BatchUpdateEntities.------ /See:/ 'googleCloudDialogflowV2BatchUpdateEntitiesRequest' smart constructor.-data GoogleCloudDialogflowV2BatchUpdateEntitiesRequest = GoogleCloudDialogflowV2BatchUpdateEntitiesRequest'-    { _gcdvbuerLanguageCode :: !(Maybe Text)-    , _gcdvbuerUpdateMask   :: !(Maybe GFieldMask)-    , _gcdvbuerEntities     :: !(Maybe [GoogleCloudDialogflowV2EntityTypeEntity])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2BatchUpdateEntitiesRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvbuerLanguageCode'------ * 'gcdvbuerUpdateMask'------ * 'gcdvbuerEntities'-googleCloudDialogflowV2BatchUpdateEntitiesRequest-    :: GoogleCloudDialogflowV2BatchUpdateEntitiesRequest-googleCloudDialogflowV2BatchUpdateEntitiesRequest =-    GoogleCloudDialogflowV2BatchUpdateEntitiesRequest'-    { _gcdvbuerLanguageCode = Nothing-    , _gcdvbuerUpdateMask = Nothing-    , _gcdvbuerEntities = Nothing-    }---- | Optional. The language of entity synonyms defined in \`entities\`. If--- not specified, the agent\'s default language is used. [More than a dozen--- languages](https:\/\/dialogflow.com\/docs\/reference\/language) are--- supported. Note: languages must be enabled in the agent, before they can--- be used.-gcdvbuerLanguageCode :: Lens' GoogleCloudDialogflowV2BatchUpdateEntitiesRequest (Maybe Text)-gcdvbuerLanguageCode-  = lens _gcdvbuerLanguageCode-      (\ s a -> s{_gcdvbuerLanguageCode = a})---- | Optional. The mask to control which fields get updated.-gcdvbuerUpdateMask :: Lens' GoogleCloudDialogflowV2BatchUpdateEntitiesRequest (Maybe GFieldMask)-gcdvbuerUpdateMask-  = lens _gcdvbuerUpdateMask-      (\ s a -> s{_gcdvbuerUpdateMask = a})---- | Required. The entities to update or create.-gcdvbuerEntities :: Lens' GoogleCloudDialogflowV2BatchUpdateEntitiesRequest [GoogleCloudDialogflowV2EntityTypeEntity]-gcdvbuerEntities-  = lens _gcdvbuerEntities-      (\ s a -> s{_gcdvbuerEntities = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2BatchUpdateEntitiesRequest-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2BatchUpdateEntitiesRequest"-              (\ o ->-                 GoogleCloudDialogflowV2BatchUpdateEntitiesRequest'-                   <$>-                   (o .:? "languageCode") <*> (o .:? "updateMask") <*>-                     (o .:? "entities" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2BatchUpdateEntitiesRequest-         where-        toJSON-          GoogleCloudDialogflowV2BatchUpdateEntitiesRequest'{..}-          = object-              (catMaybes-                 [("languageCode" .=) <$> _gcdvbuerLanguageCode,-                  ("updateMask" .=) <$> _gcdvbuerUpdateMask,-                  ("entities" .=) <$> _gcdvbuerEntities])---- | Returns a response containing a custom, platform-specific payload. See--- the Intent.Message.Platform type for a description of the structure that--- may be required for your platform.------ /See:/ 'googleCloudDialogflowV2IntentMessagePayload' smart constructor.-newtype GoogleCloudDialogflowV2IntentMessagePayload = GoogleCloudDialogflowV2IntentMessagePayload'-    { _gooAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessagePayload' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gooAddtional'-googleCloudDialogflowV2IntentMessagePayload-    :: HashMap Text JSONValue -- ^ 'gooAddtional'-    -> GoogleCloudDialogflowV2IntentMessagePayload-googleCloudDialogflowV2IntentMessagePayload pGooAddtional_ =-    GoogleCloudDialogflowV2IntentMessagePayload'-    { _gooAddtional = _Coerce # pGooAddtional_-    }---- | Properties of the object.-gooAddtional :: Lens' GoogleCloudDialogflowV2IntentMessagePayload (HashMap Text JSONValue)-gooAddtional-  = lens _gooAddtional (\ s a -> s{_gooAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2IntentMessagePayload where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessagePayload"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessagePayload' <$>-                   (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessagePayload where-        toJSON = toJSON . _gooAddtional---- | Metadata in google::longrunning::Operation for Knowledge operations.------ /See:/ 'googleCloudDialogflowV2beta1KnowledgeOperationMetadata' smart constructor.-newtype GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata = GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata'-    { _gcdvkomState :: Maybe GoogleCloudDialogflowV2beta1KnowledgeOperationMetadataState-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvkomState'-googleCloudDialogflowV2beta1KnowledgeOperationMetadata-    :: GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata-googleCloudDialogflowV2beta1KnowledgeOperationMetadata =-    GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata'-    { _gcdvkomState = Nothing-    }---- | Required. The current state of this operation.-gcdvkomState :: Lens' GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata (Maybe GoogleCloudDialogflowV2beta1KnowledgeOperationMetadataState)-gcdvkomState-  = lens _gcdvkomState (\ s a -> s{_gcdvkomState = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata"-              (\ o ->-                 GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata'-                   <$> (o .:? "state"))--instance ToJSON-         GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata-         where-        toJSON-          GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata'{..}-          = object (catMaybes [("state" .=) <$> _gcdvkomState])---- | The request message for a webhook call.------ /See:/ 'googleCloudDialogflowV2beta1WebhookRequest' smart constructor.-data GoogleCloudDialogflowV2beta1WebhookRequest = GoogleCloudDialogflowV2beta1WebhookRequest'-    { _gOriginalDetectIntentRequest :: !(Maybe GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest)-    , _gResponseId                  :: !(Maybe Text)-    , _gAlternativeQueryResults     :: !(Maybe [GoogleCloudDialogflowV2beta1QueryResult])-    , _gQueryResult                 :: !(Maybe GoogleCloudDialogflowV2beta1QueryResult)-    , _gSession                     :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1WebhookRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gOriginalDetectIntentRequest'------ * 'gResponseId'------ * 'gAlternativeQueryResults'------ * 'gQueryResult'------ * 'gSession'-googleCloudDialogflowV2beta1WebhookRequest-    :: GoogleCloudDialogflowV2beta1WebhookRequest-googleCloudDialogflowV2beta1WebhookRequest =-    GoogleCloudDialogflowV2beta1WebhookRequest'-    { _gOriginalDetectIntentRequest = Nothing-    , _gResponseId = Nothing-    , _gAlternativeQueryResults = Nothing-    , _gQueryResult = Nothing-    , _gSession = Nothing-    }---- | Optional. The contents of the original request that was passed to--- \`[Streaming]DetectIntent\` call.-gOriginalDetectIntentRequest :: Lens' GoogleCloudDialogflowV2beta1WebhookRequest (Maybe GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest)-gOriginalDetectIntentRequest-  = lens _gOriginalDetectIntentRequest-      (\ s a -> s{_gOriginalDetectIntentRequest = a})---- | The unique identifier of the response. Contains the same value as--- \`[Streaming]DetectIntentResponse.response_id\`.-gResponseId :: Lens' GoogleCloudDialogflowV2beta1WebhookRequest (Maybe Text)-gResponseId-  = lens _gResponseId (\ s a -> s{_gResponseId = a})---- | Alternative query results from KnowledgeService.-gAlternativeQueryResults :: Lens' GoogleCloudDialogflowV2beta1WebhookRequest [GoogleCloudDialogflowV2beta1QueryResult]-gAlternativeQueryResults-  = lens _gAlternativeQueryResults-      (\ s a -> s{_gAlternativeQueryResults = a})-      . _Default-      . _Coerce---- | The result of the conversational query or event processing. Contains the--- same value as \`[Streaming]DetectIntentResponse.query_result\`.-gQueryResult :: Lens' GoogleCloudDialogflowV2beta1WebhookRequest (Maybe GoogleCloudDialogflowV2beta1QueryResult)-gQueryResult-  = lens _gQueryResult (\ s a -> s{_gQueryResult = a})---- | The unique identifier of detectIntent request session. Can be used to--- identify end-user inside webhook implementation. Format:--- \`projects\/\/agent\/sessions\/\`, or--- \`projects\/\/agent\/environments\/\/users\/\/sessions\/\`.-gSession :: Lens' GoogleCloudDialogflowV2beta1WebhookRequest (Maybe Text)-gSession = lens _gSession (\ s a -> s{_gSession = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1WebhookRequest where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1WebhookRequest"-              (\ o ->-                 GoogleCloudDialogflowV2beta1WebhookRequest' <$>-                   (o .:? "originalDetectIntentRequest") <*>-                     (o .:? "responseId")-                     <*> (o .:? "alternativeQueryResults" .!= mempty)-                     <*> (o .:? "queryResult")-                     <*> (o .:? "session"))--instance ToJSON-         GoogleCloudDialogflowV2beta1WebhookRequest where-        toJSON-          GoogleCloudDialogflowV2beta1WebhookRequest'{..}-          = object-              (catMaybes-                 [("originalDetectIntentRequest" .=) <$>-                    _gOriginalDetectIntentRequest,-                  ("responseId" .=) <$> _gResponseId,-                  ("alternativeQueryResults" .=) <$>-                    _gAlternativeQueryResults,-                  ("queryResult" .=) <$> _gQueryResult,-                  ("session" .=) <$> _gSession])---- | The text response message.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageText' smart constructor.-newtype GoogleCloudDialogflowV2beta1IntentMessageText = GoogleCloudDialogflowV2beta1IntentMessageText'-    { _gooText :: Maybe [Text]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageText' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gooText'-googleCloudDialogflowV2beta1IntentMessageText-    :: GoogleCloudDialogflowV2beta1IntentMessageText-googleCloudDialogflowV2beta1IntentMessageText =-    GoogleCloudDialogflowV2beta1IntentMessageText'-    { _gooText = Nothing-    }---- | Optional. The collection of the agent\'s responses.-gooText :: Lens' GoogleCloudDialogflowV2beta1IntentMessageText [Text]-gooText-  = lens _gooText (\ s a -> s{_gooText = a}) . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageText where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageText"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageText' <$>-                   (o .:? "text" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageText where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageText'{..}-          = object (catMaybes [("text" .=) <$> _gooText])---- | The collection of simple response candidates. This message in--- \`QueryResult.fulfillment_messages\` and--- \`WebhookResponse.fulfillment_messages\` should contain only one--- \`SimpleResponse\`.------ /See:/ 'googleCloudDialogflowV2IntentMessageSimpleResponses' smart constructor.-newtype GoogleCloudDialogflowV2IntentMessageSimpleResponses = GoogleCloudDialogflowV2IntentMessageSimpleResponses'-    { _gSimpleResponses :: Maybe [GoogleCloudDialogflowV2IntentMessageSimpleResponse]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageSimpleResponses' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gSimpleResponses'-googleCloudDialogflowV2IntentMessageSimpleResponses-    :: GoogleCloudDialogflowV2IntentMessageSimpleResponses-googleCloudDialogflowV2IntentMessageSimpleResponses =-    GoogleCloudDialogflowV2IntentMessageSimpleResponses'-    { _gSimpleResponses = Nothing-    }---- | Required. The list of simple responses.-gSimpleResponses :: Lens' GoogleCloudDialogflowV2IntentMessageSimpleResponses [GoogleCloudDialogflowV2IntentMessageSimpleResponse]-gSimpleResponses-  = lens _gSimpleResponses-      (\ s a -> s{_gSimpleResponses = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageSimpleResponses-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageSimpleResponses"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageSimpleResponses'-                   <$> (o .:? "simpleResponses" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageSimpleResponses-         where-        toJSON-          GoogleCloudDialogflowV2IntentMessageSimpleResponses'{..}-          = object-              (catMaybes-                 [("simpleResponses" .=) <$> _gSimpleResponses])---- | Represents a single followup intent in the chain.------ /See:/ 'googleCloudDialogflowV2beta1IntentFollowupIntentInfo' smart constructor.-data GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo = GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo'-    { _gFollowupIntentName       :: !(Maybe Text)-    , _gParentFollowupIntentName :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gFollowupIntentName'------ * 'gParentFollowupIntentName'-googleCloudDialogflowV2beta1IntentFollowupIntentInfo-    :: GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo-googleCloudDialogflowV2beta1IntentFollowupIntentInfo =-    GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo'-    { _gFollowupIntentName = Nothing-    , _gParentFollowupIntentName = Nothing-    }---- | The unique identifier of the followup intent. Format:--- \`projects\/\/agent\/intents\/\`.-gFollowupIntentName :: Lens' GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo (Maybe Text)-gFollowupIntentName-  = lens _gFollowupIntentName-      (\ s a -> s{_gFollowupIntentName = a})---- | The unique identifier of the followup intent\'s parent. Format:--- \`projects\/\/agent\/intents\/\`.-gParentFollowupIntentName :: Lens' GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo (Maybe Text)-gParentFollowupIntentName-  = lens _gParentFollowupIntentName-      (\ s a -> s{_gParentFollowupIntentName = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo'-                   <$>-                   (o .:? "followupIntentName") <*>-                     (o .:? "parentFollowupIntentName"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo'{..}-          = object-              (catMaybes-                 [("followupIntentName" .=) <$> _gFollowupIntentName,-                  ("parentFollowupIntentName" .=) <$>-                    _gParentFollowupIntentName])---- | The collection of extracted parameters.------ /See:/ 'googleCloudDialogflowV2QueryResultParameters' smart constructor.-newtype GoogleCloudDialogflowV2QueryResultParameters = GoogleCloudDialogflowV2QueryResultParameters'-    { _gcdvqrpsAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2QueryResultParameters' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvqrpsAddtional'-googleCloudDialogflowV2QueryResultParameters-    :: HashMap Text JSONValue -- ^ 'gcdvqrpsAddtional'-    -> GoogleCloudDialogflowV2QueryResultParameters-googleCloudDialogflowV2QueryResultParameters pGcdvqrpsAddtional_ =-    GoogleCloudDialogflowV2QueryResultParameters'-    { _gcdvqrpsAddtional = _Coerce # pGcdvqrpsAddtional_-    }---- | Properties of the object.-gcdvqrpsAddtional :: Lens' GoogleCloudDialogflowV2QueryResultParameters (HashMap Text JSONValue)-gcdvqrpsAddtional-  = lens _gcdvqrpsAddtional-      (\ s a -> s{_gcdvqrpsAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2QueryResultParameters where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2QueryResultParameters"-              (\ o ->-                 GoogleCloudDialogflowV2QueryResultParameters' <$>-                   (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2QueryResultParameters where-        toJSON = toJSON . _gcdvqrpsAddtional---- | The free-form diagnostic info. For example, this field could contain--- webhook call latency. The string keys of the Struct\'s fields map can--- change without notice.------ /See:/ 'googleCloudDialogflowV2beta1QueryResultDiagnosticInfo' smart constructor.-newtype GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo = GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo'-    { _gcdvqrdicAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvqrdicAddtional'-googleCloudDialogflowV2beta1QueryResultDiagnosticInfo-    :: HashMap Text JSONValue -- ^ 'gcdvqrdicAddtional'-    -> GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo-googleCloudDialogflowV2beta1QueryResultDiagnosticInfo pGcdvqrdicAddtional_ =-    GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo'-    { _gcdvqrdicAddtional = _Coerce # pGcdvqrdicAddtional_-    }---- | Properties of the object.-gcdvqrdicAddtional :: Lens' GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo (HashMap Text JSONValue)-gcdvqrdicAddtional-  = lens _gcdvqrdicAddtional-      (\ s a -> s{_gcdvqrdicAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo"-              (\ o ->-                 GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo'-                   <$> (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo-         where-        toJSON = toJSON . _gcdvqrdicAddtional---- | The request message for EntityTypes.BatchDeleteEntities.------ /See:/ 'googleCloudDialogflowV2BatchDeleteEntitiesRequest' smart constructor.-data GoogleCloudDialogflowV2BatchDeleteEntitiesRequest = GoogleCloudDialogflowV2BatchDeleteEntitiesRequest'-    { _gcdvbderLanguageCode :: !(Maybe Text)-    , _gcdvbderEntityValues :: !(Maybe [Text])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2BatchDeleteEntitiesRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvbderLanguageCode'------ * 'gcdvbderEntityValues'-googleCloudDialogflowV2BatchDeleteEntitiesRequest-    :: GoogleCloudDialogflowV2BatchDeleteEntitiesRequest-googleCloudDialogflowV2BatchDeleteEntitiesRequest =-    GoogleCloudDialogflowV2BatchDeleteEntitiesRequest'-    { _gcdvbderLanguageCode = Nothing-    , _gcdvbderEntityValues = Nothing-    }---- | Optional. The language of entity synonyms defined in \`entities\`. If--- not specified, the agent\'s default language is used. [More than a dozen--- languages](https:\/\/dialogflow.com\/docs\/reference\/language) are--- supported. Note: languages must be enabled in the agent, before they can--- be used.-gcdvbderLanguageCode :: Lens' GoogleCloudDialogflowV2BatchDeleteEntitiesRequest (Maybe Text)-gcdvbderLanguageCode-  = lens _gcdvbderLanguageCode-      (\ s a -> s{_gcdvbderLanguageCode = a})---- | Required. The canonical \`values\` of the entities to delete. Note that--- these are not fully-qualified names, i.e. they don\'t start with--- \`projects\/\`.-gcdvbderEntityValues :: Lens' GoogleCloudDialogflowV2BatchDeleteEntitiesRequest [Text]-gcdvbderEntityValues-  = lens _gcdvbderEntityValues-      (\ s a -> s{_gcdvbderEntityValues = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2BatchDeleteEntitiesRequest-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2BatchDeleteEntitiesRequest"-              (\ o ->-                 GoogleCloudDialogflowV2BatchDeleteEntitiesRequest'-                   <$>-                   (o .:? "languageCode") <*>-                     (o .:? "entityValues" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2BatchDeleteEntitiesRequest-         where-        toJSON-          GoogleCloudDialogflowV2BatchDeleteEntitiesRequest'{..}-          = object-              (catMaybes-                 [("languageCode" .=) <$> _gcdvbderLanguageCode,-                  ("entityValues" .=) <$> _gcdvbderEntityValues])---- | The response message for Intents.BatchUpdateIntents.------ /See:/ 'googleCloudDialogflowV2BatchUpdateIntentsResponse' smart constructor.-newtype GoogleCloudDialogflowV2BatchUpdateIntentsResponse = GoogleCloudDialogflowV2BatchUpdateIntentsResponse'-    { _gIntents :: Maybe [GoogleCloudDialogflowV2Intent]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2BatchUpdateIntentsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gIntents'-googleCloudDialogflowV2BatchUpdateIntentsResponse-    :: GoogleCloudDialogflowV2BatchUpdateIntentsResponse-googleCloudDialogflowV2BatchUpdateIntentsResponse =-    GoogleCloudDialogflowV2BatchUpdateIntentsResponse'-    { _gIntents = Nothing-    }---- | The collection of updated or created intents.-gIntents :: Lens' GoogleCloudDialogflowV2BatchUpdateIntentsResponse [GoogleCloudDialogflowV2Intent]-gIntents-  = lens _gIntents (\ s a -> s{_gIntents = a}) .-      _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2BatchUpdateIntentsResponse-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2BatchUpdateIntentsResponse"-              (\ o ->-                 GoogleCloudDialogflowV2BatchUpdateIntentsResponse'-                   <$> (o .:? "intents" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2BatchUpdateIntentsResponse-         where-        toJSON-          GoogleCloudDialogflowV2BatchUpdateIntentsResponse'{..}-          = object (catMaybes [("intents" .=) <$> _gIntents])---- | The response message for EntityTypes.ListEntityTypes.------ /See:/ 'googleCloudDialogflowV2ListEntityTypesResponse' smart constructor.-data GoogleCloudDialogflowV2ListEntityTypesResponse = GoogleCloudDialogflowV2ListEntityTypesResponse'-    { _gcdvletrNextPageToken :: !(Maybe Text)-    , _gcdvletrEntityTypes   :: !(Maybe [GoogleCloudDialogflowV2EntityType])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2ListEntityTypesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvletrNextPageToken'------ * 'gcdvletrEntityTypes'-googleCloudDialogflowV2ListEntityTypesResponse-    :: GoogleCloudDialogflowV2ListEntityTypesResponse-googleCloudDialogflowV2ListEntityTypesResponse =-    GoogleCloudDialogflowV2ListEntityTypesResponse'-    { _gcdvletrNextPageToken = Nothing-    , _gcdvletrEntityTypes = Nothing-    }---- | Token to retrieve the next page of results, or empty if there are no--- more results in the list.-gcdvletrNextPageToken :: Lens' GoogleCloudDialogflowV2ListEntityTypesResponse (Maybe Text)-gcdvletrNextPageToken-  = lens _gcdvletrNextPageToken-      (\ s a -> s{_gcdvletrNextPageToken = a})---- | The list of agent entity types. There will be a maximum number of items--- returned based on the page_size field in the request.-gcdvletrEntityTypes :: Lens' GoogleCloudDialogflowV2ListEntityTypesResponse [GoogleCloudDialogflowV2EntityType]-gcdvletrEntityTypes-  = lens _gcdvletrEntityTypes-      (\ s a -> s{_gcdvletrEntityTypes = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2ListEntityTypesResponse where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2ListEntityTypesResponse"-              (\ o ->-                 GoogleCloudDialogflowV2ListEntityTypesResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "entityTypes" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2ListEntityTypesResponse where-        toJSON-          GoogleCloudDialogflowV2ListEntityTypesResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _gcdvletrNextPageToken,-                  ("entityTypes" .=) <$> _gcdvletrEntityTypes])---- | Represents a conversational agent.------ /See:/ 'googleCloudDialogflowV2Agent' smart constructor.-data GoogleCloudDialogflowV2Agent = GoogleCloudDialogflowV2Agent'-    { _gcdvaParent                  :: !(Maybe Text)-    , _gcdvaDefaultLanguageCode     :: !(Maybe Text)-    , _gcdvaEnableLogging           :: !(Maybe Bool)-    , _gcdvaClassificationThreshold :: !(Maybe (Textual Double))-    , _gcdvaAvatarURI               :: !(Maybe Text)-    , _gcdvaSupportedLanguageCodes  :: !(Maybe [Text])-    , _gcdvaDisplayName             :: !(Maybe Text)-    , _gcdvaMatchMode               :: !(Maybe GoogleCloudDialogflowV2AgentMatchMode)-    , _gcdvaTimeZone                :: !(Maybe Text)-    , _gcdvaDescription             :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2Agent' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvaParent'------ * 'gcdvaDefaultLanguageCode'------ * 'gcdvaEnableLogging'------ * 'gcdvaClassificationThreshold'------ * 'gcdvaAvatarURI'------ * 'gcdvaSupportedLanguageCodes'------ * 'gcdvaDisplayName'------ * 'gcdvaMatchMode'------ * 'gcdvaTimeZone'------ * 'gcdvaDescription'-googleCloudDialogflowV2Agent-    :: GoogleCloudDialogflowV2Agent-googleCloudDialogflowV2Agent =-    GoogleCloudDialogflowV2Agent'-    { _gcdvaParent = Nothing-    , _gcdvaDefaultLanguageCode = Nothing-    , _gcdvaEnableLogging = Nothing-    , _gcdvaClassificationThreshold = Nothing-    , _gcdvaAvatarURI = Nothing-    , _gcdvaSupportedLanguageCodes = Nothing-    , _gcdvaDisplayName = Nothing-    , _gcdvaMatchMode = Nothing-    , _gcdvaTimeZone = Nothing-    , _gcdvaDescription = Nothing-    }---- | Required. The project of this agent. Format: \`projects\/\`.-gcdvaParent :: Lens' GoogleCloudDialogflowV2Agent (Maybe Text)-gcdvaParent-  = lens _gcdvaParent (\ s a -> s{_gcdvaParent = a})---- | Required. The default language of the agent as a language tag. See--- [Language Support](https:\/\/dialogflow.com\/docs\/reference\/language)--- for a list of the currently supported language codes. This field cannot--- be set by the \`Update\` method.-gcdvaDefaultLanguageCode :: Lens' GoogleCloudDialogflowV2Agent (Maybe Text)-gcdvaDefaultLanguageCode-  = lens _gcdvaDefaultLanguageCode-      (\ s a -> s{_gcdvaDefaultLanguageCode = a})---- | Optional. Determines whether this agent should log conversation queries.-gcdvaEnableLogging :: Lens' GoogleCloudDialogflowV2Agent (Maybe Bool)-gcdvaEnableLogging-  = lens _gcdvaEnableLogging-      (\ s a -> s{_gcdvaEnableLogging = a})---- | Optional. To filter out false positive results and still get variety in--- matched natural language inputs for your agent, you can tune the machine--- learning classification threshold. If the returned score value is less--- than the threshold value, then a fallback intent is be triggered or, if--- there are no fallback intents defined, no intent will be triggered. The--- score values range from 0.0 (completely uncertain) to 1.0 (completely--- certain). If set to 0.0, the default of 0.3 is used.-gcdvaClassificationThreshold :: Lens' GoogleCloudDialogflowV2Agent (Maybe Double)-gcdvaClassificationThreshold-  = lens _gcdvaClassificationThreshold-      (\ s a -> s{_gcdvaClassificationThreshold = a})-      . mapping _Coerce---- | Optional. The URI of the agent\'s avatar. Avatars are used throughout--- the Dialogflow console and in the self-hosted [Web--- Demo](https:\/\/dialogflow.com\/docs\/integrations\/web-demo)--- integration.-gcdvaAvatarURI :: Lens' GoogleCloudDialogflowV2Agent (Maybe Text)-gcdvaAvatarURI-  = lens _gcdvaAvatarURI-      (\ s a -> s{_gcdvaAvatarURI = a})---- | Optional. The list of all languages supported by this agent (except for--- the \`default_language_code\`).-gcdvaSupportedLanguageCodes :: Lens' GoogleCloudDialogflowV2Agent [Text]-gcdvaSupportedLanguageCodes-  = lens _gcdvaSupportedLanguageCodes-      (\ s a -> s{_gcdvaSupportedLanguageCodes = a})-      . _Default-      . _Coerce---- | Required. The name of this agent.-gcdvaDisplayName :: Lens' GoogleCloudDialogflowV2Agent (Maybe Text)-gcdvaDisplayName-  = lens _gcdvaDisplayName-      (\ s a -> s{_gcdvaDisplayName = a})---- | Optional. Determines how intents are detected from user queries.-gcdvaMatchMode :: Lens' GoogleCloudDialogflowV2Agent (Maybe GoogleCloudDialogflowV2AgentMatchMode)-gcdvaMatchMode-  = lens _gcdvaMatchMode-      (\ s a -> s{_gcdvaMatchMode = a})---- | Required. The time zone of this agent from the [time zone--- database](https:\/\/www.iana.org\/time-zones), e.g., America\/New_York,--- Europe\/Paris.-gcdvaTimeZone :: Lens' GoogleCloudDialogflowV2Agent (Maybe Text)-gcdvaTimeZone-  = lens _gcdvaTimeZone-      (\ s a -> s{_gcdvaTimeZone = a})---- | Optional. The description of this agent. The maximum length is 500--- characters. If exceeded, the request is rejected.-gcdvaDescription :: Lens' GoogleCloudDialogflowV2Agent (Maybe Text)-gcdvaDescription-  = lens _gcdvaDescription-      (\ s a -> s{_gcdvaDescription = a})--instance FromJSON GoogleCloudDialogflowV2Agent where-        parseJSON-          = withObject "GoogleCloudDialogflowV2Agent"-              (\ o ->-                 GoogleCloudDialogflowV2Agent' <$>-                   (o .:? "parent") <*> (o .:? "defaultLanguageCode")-                     <*> (o .:? "enableLogging")-                     <*> (o .:? "classificationThreshold")-                     <*> (o .:? "avatarUri")-                     <*> (o .:? "supportedLanguageCodes" .!= mempty)-                     <*> (o .:? "displayName")-                     <*> (o .:? "matchMode")-                     <*> (o .:? "timeZone")-                     <*> (o .:? "description"))--instance ToJSON GoogleCloudDialogflowV2Agent where-        toJSON GoogleCloudDialogflowV2Agent'{..}-          = object-              (catMaybes-                 [("parent" .=) <$> _gcdvaParent,-                  ("defaultLanguageCode" .=) <$>-                    _gcdvaDefaultLanguageCode,-                  ("enableLogging" .=) <$> _gcdvaEnableLogging,-                  ("classificationThreshold" .=) <$>-                    _gcdvaClassificationThreshold,-                  ("avatarUri" .=) <$> _gcdvaAvatarURI,-                  ("supportedLanguageCodes" .=) <$>-                    _gcdvaSupportedLanguageCodes,-                  ("displayName" .=) <$> _gcdvaDisplayName,-                  ("matchMode" .=) <$> _gcdvaMatchMode,-                  ("timeZone" .=) <$> _gcdvaTimeZone,-                  ("description" .=) <$> _gcdvaDescription])---- | Corresponds to the \`Response\` field in the Dialogflow console.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessage' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessage = GoogleCloudDialogflowV2beta1IntentMessage'-    { _gcdvimCard                      :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageCard)-    , _gcdvimImage                     :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)-    , _gcdvimPlatform                  :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessagePlatform)-    , _gcdvimLinkOutSuggestion         :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion)-    , _gcdvimText                      :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageText)-    , _gcdvimCarouselSelect            :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect)-    , _gcdvimTelephonySynthesizeSpeech :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech)-    , _gcdvimSimpleResponses           :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses)-    , _gcdvimPayload                   :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessagePayload)-    , _gcdvimTelephonyTransferCall     :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall)-    , _gcdvimSuggestions               :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageSuggestions)-    , _gcdvimListSelect                :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageListSelect)-    , _gcdvimTelephonyPlayAudio        :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio)-    , _gcdvimBasicCard                 :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageBasicCard)-    , _gcdvimQuickReplies              :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageQuickReplies)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessage' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimCard'------ * 'gcdvimImage'------ * 'gcdvimPlatform'------ * 'gcdvimLinkOutSuggestion'------ * 'gcdvimText'------ * 'gcdvimCarouselSelect'------ * 'gcdvimTelephonySynthesizeSpeech'------ * 'gcdvimSimpleResponses'------ * 'gcdvimPayload'------ * 'gcdvimTelephonyTransferCall'------ * 'gcdvimSuggestions'------ * 'gcdvimListSelect'------ * 'gcdvimTelephonyPlayAudio'------ * 'gcdvimBasicCard'------ * 'gcdvimQuickReplies'-googleCloudDialogflowV2beta1IntentMessage-    :: GoogleCloudDialogflowV2beta1IntentMessage-googleCloudDialogflowV2beta1IntentMessage =-    GoogleCloudDialogflowV2beta1IntentMessage'-    { _gcdvimCard = Nothing-    , _gcdvimImage = Nothing-    , _gcdvimPlatform = Nothing-    , _gcdvimLinkOutSuggestion = Nothing-    , _gcdvimText = Nothing-    , _gcdvimCarouselSelect = Nothing-    , _gcdvimTelephonySynthesizeSpeech = Nothing-    , _gcdvimSimpleResponses = Nothing-    , _gcdvimPayload = Nothing-    , _gcdvimTelephonyTransferCall = Nothing-    , _gcdvimSuggestions = Nothing-    , _gcdvimListSelect = Nothing-    , _gcdvimTelephonyPlayAudio = Nothing-    , _gcdvimBasicCard = Nothing-    , _gcdvimQuickReplies = Nothing-    }---- | Displays a card.-gcdvimCard :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageCard)-gcdvimCard-  = lens _gcdvimCard (\ s a -> s{_gcdvimCard = a})---- | Displays an image.-gcdvimImage :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)-gcdvimImage-  = lens _gcdvimImage (\ s a -> s{_gcdvimImage = a})---- | Optional. The platform that this message is intended for.-gcdvimPlatform :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessagePlatform)-gcdvimPlatform-  = lens _gcdvimPlatform-      (\ s a -> s{_gcdvimPlatform = a})---- | Displays a link out suggestion chip for Actions on Google.-gcdvimLinkOutSuggestion :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion)-gcdvimLinkOutSuggestion-  = lens _gcdvimLinkOutSuggestion-      (\ s a -> s{_gcdvimLinkOutSuggestion = a})---- | Returns a text response.-gcdvimText :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageText)-gcdvimText-  = lens _gcdvimText (\ s a -> s{_gcdvimText = a})---- | Displays a carousel card for Actions on Google.-gcdvimCarouselSelect :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect)-gcdvimCarouselSelect-  = lens _gcdvimCarouselSelect-      (\ s a -> s{_gcdvimCarouselSelect = a})---- | Synthesizes speech in Telephony Gateway.-gcdvimTelephonySynthesizeSpeech :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech)-gcdvimTelephonySynthesizeSpeech-  = lens _gcdvimTelephonySynthesizeSpeech-      (\ s a -> s{_gcdvimTelephonySynthesizeSpeech = a})---- | Returns a voice or text-only response for Actions on Google.-gcdvimSimpleResponses :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses)-gcdvimSimpleResponses-  = lens _gcdvimSimpleResponses-      (\ s a -> s{_gcdvimSimpleResponses = a})---- | Returns a response containing a custom, platform-specific payload. See--- the Intent.Message.Platform type for a description of the structure that--- may be required for your platform.-gcdvimPayload :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessagePayload)-gcdvimPayload-  = lens _gcdvimPayload-      (\ s a -> s{_gcdvimPayload = a})---- | Transfers the call in Telephony Gateway.-gcdvimTelephonyTransferCall :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall)-gcdvimTelephonyTransferCall-  = lens _gcdvimTelephonyTransferCall-      (\ s a -> s{_gcdvimTelephonyTransferCall = a})---- | Displays suggestion chips for Actions on Google.-gcdvimSuggestions :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageSuggestions)-gcdvimSuggestions-  = lens _gcdvimSuggestions-      (\ s a -> s{_gcdvimSuggestions = a})---- | Displays a list card for Actions on Google.-gcdvimListSelect :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageListSelect)-gcdvimListSelect-  = lens _gcdvimListSelect-      (\ s a -> s{_gcdvimListSelect = a})---- | Plays audio from a file in Telephony Gateway.-gcdvimTelephonyPlayAudio :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio)-gcdvimTelephonyPlayAudio-  = lens _gcdvimTelephonyPlayAudio-      (\ s a -> s{_gcdvimTelephonyPlayAudio = a})---- | Displays a basic card for Actions on Google.-gcdvimBasicCard :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageBasicCard)-gcdvimBasicCard-  = lens _gcdvimBasicCard-      (\ s a -> s{_gcdvimBasicCard = a})---- | Displays quick replies.-gcdvimQuickReplies :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageQuickReplies)-gcdvimQuickReplies-  = lens _gcdvimQuickReplies-      (\ s a -> s{_gcdvimQuickReplies = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessage where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessage"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessage' <$>-                   (o .:? "card") <*> (o .:? "image") <*>-                     (o .:? "platform")-                     <*> (o .:? "linkOutSuggestion")-                     <*> (o .:? "text")-                     <*> (o .:? "carouselSelect")-                     <*> (o .:? "telephonySynthesizeSpeech")-                     <*> (o .:? "simpleResponses")-                     <*> (o .:? "payload")-                     <*> (o .:? "telephonyTransferCall")-                     <*> (o .:? "suggestions")-                     <*> (o .:? "listSelect")-                     <*> (o .:? "telephonyPlayAudio")-                     <*> (o .:? "basicCard")-                     <*> (o .:? "quickReplies"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessage where-        toJSON GoogleCloudDialogflowV2beta1IntentMessage'{..}-          = object-              (catMaybes-                 [("card" .=) <$> _gcdvimCard,-                  ("image" .=) <$> _gcdvimImage,-                  ("platform" .=) <$> _gcdvimPlatform,-                  ("linkOutSuggestion" .=) <$>-                    _gcdvimLinkOutSuggestion,-                  ("text" .=) <$> _gcdvimText,-                  ("carouselSelect" .=) <$> _gcdvimCarouselSelect,-                  ("telephonySynthesizeSpeech" .=) <$>-                    _gcdvimTelephonySynthesizeSpeech,-                  ("simpleResponses" .=) <$> _gcdvimSimpleResponses,-                  ("payload" .=) <$> _gcdvimPayload,-                  ("telephonyTransferCall" .=) <$>-                    _gcdvimTelephonyTransferCall,-                  ("suggestions" .=) <$> _gcdvimSuggestions,-                  ("listSelect" .=) <$> _gcdvimListSelect,-                  ("telephonyPlayAudio" .=) <$>-                    _gcdvimTelephonyPlayAudio,-                  ("basicCard" .=) <$> _gcdvimBasicCard,-                  ("quickReplies" .=) <$> _gcdvimQuickReplies])---- | Additional info about the select item for when it is triggered in a--- dialog.------ /See:/ 'googleCloudDialogflowV2IntentMessageSelectItemInfo' smart constructor.-data GoogleCloudDialogflowV2IntentMessageSelectItemInfo = GoogleCloudDialogflowV2IntentMessageSelectItemInfo'-    { _gcdvimsiiKey      :: !(Maybe Text)-    , _gcdvimsiiSynonyms :: !(Maybe [Text])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageSelectItemInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimsiiKey'------ * 'gcdvimsiiSynonyms'-googleCloudDialogflowV2IntentMessageSelectItemInfo-    :: GoogleCloudDialogflowV2IntentMessageSelectItemInfo-googleCloudDialogflowV2IntentMessageSelectItemInfo =-    GoogleCloudDialogflowV2IntentMessageSelectItemInfo'-    { _gcdvimsiiKey = Nothing-    , _gcdvimsiiSynonyms = Nothing-    }---- | Required. A unique key that will be sent back to the agent if this--- response is given.-gcdvimsiiKey :: Lens' GoogleCloudDialogflowV2IntentMessageSelectItemInfo (Maybe Text)-gcdvimsiiKey-  = lens _gcdvimsiiKey (\ s a -> s{_gcdvimsiiKey = a})---- | Optional. A list of synonyms that can also be used to trigger this item--- in dialog.-gcdvimsiiSynonyms :: Lens' GoogleCloudDialogflowV2IntentMessageSelectItemInfo [Text]-gcdvimsiiSynonyms-  = lens _gcdvimsiiSynonyms-      (\ s a -> s{_gcdvimsiiSynonyms = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageSelectItemInfo-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageSelectItemInfo"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageSelectItemInfo'-                   <$> (o .:? "key") <*> (o .:? "synonyms" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageSelectItemInfo-         where-        toJSON-          GoogleCloudDialogflowV2IntentMessageSelectItemInfo'{..}-          = object-              (catMaybes-                 [("key" .=) <$> _gcdvimsiiKey,-                  ("synonyms" .=) <$> _gcdvimsiiSynonyms])---- | The sentiment, such as positive\/negative feeling or association, for a--- unit of analysis, such as the query text.------ /See:/ 'googleCloudDialogflowV2beta1Sentiment' smart constructor.-data GoogleCloudDialogflowV2beta1Sentiment = GoogleCloudDialogflowV2beta1Sentiment'-    { _gcdvsScore     :: !(Maybe (Textual Double))-    , _gcdvsMagnitude :: !(Maybe (Textual Double))-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1Sentiment' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvsScore'------ * 'gcdvsMagnitude'-googleCloudDialogflowV2beta1Sentiment-    :: GoogleCloudDialogflowV2beta1Sentiment-googleCloudDialogflowV2beta1Sentiment =-    GoogleCloudDialogflowV2beta1Sentiment'-    { _gcdvsScore = Nothing-    , _gcdvsMagnitude = Nothing-    }---- | Sentiment score between -1.0 (negative sentiment) and 1.0 (positive--- sentiment).-gcdvsScore :: Lens' GoogleCloudDialogflowV2beta1Sentiment (Maybe Double)-gcdvsScore-  = lens _gcdvsScore (\ s a -> s{_gcdvsScore = a}) .-      mapping _Coerce---- | A non-negative number in the [0, +inf) range, which represents the--- absolute magnitude of sentiment, regardless of score (positive or--- negative).-gcdvsMagnitude :: Lens' GoogleCloudDialogflowV2beta1Sentiment (Maybe Double)-gcdvsMagnitude-  = lens _gcdvsMagnitude-      (\ s a -> s{_gcdvsMagnitude = a})-      . mapping _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1Sentiment where-        parseJSON-          = withObject "GoogleCloudDialogflowV2beta1Sentiment"-              (\ o ->-                 GoogleCloudDialogflowV2beta1Sentiment' <$>-                   (o .:? "score") <*> (o .:? "magnitude"))--instance ToJSON GoogleCloudDialogflowV2beta1Sentiment-         where-        toJSON GoogleCloudDialogflowV2beta1Sentiment'{..}-          = object-              (catMaybes-                 [("score" .=) <$> _gcdvsScore,-                  ("magnitude" .=) <$> _gcdvsMagnitude])---- | The request message for EntityTypes.BatchDeleteEntityTypes.------ /See:/ 'googleCloudDialogflowV2BatchDeleteEntityTypesRequest' smart constructor.-newtype GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest = GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest'-    { _gcdvbdetrEntityTypeNames :: Maybe [Text]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvbdetrEntityTypeNames'-googleCloudDialogflowV2BatchDeleteEntityTypesRequest-    :: GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest-googleCloudDialogflowV2BatchDeleteEntityTypesRequest =-    GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest'-    { _gcdvbdetrEntityTypeNames = Nothing-    }---- | Required. The names entity types to delete. All names must point to the--- same agent as \`parent\`.-gcdvbdetrEntityTypeNames :: Lens' GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest [Text]-gcdvbdetrEntityTypeNames-  = lens _gcdvbdetrEntityTypeNames-      (\ s a -> s{_gcdvbdetrEntityTypeNames = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest"-              (\ o ->-                 GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest'-                   <$> (o .:? "entityTypeNames" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest-         where-        toJSON-          GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest'{..}-          = object-              (catMaybes-                 [("entityTypeNames" .=) <$>-                    _gcdvbdetrEntityTypeNames])---- | Represents the query input. It can contain either: 1. An audio config--- which instructs the speech recognizer how to process the speech audio.--- 2. A conversational query in the form of text,. 3. An event that--- specifies which intent to trigger.------ /See:/ 'googleCloudDialogflowV2QueryInput' smart constructor.-data GoogleCloudDialogflowV2QueryInput = GoogleCloudDialogflowV2QueryInput'-    { _gcdvqiAudioConfig :: !(Maybe GoogleCloudDialogflowV2InputAudioConfig)-    , _gcdvqiEvent       :: !(Maybe GoogleCloudDialogflowV2EventInput)-    , _gcdvqiText        :: !(Maybe GoogleCloudDialogflowV2TextInput)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2QueryInput' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvqiAudioConfig'------ * 'gcdvqiEvent'------ * 'gcdvqiText'-googleCloudDialogflowV2QueryInput-    :: GoogleCloudDialogflowV2QueryInput-googleCloudDialogflowV2QueryInput =-    GoogleCloudDialogflowV2QueryInput'-    { _gcdvqiAudioConfig = Nothing-    , _gcdvqiEvent = Nothing-    , _gcdvqiText = Nothing-    }---- | Instructs the speech recognizer how to process the speech audio.-gcdvqiAudioConfig :: Lens' GoogleCloudDialogflowV2QueryInput (Maybe GoogleCloudDialogflowV2InputAudioConfig)-gcdvqiAudioConfig-  = lens _gcdvqiAudioConfig-      (\ s a -> s{_gcdvqiAudioConfig = a})---- | The event to be processed.-gcdvqiEvent :: Lens' GoogleCloudDialogflowV2QueryInput (Maybe GoogleCloudDialogflowV2EventInput)-gcdvqiEvent-  = lens _gcdvqiEvent (\ s a -> s{_gcdvqiEvent = a})---- | The natural language text to be processed.-gcdvqiText :: Lens' GoogleCloudDialogflowV2QueryInput (Maybe GoogleCloudDialogflowV2TextInput)-gcdvqiText-  = lens _gcdvqiText (\ s a -> s{_gcdvqiText = a})--instance FromJSON GoogleCloudDialogflowV2QueryInput-         where-        parseJSON-          = withObject "GoogleCloudDialogflowV2QueryInput"-              (\ o ->-                 GoogleCloudDialogflowV2QueryInput' <$>-                   (o .:? "audioConfig") <*> (o .:? "event") <*>-                     (o .:? "text"))--instance ToJSON GoogleCloudDialogflowV2QueryInput-         where-        toJSON GoogleCloudDialogflowV2QueryInput'{..}-          = object-              (catMaybes-                 [("audioConfig" .=) <$> _gcdvqiAudioConfig,-                  ("event" .=) <$> _gcdvqiEvent,-                  ("text" .=) <$> _gcdvqiText])---- | The request message for Agents.ExportAgent.------ /See:/ 'googleCloudDialogflowV2ExportAgentRequest' smart constructor.-newtype GoogleCloudDialogflowV2ExportAgentRequest = GoogleCloudDialogflowV2ExportAgentRequest'-    { _gcdvearAgentURI :: Maybe Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2ExportAgentRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvearAgentURI'-googleCloudDialogflowV2ExportAgentRequest-    :: GoogleCloudDialogflowV2ExportAgentRequest-googleCloudDialogflowV2ExportAgentRequest =-    GoogleCloudDialogflowV2ExportAgentRequest'-    { _gcdvearAgentURI = Nothing-    }---- | Optional. The [Google Cloud--- Storage](https:\/\/cloud.google.com\/storage\/docs\/) URI to export the--- agent to. The format of this URI must be \`gs:\/\/\/\`. If left--- unspecified, the serialized agent is returned inline.-gcdvearAgentURI :: Lens' GoogleCloudDialogflowV2ExportAgentRequest (Maybe Text)-gcdvearAgentURI-  = lens _gcdvearAgentURI-      (\ s a -> s{_gcdvearAgentURI = a})--instance FromJSON-         GoogleCloudDialogflowV2ExportAgentRequest where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2ExportAgentRequest"-              (\ o ->-                 GoogleCloudDialogflowV2ExportAgentRequest' <$>-                   (o .:? "agentUri"))--instance ToJSON-         GoogleCloudDialogflowV2ExportAgentRequest where-        toJSON GoogleCloudDialogflowV2ExportAgentRequest'{..}-          = object-              (catMaybes [("agentUri" .=) <$> _gcdvearAgentURI])---- | The card for presenting a carousel of options to select from.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageCarouselSelect' smart constructor.-newtype GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect = GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect'-    { _gcdvimcsItems :: Maybe [GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimcsItems'-googleCloudDialogflowV2beta1IntentMessageCarouselSelect-    :: GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect-googleCloudDialogflowV2beta1IntentMessageCarouselSelect =-    GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect'-    { _gcdvimcsItems = Nothing-    }---- | Required. Carousel items.-gcdvimcsItems :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect [GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem]-gcdvimcsItems-  = lens _gcdvimcsItems-      (\ s a -> s{_gcdvimcsItems = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect'-                   <$> (o .:? "items" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect'{..}-          = object-              (catMaybes [("items" .=) <$> _gcdvimcsItems])---- | Represents a context.------ /See:/ 'googleCloudDialogflowV2beta1Context' smart constructor.-data GoogleCloudDialogflowV2beta1Context = GoogleCloudDialogflowV2beta1Context'-    { _gcdvcLifespanCount :: !(Maybe (Textual Int32))-    , _gcdvcName          :: !(Maybe Text)-    , _gcdvcParameters    :: !(Maybe GoogleCloudDialogflowV2beta1ContextParameters)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1Context' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvcLifespanCount'------ * 'gcdvcName'------ * 'gcdvcParameters'-googleCloudDialogflowV2beta1Context-    :: GoogleCloudDialogflowV2beta1Context-googleCloudDialogflowV2beta1Context =-    GoogleCloudDialogflowV2beta1Context'-    { _gcdvcLifespanCount = Nothing-    , _gcdvcName = Nothing-    , _gcdvcParameters = Nothing-    }---- | Optional. The number of conversational query requests after which the--- context expires. If set to \`0\` (the default) the context expires--- immediately. Contexts expire automatically after 10 minutes even if--- there are no matching queries.-gcdvcLifespanCount :: Lens' GoogleCloudDialogflowV2beta1Context (Maybe Int32)-gcdvcLifespanCount-  = lens _gcdvcLifespanCount-      (\ s a -> s{_gcdvcLifespanCount = a})-      . mapping _Coerce---- | Required. The unique identifier of the context. Format:--- \`projects\/\/agent\/sessions\/\/contexts\/\`, or--- \`projects\/\/agent\/environments\/\/users\/\/sessions\/\/contexts\/\`.--- The \`Context ID\` is always converted to lowercase, may only contain--- characters in a-zA-Z0-9_-% and may be at most 250 bytes long. If--- \`Environment ID\` is not specified, we assume default \'draft\'--- environment. If \`User ID\` is not specified, we assume default \'-\'--- user.-gcdvcName :: Lens' GoogleCloudDialogflowV2beta1Context (Maybe Text)-gcdvcName-  = lens _gcdvcName (\ s a -> s{_gcdvcName = a})---- | Optional. The collection of parameters associated with this context.--- Refer to [this--- doc](https:\/\/dialogflow.com\/docs\/actions-and-parameters) for syntax.-gcdvcParameters :: Lens' GoogleCloudDialogflowV2beta1Context (Maybe GoogleCloudDialogflowV2beta1ContextParameters)-gcdvcParameters-  = lens _gcdvcParameters-      (\ s a -> s{_gcdvcParameters = a})--instance FromJSON GoogleCloudDialogflowV2beta1Context-         where-        parseJSON-          = withObject "GoogleCloudDialogflowV2beta1Context"-              (\ o ->-                 GoogleCloudDialogflowV2beta1Context' <$>-                   (o .:? "lifespanCount") <*> (o .:? "name") <*>-                     (o .:? "parameters"))--instance ToJSON GoogleCloudDialogflowV2beta1Context-         where-        toJSON GoogleCloudDialogflowV2beta1Context'{..}-          = object-              (catMaybes-                 [("lifespanCount" .=) <$> _gcdvcLifespanCount,-                  ("name" .=) <$> _gcdvcName,-                  ("parameters" .=) <$> _gcdvcParameters])---- | The request message for EntityTypes.BatchUpdateEntityTypes.------ /See:/ 'googleCloudDialogflowV2BatchUpdateEntityTypesRequest' smart constructor.-data GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest = GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest'-    { _gcdvbuetrLanguageCode          :: !(Maybe Text)-    , _gcdvbuetrUpdateMask            :: !(Maybe GFieldMask)-    , _gcdvbuetrEntityTypeBatchInline :: !(Maybe GoogleCloudDialogflowV2EntityTypeBatch)-    , _gcdvbuetrEntityTypeBatchURI    :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvbuetrLanguageCode'------ * 'gcdvbuetrUpdateMask'------ * 'gcdvbuetrEntityTypeBatchInline'------ * 'gcdvbuetrEntityTypeBatchURI'-googleCloudDialogflowV2BatchUpdateEntityTypesRequest-    :: GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest-googleCloudDialogflowV2BatchUpdateEntityTypesRequest =-    GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest'-    { _gcdvbuetrLanguageCode = Nothing-    , _gcdvbuetrUpdateMask = Nothing-    , _gcdvbuetrEntityTypeBatchInline = Nothing-    , _gcdvbuetrEntityTypeBatchURI = Nothing-    }---- | Optional. The language of entity synonyms defined in \`entity_types\`.--- If not specified, the agent\'s default language is used. [More than a--- dozen languages](https:\/\/dialogflow.com\/docs\/reference\/language)--- are supported. Note: languages must be enabled in the agent, before they--- can be used.-gcdvbuetrLanguageCode :: Lens' GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest (Maybe Text)-gcdvbuetrLanguageCode-  = lens _gcdvbuetrLanguageCode-      (\ s a -> s{_gcdvbuetrLanguageCode = a})---- | Optional. The mask to control which fields get updated.-gcdvbuetrUpdateMask :: Lens' GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest (Maybe GFieldMask)-gcdvbuetrUpdateMask-  = lens _gcdvbuetrUpdateMask-      (\ s a -> s{_gcdvbuetrUpdateMask = a})---- | The collection of entity types to update or create.-gcdvbuetrEntityTypeBatchInline :: Lens' GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest (Maybe GoogleCloudDialogflowV2EntityTypeBatch)-gcdvbuetrEntityTypeBatchInline-  = lens _gcdvbuetrEntityTypeBatchInline-      (\ s a -> s{_gcdvbuetrEntityTypeBatchInline = a})---- | The URI to a Google Cloud Storage file containing entity types to update--- or create. The file format can either be a serialized proto (of--- EntityBatch type) or a JSON object. Note: The URI must start with--- \"gs:\/\/\".-gcdvbuetrEntityTypeBatchURI :: Lens' GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest (Maybe Text)-gcdvbuetrEntityTypeBatchURI-  = lens _gcdvbuetrEntityTypeBatchURI-      (\ s a -> s{_gcdvbuetrEntityTypeBatchURI = a})--instance FromJSON-         GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest"-              (\ o ->-                 GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest'-                   <$>-                   (o .:? "languageCode") <*> (o .:? "updateMask") <*>-                     (o .:? "entityTypeBatchInline")-                     <*> (o .:? "entityTypeBatchUri"))--instance ToJSON-         GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest-         where-        toJSON-          GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest'{..}-          = object-              (catMaybes-                 [("languageCode" .=) <$> _gcdvbuetrLanguageCode,-                  ("updateMask" .=) <$> _gcdvbuetrUpdateMask,-                  ("entityTypeBatchInline" .=) <$>-                    _gcdvbuetrEntityTypeBatchInline,-                  ("entityTypeBatchUri" .=) <$>-                    _gcdvbuetrEntityTypeBatchURI])---- | 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:/ 'googleLongrunningOperationResponse' smart constructor.-newtype GoogleLongrunningOperationResponse = GoogleLongrunningOperationResponse'-    { _glorAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleLongrunningOperationResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'glorAddtional'-googleLongrunningOperationResponse-    :: HashMap Text JSONValue -- ^ 'glorAddtional'-    -> GoogleLongrunningOperationResponse-googleLongrunningOperationResponse pGlorAddtional_ =-    GoogleLongrunningOperationResponse'-    { _glorAddtional = _Coerce # pGlorAddtional_-    }---- | Properties of the object. Contains field \'type with type URL.-glorAddtional :: Lens' GoogleLongrunningOperationResponse (HashMap Text JSONValue)-glorAddtional-  = lens _glorAddtional-      (\ s a -> s{_glorAddtional = a})-      . _Coerce--instance FromJSON GoogleLongrunningOperationResponse-         where-        parseJSON-          = withObject "GoogleLongrunningOperationResponse"-              (\ o ->-                 GoogleLongrunningOperationResponse' <$>-                   (parseJSONObject o))--instance ToJSON GoogleLongrunningOperationResponse-         where-        toJSON = toJSON . _glorAddtional---- | Synthesizes speech and plays back the synthesized audio to the caller in--- Telephony Gateway. Telephony Gateway takes the synthesizer settings from--- \`DetectIntentResponse.output_audio_config\` which can either be set at--- request-level or can come from the agent-level synthesizer config.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech = GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech'-    { _gcdvimtssText :: !(Maybe Text)-    , _gcdvimtssSsml :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimtssText'------ * 'gcdvimtssSsml'-googleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech-    :: GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech-googleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech =-    GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech'-    { _gcdvimtssText = Nothing-    , _gcdvimtssSsml = Nothing-    }---- | The raw text to be synthesized.-gcdvimtssText :: Lens' GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech (Maybe Text)-gcdvimtssText-  = lens _gcdvimtssText-      (\ s a -> s{_gcdvimtssText = a})---- | The SSML to be synthesized. For more information, see--- [SSML](https:\/\/developers.google.com\/actions\/reference\/ssml).-gcdvimtssSsml :: Lens' GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech (Maybe Text)-gcdvimtssSsml-  = lens _gcdvimtssSsml-      (\ s a -> s{_gcdvimtssSsml = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech'-                   <$> (o .:? "text") <*> (o .:? "ssml"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech'{..}-          = object-              (catMaybes-                 [("text" .=) <$> _gcdvimtssText,-                  ("ssml" .=) <$> _gcdvimtssSsml])---- | An item in the list.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageListSelectItem' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessageListSelectItem = GoogleCloudDialogflowV2beta1IntentMessageListSelectItem'-    { _gcdvimlsicImage       :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)-    , _gcdvimlsicTitle       :: !(Maybe Text)-    , _gcdvimlsicDescription :: !(Maybe Text)-    , _gcdvimlsicInfo        :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageListSelectItem' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimlsicImage'------ * 'gcdvimlsicTitle'------ * 'gcdvimlsicDescription'------ * 'gcdvimlsicInfo'-googleCloudDialogflowV2beta1IntentMessageListSelectItem-    :: GoogleCloudDialogflowV2beta1IntentMessageListSelectItem-googleCloudDialogflowV2beta1IntentMessageListSelectItem =-    GoogleCloudDialogflowV2beta1IntentMessageListSelectItem'-    { _gcdvimlsicImage = Nothing-    , _gcdvimlsicTitle = Nothing-    , _gcdvimlsicDescription = Nothing-    , _gcdvimlsicInfo = Nothing-    }---- | Optional. The image to display.-gcdvimlsicImage :: Lens' GoogleCloudDialogflowV2beta1IntentMessageListSelectItem (Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)-gcdvimlsicImage-  = lens _gcdvimlsicImage-      (\ s a -> s{_gcdvimlsicImage = a})---- | Required. The title of the list item.-gcdvimlsicTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageListSelectItem (Maybe Text)-gcdvimlsicTitle-  = lens _gcdvimlsicTitle-      (\ s a -> s{_gcdvimlsicTitle = a})---- | Optional. The main text describing the item.-gcdvimlsicDescription :: Lens' GoogleCloudDialogflowV2beta1IntentMessageListSelectItem (Maybe Text)-gcdvimlsicDescription-  = lens _gcdvimlsicDescription-      (\ s a -> s{_gcdvimlsicDescription = a})---- | Required. Additional information about this option.-gcdvimlsicInfo :: Lens' GoogleCloudDialogflowV2beta1IntentMessageListSelectItem (Maybe GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo)-gcdvimlsicInfo-  = lens _gcdvimlsicInfo-      (\ s a -> s{_gcdvimlsicInfo = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageListSelectItem-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageListSelectItem"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageListSelectItem'-                   <$>-                   (o .:? "image") <*> (o .:? "title") <*>-                     (o .:? "description")-                     <*> (o .:? "info"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageListSelectItem-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageListSelectItem'{..}-          = object-              (catMaybes-                 [("image" .=) <$> _gcdvimlsicImage,-                  ("title" .=) <$> _gcdvimlsicTitle,-                  ("description" .=) <$> _gcdvimlsicDescription,-                  ("info" .=) <$> _gcdvimlsicInfo])---- | The suggestion chip message that the user can tap to quickly post a--- reply to the conversation.------ /See:/ 'googleCloudDialogflowV2IntentMessageSuggestion' smart constructor.-newtype GoogleCloudDialogflowV2IntentMessageSuggestion = GoogleCloudDialogflowV2IntentMessageSuggestion'-    { _gcdvimscTitle :: Maybe Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageSuggestion' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimscTitle'-googleCloudDialogflowV2IntentMessageSuggestion-    :: GoogleCloudDialogflowV2IntentMessageSuggestion-googleCloudDialogflowV2IntentMessageSuggestion =-    GoogleCloudDialogflowV2IntentMessageSuggestion'-    { _gcdvimscTitle = Nothing-    }---- | Required. The text shown the in the suggestion chip.-gcdvimscTitle :: Lens' GoogleCloudDialogflowV2IntentMessageSuggestion (Maybe Text)-gcdvimscTitle-  = lens _gcdvimscTitle-      (\ s a -> s{_gcdvimscTitle = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageSuggestion where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageSuggestion"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageSuggestion' <$>-                   (o .:? "title"))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageSuggestion where-        toJSON-          GoogleCloudDialogflowV2IntentMessageSuggestion'{..}-          = object-              (catMaybes [("title" .=) <$> _gcdvimscTitle])---- | Optional. Represents an entity.------ /See:/ 'googleCloudDialogflowV2beta1EntityTypeEntity' smart constructor.-data GoogleCloudDialogflowV2beta1EntityTypeEntity = GoogleCloudDialogflowV2beta1EntityTypeEntity'-    { _gcdveteValue    :: !(Maybe Text)-    , _gcdveteSynonyms :: !(Maybe [Text])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1EntityTypeEntity' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdveteValue'------ * 'gcdveteSynonyms'-googleCloudDialogflowV2beta1EntityTypeEntity-    :: GoogleCloudDialogflowV2beta1EntityTypeEntity-googleCloudDialogflowV2beta1EntityTypeEntity =-    GoogleCloudDialogflowV2beta1EntityTypeEntity'-    { _gcdveteValue = Nothing-    , _gcdveteSynonyms = Nothing-    }---- | Required. For \`KIND_MAP\` entity types: A canonical name to be used in--- place of synonyms. For \`KIND_LIST\` entity types: A string that can--- contain references to other entity types (with or without aliases).-gcdveteValue :: Lens' GoogleCloudDialogflowV2beta1EntityTypeEntity (Maybe Text)-gcdveteValue-  = lens _gcdveteValue (\ s a -> s{_gcdveteValue = a})---- | Required. A collection of synonyms. For \`KIND_LIST\` entity types this--- must contain exactly one synonym equal to \`value\`.-gcdveteSynonyms :: Lens' GoogleCloudDialogflowV2beta1EntityTypeEntity [Text]-gcdveteSynonyms-  = lens _gcdveteSynonyms-      (\ s a -> s{_gcdveteSynonyms = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1EntityTypeEntity where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1EntityTypeEntity"-              (\ o ->-                 GoogleCloudDialogflowV2beta1EntityTypeEntity' <$>-                   (o .:? "value") <*> (o .:? "synonyms" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2beta1EntityTypeEntity where-        toJSON-          GoogleCloudDialogflowV2beta1EntityTypeEntity'{..}-          = object-              (catMaybes-                 [("value" .=) <$> _gcdveteValue,-                  ("synonyms" .=) <$> _gcdveteSynonyms])---- | Represents an entity type. Entity types serve as a tool for extracting--- parameter values from natural language queries.------ /See:/ 'googleCloudDialogflowV2EntityType' smart constructor.-data GoogleCloudDialogflowV2EntityType = GoogleCloudDialogflowV2EntityType'-    { _gcdvetEntities          :: !(Maybe [GoogleCloudDialogflowV2EntityTypeEntity])-    , _gcdvetKind              :: !(Maybe GoogleCloudDialogflowV2EntityTypeKind)-    , _gcdvetName              :: !(Maybe Text)-    , _gcdvetAutoExpansionMode :: !(Maybe GoogleCloudDialogflowV2EntityTypeAutoExpansionMode)-    , _gcdvetDisplayName       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2EntityType' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvetEntities'------ * 'gcdvetKind'------ * 'gcdvetName'------ * 'gcdvetAutoExpansionMode'------ * 'gcdvetDisplayName'-googleCloudDialogflowV2EntityType-    :: GoogleCloudDialogflowV2EntityType-googleCloudDialogflowV2EntityType =-    GoogleCloudDialogflowV2EntityType'-    { _gcdvetEntities = Nothing-    , _gcdvetKind = Nothing-    , _gcdvetName = Nothing-    , _gcdvetAutoExpansionMode = Nothing-    , _gcdvetDisplayName = Nothing-    }---- | Optional. The collection of entities associated with the entity type.-gcdvetEntities :: Lens' GoogleCloudDialogflowV2EntityType [GoogleCloudDialogflowV2EntityTypeEntity]-gcdvetEntities-  = lens _gcdvetEntities-      (\ s a -> s{_gcdvetEntities = a})-      . _Default-      . _Coerce---- | Required. Indicates the kind of entity type.-gcdvetKind :: Lens' GoogleCloudDialogflowV2EntityType (Maybe GoogleCloudDialogflowV2EntityTypeKind)-gcdvetKind-  = lens _gcdvetKind (\ s a -> s{_gcdvetKind = a})---- | Required for all methods except \`create\` (\`create\` populates the--- name automatically. The unique identifier of the entity type. Format:--- \`projects\/\/agent\/entityTypes\/\`.-gcdvetName :: Lens' GoogleCloudDialogflowV2EntityType (Maybe Text)-gcdvetName-  = lens _gcdvetName (\ s a -> s{_gcdvetName = a})---- | Optional. Indicates whether the entity type can be automatically--- expanded.-gcdvetAutoExpansionMode :: Lens' GoogleCloudDialogflowV2EntityType (Maybe GoogleCloudDialogflowV2EntityTypeAutoExpansionMode)-gcdvetAutoExpansionMode-  = lens _gcdvetAutoExpansionMode-      (\ s a -> s{_gcdvetAutoExpansionMode = a})---- | Required. The name of the entity type.-gcdvetDisplayName :: Lens' GoogleCloudDialogflowV2EntityType (Maybe Text)-gcdvetDisplayName-  = lens _gcdvetDisplayName-      (\ s a -> s{_gcdvetDisplayName = a})--instance FromJSON GoogleCloudDialogflowV2EntityType-         where-        parseJSON-          = withObject "GoogleCloudDialogflowV2EntityType"-              (\ o ->-                 GoogleCloudDialogflowV2EntityType' <$>-                   (o .:? "entities" .!= mempty) <*> (o .:? "kind") <*>-                     (o .:? "name")-                     <*> (o .:? "autoExpansionMode")-                     <*> (o .:? "displayName"))--instance ToJSON GoogleCloudDialogflowV2EntityType-         where-        toJSON GoogleCloudDialogflowV2EntityType'{..}-          = object-              (catMaybes-                 [("entities" .=) <$> _gcdvetEntities,-                  ("kind" .=) <$> _gcdvetKind,-                  ("name" .=) <$> _gcdvetName,-                  ("autoExpansionMode" .=) <$>-                    _gcdvetAutoExpansionMode,-                  ("displayName" .=) <$> _gcdvetDisplayName])---- | Represents the natural language text to be processed.------ /See:/ 'googleCloudDialogflowV2TextInput' smart constructor.-data GoogleCloudDialogflowV2TextInput = GoogleCloudDialogflowV2TextInput'-    { _gcdvtiLanguageCode :: !(Maybe Text)-    , _gcdvtiText         :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2TextInput' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvtiLanguageCode'------ * 'gcdvtiText'-googleCloudDialogflowV2TextInput-    :: GoogleCloudDialogflowV2TextInput-googleCloudDialogflowV2TextInput =-    GoogleCloudDialogflowV2TextInput'-    { _gcdvtiLanguageCode = Nothing-    , _gcdvtiText = Nothing-    }---- | Required. The language of this conversational query. See [Language--- Support](https:\/\/dialogflow.com\/docs\/languages) for a list of the--- currently supported language codes. Note that queries in the same--- session do not necessarily need to specify the same language.-gcdvtiLanguageCode :: Lens' GoogleCloudDialogflowV2TextInput (Maybe Text)-gcdvtiLanguageCode-  = lens _gcdvtiLanguageCode-      (\ s a -> s{_gcdvtiLanguageCode = a})---- | Required. The UTF-8 encoded natural language text to be processed. Text--- length must not exceed 256 characters.-gcdvtiText :: Lens' GoogleCloudDialogflowV2TextInput (Maybe Text)-gcdvtiText-  = lens _gcdvtiText (\ s a -> s{_gcdvtiText = a})--instance FromJSON GoogleCloudDialogflowV2TextInput-         where-        parseJSON-          = withObject "GoogleCloudDialogflowV2TextInput"-              (\ o ->-                 GoogleCloudDialogflowV2TextInput' <$>-                   (o .:? "languageCode") <*> (o .:? "text"))--instance ToJSON GoogleCloudDialogflowV2TextInput-         where-        toJSON GoogleCloudDialogflowV2TextInput'{..}-          = object-              (catMaybes-                 [("languageCode" .=) <$> _gcdvtiLanguageCode,-                  ("text" .=) <$> _gcdvtiText])---- | Opens the given URI.------ /See:/ 'googleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction' smart constructor.-newtype GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction = GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction'-    { _gcdvimbcbouriaURI :: Maybe Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimbcbouriaURI'-googleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction-    :: GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction-googleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction =-    GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction'-    { _gcdvimbcbouriaURI = Nothing-    }---- | Required. The HTTP or HTTPS scheme URI.-gcdvimbcbouriaURI :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction (Maybe Text)-gcdvimbcbouriaURI-  = lens _gcdvimbcbouriaURI-      (\ s a -> s{_gcdvimbcbouriaURI = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction'-                   <$> (o .:? "uri"))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction-         where-        toJSON-          GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction'{..}-          = object-              (catMaybes [("uri" .=) <$> _gcdvimbcbouriaURI])---- | The card response message.------ /See:/ 'googleCloudDialogflowV2IntentMessageCard' smart constructor.-data GoogleCloudDialogflowV2IntentMessageCard = GoogleCloudDialogflowV2IntentMessageCard'-    { _gcdvimccButtons  :: !(Maybe [GoogleCloudDialogflowV2IntentMessageCardButton])-    , _gcdvimccImageURI :: !(Maybe Text)-    , _gcdvimccSubtitle :: !(Maybe Text)-    , _gcdvimccTitle    :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageCard' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimccButtons'------ * 'gcdvimccImageURI'------ * 'gcdvimccSubtitle'------ * 'gcdvimccTitle'-googleCloudDialogflowV2IntentMessageCard-    :: GoogleCloudDialogflowV2IntentMessageCard-googleCloudDialogflowV2IntentMessageCard =-    GoogleCloudDialogflowV2IntentMessageCard'-    { _gcdvimccButtons = Nothing-    , _gcdvimccImageURI = Nothing-    , _gcdvimccSubtitle = Nothing-    , _gcdvimccTitle = Nothing-    }---- | Optional. The collection of card buttons.-gcdvimccButtons :: Lens' GoogleCloudDialogflowV2IntentMessageCard [GoogleCloudDialogflowV2IntentMessageCardButton]-gcdvimccButtons-  = lens _gcdvimccButtons-      (\ s a -> s{_gcdvimccButtons = a})-      . _Default-      . _Coerce---- | Optional. The public URI to an image file for the card.-gcdvimccImageURI :: Lens' GoogleCloudDialogflowV2IntentMessageCard (Maybe Text)-gcdvimccImageURI-  = lens _gcdvimccImageURI-      (\ s a -> s{_gcdvimccImageURI = a})---- | Optional. The subtitle of the card.-gcdvimccSubtitle :: Lens' GoogleCloudDialogflowV2IntentMessageCard (Maybe Text)-gcdvimccSubtitle-  = lens _gcdvimccSubtitle-      (\ s a -> s{_gcdvimccSubtitle = a})---- | Optional. The title of the card.-gcdvimccTitle :: Lens' GoogleCloudDialogflowV2IntentMessageCard (Maybe Text)-gcdvimccTitle-  = lens _gcdvimccTitle-      (\ s a -> s{_gcdvimccTitle = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageCard where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageCard"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageCard' <$>-                   (o .:? "buttons" .!= mempty) <*> (o .:? "imageUri")-                     <*> (o .:? "subtitle")-                     <*> (o .:? "title"))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageCard where-        toJSON GoogleCloudDialogflowV2IntentMessageCard'{..}-          = object-              (catMaybes-                 [("buttons" .=) <$> _gcdvimccButtons,-                  ("imageUri" .=) <$> _gcdvimccImageURI,-                  ("subtitle" .=) <$> _gcdvimccSubtitle,-                  ("title" .=) <$> _gcdvimccTitle])---- | Represents the contents of the original request that was passed to the--- \`[Streaming]DetectIntent\` call.------ /See:/ 'googleCloudDialogflowV2OriginalDetectIntentRequest' smart constructor.-data GoogleCloudDialogflowV2OriginalDetectIntentRequest = GoogleCloudDialogflowV2OriginalDetectIntentRequest'-    { _gPayload :: !(Maybe GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload)-    , _gVersion :: !(Maybe Text)-    , _gSource  :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2OriginalDetectIntentRequest' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gPayload'------ * 'gVersion'------ * 'gSource'-googleCloudDialogflowV2OriginalDetectIntentRequest-    :: GoogleCloudDialogflowV2OriginalDetectIntentRequest-googleCloudDialogflowV2OriginalDetectIntentRequest =-    GoogleCloudDialogflowV2OriginalDetectIntentRequest'-    { _gPayload = Nothing-    , _gVersion = Nothing-    , _gSource = Nothing-    }---- | Optional. This field is set to the value of the--- \`QueryParameters.payload\` field passed in the request. Some--- integrations that query a Dialogflow agent may provide additional--- information in the payload. In particular for the Telephony Gateway this--- field has the form:------ > {--- >  "telephony": {--- >    "caller_id": "+18558363987"--- >  }--- > }------ Note: The caller ID field (\`caller_id\`) will be redacted for Standard--- Edition agents and populated with the caller ID in [E.164--- format](https:\/\/en.wikipedia.org\/wiki\/E.164) for Enterprise Edition--- agents.-gPayload :: Lens' GoogleCloudDialogflowV2OriginalDetectIntentRequest (Maybe GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload)-gPayload = lens _gPayload (\ s a -> s{_gPayload = a})---- | Optional. The version of the protocol used for this request. This field--- is AoG-specific.-gVersion :: Lens' GoogleCloudDialogflowV2OriginalDetectIntentRequest (Maybe Text)-gVersion = lens _gVersion (\ s a -> s{_gVersion = a})---- | The source of this request, e.g., \`google\`, \`facebook\`, \`slack\`.--- It is set by Dialogflow-owned servers.-gSource :: Lens' GoogleCloudDialogflowV2OriginalDetectIntentRequest (Maybe Text)-gSource = lens _gSource (\ s a -> s{_gSource = a})--instance FromJSON-         GoogleCloudDialogflowV2OriginalDetectIntentRequest-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2OriginalDetectIntentRequest"-              (\ o ->-                 GoogleCloudDialogflowV2OriginalDetectIntentRequest'-                   <$>-                   (o .:? "payload") <*> (o .:? "version") <*>-                     (o .:? "source"))--instance ToJSON-         GoogleCloudDialogflowV2OriginalDetectIntentRequest-         where-        toJSON-          GoogleCloudDialogflowV2OriginalDetectIntentRequest'{..}-          = object-              (catMaybes-                 [("payload" .=) <$> _gPayload,-                  ("version" .=) <$> _gVersion,-                  ("source" .=) <$> _gSource])---- | The image response message.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageImage' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessageImage = GoogleCloudDialogflowV2beta1IntentMessageImage'-    { _gcdvimiAccessibilityText :: !(Maybe Text)-    , _gcdvimiImageURI          :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageImage' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimiAccessibilityText'------ * 'gcdvimiImageURI'-googleCloudDialogflowV2beta1IntentMessageImage-    :: GoogleCloudDialogflowV2beta1IntentMessageImage-googleCloudDialogflowV2beta1IntentMessageImage =-    GoogleCloudDialogflowV2beta1IntentMessageImage'-    { _gcdvimiAccessibilityText = Nothing-    , _gcdvimiImageURI = Nothing-    }---- | A text description of the image to be used for accessibility, e.g.,--- screen readers. Required if image_uri is set for CarouselSelect.-gcdvimiAccessibilityText :: Lens' GoogleCloudDialogflowV2beta1IntentMessageImage (Maybe Text)-gcdvimiAccessibilityText-  = lens _gcdvimiAccessibilityText-      (\ s a -> s{_gcdvimiAccessibilityText = a})---- | Optional. The public URI to an image file.-gcdvimiImageURI :: Lens' GoogleCloudDialogflowV2beta1IntentMessageImage (Maybe Text)-gcdvimiImageURI-  = lens _gcdvimiImageURI-      (\ s a -> s{_gcdvimiImageURI = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageImage where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageImage"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageImage' <$>-                   (o .:? "accessibilityText") <*> (o .:? "imageUri"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageImage where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageImage'{..}-          = object-              (catMaybes-                 [("accessibilityText" .=) <$>-                    _gcdvimiAccessibilityText,-                  ("imageUri" .=) <$> _gcdvimiImageURI])---- | The response message for Agents.ExportAgent.------ /See:/ 'googleCloudDialogflowV2ExportAgentResponse' smart constructor.-data GoogleCloudDialogflowV2ExportAgentResponse = GoogleCloudDialogflowV2ExportAgentResponse'-    { _gAgentURI     :: !(Maybe Text)-    , _gAgentContent :: !(Maybe Bytes)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2ExportAgentResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gAgentURI'------ * 'gAgentContent'-googleCloudDialogflowV2ExportAgentResponse-    :: GoogleCloudDialogflowV2ExportAgentResponse-googleCloudDialogflowV2ExportAgentResponse =-    GoogleCloudDialogflowV2ExportAgentResponse'-    { _gAgentURI = Nothing-    , _gAgentContent = Nothing-    }---- | The URI to a file containing the exported agent. This field is populated--- only if \`agent_uri\` is specified in \`ExportAgentRequest\`.-gAgentURI :: Lens' GoogleCloudDialogflowV2ExportAgentResponse (Maybe Text)-gAgentURI-  = lens _gAgentURI (\ s a -> s{_gAgentURI = a})---- | The exported agent. Example for how to export an agent to a zip file via--- a command line:------ > curl \--- >   'https://dialogflow.googleapis.com/v2/projects/<project_name>/agent:export'\--- >   -X POST \--- >   -H 'Authorization: Bearer '$(gcloud auth application-default--- >   print-access-token) \--- >   -H 'Accept: application/json' \--- >   -H 'Content-Type: application/json' \--- >   --compressed \--- >   --data-binary '{}' \--- > | grep agentContent | sed -e 's/.*"agentContent": "\([^"]*\)".*/\1/' \--- > | base64 --decode > <agent zip file>-gAgentContent :: Lens' GoogleCloudDialogflowV2ExportAgentResponse (Maybe ByteString)-gAgentContent-  = lens _gAgentContent-      (\ s a -> s{_gAgentContent = a})-      . mapping _Bytes--instance FromJSON-         GoogleCloudDialogflowV2ExportAgentResponse where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2ExportAgentResponse"-              (\ o ->-                 GoogleCloudDialogflowV2ExportAgentResponse' <$>-                   (o .:? "agentUri") <*> (o .:? "agentContent"))--instance ToJSON-         GoogleCloudDialogflowV2ExportAgentResponse where-        toJSON-          GoogleCloudDialogflowV2ExportAgentResponse'{..}-          = object-              (catMaybes-                 [("agentUri" .=) <$> _gAgentURI,-                  ("agentContent" .=) <$> _gAgentContent])---- | Optional. This value is passed directly to--- \`QueryResult.webhook_payload\`. See the related--- \`fulfillment_messages[i].payload field\`, which may be used as an--- alternative to this field. This field can be used for Actions on Google--- responses. It should have a structure similar to the JSON message shown--- here. For more information, see [Actions on Google Webhook--- Format](https:\/\/developers.google.com\/actions\/dialogflow\/webhook)------ > {--- >   "google": {--- >     "expectUserResponse": true,--- >     "richResponse": {--- >       "items": [--- >         {--- >           "simpleResponse": {--- >             "textToSpeech": "this is a simple response"--- >           }--- >         }--- >       ]--- >     }--- >   }--- > }------ /See:/ 'googleCloudDialogflowV2WebhookResponsePayload' smart constructor.-newtype GoogleCloudDialogflowV2WebhookResponsePayload = GoogleCloudDialogflowV2WebhookResponsePayload'-    { _gcdvwrpcAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2WebhookResponsePayload' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvwrpcAddtional'-googleCloudDialogflowV2WebhookResponsePayload-    :: HashMap Text JSONValue -- ^ 'gcdvwrpcAddtional'-    -> GoogleCloudDialogflowV2WebhookResponsePayload-googleCloudDialogflowV2WebhookResponsePayload pGcdvwrpcAddtional_ =-    GoogleCloudDialogflowV2WebhookResponsePayload'-    { _gcdvwrpcAddtional = _Coerce # pGcdvwrpcAddtional_-    }---- | Properties of the object.-gcdvwrpcAddtional :: Lens' GoogleCloudDialogflowV2WebhookResponsePayload (HashMap Text JSONValue)-gcdvwrpcAddtional-  = lens _gcdvwrpcAddtional-      (\ s a -> s{_gcdvwrpcAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2WebhookResponsePayload where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2WebhookResponsePayload"-              (\ o ->-                 GoogleCloudDialogflowV2WebhookResponsePayload' <$>-                   (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2WebhookResponsePayload where-        toJSON = toJSON . _gcdvwrpcAddtional---- | The suggestion chip message that allows the user to jump out to the app--- or website associated with this agent.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion = GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion'-    { _gURI             :: !(Maybe Text)-    , _gDestinationName :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gURI'------ * 'gDestinationName'-googleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion-    :: GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion-googleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion =-    GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion'-    { _gURI = Nothing-    , _gDestinationName = Nothing-    }---- | Required. The URI of the app or site to open when the user taps the--- suggestion chip.-gURI :: Lens' GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion (Maybe Text)-gURI = lens _gURI (\ s a -> s{_gURI = a})---- | Required. The name of the app or site this chip is linking to.-gDestinationName :: Lens' GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion (Maybe Text)-gDestinationName-  = lens _gDestinationName-      (\ s a -> s{_gDestinationName = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion'-                   <$> (o .:? "uri") <*> (o .:? "destinationName"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion'{..}-          = object-              (catMaybes-                 [("uri" .=) <$> _gURI,-                  ("destinationName" .=) <$> _gDestinationName])---- | The response message for Intents.ListIntents.------ /See:/ 'googleCloudDialogflowV2ListIntentsResponse' smart constructor.-data GoogleCloudDialogflowV2ListIntentsResponse = GoogleCloudDialogflowV2ListIntentsResponse'-    { _gcdvlirIntents       :: !(Maybe [GoogleCloudDialogflowV2Intent])-    , _gcdvlirNextPageToken :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2ListIntentsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvlirIntents'------ * 'gcdvlirNextPageToken'-googleCloudDialogflowV2ListIntentsResponse-    :: GoogleCloudDialogflowV2ListIntentsResponse-googleCloudDialogflowV2ListIntentsResponse =-    GoogleCloudDialogflowV2ListIntentsResponse'-    { _gcdvlirIntents = Nothing-    , _gcdvlirNextPageToken = Nothing-    }---- | The list of agent intents. There will be a maximum number of items--- returned based on the page_size field in the request.-gcdvlirIntents :: Lens' GoogleCloudDialogflowV2ListIntentsResponse [GoogleCloudDialogflowV2Intent]-gcdvlirIntents-  = lens _gcdvlirIntents-      (\ s a -> s{_gcdvlirIntents = a})-      . _Default-      . _Coerce---- | Token to retrieve the next page of results, or empty if there are no--- more results in the list.-gcdvlirNextPageToken :: Lens' GoogleCloudDialogflowV2ListIntentsResponse (Maybe Text)-gcdvlirNextPageToken-  = lens _gcdvlirNextPageToken-      (\ s a -> s{_gcdvlirNextPageToken = a})--instance FromJSON-         GoogleCloudDialogflowV2ListIntentsResponse where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2ListIntentsResponse"-              (\ o ->-                 GoogleCloudDialogflowV2ListIntentsResponse' <$>-                   (o .:? "intents" .!= mempty) <*>-                     (o .:? "nextPageToken"))--instance ToJSON-         GoogleCloudDialogflowV2ListIntentsResponse where-        toJSON-          GoogleCloudDialogflowV2ListIntentsResponse'{..}-          = object-              (catMaybes-                 [("intents" .=) <$> _gcdvlirIntents,-                  ("nextPageToken" .=) <$> _gcdvlirNextPageToken])---- | The response message for EntityTypes.BatchUpdateEntityTypes.------ /See:/ 'googleCloudDialogflowV2BatchUpdateEntityTypesResponse' smart constructor.-newtype GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse = GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse'-    { _gEntityTypes :: Maybe [GoogleCloudDialogflowV2EntityType]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gEntityTypes'-googleCloudDialogflowV2BatchUpdateEntityTypesResponse-    :: GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse-googleCloudDialogflowV2BatchUpdateEntityTypesResponse =-    GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse'-    { _gEntityTypes = Nothing-    }---- | The collection of updated or created entity types.-gEntityTypes :: Lens' GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse [GoogleCloudDialogflowV2EntityType]-gEntityTypes-  = lens _gEntityTypes (\ s a -> s{_gEntityTypes = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse"-              (\ o ->-                 GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse'-                   <$> (o .:? "entityTypes" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse-         where-        toJSON-          GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse'{..}-          = object-              (catMaybes [("entityTypes" .=) <$> _gEntityTypes])---- | If the query was fulfilled by a webhook call, this field is set to the--- value of the \`payload\` field returned in the webhook response.------ /See:/ 'googleCloudDialogflowV2QueryResultWebhookPayload' smart constructor.-newtype GoogleCloudDialogflowV2QueryResultWebhookPayload = GoogleCloudDialogflowV2QueryResultWebhookPayload'-    { _gcdvqrwpAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2QueryResultWebhookPayload' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvqrwpAddtional'-googleCloudDialogflowV2QueryResultWebhookPayload-    :: HashMap Text JSONValue -- ^ 'gcdvqrwpAddtional'-    -> GoogleCloudDialogflowV2QueryResultWebhookPayload-googleCloudDialogflowV2QueryResultWebhookPayload pGcdvqrwpAddtional_ =-    GoogleCloudDialogflowV2QueryResultWebhookPayload'-    { _gcdvqrwpAddtional = _Coerce # pGcdvqrwpAddtional_-    }---- | Properties of the object.-gcdvqrwpAddtional :: Lens' GoogleCloudDialogflowV2QueryResultWebhookPayload (HashMap Text JSONValue)-gcdvqrwpAddtional-  = lens _gcdvqrwpAddtional-      (\ s a -> s{_gcdvqrwpAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2QueryResultWebhookPayload-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2QueryResultWebhookPayload"-              (\ o ->-                 GoogleCloudDialogflowV2QueryResultWebhookPayload' <$>-                   (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2QueryResultWebhookPayload-         where-        toJSON = toJSON . _gcdvqrwpAddtional---- | Represents intent parameters.------ /See:/ 'googleCloudDialogflowV2beta1IntentParameter' smart constructor.-data GoogleCloudDialogflowV2beta1IntentParameter = GoogleCloudDialogflowV2beta1IntentParameter'-    { _gcdvipValue                 :: !(Maybe Text)-    , _gcdvipName                  :: !(Maybe Text)-    , _gcdvipPrompts               :: !(Maybe [Text])-    , _gcdvipMandatory             :: !(Maybe Bool)-    , _gcdvipDisplayName           :: !(Maybe Text)-    , _gcdvipDefaultValue          :: !(Maybe Text)-    , _gcdvipIsList                :: !(Maybe Bool)-    , _gcdvipEntityTypeDisplayName :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentParameter' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvipValue'------ * 'gcdvipName'------ * 'gcdvipPrompts'------ * 'gcdvipMandatory'------ * 'gcdvipDisplayName'------ * 'gcdvipDefaultValue'------ * 'gcdvipIsList'------ * 'gcdvipEntityTypeDisplayName'-googleCloudDialogflowV2beta1IntentParameter-    :: GoogleCloudDialogflowV2beta1IntentParameter-googleCloudDialogflowV2beta1IntentParameter =-    GoogleCloudDialogflowV2beta1IntentParameter'-    { _gcdvipValue = Nothing-    , _gcdvipName = Nothing-    , _gcdvipPrompts = Nothing-    , _gcdvipMandatory = Nothing-    , _gcdvipDisplayName = Nothing-    , _gcdvipDefaultValue = Nothing-    , _gcdvipIsList = Nothing-    , _gcdvipEntityTypeDisplayName = Nothing-    }---- | Optional. The definition of the parameter value. It can be: - a constant--- string, - a parameter value defined as--- \`$parameter_name\`, - an original parameter value defined as \`$parameter_name.original\`,--- - a parameter value from some context defined as--- \`#context_name.parameter_name\`.-gcdvipValue :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Text)-gcdvipValue-  = lens _gcdvipValue (\ s a -> s{_gcdvipValue = a})---- | The unique identifier of this parameter.-gcdvipName :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Text)-gcdvipName-  = lens _gcdvipName (\ s a -> s{_gcdvipName = a})---- | Optional. The collection of prompts that the agent can present to the--- user in order to collect value for the parameter.-gcdvipPrompts :: Lens' GoogleCloudDialogflowV2beta1IntentParameter [Text]-gcdvipPrompts-  = lens _gcdvipPrompts-      (\ s a -> s{_gcdvipPrompts = a})-      . _Default-      . _Coerce---- | Optional. Indicates whether the parameter is required. That is, whether--- the intent cannot be completed without collecting the parameter value.-gcdvipMandatory :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Bool)-gcdvipMandatory-  = lens _gcdvipMandatory-      (\ s a -> s{_gcdvipMandatory = a})---- | Required. The name of the parameter.-gcdvipDisplayName :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Text)-gcdvipDisplayName-  = lens _gcdvipDisplayName-      (\ s a -> s{_gcdvipDisplayName = a})---- | Optional. The default value to use when the \`value\` yields an empty--- result. Default values can be extracted from contexts by using the--- following syntax: \`#context_name.parameter_name\`.-gcdvipDefaultValue :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Text)-gcdvipDefaultValue-  = lens _gcdvipDefaultValue-      (\ s a -> s{_gcdvipDefaultValue = a})---- | Optional. Indicates whether the parameter represents a list of values.-gcdvipIsList :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Bool)-gcdvipIsList-  = lens _gcdvipIsList (\ s a -> s{_gcdvipIsList = a})---- | Optional. The name of the entity type, prefixed with \`\'\`, that--- describes values of the parameter. If the parameter is required, this--- must be provided.-gcdvipEntityTypeDisplayName :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Text)-gcdvipEntityTypeDisplayName-  = lens _gcdvipEntityTypeDisplayName-      (\ s a -> s{_gcdvipEntityTypeDisplayName = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentParameter where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentParameter"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentParameter' <$>-                   (o .:? "value") <*> (o .:? "name") <*>-                     (o .:? "prompts" .!= mempty)-                     <*> (o .:? "mandatory")-                     <*> (o .:? "displayName")-                     <*> (o .:? "defaultValue")-                     <*> (o .:? "isList")-                     <*> (o .:? "entityTypeDisplayName"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentParameter where-        toJSON-          GoogleCloudDialogflowV2beta1IntentParameter'{..}-          = object-              (catMaybes-                 [("value" .=) <$> _gcdvipValue,-                  ("name" .=) <$> _gcdvipName,-                  ("prompts" .=) <$> _gcdvipPrompts,-                  ("mandatory" .=) <$> _gcdvipMandatory,-                  ("displayName" .=) <$> _gcdvipDisplayName,-                  ("defaultValue" .=) <$> _gcdvipDefaultValue,-                  ("isList" .=) <$> _gcdvipIsList,-                  ("entityTypeDisplayName" .=) <$>-                    _gcdvipEntityTypeDisplayName])---- | Represents intent parameters.------ /See:/ 'googleCloudDialogflowV2IntentParameter' smart constructor.-data GoogleCloudDialogflowV2IntentParameter = GoogleCloudDialogflowV2IntentParameter'-    { _gcdvipcValue                 :: !(Maybe Text)-    , _gcdvipcName                  :: !(Maybe Text)-    , _gcdvipcPrompts               :: !(Maybe [Text])-    , _gcdvipcMandatory             :: !(Maybe Bool)-    , _gcdvipcDisplayName           :: !(Maybe Text)-    , _gcdvipcDefaultValue          :: !(Maybe Text)-    , _gcdvipcIsList                :: !(Maybe Bool)-    , _gcdvipcEntityTypeDisplayName :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentParameter' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvipcValue'------ * 'gcdvipcName'------ * 'gcdvipcPrompts'------ * 'gcdvipcMandatory'------ * 'gcdvipcDisplayName'------ * 'gcdvipcDefaultValue'------ * 'gcdvipcIsList'------ * 'gcdvipcEntityTypeDisplayName'-googleCloudDialogflowV2IntentParameter-    :: GoogleCloudDialogflowV2IntentParameter-googleCloudDialogflowV2IntentParameter =-    GoogleCloudDialogflowV2IntentParameter'-    { _gcdvipcValue = Nothing-    , _gcdvipcName = Nothing-    , _gcdvipcPrompts = Nothing-    , _gcdvipcMandatory = Nothing-    , _gcdvipcDisplayName = Nothing-    , _gcdvipcDefaultValue = Nothing-    , _gcdvipcIsList = Nothing-    , _gcdvipcEntityTypeDisplayName = Nothing-    }---- | Optional. The definition of the parameter value. It can be: - a constant--- string, - a parameter value defined as--- \`$parameter_name\`, - an original parameter value defined as \`$parameter_name.original\`,--- - a parameter value from some context defined as--- \`#context_name.parameter_name\`.-gcdvipcValue :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Text)-gcdvipcValue-  = lens _gcdvipcValue (\ s a -> s{_gcdvipcValue = a})---- | The unique identifier of this parameter.-gcdvipcName :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Text)-gcdvipcName-  = lens _gcdvipcName (\ s a -> s{_gcdvipcName = a})---- | Optional. The collection of prompts that the agent can present to the--- user in order to collect value for the parameter.-gcdvipcPrompts :: Lens' GoogleCloudDialogflowV2IntentParameter [Text]-gcdvipcPrompts-  = lens _gcdvipcPrompts-      (\ s a -> s{_gcdvipcPrompts = a})-      . _Default-      . _Coerce---- | Optional. Indicates whether the parameter is required. That is, whether--- the intent cannot be completed without collecting the parameter value.-gcdvipcMandatory :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Bool)-gcdvipcMandatory-  = lens _gcdvipcMandatory-      (\ s a -> s{_gcdvipcMandatory = a})---- | Required. The name of the parameter.-gcdvipcDisplayName :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Text)-gcdvipcDisplayName-  = lens _gcdvipcDisplayName-      (\ s a -> s{_gcdvipcDisplayName = a})---- | Optional. The default value to use when the \`value\` yields an empty--- result. Default values can be extracted from contexts by using the--- following syntax: \`#context_name.parameter_name\`.-gcdvipcDefaultValue :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Text)-gcdvipcDefaultValue-  = lens _gcdvipcDefaultValue-      (\ s a -> s{_gcdvipcDefaultValue = a})---- | Optional. Indicates whether the parameter represents a list of values.-gcdvipcIsList :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Bool)-gcdvipcIsList-  = lens _gcdvipcIsList-      (\ s a -> s{_gcdvipcIsList = a})---- | Optional. The name of the entity type, prefixed with \`\'\`, that--- describes values of the parameter. If the parameter is required, this--- must be provided.-gcdvipcEntityTypeDisplayName :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Text)-gcdvipcEntityTypeDisplayName-  = lens _gcdvipcEntityTypeDisplayName-      (\ s a -> s{_gcdvipcEntityTypeDisplayName = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentParameter where-        parseJSON-          = withObject "GoogleCloudDialogflowV2IntentParameter"-              (\ o ->-                 GoogleCloudDialogflowV2IntentParameter' <$>-                   (o .:? "value") <*> (o .:? "name") <*>-                     (o .:? "prompts" .!= mempty)-                     <*> (o .:? "mandatory")-                     <*> (o .:? "displayName")-                     <*> (o .:? "defaultValue")-                     <*> (o .:? "isList")-                     <*> (o .:? "entityTypeDisplayName"))--instance ToJSON-         GoogleCloudDialogflowV2IntentParameter where-        toJSON GoogleCloudDialogflowV2IntentParameter'{..}-          = object-              (catMaybes-                 [("value" .=) <$> _gcdvipcValue,-                  ("name" .=) <$> _gcdvipcName,-                  ("prompts" .=) <$> _gcdvipcPrompts,-                  ("mandatory" .=) <$> _gcdvipcMandatory,-                  ("displayName" .=) <$> _gcdvipcDisplayName,-                  ("defaultValue" .=) <$> _gcdvipcDefaultValue,-                  ("isList" .=) <$> _gcdvipcIsList,-                  ("entityTypeDisplayName" .=) <$>-                    _gcdvipcEntityTypeDisplayName])---- | If the query was fulfilled by a webhook call, this field is set to the--- value of the \`payload\` field returned in the webhook response.------ /See:/ 'googleCloudDialogflowV2beta1QueryResultWebhookPayload' smart constructor.-newtype GoogleCloudDialogflowV2beta1QueryResultWebhookPayload = GoogleCloudDialogflowV2beta1QueryResultWebhookPayload'-    { _gcdvqrwpcAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1QueryResultWebhookPayload' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvqrwpcAddtional'-googleCloudDialogflowV2beta1QueryResultWebhookPayload-    :: HashMap Text JSONValue -- ^ 'gcdvqrwpcAddtional'-    -> GoogleCloudDialogflowV2beta1QueryResultWebhookPayload-googleCloudDialogflowV2beta1QueryResultWebhookPayload pGcdvqrwpcAddtional_ =-    GoogleCloudDialogflowV2beta1QueryResultWebhookPayload'-    { _gcdvqrwpcAddtional = _Coerce # pGcdvqrwpcAddtional_-    }---- | Properties of the object.-gcdvqrwpcAddtional :: Lens' GoogleCloudDialogflowV2beta1QueryResultWebhookPayload (HashMap Text JSONValue)-gcdvqrwpcAddtional-  = lens _gcdvqrwpcAddtional-      (\ s a -> s{_gcdvqrwpcAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1QueryResultWebhookPayload-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1QueryResultWebhookPayload"-              (\ o ->-                 GoogleCloudDialogflowV2beta1QueryResultWebhookPayload'-                   <$> (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2beta1QueryResultWebhookPayload-         where-        toJSON = toJSON . _gcdvqrwpcAddtional---- | Represents a part of a training phrase.------ /See:/ 'googleCloudDialogflowV2beta1IntentTrainingPhrasePart' smart constructor.-data GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart = GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart'-    { _gcdvitppcText        :: !(Maybe Text)-    , _gcdvitppcUserDefined :: !(Maybe Bool)-    , _gcdvitppcEntityType  :: !(Maybe Text)-    , _gcdvitppcAlias       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvitppcText'------ * 'gcdvitppcUserDefined'------ * 'gcdvitppcEntityType'------ * 'gcdvitppcAlias'-googleCloudDialogflowV2beta1IntentTrainingPhrasePart-    :: GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart-googleCloudDialogflowV2beta1IntentTrainingPhrasePart =-    GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart'-    { _gcdvitppcText = Nothing-    , _gcdvitppcUserDefined = Nothing-    , _gcdvitppcEntityType = Nothing-    , _gcdvitppcAlias = Nothing-    }---- | Required. The text corresponding to the example or template, if there--- are no annotations. For annotated examples, it is the text for one of--- the example\'s parts.-gcdvitppcText :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart (Maybe Text)-gcdvitppcText-  = lens _gcdvitppcText-      (\ s a -> s{_gcdvitppcText = a})---- | Optional. Indicates whether the text was manually annotated by the--- developer.-gcdvitppcUserDefined :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart (Maybe Bool)-gcdvitppcUserDefined-  = lens _gcdvitppcUserDefined-      (\ s a -> s{_gcdvitppcUserDefined = a})---- | Optional. The entity type name prefixed with \`\'\`. This field is--- required for the annotated part of the text and applies only to--- examples.-gcdvitppcEntityType :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart (Maybe Text)-gcdvitppcEntityType-  = lens _gcdvitppcEntityType-      (\ s a -> s{_gcdvitppcEntityType = a})---- | Optional. The parameter name for the value extracted from the annotated--- part of the example.-gcdvitppcAlias :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart (Maybe Text)-gcdvitppcAlias-  = lens _gcdvitppcAlias-      (\ s a -> s{_gcdvitppcAlias = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart'-                   <$>-                   (o .:? "text") <*> (o .:? "userDefined") <*>-                     (o .:? "entityType")-                     <*> (o .:? "alias"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart'{..}-          = object-              (catMaybes-                 [("text" .=) <$> _gcdvitppcText,-                  ("userDefined" .=) <$> _gcdvitppcUserDefined,-                  ("entityType" .=) <$> _gcdvitppcEntityType,-                  ("alias" .=) <$> _gcdvitppcAlias])---- | The response message for Contexts.ListContexts.------ /See:/ 'googleCloudDialogflowV2ListContextsResponse' smart constructor.-data GoogleCloudDialogflowV2ListContextsResponse = GoogleCloudDialogflowV2ListContextsResponse'-    { _gcdvlcrContexts      :: !(Maybe [GoogleCloudDialogflowV2Context])-    , _gcdvlcrNextPageToken :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2ListContextsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvlcrContexts'------ * 'gcdvlcrNextPageToken'-googleCloudDialogflowV2ListContextsResponse-    :: GoogleCloudDialogflowV2ListContextsResponse-googleCloudDialogflowV2ListContextsResponse =-    GoogleCloudDialogflowV2ListContextsResponse'-    { _gcdvlcrContexts = Nothing-    , _gcdvlcrNextPageToken = Nothing-    }---- | The list of contexts. There will be a maximum number of items returned--- based on the page_size field in the request.-gcdvlcrContexts :: Lens' GoogleCloudDialogflowV2ListContextsResponse [GoogleCloudDialogflowV2Context]-gcdvlcrContexts-  = lens _gcdvlcrContexts-      (\ s a -> s{_gcdvlcrContexts = a})-      . _Default-      . _Coerce---- | Token to retrieve the next page of results, or empty if there are no--- more results in the list.-gcdvlcrNextPageToken :: Lens' GoogleCloudDialogflowV2ListContextsResponse (Maybe Text)-gcdvlcrNextPageToken-  = lens _gcdvlcrNextPageToken-      (\ s a -> s{_gcdvlcrNextPageToken = a})--instance FromJSON-         GoogleCloudDialogflowV2ListContextsResponse where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2ListContextsResponse"-              (\ o ->-                 GoogleCloudDialogflowV2ListContextsResponse' <$>-                   (o .:? "contexts" .!= mempty) <*>-                     (o .:? "nextPageToken"))--instance ToJSON-         GoogleCloudDialogflowV2ListContextsResponse where-        toJSON-          GoogleCloudDialogflowV2ListContextsResponse'{..}-          = object-              (catMaybes-                 [("contexts" .=) <$> _gcdvlcrContexts,-                  ("nextPageToken" .=) <$> _gcdvlcrNextPageToken])---- | Transfers the call in Telephony Gateway.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall' smart constructor.-newtype GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall = GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall'-    { _gcdvimttcPhoneNumber :: Maybe Text-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimttcPhoneNumber'-googleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall-    :: GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall-googleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall =-    GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall'-    { _gcdvimttcPhoneNumber = Nothing-    }---- | Required. The phone number to transfer the call to in [E.164--- format](https:\/\/en.wikipedia.org\/wiki\/E.164). We currently only--- allow transferring to US numbers (+1xxxyyyzzzz).-gcdvimttcPhoneNumber :: Lens' GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall (Maybe Text)-gcdvimttcPhoneNumber-  = lens _gcdvimttcPhoneNumber-      (\ s a -> s{_gcdvimttcPhoneNumber = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall'-                   <$> (o .:? "phoneNumber"))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall'{..}-          = object-              (catMaybes-                 [("phoneNumber" .=) <$> _gcdvimttcPhoneNumber])---- | The response message for Agents.ExportAgent.------ /See:/ 'googleCloudDialogflowV2beta1ExportAgentResponse' smart constructor.-data GoogleCloudDialogflowV2beta1ExportAgentResponse = GoogleCloudDialogflowV2beta1ExportAgentResponse'-    { _gooAgentURI     :: !(Maybe Text)-    , _gooAgentContent :: !(Maybe Bytes)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1ExportAgentResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gooAgentURI'------ * 'gooAgentContent'-googleCloudDialogflowV2beta1ExportAgentResponse-    :: GoogleCloudDialogflowV2beta1ExportAgentResponse-googleCloudDialogflowV2beta1ExportAgentResponse =-    GoogleCloudDialogflowV2beta1ExportAgentResponse'-    { _gooAgentURI = Nothing-    , _gooAgentContent = Nothing-    }---- | The URI to a file containing the exported agent. This field is populated--- only if \`agent_uri\` is specified in \`ExportAgentRequest\`.-gooAgentURI :: Lens' GoogleCloudDialogflowV2beta1ExportAgentResponse (Maybe Text)-gooAgentURI-  = lens _gooAgentURI (\ s a -> s{_gooAgentURI = a})---- | The exported agent. Example for how to export an agent to a zip file via--- a command line:------ > curl \--- >   'https://dialogflow.googleapis.com/v2beta1/projects/<project_name>/agent:export'\--- >   -X POST \--- >   -H 'Authorization: Bearer '$(gcloud auth application-default--- >   print-access-token) \--- >   -H 'Accept: application/json' \--- >   -H 'Content-Type: application/json' \--- >   --compressed \--- >   --data-binary '{}' \--- > | grep agentContent | sed -e 's/.*"agentContent": "\([^"]*\)".*/\1/' \--- > | base64 --decode > <agent zip file>-gooAgentContent :: Lens' GoogleCloudDialogflowV2beta1ExportAgentResponse (Maybe ByteString)-gooAgentContent-  = lens _gooAgentContent-      (\ s a -> s{_gooAgentContent = a})-      . mapping _Bytes--instance FromJSON-         GoogleCloudDialogflowV2beta1ExportAgentResponse where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1ExportAgentResponse"-              (\ o ->-                 GoogleCloudDialogflowV2beta1ExportAgentResponse' <$>-                   (o .:? "agentUri") <*> (o .:? "agentContent"))--instance ToJSON-         GoogleCloudDialogflowV2beta1ExportAgentResponse where-        toJSON-          GoogleCloudDialogflowV2beta1ExportAgentResponse'{..}-          = object-              (catMaybes-                 [("agentUri" .=) <$> _gooAgentURI,-                  ("agentContent" .=) <$> _gooAgentContent])---- | Optional. This field is set to the value of the--- \`QueryParameters.payload\` field passed in the request. Some--- integrations that query a Dialogflow agent may provide additional--- information in the payload. In particular for the Telephony Gateway this--- field has the form:------ > {--- >  "telephony": {--- >    "caller_id": "+18558363987"--- >  }--- > }------ Note: The caller ID field (\`caller_id\`) will be redacted for Standard--- Edition agents and populated with the caller ID in [E.164--- format](https:\/\/en.wikipedia.org\/wiki\/E.164) for Enterprise Edition--- agents.------ /See:/ 'googleCloudDialogflowV2OriginalDetectIntentRequestPayload' smart constructor.-newtype GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload = GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload'-    { _gcdvodirpcAddtional :: HashMap Text JSONValue-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvodirpcAddtional'-googleCloudDialogflowV2OriginalDetectIntentRequestPayload-    :: HashMap Text JSONValue -- ^ 'gcdvodirpcAddtional'-    -> GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload-googleCloudDialogflowV2OriginalDetectIntentRequestPayload pGcdvodirpcAddtional_ =-    GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload'-    { _gcdvodirpcAddtional = _Coerce # pGcdvodirpcAddtional_-    }---- | Properties of the object.-gcdvodirpcAddtional :: Lens' GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload (HashMap Text JSONValue)-gcdvodirpcAddtional-  = lens _gcdvodirpcAddtional-      (\ s a -> s{_gcdvodirpcAddtional = a})-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload"-              (\ o ->-                 GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload'-                   <$> (parseJSONObject o))--instance ToJSON-         GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload-         where-        toJSON = toJSON . _gcdvodirpcAddtional---- | Represents a session entity type. Extends or replaces a developer entity--- type at the user session level (we refer to the entity types defined at--- the agent level as \"developer entity types\"). Note: session entity--- types apply to all queries, regardless of the language.------ /See:/ 'googleCloudDialogflowV2SessionEntityType' smart constructor.-data GoogleCloudDialogflowV2SessionEntityType = GoogleCloudDialogflowV2SessionEntityType'-    { _gcdvSetEntityOverrideMode :: !(Maybe GoogleCloudDialogflowV2SessionEntityTypeEntityOverrideMode)-    , _gcdvSetEntities           :: !(Maybe [GoogleCloudDialogflowV2EntityTypeEntity])-    , _gcdvSetName               :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2SessionEntityType' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvSetEntityOverrideMode'------ * 'gcdvSetEntities'------ * 'gcdvSetName'-googleCloudDialogflowV2SessionEntityType-    :: GoogleCloudDialogflowV2SessionEntityType-googleCloudDialogflowV2SessionEntityType =-    GoogleCloudDialogflowV2SessionEntityType'-    { _gcdvSetEntityOverrideMode = Nothing-    , _gcdvSetEntities = Nothing-    , _gcdvSetName = Nothing-    }---- | Required. Indicates whether the additional data should override or--- supplement the developer entity type definition.-gcdvSetEntityOverrideMode :: Lens' GoogleCloudDialogflowV2SessionEntityType (Maybe GoogleCloudDialogflowV2SessionEntityTypeEntityOverrideMode)-gcdvSetEntityOverrideMode-  = lens _gcdvSetEntityOverrideMode-      (\ s a -> s{_gcdvSetEntityOverrideMode = a})---- | Required. The collection of entities associated with this session entity--- type.-gcdvSetEntities :: Lens' GoogleCloudDialogflowV2SessionEntityType [GoogleCloudDialogflowV2EntityTypeEntity]-gcdvSetEntities-  = lens _gcdvSetEntities-      (\ s a -> s{_gcdvSetEntities = a})-      . _Default-      . _Coerce---- | Required. The unique identifier of this session entity type. Format:--- \`projects\/\/agent\/sessions\/\/entityTypes\/\`. \`\` must be the--- display name of an existing entity type in the same agent that will be--- overridden or supplemented.-gcdvSetName :: Lens' GoogleCloudDialogflowV2SessionEntityType (Maybe Text)-gcdvSetName-  = lens _gcdvSetName (\ s a -> s{_gcdvSetName = a})--instance FromJSON-         GoogleCloudDialogflowV2SessionEntityType where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2SessionEntityType"-              (\ o ->-                 GoogleCloudDialogflowV2SessionEntityType' <$>-                   (o .:? "entityOverrideMode") <*>-                     (o .:? "entities" .!= mempty)-                     <*> (o .:? "name"))--instance ToJSON-         GoogleCloudDialogflowV2SessionEntityType where-        toJSON GoogleCloudDialogflowV2SessionEntityType'{..}-          = object-              (catMaybes-                 [("entityOverrideMode" .=) <$>-                    _gcdvSetEntityOverrideMode,-                  ("entities" .=) <$> _gcdvSetEntities,-                  ("name" .=) <$> _gcdvSetName])---- | Optional. Represents an entity.------ /See:/ 'googleCloudDialogflowV2EntityTypeEntity' smart constructor.-data GoogleCloudDialogflowV2EntityTypeEntity = GoogleCloudDialogflowV2EntityTypeEntity'-    { _gValue    :: !(Maybe Text)-    , _gSynonyms :: !(Maybe [Text])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2EntityTypeEntity' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gValue'------ * 'gSynonyms'-googleCloudDialogflowV2EntityTypeEntity-    :: GoogleCloudDialogflowV2EntityTypeEntity-googleCloudDialogflowV2EntityTypeEntity =-    GoogleCloudDialogflowV2EntityTypeEntity'-    { _gValue = Nothing-    , _gSynonyms = Nothing-    }---- | Required. For \`KIND_MAP\` entity types: A canonical name to be used in--- place of synonyms. For \`KIND_LIST\` entity types: A string that can--- contain references to other entity types (with or without aliases).-gValue :: Lens' GoogleCloudDialogflowV2EntityTypeEntity (Maybe Text)-gValue = lens _gValue (\ s a -> s{_gValue = a})---- | Required. A collection of synonyms. For \`KIND_LIST\` entity types this--- must contain exactly one synonym equal to \`value\`.-gSynonyms :: Lens' GoogleCloudDialogflowV2EntityTypeEntity [Text]-gSynonyms-  = lens _gSynonyms (\ s a -> s{_gSynonyms = a}) .-      _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2EntityTypeEntity where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2EntityTypeEntity"-              (\ o ->-                 GoogleCloudDialogflowV2EntityTypeEntity' <$>-                   (o .:? "value") <*> (o .:? "synonyms" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2EntityTypeEntity where-        toJSON GoogleCloudDialogflowV2EntityTypeEntity'{..}-          = object-              (catMaybes-                 [("value" .=) <$> _gValue,-                  ("synonyms" .=) <$> _gSynonyms])---- | Represents the result of conversational query or event processing.------ /See:/ 'googleCloudDialogflowV2beta1QueryResult' smart constructor.-data GoogleCloudDialogflowV2beta1QueryResult = GoogleCloudDialogflowV2beta1QueryResult'-    { _gLanguageCode                :: !(Maybe Text)-    , _gAllRequiredParamsPresent    :: !(Maybe Bool)-    , _gIntentDetectionConfidence   :: !(Maybe (Textual Double))-    , _gFulfillmentMessages         :: !(Maybe [GoogleCloudDialogflowV2beta1IntentMessage])-    , _gKnowledgeAnswers            :: !(Maybe GoogleCloudDialogflowV2beta1KnowledgeAnswers)-    , _gSpeechRecognitionConfidence :: !(Maybe (Textual Double))-    , _gAction                      :: !(Maybe Text)-    , _gIntent                      :: !(Maybe GoogleCloudDialogflowV2beta1Intent)-    , _gSentimentAnalysisResult     :: !(Maybe GoogleCloudDialogflowV2beta1SentimentAnalysisResult)-    , _gQueryText                   :: !(Maybe Text)-    , _gFulfillmentText             :: !(Maybe Text)-    , _gParameters                  :: !(Maybe GoogleCloudDialogflowV2beta1QueryResultParameters)-    , _gWebhookPayload              :: !(Maybe GoogleCloudDialogflowV2beta1QueryResultWebhookPayload)-    , _gOutputContexts              :: !(Maybe [GoogleCloudDialogflowV2beta1Context])-    , _gWebhookSource               :: !(Maybe Text)-    , _gDiagnosticInfo              :: !(Maybe GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1QueryResult' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gLanguageCode'------ * 'gAllRequiredParamsPresent'------ * 'gIntentDetectionConfidence'------ * 'gFulfillmentMessages'------ * 'gKnowledgeAnswers'------ * 'gSpeechRecognitionConfidence'------ * 'gAction'------ * 'gIntent'------ * 'gSentimentAnalysisResult'------ * 'gQueryText'------ * 'gFulfillmentText'------ * 'gParameters'------ * 'gWebhookPayload'------ * 'gOutputContexts'------ * 'gWebhookSource'------ * 'gDiagnosticInfo'-googleCloudDialogflowV2beta1QueryResult-    :: GoogleCloudDialogflowV2beta1QueryResult-googleCloudDialogflowV2beta1QueryResult =-    GoogleCloudDialogflowV2beta1QueryResult'-    { _gLanguageCode = Nothing-    , _gAllRequiredParamsPresent = Nothing-    , _gIntentDetectionConfidence = Nothing-    , _gFulfillmentMessages = Nothing-    , _gKnowledgeAnswers = Nothing-    , _gSpeechRecognitionConfidence = Nothing-    , _gAction = Nothing-    , _gIntent = Nothing-    , _gSentimentAnalysisResult = Nothing-    , _gQueryText = Nothing-    , _gFulfillmentText = Nothing-    , _gParameters = Nothing-    , _gWebhookPayload = Nothing-    , _gOutputContexts = Nothing-    , _gWebhookSource = Nothing-    , _gDiagnosticInfo = Nothing-    }---- | The language that was triggered during intent detection. See [Language--- Support](https:\/\/dialogflow.com\/docs\/reference\/language) for a list--- of the currently supported language codes.-gLanguageCode :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Text)-gLanguageCode-  = lens _gLanguageCode-      (\ s a -> s{_gLanguageCode = a})---- | This field is set to: - \`false\` if the matched intent has required--- parameters and not all of the required parameter values have been--- collected. - \`true\` if all required parameter values have been--- collected, or if the matched intent doesn\'t contain any required--- parameters.-gAllRequiredParamsPresent :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Bool)-gAllRequiredParamsPresent-  = lens _gAllRequiredParamsPresent-      (\ s a -> s{_gAllRequiredParamsPresent = a})---- | The intent detection confidence. Values range from 0.0 (completely--- uncertain) to 1.0 (completely certain). If there are \`multiple--- knowledge_answers\` messages, this value is set to the greatest--- \`knowledgeAnswers.match_confidence\` value in the list.-gIntentDetectionConfidence :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Double)-gIntentDetectionConfidence-  = lens _gIntentDetectionConfidence-      (\ s a -> s{_gIntentDetectionConfidence = a})-      . mapping _Coerce---- | The collection of rich messages to present to the user.-gFulfillmentMessages :: Lens' GoogleCloudDialogflowV2beta1QueryResult [GoogleCloudDialogflowV2beta1IntentMessage]-gFulfillmentMessages-  = lens _gFulfillmentMessages-      (\ s a -> s{_gFulfillmentMessages = a})-      . _Default-      . _Coerce---- | The result from Knowledge Connector (if any), ordered by decreasing--- \`KnowledgeAnswers.match_confidence\`.-gKnowledgeAnswers :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe GoogleCloudDialogflowV2beta1KnowledgeAnswers)-gKnowledgeAnswers-  = lens _gKnowledgeAnswers-      (\ s a -> s{_gKnowledgeAnswers = a})---- | The Speech recognition confidence between 0.0 and 1.0. A higher number--- indicates an estimated greater likelihood that the recognized words are--- correct. The default of 0.0 is a sentinel value indicating that--- confidence was not set. This field is not guaranteed to be accurate or--- set. In particular this field isn\'t set for StreamingDetectIntent since--- the streaming endpoint has separate confidence estimates per portion of--- the audio in StreamingRecognitionResult.-gSpeechRecognitionConfidence :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Double)-gSpeechRecognitionConfidence-  = lens _gSpeechRecognitionConfidence-      (\ s a -> s{_gSpeechRecognitionConfidence = a})-      . mapping _Coerce---- | The action name from the matched intent.-gAction :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Text)-gAction = lens _gAction (\ s a -> s{_gAction = a})---- | The intent that matched the conversational query. Some, not all fields--- are filled in this message, including but not limited to: \`name\`,--- \`display_name\` and \`webhook_state\`.-gIntent :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe GoogleCloudDialogflowV2beta1Intent)-gIntent = lens _gIntent (\ s a -> s{_gIntent = a})---- | The sentiment analysis result, which depends on the--- \`sentiment_analysis_request_config\` specified in the request.-gSentimentAnalysisResult :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe GoogleCloudDialogflowV2beta1SentimentAnalysisResult)-gSentimentAnalysisResult-  = lens _gSentimentAnalysisResult-      (\ s a -> s{_gSentimentAnalysisResult = a})---- | The original conversational query text: - If natural language text was--- provided as input, \`query_text\` contains a copy of the input. - If--- natural language speech audio was provided as input, \`query_text\`--- contains the speech recognition result. If speech recognizer produced--- multiple alternatives, a particular one is picked. - If an event was--- provided as input, \`query_text\` is not set.-gQueryText :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Text)-gQueryText-  = lens _gQueryText (\ s a -> s{_gQueryText = a})---- | The text to be pronounced to the user or shown on the screen.-gFulfillmentText :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Text)-gFulfillmentText-  = lens _gFulfillmentText-      (\ s a -> s{_gFulfillmentText = a})---- | The collection of extracted parameters.-gParameters :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe GoogleCloudDialogflowV2beta1QueryResultParameters)-gParameters-  = lens _gParameters (\ s a -> s{_gParameters = a})---- | If the query was fulfilled by a webhook call, this field is set to the--- value of the \`payload\` field returned in the webhook response.-gWebhookPayload :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe GoogleCloudDialogflowV2beta1QueryResultWebhookPayload)-gWebhookPayload-  = lens _gWebhookPayload-      (\ s a -> s{_gWebhookPayload = a})---- | The collection of output contexts. If applicable,--- \`output_contexts.parameters\` contains entries with name \`.original\`--- containing the original parameter values before the query.-gOutputContexts :: Lens' GoogleCloudDialogflowV2beta1QueryResult [GoogleCloudDialogflowV2beta1Context]-gOutputContexts-  = lens _gOutputContexts-      (\ s a -> s{_gOutputContexts = a})-      . _Default-      . _Coerce---- | If the query was fulfilled by a webhook call, this field is set to the--- value of the \`source\` field returned in the webhook response.-gWebhookSource :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Text)-gWebhookSource-  = lens _gWebhookSource-      (\ s a -> s{_gWebhookSource = a})---- | The free-form diagnostic info. For example, this field could contain--- webhook call latency. The string keys of the Struct\'s fields map can--- change without notice.-gDiagnosticInfo :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo)-gDiagnosticInfo-  = lens _gDiagnosticInfo-      (\ s a -> s{_gDiagnosticInfo = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1QueryResult where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1QueryResult"-              (\ o ->-                 GoogleCloudDialogflowV2beta1QueryResult' <$>-                   (o .:? "languageCode") <*>-                     (o .:? "allRequiredParamsPresent")-                     <*> (o .:? "intentDetectionConfidence")-                     <*> (o .:? "fulfillmentMessages" .!= mempty)-                     <*> (o .:? "knowledgeAnswers")-                     <*> (o .:? "speechRecognitionConfidence")-                     <*> (o .:? "action")-                     <*> (o .:? "intent")-                     <*> (o .:? "sentimentAnalysisResult")-                     <*> (o .:? "queryText")-                     <*> (o .:? "fulfillmentText")-                     <*> (o .:? "parameters")-                     <*> (o .:? "webhookPayload")-                     <*> (o .:? "outputContexts" .!= mempty)-                     <*> (o .:? "webhookSource")-                     <*> (o .:? "diagnosticInfo"))--instance ToJSON-         GoogleCloudDialogflowV2beta1QueryResult where-        toJSON GoogleCloudDialogflowV2beta1QueryResult'{..}-          = object-              (catMaybes-                 [("languageCode" .=) <$> _gLanguageCode,-                  ("allRequiredParamsPresent" .=) <$>-                    _gAllRequiredParamsPresent,-                  ("intentDetectionConfidence" .=) <$>-                    _gIntentDetectionConfidence,-                  ("fulfillmentMessages" .=) <$> _gFulfillmentMessages,-                  ("knowledgeAnswers" .=) <$> _gKnowledgeAnswers,-                  ("speechRecognitionConfidence" .=) <$>-                    _gSpeechRecognitionConfidence,-                  ("action" .=) <$> _gAction,-                  ("intent" .=) <$> _gIntent,-                  ("sentimentAnalysisResult" .=) <$>-                    _gSentimentAnalysisResult,-                  ("queryText" .=) <$> _gQueryText,-                  ("fulfillmentText" .=) <$> _gFulfillmentText,-                  ("parameters" .=) <$> _gParameters,-                  ("webhookPayload" .=) <$> _gWebhookPayload,-                  ("outputContexts" .=) <$> _gOutputContexts,-                  ("webhookSource" .=) <$> _gWebhookSource,-                  ("diagnosticInfo" .=) <$> _gDiagnosticInfo])---- | The image response message.------ /See:/ 'googleCloudDialogflowV2IntentMessageImage' smart constructor.-data GoogleCloudDialogflowV2IntentMessageImage = GoogleCloudDialogflowV2IntentMessageImage'-    { _gAccessibilityText :: !(Maybe Text)-    , _gImageURI          :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageImage' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gAccessibilityText'------ * 'gImageURI'-googleCloudDialogflowV2IntentMessageImage-    :: GoogleCloudDialogflowV2IntentMessageImage-googleCloudDialogflowV2IntentMessageImage =-    GoogleCloudDialogflowV2IntentMessageImage'-    { _gAccessibilityText = Nothing-    , _gImageURI = Nothing-    }---- | Optional. A text description of the image to be used for accessibility,--- e.g., screen readers.-gAccessibilityText :: Lens' GoogleCloudDialogflowV2IntentMessageImage (Maybe Text)-gAccessibilityText-  = lens _gAccessibilityText-      (\ s a -> s{_gAccessibilityText = a})---- | Optional. The public URI to an image file.-gImageURI :: Lens' GoogleCloudDialogflowV2IntentMessageImage (Maybe Text)-gImageURI-  = lens _gImageURI (\ s a -> s{_gImageURI = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageImage where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageImage"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageImage' <$>-                   (o .:? "accessibilityText") <*> (o .:? "imageUri"))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageImage where-        toJSON GoogleCloudDialogflowV2IntentMessageImage'{..}-          = object-              (catMaybes-                 [("accessibilityText" .=) <$> _gAccessibilityText,-                  ("imageUri" .=) <$> _gImageURI])---- | The response message for a webhook call.------ /See:/ 'googleCloudDialogflowV2WebhookResponse' smart constructor.-data GoogleCloudDialogflowV2WebhookResponse = GoogleCloudDialogflowV2WebhookResponse'-    { _gooFulfillmentMessages :: !(Maybe [GoogleCloudDialogflowV2IntentMessage])-    , _gooPayload             :: !(Maybe GoogleCloudDialogflowV2WebhookResponsePayload)-    , _gooFulfillmentText     :: !(Maybe Text)-    , _gooSource              :: !(Maybe Text)-    , _gooOutputContexts      :: !(Maybe [GoogleCloudDialogflowV2Context])-    , _gooFollowupEventInput  :: !(Maybe GoogleCloudDialogflowV2EventInput)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2WebhookResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gooFulfillmentMessages'------ * 'gooPayload'------ * 'gooFulfillmentText'------ * 'gooSource'------ * 'gooOutputContexts'------ * 'gooFollowupEventInput'-googleCloudDialogflowV2WebhookResponse-    :: GoogleCloudDialogflowV2WebhookResponse-googleCloudDialogflowV2WebhookResponse =-    GoogleCloudDialogflowV2WebhookResponse'-    { _gooFulfillmentMessages = Nothing-    , _gooPayload = Nothing-    , _gooFulfillmentText = Nothing-    , _gooSource = Nothing-    , _gooOutputContexts = Nothing-    , _gooFollowupEventInput = Nothing-    }---- | Optional. The collection of rich messages to present to the user. This--- value is passed directly to \`QueryResult.fulfillment_messages\`.-gooFulfillmentMessages :: Lens' GoogleCloudDialogflowV2WebhookResponse [GoogleCloudDialogflowV2IntentMessage]-gooFulfillmentMessages-  = lens _gooFulfillmentMessages-      (\ s a -> s{_gooFulfillmentMessages = a})-      . _Default-      . _Coerce---- | Optional. This value is passed directly to--- \`QueryResult.webhook_payload\`. See the related--- \`fulfillment_messages[i].payload field\`, which may be used as an--- alternative to this field. This field can be used for Actions on Google--- responses. It should have a structure similar to the JSON message shown--- here. For more information, see [Actions on Google Webhook--- Format](https:\/\/developers.google.com\/actions\/dialogflow\/webhook)------ > {--- >   "google": {--- >     "expectUserResponse": true,--- >     "richResponse": {--- >       "items": [--- >         {--- >           "simpleResponse": {--- >             "textToSpeech": "this is a simple response"--- >           }--- >         }--- >       ]--- >     }--- >   }--- > }-gooPayload :: Lens' GoogleCloudDialogflowV2WebhookResponse (Maybe GoogleCloudDialogflowV2WebhookResponsePayload)-gooPayload-  = lens _gooPayload (\ s a -> s{_gooPayload = a})---- | Optional. The text to be shown on the screen. This value is passed--- directly to \`QueryResult.fulfillment_text\`.-gooFulfillmentText :: Lens' GoogleCloudDialogflowV2WebhookResponse (Maybe Text)-gooFulfillmentText-  = lens _gooFulfillmentText-      (\ s a -> s{_gooFulfillmentText = a})---- | Optional. This value is passed directly to--- \`QueryResult.webhook_source\`.-gooSource :: Lens' GoogleCloudDialogflowV2WebhookResponse (Maybe Text)-gooSource-  = lens _gooSource (\ s a -> s{_gooSource = a})---- | Optional. The collection of output contexts. This value is passed--- directly to \`QueryResult.output_contexts\`.-gooOutputContexts :: Lens' GoogleCloudDialogflowV2WebhookResponse [GoogleCloudDialogflowV2Context]-gooOutputContexts-  = lens _gooOutputContexts-      (\ s a -> s{_gooOutputContexts = a})-      . _Default-      . _Coerce---- | Optional. Makes the platform immediately invoke another \`DetectIntent\`--- call internally with the specified event as input.-gooFollowupEventInput :: Lens' GoogleCloudDialogflowV2WebhookResponse (Maybe GoogleCloudDialogflowV2EventInput)-gooFollowupEventInput-  = lens _gooFollowupEventInput-      (\ s a -> s{_gooFollowupEventInput = a})--instance FromJSON-         GoogleCloudDialogflowV2WebhookResponse where-        parseJSON-          = withObject "GoogleCloudDialogflowV2WebhookResponse"-              (\ o ->-                 GoogleCloudDialogflowV2WebhookResponse' <$>-                   (o .:? "fulfillmentMessages" .!= mempty) <*>-                     (o .:? "payload")-                     <*> (o .:? "fulfillmentText")-                     <*> (o .:? "source")-                     <*> (o .:? "outputContexts" .!= mempty)-                     <*> (o .:? "followupEventInput"))--instance ToJSON-         GoogleCloudDialogflowV2WebhookResponse where-        toJSON GoogleCloudDialogflowV2WebhookResponse'{..}-          = object-              (catMaybes-                 [("fulfillmentMessages" .=) <$>-                    _gooFulfillmentMessages,-                  ("payload" .=) <$> _gooPayload,-                  ("fulfillmentText" .=) <$> _gooFulfillmentText,-                  ("source" .=) <$> _gooSource,-                  ("outputContexts" .=) <$> _gooOutputContexts,-                  ("followupEventInput" .=) <$>-                    _gooFollowupEventInput])---- | The request message for Agents.TrainAgent.------ /See:/ 'googleCloudDialogflowV2TrainAgentRequest' smart constructor.-data GoogleCloudDialogflowV2TrainAgentRequest =-    GoogleCloudDialogflowV2TrainAgentRequest'-    deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2TrainAgentRequest' with the minimum fields required to make a request.----googleCloudDialogflowV2TrainAgentRequest-    :: GoogleCloudDialogflowV2TrainAgentRequest-googleCloudDialogflowV2TrainAgentRequest =-    GoogleCloudDialogflowV2TrainAgentRequest'--instance FromJSON-         GoogleCloudDialogflowV2TrainAgentRequest where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2TrainAgentRequest"-              (\ o ->-                 pure GoogleCloudDialogflowV2TrainAgentRequest')--instance ToJSON-         GoogleCloudDialogflowV2TrainAgentRequest where-        toJSON = const emptyObject---- | This message is a wrapper around a collection of intents.------ /See:/ 'googleCloudDialogflowV2IntentBatch' smart constructor.-newtype GoogleCloudDialogflowV2IntentBatch = GoogleCloudDialogflowV2IntentBatch'-    { _gcdvibIntents :: Maybe [GoogleCloudDialogflowV2Intent]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentBatch' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvibIntents'-googleCloudDialogflowV2IntentBatch-    :: GoogleCloudDialogflowV2IntentBatch-googleCloudDialogflowV2IntentBatch =-    GoogleCloudDialogflowV2IntentBatch'-    { _gcdvibIntents = Nothing-    }---- | A collection of intents.-gcdvibIntents :: Lens' GoogleCloudDialogflowV2IntentBatch [GoogleCloudDialogflowV2Intent]-gcdvibIntents-  = lens _gcdvibIntents-      (\ s a -> s{_gcdvibIntents = a})-      . _Default-      . _Coerce--instance FromJSON GoogleCloudDialogflowV2IntentBatch-         where-        parseJSON-          = withObject "GoogleCloudDialogflowV2IntentBatch"-              (\ o ->-                 GoogleCloudDialogflowV2IntentBatch' <$>-                   (o .:? "intents" .!= mempty))--instance ToJSON GoogleCloudDialogflowV2IntentBatch-         where-        toJSON GoogleCloudDialogflowV2IntentBatch'{..}-          = object-              (catMaybes [("intents" .=) <$> _gcdvibIntents])---- | Represents an entity type. Entity types serve as a tool for extracting--- parameter values from natural language queries.------ /See:/ 'googleCloudDialogflowV2beta1EntityType' smart constructor.-data GoogleCloudDialogflowV2beta1EntityType = GoogleCloudDialogflowV2beta1EntityType'-    { _gcdvetcEntities          :: !(Maybe [GoogleCloudDialogflowV2beta1EntityTypeEntity])-    , _gcdvetcKind              :: !(Maybe GoogleCloudDialogflowV2beta1EntityTypeKind)-    , _gcdvetcName              :: !(Maybe Text)-    , _gcdvetcAutoExpansionMode :: !(Maybe GoogleCloudDialogflowV2beta1EntityTypeAutoExpansionMode)-    , _gcdvetcDisplayName       :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1EntityType' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvetcEntities'------ * 'gcdvetcKind'------ * 'gcdvetcName'------ * 'gcdvetcAutoExpansionMode'------ * 'gcdvetcDisplayName'-googleCloudDialogflowV2beta1EntityType-    :: GoogleCloudDialogflowV2beta1EntityType-googleCloudDialogflowV2beta1EntityType =-    GoogleCloudDialogflowV2beta1EntityType'-    { _gcdvetcEntities = Nothing-    , _gcdvetcKind = Nothing-    , _gcdvetcName = Nothing-    , _gcdvetcAutoExpansionMode = Nothing-    , _gcdvetcDisplayName = Nothing-    }---- | Optional. The collection of entities associated with the entity type.-gcdvetcEntities :: Lens' GoogleCloudDialogflowV2beta1EntityType [GoogleCloudDialogflowV2beta1EntityTypeEntity]-gcdvetcEntities-  = lens _gcdvetcEntities-      (\ s a -> s{_gcdvetcEntities = a})-      . _Default-      . _Coerce---- | Required. Indicates the kind of entity type.-gcdvetcKind :: Lens' GoogleCloudDialogflowV2beta1EntityType (Maybe GoogleCloudDialogflowV2beta1EntityTypeKind)-gcdvetcKind-  = lens _gcdvetcKind (\ s a -> s{_gcdvetcKind = a})---- | Required for all methods except \`create\` (\`create\` populates the--- name automatically. The unique identifier of the entity type. Format:--- \`projects\/\/agent\/entityTypes\/\`.-gcdvetcName :: Lens' GoogleCloudDialogflowV2beta1EntityType (Maybe Text)-gcdvetcName-  = lens _gcdvetcName (\ s a -> s{_gcdvetcName = a})---- | Optional. Indicates whether the entity type can be automatically--- expanded.-gcdvetcAutoExpansionMode :: Lens' GoogleCloudDialogflowV2beta1EntityType (Maybe GoogleCloudDialogflowV2beta1EntityTypeAutoExpansionMode)-gcdvetcAutoExpansionMode-  = lens _gcdvetcAutoExpansionMode-      (\ s a -> s{_gcdvetcAutoExpansionMode = a})---- | Required. The name of the entity type.-gcdvetcDisplayName :: Lens' GoogleCloudDialogflowV2beta1EntityType (Maybe Text)-gcdvetcDisplayName-  = lens _gcdvetcDisplayName-      (\ s a -> s{_gcdvetcDisplayName = a})--instance FromJSON-         GoogleCloudDialogflowV2beta1EntityType where-        parseJSON-          = withObject "GoogleCloudDialogflowV2beta1EntityType"-              (\ o ->-                 GoogleCloudDialogflowV2beta1EntityType' <$>-                   (o .:? "entities" .!= mempty) <*> (o .:? "kind") <*>-                     (o .:? "name")-                     <*> (o .:? "autoExpansionMode")-                     <*> (o .:? "displayName"))--instance ToJSON-         GoogleCloudDialogflowV2beta1EntityType where-        toJSON GoogleCloudDialogflowV2beta1EntityType'{..}-          = object-              (catMaybes-                 [("entities" .=) <$> _gcdvetcEntities,-                  ("kind" .=) <$> _gcdvetcKind,-                  ("name" .=) <$> _gcdvetcName,-                  ("autoExpansionMode" .=) <$>-                    _gcdvetcAutoExpansionMode,-                  ("displayName" .=) <$> _gcdvetcDisplayName])---- | The response message for Agents.SearchAgents.------ /See:/ 'googleCloudDialogflowV2SearchAgentsResponse' smart constructor.-data GoogleCloudDialogflowV2SearchAgentsResponse = GoogleCloudDialogflowV2SearchAgentsResponse'-    { _gcdvsarNextPageToken :: !(Maybe Text)-    , _gcdvsarAgents        :: !(Maybe [GoogleCloudDialogflowV2Agent])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2SearchAgentsResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvsarNextPageToken'------ * 'gcdvsarAgents'-googleCloudDialogflowV2SearchAgentsResponse-    :: GoogleCloudDialogflowV2SearchAgentsResponse-googleCloudDialogflowV2SearchAgentsResponse =-    GoogleCloudDialogflowV2SearchAgentsResponse'-    { _gcdvsarNextPageToken = Nothing-    , _gcdvsarAgents = Nothing-    }---- | Token to retrieve the next page of results, or empty if there are no--- more results in the list.-gcdvsarNextPageToken :: Lens' GoogleCloudDialogflowV2SearchAgentsResponse (Maybe Text)-gcdvsarNextPageToken-  = lens _gcdvsarNextPageToken-      (\ s a -> s{_gcdvsarNextPageToken = a})---- | The list of agents. There will be a maximum number of items returned--- based on the page_size field in the request.-gcdvsarAgents :: Lens' GoogleCloudDialogflowV2SearchAgentsResponse [GoogleCloudDialogflowV2Agent]-gcdvsarAgents-  = lens _gcdvsarAgents-      (\ s a -> s{_gcdvsarAgents = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2SearchAgentsResponse where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2SearchAgentsResponse"-              (\ o ->-                 GoogleCloudDialogflowV2SearchAgentsResponse' <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "agents" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2SearchAgentsResponse where-        toJSON-          GoogleCloudDialogflowV2SearchAgentsResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _gcdvsarNextPageToken,-                  ("agents" .=) <$> _gcdvsarAgents])---- | The response message for SessionEntityTypes.ListSessionEntityTypes.------ /See:/ 'googleCloudDialogflowV2ListSessionEntityTypesResponse' smart constructor.-data GoogleCloudDialogflowV2ListSessionEntityTypesResponse = GoogleCloudDialogflowV2ListSessionEntityTypesResponse'-    { _gcdvlSetrNextPageToken      :: !(Maybe Text)-    , _gcdvlSetrSessionEntityTypes :: !(Maybe [GoogleCloudDialogflowV2SessionEntityType])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2ListSessionEntityTypesResponse' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvlSetrNextPageToken'------ * 'gcdvlSetrSessionEntityTypes'-googleCloudDialogflowV2ListSessionEntityTypesResponse-    :: GoogleCloudDialogflowV2ListSessionEntityTypesResponse-googleCloudDialogflowV2ListSessionEntityTypesResponse =-    GoogleCloudDialogflowV2ListSessionEntityTypesResponse'-    { _gcdvlSetrNextPageToken = Nothing-    , _gcdvlSetrSessionEntityTypes = Nothing-    }---- | Token to retrieve the next page of results, or empty if there are no--- more results in the list.-gcdvlSetrNextPageToken :: Lens' GoogleCloudDialogflowV2ListSessionEntityTypesResponse (Maybe Text)-gcdvlSetrNextPageToken-  = lens _gcdvlSetrNextPageToken-      (\ s a -> s{_gcdvlSetrNextPageToken = a})---- | The list of session entity types. There will be a maximum number of--- items returned based on the page_size field in the request.-gcdvlSetrSessionEntityTypes :: Lens' GoogleCloudDialogflowV2ListSessionEntityTypesResponse [GoogleCloudDialogflowV2SessionEntityType]-gcdvlSetrSessionEntityTypes-  = lens _gcdvlSetrSessionEntityTypes-      (\ s a -> s{_gcdvlSetrSessionEntityTypes = a})-      . _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2ListSessionEntityTypesResponse-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2ListSessionEntityTypesResponse"-              (\ o ->-                 GoogleCloudDialogflowV2ListSessionEntityTypesResponse'-                   <$>-                   (o .:? "nextPageToken") <*>-                     (o .:? "sessionEntityTypes" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2ListSessionEntityTypesResponse-         where-        toJSON-          GoogleCloudDialogflowV2ListSessionEntityTypesResponse'{..}-          = object-              (catMaybes-                 [("nextPageToken" .=) <$> _gcdvlSetrNextPageToken,-                  ("sessionEntityTypes" .=) <$>-                    _gcdvlSetrSessionEntityTypes])---- | This resource represents a long-running operation that is the result of--- a network API call.------ /See:/ 'googleLongrunningOperation' smart constructor.-data GoogleLongrunningOperation = GoogleLongrunningOperation'-    { _gloDone     :: !(Maybe Bool)-    , _gloError    :: !(Maybe GoogleRpcStatus)-    , _gloResponse :: !(Maybe GoogleLongrunningOperationResponse)-    , _gloName     :: !(Maybe Text)-    , _gloMetadata :: !(Maybe GoogleLongrunningOperationMetadata)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleLongrunningOperation' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gloDone'------ * 'gloError'------ * 'gloResponse'------ * 'gloName'------ * 'gloMetadata'-googleLongrunningOperation-    :: GoogleLongrunningOperation-googleLongrunningOperation =-    GoogleLongrunningOperation'-    { _gloDone = Nothing-    , _gloError = Nothing-    , _gloResponse = Nothing-    , _gloName = Nothing-    , _gloMetadata = 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.-gloDone :: Lens' GoogleLongrunningOperation (Maybe Bool)-gloDone = lens _gloDone (\ s a -> s{_gloDone = a})---- | The error result of the operation in case of failure or cancellation.-gloError :: Lens' GoogleLongrunningOperation (Maybe GoogleRpcStatus)-gloError = lens _gloError (\ s a -> s{_gloError = 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\`.-gloResponse :: Lens' GoogleLongrunningOperation (Maybe GoogleLongrunningOperationResponse)-gloResponse-  = lens _gloResponse (\ s a -> s{_gloResponse = 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\`.-gloName :: Lens' GoogleLongrunningOperation (Maybe Text)-gloName = lens _gloName (\ s a -> s{_gloName = 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.-gloMetadata :: Lens' GoogleLongrunningOperation (Maybe GoogleLongrunningOperationMetadata)-gloMetadata-  = lens _gloMetadata (\ s a -> s{_gloMetadata = a})--instance FromJSON GoogleLongrunningOperation where-        parseJSON-          = withObject "GoogleLongrunningOperation"-              (\ o ->-                 GoogleLongrunningOperation' <$>-                   (o .:? "done") <*> (o .:? "error") <*>-                     (o .:? "response")-                     <*> (o .:? "name")-                     <*> (o .:? "metadata"))--instance ToJSON GoogleLongrunningOperation where-        toJSON GoogleLongrunningOperation'{..}-          = object-              (catMaybes-                 [("done" .=) <$> _gloDone,-                  ("error" .=) <$> _gloError,-                  ("response" .=) <$> _gloResponse,-                  ("name" .=) <$> _gloName,-                  ("metadata" .=) <$> _gloMetadata])---- | Corresponds to the \`Response\` field in the Dialogflow console.------ /See:/ 'googleCloudDialogflowV2IntentMessage' smart constructor.-data GoogleCloudDialogflowV2IntentMessage = GoogleCloudDialogflowV2IntentMessage'-    { _gcdvimcCard              :: !(Maybe GoogleCloudDialogflowV2IntentMessageCard)-    , _gcdvimcImage             :: !(Maybe GoogleCloudDialogflowV2IntentMessageImage)-    , _gcdvimcPlatform          :: !(Maybe GoogleCloudDialogflowV2IntentMessagePlatform)-    , _gcdvimcLinkOutSuggestion :: !(Maybe GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion)-    , _gcdvimcText              :: !(Maybe GoogleCloudDialogflowV2IntentMessageText)-    , _gcdvimcCarouselSelect    :: !(Maybe GoogleCloudDialogflowV2IntentMessageCarouselSelect)-    , _gcdvimcSimpleResponses   :: !(Maybe GoogleCloudDialogflowV2IntentMessageSimpleResponses)-    , _gcdvimcPayload           :: !(Maybe GoogleCloudDialogflowV2IntentMessagePayload)-    , _gcdvimcSuggestions       :: !(Maybe GoogleCloudDialogflowV2IntentMessageSuggestions)-    , _gcdvimcListSelect        :: !(Maybe GoogleCloudDialogflowV2IntentMessageListSelect)-    , _gcdvimcBasicCard         :: !(Maybe GoogleCloudDialogflowV2IntentMessageBasicCard)-    , _gcdvimcQuickReplies      :: !(Maybe GoogleCloudDialogflowV2IntentMessageQuickReplies)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessage' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimcCard'------ * 'gcdvimcImage'------ * 'gcdvimcPlatform'------ * 'gcdvimcLinkOutSuggestion'------ * 'gcdvimcText'------ * 'gcdvimcCarouselSelect'------ * 'gcdvimcSimpleResponses'------ * 'gcdvimcPayload'------ * 'gcdvimcSuggestions'------ * 'gcdvimcListSelect'------ * 'gcdvimcBasicCard'------ * 'gcdvimcQuickReplies'-googleCloudDialogflowV2IntentMessage-    :: GoogleCloudDialogflowV2IntentMessage-googleCloudDialogflowV2IntentMessage =-    GoogleCloudDialogflowV2IntentMessage'-    { _gcdvimcCard = Nothing-    , _gcdvimcImage = Nothing-    , _gcdvimcPlatform = Nothing-    , _gcdvimcLinkOutSuggestion = Nothing-    , _gcdvimcText = Nothing-    , _gcdvimcCarouselSelect = Nothing-    , _gcdvimcSimpleResponses = Nothing-    , _gcdvimcPayload = Nothing-    , _gcdvimcSuggestions = Nothing-    , _gcdvimcListSelect = Nothing-    , _gcdvimcBasicCard = Nothing-    , _gcdvimcQuickReplies = Nothing-    }---- | The card response.-gcdvimcCard :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageCard)-gcdvimcCard-  = lens _gcdvimcCard (\ s a -> s{_gcdvimcCard = a})---- | The image response.-gcdvimcImage :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageImage)-gcdvimcImage-  = lens _gcdvimcImage (\ s a -> s{_gcdvimcImage = a})---- | Optional. The platform that this message is intended for.-gcdvimcPlatform :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessagePlatform)-gcdvimcPlatform-  = lens _gcdvimcPlatform-      (\ s a -> s{_gcdvimcPlatform = a})---- | The link out suggestion chip for Actions on Google.-gcdvimcLinkOutSuggestion :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion)-gcdvimcLinkOutSuggestion-  = lens _gcdvimcLinkOutSuggestion-      (\ s a -> s{_gcdvimcLinkOutSuggestion = a})---- | The text response.-gcdvimcText :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageText)-gcdvimcText-  = lens _gcdvimcText (\ s a -> s{_gcdvimcText = a})---- | The carousel card response for Actions on Google.-gcdvimcCarouselSelect :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageCarouselSelect)-gcdvimcCarouselSelect-  = lens _gcdvimcCarouselSelect-      (\ s a -> s{_gcdvimcCarouselSelect = a})---- | The voice and text-only responses for Actions on Google.-gcdvimcSimpleResponses :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageSimpleResponses)-gcdvimcSimpleResponses-  = lens _gcdvimcSimpleResponses-      (\ s a -> s{_gcdvimcSimpleResponses = a})---- | Returns a response containing a custom, platform-specific payload. See--- the Intent.Message.Platform type for a description of the structure that--- may be required for your platform.-gcdvimcPayload :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessagePayload)-gcdvimcPayload-  = lens _gcdvimcPayload-      (\ s a -> s{_gcdvimcPayload = a})---- | The suggestion chips for Actions on Google.-gcdvimcSuggestions :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageSuggestions)-gcdvimcSuggestions-  = lens _gcdvimcSuggestions-      (\ s a -> s{_gcdvimcSuggestions = a})---- | The list card response for Actions on Google.-gcdvimcListSelect :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageListSelect)-gcdvimcListSelect-  = lens _gcdvimcListSelect-      (\ s a -> s{_gcdvimcListSelect = a})---- | The basic card response for Actions on Google.-gcdvimcBasicCard :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageBasicCard)-gcdvimcBasicCard-  = lens _gcdvimcBasicCard-      (\ s a -> s{_gcdvimcBasicCard = a})---- | The quick replies response.-gcdvimcQuickReplies :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageQuickReplies)-gcdvimcQuickReplies-  = lens _gcdvimcQuickReplies-      (\ s a -> s{_gcdvimcQuickReplies = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentMessage where-        parseJSON-          = withObject "GoogleCloudDialogflowV2IntentMessage"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessage' <$>-                   (o .:? "card") <*> (o .:? "image") <*>-                     (o .:? "platform")-                     <*> (o .:? "linkOutSuggestion")-                     <*> (o .:? "text")-                     <*> (o .:? "carouselSelect")-                     <*> (o .:? "simpleResponses")-                     <*> (o .:? "payload")-                     <*> (o .:? "suggestions")-                     <*> (o .:? "listSelect")-                     <*> (o .:? "basicCard")-                     <*> (o .:? "quickReplies"))--instance ToJSON GoogleCloudDialogflowV2IntentMessage-         where-        toJSON GoogleCloudDialogflowV2IntentMessage'{..}-          = object-              (catMaybes-                 [("card" .=) <$> _gcdvimcCard,-                  ("image" .=) <$> _gcdvimcImage,-                  ("platform" .=) <$> _gcdvimcPlatform,-                  ("linkOutSuggestion" .=) <$>-                    _gcdvimcLinkOutSuggestion,-                  ("text" .=) <$> _gcdvimcText,-                  ("carouselSelect" .=) <$> _gcdvimcCarouselSelect,-                  ("simpleResponses" .=) <$> _gcdvimcSimpleResponses,-                  ("payload" .=) <$> _gcdvimcPayload,-                  ("suggestions" .=) <$> _gcdvimcSuggestions,-                  ("listSelect" .=) <$> _gcdvimcListSelect,-                  ("basicCard" .=) <$> _gcdvimcBasicCard,-                  ("quickReplies" .=) <$> _gcdvimcQuickReplies])---- | The card for presenting a carousel of options to select from.------ /See:/ 'googleCloudDialogflowV2IntentMessageCarouselSelect' smart constructor.-newtype GoogleCloudDialogflowV2IntentMessageCarouselSelect = GoogleCloudDialogflowV2IntentMessageCarouselSelect'-    { _gItems :: Maybe [GoogleCloudDialogflowV2IntentMessageCarouselSelectItem]-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageCarouselSelect' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gItems'-googleCloudDialogflowV2IntentMessageCarouselSelect-    :: GoogleCloudDialogflowV2IntentMessageCarouselSelect-googleCloudDialogflowV2IntentMessageCarouselSelect =-    GoogleCloudDialogflowV2IntentMessageCarouselSelect'-    { _gItems = Nothing-    }---- | Required. Carousel items.-gItems :: Lens' GoogleCloudDialogflowV2IntentMessageCarouselSelect [GoogleCloudDialogflowV2IntentMessageCarouselSelectItem]-gItems-  = lens _gItems (\ s a -> s{_gItems = a}) . _Default .-      _Coerce--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageCarouselSelect-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageCarouselSelect"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageCarouselSelect'-                   <$> (o .:? "items" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageCarouselSelect-         where-        toJSON-          GoogleCloudDialogflowV2IntentMessageCarouselSelect'{..}-          = object (catMaybes [("items" .=) <$> _gItems])---- | Additional info about the select item for when it is triggered in a--- dialog.------ /See:/ 'googleCloudDialogflowV2beta1IntentMessageSelectItemInfo' smart constructor.-data GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo = GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo'-    { _gooKey      :: !(Maybe Text)-    , _gooSynonyms :: !(Maybe [Text])-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gooKey'------ * 'gooSynonyms'-googleCloudDialogflowV2beta1IntentMessageSelectItemInfo-    :: GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo-googleCloudDialogflowV2beta1IntentMessageSelectItemInfo =-    GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo'-    { _gooKey = Nothing-    , _gooSynonyms = Nothing-    }---- | Required. A unique key that will be sent back to the agent if this--- response is given.-gooKey :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo (Maybe Text)-gooKey = lens _gooKey (\ s a -> s{_gooKey = a})---- | Optional. A list of synonyms that can also be used to trigger this item--- in dialog.-gooSynonyms :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo [Text]-gooSynonyms-  = lens _gooSynonyms (\ s a -> s{_gooSynonyms = a}) .-      _Default-      . _Coerce--instance FromJSON-         GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo"-              (\ o ->-                 GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo'-                   <$> (o .:? "key") <*> (o .:? "synonyms" .!= mempty))--instance ToJSON-         GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo-         where-        toJSON-          GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo'{..}-          = object-              (catMaybes-                 [("key" .=) <$> _gooKey,-                  ("synonyms" .=) <$> _gooSynonyms])---- | Represents an intent. Intents convert a number of user expressions or--- patterns into an action. An action is an extraction of a user command or--- sentence semantics.------ /See:/ 'googleCloudDialogflowV2beta1Intent' smart constructor.-data GoogleCloudDialogflowV2beta1Intent = GoogleCloudDialogflowV2beta1Intent'-    { _gcdvicDefaultResponsePlatforms :: !(Maybe [Text])-    , _gcdvicWebhookState             :: !(Maybe GoogleCloudDialogflowV2beta1IntentWebhookState)-    , _gcdvicMlEnabled                :: !(Maybe Bool)-    , _gcdvicPriority                 :: !(Maybe (Textual Int32))-    , _gcdvicAction                   :: !(Maybe Text)-    , _gcdvicRootFollowupIntentName   :: !(Maybe Text)-    , _gcdvicName                     :: !(Maybe Text)-    , _gcdvicEvents                   :: !(Maybe [Text])-    , _gcdvicParameters               :: !(Maybe [GoogleCloudDialogflowV2beta1IntentParameter])-    , _gcdvicDisplayName              :: !(Maybe Text)-    , _gcdvicInputContextNames        :: !(Maybe [Text])-    , _gcdvicEndInteraction           :: !(Maybe Bool)-    , _gcdvicMessages                 :: !(Maybe [GoogleCloudDialogflowV2beta1IntentMessage])-    , _gcdvicParentFollowupIntentName :: !(Maybe Text)-    , _gcdvicOutputContexts           :: !(Maybe [GoogleCloudDialogflowV2beta1Context])-    , _gcdvicTrainingPhrases          :: !(Maybe [GoogleCloudDialogflowV2beta1IntentTrainingPhrase])-    , _gcdvicFollowupIntentInfo       :: !(Maybe [GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo])-    , _gcdvicIsFallback               :: !(Maybe Bool)-    , _gcdvicMlDisabled               :: !(Maybe Bool)-    , _gcdvicResetContexts            :: !(Maybe Bool)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2beta1Intent' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvicDefaultResponsePlatforms'------ * 'gcdvicWebhookState'------ * 'gcdvicMlEnabled'------ * 'gcdvicPriority'------ * 'gcdvicAction'------ * 'gcdvicRootFollowupIntentName'------ * 'gcdvicName'------ * 'gcdvicEvents'------ * 'gcdvicParameters'------ * 'gcdvicDisplayName'------ * 'gcdvicInputContextNames'------ * 'gcdvicEndInteraction'------ * 'gcdvicMessages'------ * 'gcdvicParentFollowupIntentName'------ * 'gcdvicOutputContexts'------ * 'gcdvicTrainingPhrases'------ * 'gcdvicFollowupIntentInfo'------ * 'gcdvicIsFallback'------ * 'gcdvicMlDisabled'------ * 'gcdvicResetContexts'-googleCloudDialogflowV2beta1Intent-    :: GoogleCloudDialogflowV2beta1Intent-googleCloudDialogflowV2beta1Intent =-    GoogleCloudDialogflowV2beta1Intent'-    { _gcdvicDefaultResponsePlatforms = Nothing-    , _gcdvicWebhookState = Nothing-    , _gcdvicMlEnabled = Nothing-    , _gcdvicPriority = Nothing-    , _gcdvicAction = Nothing-    , _gcdvicRootFollowupIntentName = Nothing-    , _gcdvicName = Nothing-    , _gcdvicEvents = Nothing-    , _gcdvicParameters = Nothing-    , _gcdvicDisplayName = Nothing-    , _gcdvicInputContextNames = Nothing-    , _gcdvicEndInteraction = Nothing-    , _gcdvicMessages = Nothing-    , _gcdvicParentFollowupIntentName = Nothing-    , _gcdvicOutputContexts = Nothing-    , _gcdvicTrainingPhrases = Nothing-    , _gcdvicFollowupIntentInfo = Nothing-    , _gcdvicIsFallback = Nothing-    , _gcdvicMlDisabled = Nothing-    , _gcdvicResetContexts = Nothing-    }---- | Optional. The list of platforms for which the first response will be--- taken from among the messages assigned to the DEFAULT_PLATFORM.-gcdvicDefaultResponsePlatforms :: Lens' GoogleCloudDialogflowV2beta1Intent [Text]-gcdvicDefaultResponsePlatforms-  = lens _gcdvicDefaultResponsePlatforms-      (\ s a -> s{_gcdvicDefaultResponsePlatforms = a})-      . _Default-      . _Coerce---- | Optional. Indicates whether webhooks are enabled for the intent.-gcdvicWebhookState :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe GoogleCloudDialogflowV2beta1IntentWebhookState)-gcdvicWebhookState-  = lens _gcdvicWebhookState-      (\ s a -> s{_gcdvicWebhookState = a})---- | Optional. Indicates whether Machine Learning is enabled for the intent.--- Note: If \`ml_enabled\` setting is set to false, then this intent is not--- taken into account during inference in \`ML ONLY\` match mode. Also,--- auto-markup in the UI is turned off. DEPRECATED! Please use--- \`ml_disabled\` field instead. NOTE: If both \`ml_enabled\` and--- \`ml_disabled\` are either not set or false, then the default value is--- determined as follows: - Before April 15th, 2018 the default is:--- ml_enabled = false \/ ml_disabled = true. - After April 15th, 2018 the--- default is: ml_enabled = true \/ ml_disabled = false.-gcdvicMlEnabled :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Bool)-gcdvicMlEnabled-  = lens _gcdvicMlEnabled-      (\ s a -> s{_gcdvicMlEnabled = a})---- | Optional. The priority of this intent. Higher numbers represent higher--- priorities. If this is zero or unspecified, we use the default priority--- 500000. Negative numbers mean that the intent is disabled.-gcdvicPriority :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Int32)-gcdvicPriority-  = lens _gcdvicPriority-      (\ s a -> s{_gcdvicPriority = a})-      . mapping _Coerce---- | Optional. The name of the action associated with the intent. Note: The--- action name must not contain whitespaces.-gcdvicAction :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Text)-gcdvicAction-  = lens _gcdvicAction (\ s a -> s{_gcdvicAction = a})---- | Read-only. The unique identifier of the root intent in the chain of--- followup intents. It identifies the correct followup intents chain for--- this intent. We populate this field only in the output. Format:--- \`projects\/\/agent\/intents\/\`.-gcdvicRootFollowupIntentName :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Text)-gcdvicRootFollowupIntentName-  = lens _gcdvicRootFollowupIntentName-      (\ s a -> s{_gcdvicRootFollowupIntentName = a})---- | Required for all methods except \`create\` (\`create\` populates the--- name automatically. The unique identifier of this intent. Format:--- \`projects\/\/agent\/intents\/\`.-gcdvicName :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Text)-gcdvicName-  = lens _gcdvicName (\ s a -> s{_gcdvicName = a})---- | Optional. The collection of event names that trigger the intent. If the--- collection of input contexts is not empty, all of the contexts must be--- present in the active user session for an event to trigger this intent.-gcdvicEvents :: Lens' GoogleCloudDialogflowV2beta1Intent [Text]-gcdvicEvents-  = lens _gcdvicEvents (\ s a -> s{_gcdvicEvents = a})-      . _Default-      . _Coerce---- | Optional. The collection of parameters associated with the intent.-gcdvicParameters :: Lens' GoogleCloudDialogflowV2beta1Intent [GoogleCloudDialogflowV2beta1IntentParameter]-gcdvicParameters-  = lens _gcdvicParameters-      (\ s a -> s{_gcdvicParameters = a})-      . _Default-      . _Coerce---- | Required. The name of this intent.-gcdvicDisplayName :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Text)-gcdvicDisplayName-  = lens _gcdvicDisplayName-      (\ s a -> s{_gcdvicDisplayName = a})---- | Optional. The list of context names required for this intent to be--- triggered. Format: \`projects\/\/agent\/sessions\/-\/contexts\/\`.-gcdvicInputContextNames :: Lens' GoogleCloudDialogflowV2beta1Intent [Text]-gcdvicInputContextNames-  = lens _gcdvicInputContextNames-      (\ s a -> s{_gcdvicInputContextNames = a})-      . _Default-      . _Coerce---- | Optional. Indicates that this intent ends an interaction. Some--- integrations (e.g., Actions on Google or Dialogflow phone gateway) use--- this information to close interaction with an end user. Default is--- false.-gcdvicEndInteraction :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Bool)-gcdvicEndInteraction-  = lens _gcdvicEndInteraction-      (\ s a -> s{_gcdvicEndInteraction = a})---- | Optional. The collection of rich messages corresponding to the--- \`Response\` field in the Dialogflow console.-gcdvicMessages :: Lens' GoogleCloudDialogflowV2beta1Intent [GoogleCloudDialogflowV2beta1IntentMessage]-gcdvicMessages-  = lens _gcdvicMessages-      (\ s a -> s{_gcdvicMessages = a})-      . _Default-      . _Coerce---- | Read-only after creation. The unique identifier of the parent intent in--- the chain of followup intents. You can set this field when creating an--- intent, for example with CreateIntent or BatchUpdateIntents, in order to--- make this intent a followup intent. It identifies the parent followup--- intent. Format: \`projects\/\/agent\/intents\/\`.-gcdvicParentFollowupIntentName :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Text)-gcdvicParentFollowupIntentName-  = lens _gcdvicParentFollowupIntentName-      (\ s a -> s{_gcdvicParentFollowupIntentName = a})---- | Optional. The collection of contexts that are activated when the intent--- is matched. Context messages in this collection should not set the--- parameters field. Setting the \`lifespan_count\` to 0 will reset the--- context when the intent is matched. Format:--- \`projects\/\/agent\/sessions\/-\/contexts\/\`.-gcdvicOutputContexts :: Lens' GoogleCloudDialogflowV2beta1Intent [GoogleCloudDialogflowV2beta1Context]-gcdvicOutputContexts-  = lens _gcdvicOutputContexts-      (\ s a -> s{_gcdvicOutputContexts = a})-      . _Default-      . _Coerce---- | Optional. The collection of examples\/templates that the agent is--- trained on.-gcdvicTrainingPhrases :: Lens' GoogleCloudDialogflowV2beta1Intent [GoogleCloudDialogflowV2beta1IntentTrainingPhrase]-gcdvicTrainingPhrases-  = lens _gcdvicTrainingPhrases-      (\ s a -> s{_gcdvicTrainingPhrases = a})-      . _Default-      . _Coerce---- | Read-only. Information about all followup intents that have this intent--- as a direct or indirect parent. We populate this field only in the--- output.-gcdvicFollowupIntentInfo :: Lens' GoogleCloudDialogflowV2beta1Intent [GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo]-gcdvicFollowupIntentInfo-  = lens _gcdvicFollowupIntentInfo-      (\ s a -> s{_gcdvicFollowupIntentInfo = a})-      . _Default-      . _Coerce---- | Optional. Indicates whether this is a fallback intent.-gcdvicIsFallback :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Bool)-gcdvicIsFallback-  = lens _gcdvicIsFallback-      (\ s a -> s{_gcdvicIsFallback = a})---- | Optional. Indicates whether Machine Learning is disabled for the intent.--- Note: If \`ml_disabled\` setting is set to true, then this intent is not--- taken into account during inference in \`ML ONLY\` match mode. Also,--- auto-markup in the UI is turned off.-gcdvicMlDisabled :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Bool)-gcdvicMlDisabled-  = lens _gcdvicMlDisabled-      (\ s a -> s{_gcdvicMlDisabled = a})---- | Optional. Indicates whether to delete all contexts in the current--- session when this intent is matched.-gcdvicResetContexts :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Bool)-gcdvicResetContexts-  = lens _gcdvicResetContexts-      (\ s a -> s{_gcdvicResetContexts = a})--instance FromJSON GoogleCloudDialogflowV2beta1Intent-         where-        parseJSON-          = withObject "GoogleCloudDialogflowV2beta1Intent"-              (\ o ->-                 GoogleCloudDialogflowV2beta1Intent' <$>-                   (o .:? "defaultResponsePlatforms" .!= mempty) <*>-                     (o .:? "webhookState")-                     <*> (o .:? "mlEnabled")-                     <*> (o .:? "priority")-                     <*> (o .:? "action")-                     <*> (o .:? "rootFollowupIntentName")-                     <*> (o .:? "name")-                     <*> (o .:? "events" .!= mempty)-                     <*> (o .:? "parameters" .!= mempty)-                     <*> (o .:? "displayName")-                     <*> (o .:? "inputContextNames" .!= mempty)-                     <*> (o .:? "endInteraction")-                     <*> (o .:? "messages" .!= mempty)-                     <*> (o .:? "parentFollowupIntentName")-                     <*> (o .:? "outputContexts" .!= mempty)-                     <*> (o .:? "trainingPhrases" .!= mempty)-                     <*> (o .:? "followupIntentInfo" .!= mempty)-                     <*> (o .:? "isFallback")-                     <*> (o .:? "mlDisabled")-                     <*> (o .:? "resetContexts"))--instance ToJSON GoogleCloudDialogflowV2beta1Intent-         where-        toJSON GoogleCloudDialogflowV2beta1Intent'{..}-          = object-              (catMaybes-                 [("defaultResponsePlatforms" .=) <$>-                    _gcdvicDefaultResponsePlatforms,-                  ("webhookState" .=) <$> _gcdvicWebhookState,-                  ("mlEnabled" .=) <$> _gcdvicMlEnabled,-                  ("priority" .=) <$> _gcdvicPriority,-                  ("action" .=) <$> _gcdvicAction,-                  ("rootFollowupIntentName" .=) <$>-                    _gcdvicRootFollowupIntentName,-                  ("name" .=) <$> _gcdvicName,-                  ("events" .=) <$> _gcdvicEvents,-                  ("parameters" .=) <$> _gcdvicParameters,-                  ("displayName" .=) <$> _gcdvicDisplayName,-                  ("inputContextNames" .=) <$>-                    _gcdvicInputContextNames,-                  ("endInteraction" .=) <$> _gcdvicEndInteraction,-                  ("messages" .=) <$> _gcdvicMessages,-                  ("parentFollowupIntentName" .=) <$>-                    _gcdvicParentFollowupIntentName,-                  ("outputContexts" .=) <$> _gcdvicOutputContexts,-                  ("trainingPhrases" .=) <$> _gcdvicTrainingPhrases,-                  ("followupIntentInfo" .=) <$>-                    _gcdvicFollowupIntentInfo,-                  ("isFallback" .=) <$> _gcdvicIsFallback,-                  ("mlDisabled" .=) <$> _gcdvicMlDisabled,-                  ("resetContexts" .=) <$> _gcdvicResetContexts])---- | Represents a context.------ /See:/ 'googleCloudDialogflowV2Context' smart constructor.-data GoogleCloudDialogflowV2Context = GoogleCloudDialogflowV2Context'-    { _gcdvccLifespanCount :: !(Maybe (Textual Int32))-    , _gcdvccName          :: !(Maybe Text)-    , _gcdvccParameters    :: !(Maybe GoogleCloudDialogflowV2ContextParameters)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2Context' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvccLifespanCount'------ * 'gcdvccName'------ * 'gcdvccParameters'-googleCloudDialogflowV2Context-    :: GoogleCloudDialogflowV2Context-googleCloudDialogflowV2Context =-    GoogleCloudDialogflowV2Context'-    { _gcdvccLifespanCount = Nothing-    , _gcdvccName = Nothing-    , _gcdvccParameters = Nothing-    }---- | Optional. The number of conversational query requests after which the--- context expires. If set to \`0\` (the default) the context expires--- immediately. Contexts expire automatically after 20 minutes even if--- there are no matching queries.-gcdvccLifespanCount :: Lens' GoogleCloudDialogflowV2Context (Maybe Int32)-gcdvccLifespanCount-  = lens _gcdvccLifespanCount-      (\ s a -> s{_gcdvccLifespanCount = a})-      . mapping _Coerce---- | Required. The unique identifier of the context. Format:--- \`projects\/\/agent\/sessions\/\/contexts\/\`. The \`Context ID\` is--- always converted to lowercase, may only contain characters in--- [a-zA-Z0-9_-%] and may be at most 250 bytes long.-gcdvccName :: Lens' GoogleCloudDialogflowV2Context (Maybe Text)-gcdvccName-  = lens _gcdvccName (\ s a -> s{_gcdvccName = a})---- | Optional. The collection of parameters associated with this context.--- Refer to [this--- doc](https:\/\/dialogflow.com\/docs\/actions-and-parameters) for syntax.-gcdvccParameters :: Lens' GoogleCloudDialogflowV2Context (Maybe GoogleCloudDialogflowV2ContextParameters)-gcdvccParameters-  = lens _gcdvccParameters-      (\ s a -> s{_gcdvccParameters = a})--instance FromJSON GoogleCloudDialogflowV2Context-         where-        parseJSON-          = withObject "GoogleCloudDialogflowV2Context"-              (\ o ->-                 GoogleCloudDialogflowV2Context' <$>-                   (o .:? "lifespanCount") <*> (o .:? "name") <*>-                     (o .:? "parameters"))--instance ToJSON GoogleCloudDialogflowV2Context where-        toJSON GoogleCloudDialogflowV2Context'{..}-          = object-              (catMaybes-                 [("lifespanCount" .=) <$> _gcdvccLifespanCount,-                  ("name" .=) <$> _gcdvccName,-                  ("parameters" .=) <$> _gcdvccParameters])---- | The button object that appears at the bottom of a card.------ /See:/ 'googleCloudDialogflowV2IntentMessageBasicCardButton' smart constructor.-data GoogleCloudDialogflowV2IntentMessageBasicCardButton = GoogleCloudDialogflowV2IntentMessageBasicCardButton'-    { _gcdvimbcbcOpenURIAction :: !(Maybe GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction)-    , _gcdvimbcbcTitle         :: !(Maybe Text)-    } deriving (Eq,Show,Data,Typeable,Generic)---- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageBasicCardButton' with the minimum fields required to make a request.------ Use one of the following lenses to modify other fields as desired:------ * 'gcdvimbcbcOpenURIAction'------ * 'gcdvimbcbcTitle'-googleCloudDialogflowV2IntentMessageBasicCardButton-    :: GoogleCloudDialogflowV2IntentMessageBasicCardButton-googleCloudDialogflowV2IntentMessageBasicCardButton =-    GoogleCloudDialogflowV2IntentMessageBasicCardButton'-    { _gcdvimbcbcOpenURIAction = Nothing-    , _gcdvimbcbcTitle = Nothing-    }---- | Required. Action to take when a user taps on the button.-gcdvimbcbcOpenURIAction :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCardButton (Maybe GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction)-gcdvimbcbcOpenURIAction-  = lens _gcdvimbcbcOpenURIAction-      (\ s a -> s{_gcdvimbcbcOpenURIAction = a})---- | Required. The title of the button.-gcdvimbcbcTitle :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCardButton (Maybe Text)-gcdvimbcbcTitle-  = lens _gcdvimbcbcTitle-      (\ s a -> s{_gcdvimbcbcTitle = a})--instance FromJSON-         GoogleCloudDialogflowV2IntentMessageBasicCardButton-         where-        parseJSON-          = withObject-              "GoogleCloudDialogflowV2IntentMessageBasicCardButton"-              (\ o ->-                 GoogleCloudDialogflowV2IntentMessageBasicCardButton'-                   <$> (o .:? "openUriAction") <*> (o .:? "title"))--instance ToJSON-         GoogleCloudDialogflowV2IntentMessageBasicCardButton+data GoogleRpcStatus =+  GoogleRpcStatus'+    { _grsDetails :: !(Maybe [GoogleRpcStatusDetailsItem])+    , _grsCode    :: !(Maybe (Textual Int32))+    , _grsMessage :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleRpcStatus' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'grsDetails'+--+-- * 'grsCode'+--+-- * 'grsMessage'+googleRpcStatus+    :: GoogleRpcStatus+googleRpcStatus =+  GoogleRpcStatus'+    {_grsDetails = Nothing, _grsCode = Nothing, _grsMessage = Nothing}+++-- | A list of messages that carry the error details. There is a common set+-- of message types for APIs to use.+grsDetails :: Lens' GoogleRpcStatus [GoogleRpcStatusDetailsItem]+grsDetails+  = lens _grsDetails (\ s a -> s{_grsDetails = a}) .+      _Default+      . _Coerce++-- | The status code, which should be an enum value of google.rpc.Code.+grsCode :: Lens' GoogleRpcStatus (Maybe Int32)+grsCode+  = lens _grsCode (\ s a -> s{_grsCode = 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.+grsMessage :: Lens' GoogleRpcStatus (Maybe Text)+grsMessage+  = lens _grsMessage (\ s a -> s{_grsMessage = a})++instance FromJSON GoogleRpcStatus where+        parseJSON+          = withObject "GoogleRpcStatus"+              (\ o ->+                 GoogleRpcStatus' <$>+                   (o .:? "details" .!= mempty) <*> (o .:? "code") <*>+                     (o .:? "message"))++instance ToJSON GoogleRpcStatus where+        toJSON GoogleRpcStatus'{..}+          = object+              (catMaybes+                 [("details" .=) <$> _grsDetails,+                  ("code" .=) <$> _grsCode,+                  ("message" .=) <$> _grsMessage])++-- | Represents a single followup intent in the chain.+--+-- /See:/ 'googleCloudDialogflowV2IntentFollowupIntentInfo' smart constructor.+data GoogleCloudDialogflowV2IntentFollowupIntentInfo =+  GoogleCloudDialogflowV2IntentFollowupIntentInfo'+    { _gcdvifiiFollowupIntentName       :: !(Maybe Text)+    , _gcdvifiiParentFollowupIntentName :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentFollowupIntentInfo' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvifiiFollowupIntentName'+--+-- * 'gcdvifiiParentFollowupIntentName'+googleCloudDialogflowV2IntentFollowupIntentInfo+    :: GoogleCloudDialogflowV2IntentFollowupIntentInfo+googleCloudDialogflowV2IntentFollowupIntentInfo =+  GoogleCloudDialogflowV2IntentFollowupIntentInfo'+    { _gcdvifiiFollowupIntentName = Nothing+    , _gcdvifiiParentFollowupIntentName = Nothing+    }+++-- | The unique identifier of the followup intent. Format:+-- \`projects\/\/agent\/intents\/\`.+gcdvifiiFollowupIntentName :: Lens' GoogleCloudDialogflowV2IntentFollowupIntentInfo (Maybe Text)+gcdvifiiFollowupIntentName+  = lens _gcdvifiiFollowupIntentName+      (\ s a -> s{_gcdvifiiFollowupIntentName = a})++-- | The unique identifier of the followup intent\'s parent. Format:+-- \`projects\/\/agent\/intents\/\`.+gcdvifiiParentFollowupIntentName :: Lens' GoogleCloudDialogflowV2IntentFollowupIntentInfo (Maybe Text)+gcdvifiiParentFollowupIntentName+  = lens _gcdvifiiParentFollowupIntentName+      (\ s a -> s{_gcdvifiiParentFollowupIntentName = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentFollowupIntentInfo+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentFollowupIntentInfo"+              (\ o ->+                 GoogleCloudDialogflowV2IntentFollowupIntentInfo' <$>+                   (o .:? "followupIntentName") <*>+                     (o .:? "parentFollowupIntentName"))++instance ToJSON+           GoogleCloudDialogflowV2IntentFollowupIntentInfo+         where+        toJSON+          GoogleCloudDialogflowV2IntentFollowupIntentInfo'{..}+          = object+              (catMaybes+                 [("followupIntentName" .=) <$>+                    _gcdvifiiFollowupIntentName,+                  ("parentFollowupIntentName" .=) <$>+                    _gcdvifiiParentFollowupIntentName])++-- | The collection of simple response candidates. This message in+-- \`QueryResult.fulfillment_messages\` and+-- \`WebhookResponse.fulfillment_messages\` should contain only one+-- \`SimpleResponse\`.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageSimpleResponses' smart constructor.+newtype GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses =+  GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses'+    { _gcdvimsrSimpleResponses :: Maybe [GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimsrSimpleResponses'+googleCloudDialogflowV2beta1IntentMessageSimpleResponses+    :: GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses+googleCloudDialogflowV2beta1IntentMessageSimpleResponses =+  GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses'+    {_gcdvimsrSimpleResponses = Nothing}+++-- | Required. The list of simple responses.+gcdvimsrSimpleResponses :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses [GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse]+gcdvimsrSimpleResponses+  = lens _gcdvimsrSimpleResponses+      (\ s a -> s{_gcdvimsrSimpleResponses = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses'+                   <$> (o .:? "simpleResponses" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses'{..}+          = object+              (catMaybes+                 [("simpleResponses" .=) <$>+                    _gcdvimsrSimpleResponses])++-- | Configuration of how speech should be synthesized.+--+-- /See:/ 'googleCloudDialogflowV2SynthesizeSpeechConfig' smart constructor.+data GoogleCloudDialogflowV2SynthesizeSpeechConfig =+  GoogleCloudDialogflowV2SynthesizeSpeechConfig'+    { _gcdvsscVolumeGainDB     :: !(Maybe (Textual Double))+    , _gcdvsscEffectsProFileId :: !(Maybe [Text])+    , _gcdvsscVoice            :: !(Maybe GoogleCloudDialogflowV2VoiceSelectionParams)+    , _gcdvsscSpeakingRate     :: !(Maybe (Textual Double))+    , _gcdvsscPitch            :: !(Maybe (Textual Double))+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2SynthesizeSpeechConfig' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvsscVolumeGainDB'+--+-- * 'gcdvsscEffectsProFileId'+--+-- * 'gcdvsscVoice'+--+-- * 'gcdvsscSpeakingRate'+--+-- * 'gcdvsscPitch'+googleCloudDialogflowV2SynthesizeSpeechConfig+    :: GoogleCloudDialogflowV2SynthesizeSpeechConfig+googleCloudDialogflowV2SynthesizeSpeechConfig =+  GoogleCloudDialogflowV2SynthesizeSpeechConfig'+    { _gcdvsscVolumeGainDB = Nothing+    , _gcdvsscEffectsProFileId = Nothing+    , _gcdvsscVoice = Nothing+    , _gcdvsscSpeakingRate = Nothing+    , _gcdvsscPitch = Nothing+    }+++-- | Optional. Volume gain (in dB) of the normal native volume supported by+-- the specific voice, in the range [-96.0, 16.0]. If unset, or set to a+-- value of 0.0 (dB), will play at normal native signal amplitude. A value+-- of -6.0 (dB) will play at approximately half the amplitude of the normal+-- native signal amplitude. A value of +6.0 (dB) will play at approximately+-- twice the amplitude of the normal native signal amplitude. We strongly+-- recommend not to exceed +10 (dB) as there\'s usually no effective+-- increase in loudness for any value greater than that.+gcdvsscVolumeGainDB :: Lens' GoogleCloudDialogflowV2SynthesizeSpeechConfig (Maybe Double)+gcdvsscVolumeGainDB+  = lens _gcdvsscVolumeGainDB+      (\ s a -> s{_gcdvsscVolumeGainDB = a})+      . mapping _Coerce++-- | Optional. An identifier which selects \'audio effects\' profiles that+-- are applied on (post synthesized) text to speech. Effects are applied on+-- top of each other in the order they are given.+gcdvsscEffectsProFileId :: Lens' GoogleCloudDialogflowV2SynthesizeSpeechConfig [Text]+gcdvsscEffectsProFileId+  = lens _gcdvsscEffectsProFileId+      (\ s a -> s{_gcdvsscEffectsProFileId = a})+      . _Default+      . _Coerce++-- | Optional. The desired voice of the synthesized audio.+gcdvsscVoice :: Lens' GoogleCloudDialogflowV2SynthesizeSpeechConfig (Maybe GoogleCloudDialogflowV2VoiceSelectionParams)+gcdvsscVoice+  = lens _gcdvsscVoice (\ s a -> s{_gcdvsscVoice = a})++-- | Optional. Speaking rate\/speed, in the range [0.25, 4.0]. 1.0 is the+-- normal native speed supported by the specific voice. 2.0 is twice as+-- fast, and 0.5 is half as fast. If unset(0.0), defaults to the native 1.0+-- speed. Any other values \< 0.25 or > 4.0 will return an error.+gcdvsscSpeakingRate :: Lens' GoogleCloudDialogflowV2SynthesizeSpeechConfig (Maybe Double)+gcdvsscSpeakingRate+  = lens _gcdvsscSpeakingRate+      (\ s a -> s{_gcdvsscSpeakingRate = a})+      . mapping _Coerce++-- | Optional. Speaking pitch, in the range [-20.0, 20.0]. 20 means increase+-- 20 semitones from the original pitch. -20 means decrease 20 semitones+-- from the original pitch.+gcdvsscPitch :: Lens' GoogleCloudDialogflowV2SynthesizeSpeechConfig (Maybe Double)+gcdvsscPitch+  = lens _gcdvsscPitch (\ s a -> s{_gcdvsscPitch = a})+      . mapping _Coerce++instance FromJSON+           GoogleCloudDialogflowV2SynthesizeSpeechConfig+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2SynthesizeSpeechConfig"+              (\ o ->+                 GoogleCloudDialogflowV2SynthesizeSpeechConfig' <$>+                   (o .:? "volumeGainDb") <*>+                     (o .:? "effectsProfileId" .!= mempty)+                     <*> (o .:? "voice")+                     <*> (o .:? "speakingRate")+                     <*> (o .:? "pitch"))++instance ToJSON+           GoogleCloudDialogflowV2SynthesizeSpeechConfig+         where+        toJSON+          GoogleCloudDialogflowV2SynthesizeSpeechConfig'{..}+          = object+              (catMaybes+                 [("volumeGainDb" .=) <$> _gcdvsscVolumeGainDB,+                  ("effectsProfileId" .=) <$> _gcdvsscEffectsProFileId,+                  ("voice" .=) <$> _gcdvsscVoice,+                  ("speakingRate" .=) <$> _gcdvsscSpeakingRate,+                  ("pitch" .=) <$> _gcdvsscPitch])++-- | Instructs the speech recognizer how to process the audio content.+--+-- /See:/ 'googleCloudDialogflowV2InputAudioConfig' smart constructor.+data GoogleCloudDialogflowV2InputAudioConfig =+  GoogleCloudDialogflowV2InputAudioConfig'+    { _gcdviacLanguageCode    :: !(Maybe Text)+    , _gcdviacPhraseHints     :: !(Maybe [Text])+    , _gcdviacSampleRateHertz :: !(Maybe (Textual Int32))+    , _gcdviacModelVariant    :: !(Maybe GoogleCloudDialogflowV2InputAudioConfigModelVariant)+    , _gcdviacAudioEncoding   :: !(Maybe GoogleCloudDialogflowV2InputAudioConfigAudioEncoding)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2InputAudioConfig' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdviacLanguageCode'+--+-- * 'gcdviacPhraseHints'+--+-- * 'gcdviacSampleRateHertz'+--+-- * 'gcdviacModelVariant'+--+-- * 'gcdviacAudioEncoding'+googleCloudDialogflowV2InputAudioConfig+    :: GoogleCloudDialogflowV2InputAudioConfig+googleCloudDialogflowV2InputAudioConfig =+  GoogleCloudDialogflowV2InputAudioConfig'+    { _gcdviacLanguageCode = Nothing+    , _gcdviacPhraseHints = Nothing+    , _gcdviacSampleRateHertz = Nothing+    , _gcdviacModelVariant = Nothing+    , _gcdviacAudioEncoding = Nothing+    }+++-- | Required. The language of the supplied audio. Dialogflow does not do+-- translations. See [Language+-- Support](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/reference\/language)+-- for a list of the currently supported language codes. Note that queries+-- in the same session do not necessarily need to specify the same+-- language.+gcdviacLanguageCode :: Lens' GoogleCloudDialogflowV2InputAudioConfig (Maybe Text)+gcdviacLanguageCode+  = lens _gcdviacLanguageCode+      (\ s a -> s{_gcdviacLanguageCode = a})++-- | Optional. The collection of phrase hints which are used to boost+-- accuracy of speech recognition. Refer to [Cloud Speech API+-- documentation](https:\/\/cloud.google.com\/speech-to-text\/docs\/basics#phrase-hints)+-- for more details.+gcdviacPhraseHints :: Lens' GoogleCloudDialogflowV2InputAudioConfig [Text]+gcdviacPhraseHints+  = lens _gcdviacPhraseHints+      (\ s a -> s{_gcdviacPhraseHints = a})+      . _Default+      . _Coerce++-- | Required. Sample rate (in Hertz) of the audio content sent in the query.+-- Refer to [Cloud Speech API+-- documentation](https:\/\/cloud.google.com\/speech-to-text\/docs\/basics)+-- for more details.+gcdviacSampleRateHertz :: Lens' GoogleCloudDialogflowV2InputAudioConfig (Maybe Int32)+gcdviacSampleRateHertz+  = lens _gcdviacSampleRateHertz+      (\ s a -> s{_gcdviacSampleRateHertz = a})+      . mapping _Coerce++-- | Optional. Which variant of the Speech model to use.+gcdviacModelVariant :: Lens' GoogleCloudDialogflowV2InputAudioConfig (Maybe GoogleCloudDialogflowV2InputAudioConfigModelVariant)+gcdviacModelVariant+  = lens _gcdviacModelVariant+      (\ s a -> s{_gcdviacModelVariant = a})++-- | Required. Audio encoding of the audio content to process.+gcdviacAudioEncoding :: Lens' GoogleCloudDialogflowV2InputAudioConfig (Maybe GoogleCloudDialogflowV2InputAudioConfigAudioEncoding)+gcdviacAudioEncoding+  = lens _gcdviacAudioEncoding+      (\ s a -> s{_gcdviacAudioEncoding = a})++instance FromJSON+           GoogleCloudDialogflowV2InputAudioConfig+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2InputAudioConfig"+              (\ o ->+                 GoogleCloudDialogflowV2InputAudioConfig' <$>+                   (o .:? "languageCode") <*>+                     (o .:? "phraseHints" .!= mempty)+                     <*> (o .:? "sampleRateHertz")+                     <*> (o .:? "modelVariant")+                     <*> (o .:? "audioEncoding"))++instance ToJSON+           GoogleCloudDialogflowV2InputAudioConfig+         where+        toJSON GoogleCloudDialogflowV2InputAudioConfig'{..}+          = object+              (catMaybes+                 [("languageCode" .=) <$> _gcdviacLanguageCode,+                  ("phraseHints" .=) <$> _gcdviacPhraseHints,+                  ("sampleRateHertz" .=) <$> _gcdviacSampleRateHertz,+                  ("modelVariant" .=) <$> _gcdviacModelVariant,+                  ("audioEncoding" .=) <$> _gcdviacAudioEncoding])++-- | The response message for Intents.BatchUpdateIntents.+--+-- /See:/ 'googleCloudDialogflowV2beta1BatchUpdateIntentsResponse' smart constructor.+newtype GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse =+  GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse'+    { _gcdvbuirIntents :: Maybe [GoogleCloudDialogflowV2beta1Intent]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvbuirIntents'+googleCloudDialogflowV2beta1BatchUpdateIntentsResponse+    :: GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse+googleCloudDialogflowV2beta1BatchUpdateIntentsResponse =+  GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse'+    {_gcdvbuirIntents = Nothing}+++-- | The collection of updated or created intents.+gcdvbuirIntents :: Lens' GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse [GoogleCloudDialogflowV2beta1Intent]+gcdvbuirIntents+  = lens _gcdvbuirIntents+      (\ s a -> s{_gcdvbuirIntents = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse"+              (\ o ->+                 GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse'+                   <$> (o .:? "intents" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse+         where+        toJSON+          GoogleCloudDialogflowV2beta1BatchUpdateIntentsResponse'{..}+          = object+              (catMaybes [("intents" .=) <$> _gcdvbuirIntents])++-- | Returns a response containing a custom, platform-specific payload. See+-- the Intent.Message.Platform type for a description of the structure that+-- may be required for your platform.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessagePayload' smart constructor.+newtype GoogleCloudDialogflowV2beta1IntentMessagePayload =+  GoogleCloudDialogflowV2beta1IntentMessagePayload'+    { _gcdvimpAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessagePayload' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimpAddtional'+googleCloudDialogflowV2beta1IntentMessagePayload+    :: HashMap Text JSONValue -- ^ 'gcdvimpAddtional'+    -> GoogleCloudDialogflowV2beta1IntentMessagePayload+googleCloudDialogflowV2beta1IntentMessagePayload pGcdvimpAddtional_ =+  GoogleCloudDialogflowV2beta1IntentMessagePayload'+    {_gcdvimpAddtional = _Coerce # pGcdvimpAddtional_}+++-- | Properties of the object.+gcdvimpAddtional :: Lens' GoogleCloudDialogflowV2beta1IntentMessagePayload (HashMap Text JSONValue)+gcdvimpAddtional+  = lens _gcdvimpAddtional+      (\ s a -> s{_gcdvimpAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessagePayload+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessagePayload"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessagePayload' <$>+                   (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessagePayload+         where+        toJSON = toJSON . _gcdvimpAddtional++-- | The request message for a webhook call.+--+-- /See:/ 'googleCloudDialogflowV2WebhookRequest' smart constructor.+data GoogleCloudDialogflowV2WebhookRequest =+  GoogleCloudDialogflowV2WebhookRequest'+    { _gcdvwrOriginalDetectIntentRequest :: !(Maybe GoogleCloudDialogflowV2OriginalDetectIntentRequest)+    , _gcdvwrResponseId                  :: !(Maybe Text)+    , _gcdvwrQueryResult                 :: !(Maybe GoogleCloudDialogflowV2QueryResult)+    , _gcdvwrSession                     :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2WebhookRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvwrOriginalDetectIntentRequest'+--+-- * 'gcdvwrResponseId'+--+-- * 'gcdvwrQueryResult'+--+-- * 'gcdvwrSession'+googleCloudDialogflowV2WebhookRequest+    :: GoogleCloudDialogflowV2WebhookRequest+googleCloudDialogflowV2WebhookRequest =+  GoogleCloudDialogflowV2WebhookRequest'+    { _gcdvwrOriginalDetectIntentRequest = Nothing+    , _gcdvwrResponseId = Nothing+    , _gcdvwrQueryResult = Nothing+    , _gcdvwrSession = Nothing+    }+++-- | Optional. The contents of the original request that was passed to+-- \`[Streaming]DetectIntent\` call.+gcdvwrOriginalDetectIntentRequest :: Lens' GoogleCloudDialogflowV2WebhookRequest (Maybe GoogleCloudDialogflowV2OriginalDetectIntentRequest)+gcdvwrOriginalDetectIntentRequest+  = lens _gcdvwrOriginalDetectIntentRequest+      (\ s a -> s{_gcdvwrOriginalDetectIntentRequest = a})++-- | The unique identifier of the response. Contains the same value as+-- \`[Streaming]DetectIntentResponse.response_id\`.+gcdvwrResponseId :: Lens' GoogleCloudDialogflowV2WebhookRequest (Maybe Text)+gcdvwrResponseId+  = lens _gcdvwrResponseId+      (\ s a -> s{_gcdvwrResponseId = a})++-- | The result of the conversational query or event processing. Contains the+-- same value as \`[Streaming]DetectIntentResponse.query_result\`.+gcdvwrQueryResult :: Lens' GoogleCloudDialogflowV2WebhookRequest (Maybe GoogleCloudDialogflowV2QueryResult)+gcdvwrQueryResult+  = lens _gcdvwrQueryResult+      (\ s a -> s{_gcdvwrQueryResult = a})++-- | The unique identifier of detectIntent request session. Can be used to+-- identify end-user inside webhook implementation. Format:+-- \`projects\/\/agent\/sessions\/\`, or+-- \`projects\/\/agent\/environments\/\/users\/\/sessions\/\`.+gcdvwrSession :: Lens' GoogleCloudDialogflowV2WebhookRequest (Maybe Text)+gcdvwrSession+  = lens _gcdvwrSession+      (\ s a -> s{_gcdvwrSession = a})++instance FromJSON+           GoogleCloudDialogflowV2WebhookRequest+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2WebhookRequest"+              (\ o ->+                 GoogleCloudDialogflowV2WebhookRequest' <$>+                   (o .:? "originalDetectIntentRequest") <*>+                     (o .:? "responseId")+                     <*> (o .:? "queryResult")+                     <*> (o .:? "session"))++instance ToJSON GoogleCloudDialogflowV2WebhookRequest+         where+        toJSON GoogleCloudDialogflowV2WebhookRequest'{..}+          = object+              (catMaybes+                 [("originalDetectIntentRequest" .=) <$>+                    _gcdvwrOriginalDetectIntentRequest,+                  ("responseId" .=) <$> _gcdvwrResponseId,+                  ("queryResult" .=) <$> _gcdvwrQueryResult,+                  ("session" .=) <$> _gcdvwrSession])++-- | An item in the carousel.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageCarouselSelectItem' smart constructor.+data GoogleCloudDialogflowV2IntentMessageCarouselSelectItem =+  GoogleCloudDialogflowV2IntentMessageCarouselSelectItem'+    { _gcdvimcsiImage       :: !(Maybe GoogleCloudDialogflowV2IntentMessageImage)+    , _gcdvimcsiTitle       :: !(Maybe Text)+    , _gcdvimcsiDescription :: !(Maybe Text)+    , _gcdvimcsiInfo        :: !(Maybe GoogleCloudDialogflowV2IntentMessageSelectItemInfo)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageCarouselSelectItem' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimcsiImage'+--+-- * 'gcdvimcsiTitle'+--+-- * 'gcdvimcsiDescription'+--+-- * 'gcdvimcsiInfo'+googleCloudDialogflowV2IntentMessageCarouselSelectItem+    :: GoogleCloudDialogflowV2IntentMessageCarouselSelectItem+googleCloudDialogflowV2IntentMessageCarouselSelectItem =+  GoogleCloudDialogflowV2IntentMessageCarouselSelectItem'+    { _gcdvimcsiImage = Nothing+    , _gcdvimcsiTitle = Nothing+    , _gcdvimcsiDescription = Nothing+    , _gcdvimcsiInfo = Nothing+    }+++-- | Optional. The image to display.+gcdvimcsiImage :: Lens' GoogleCloudDialogflowV2IntentMessageCarouselSelectItem (Maybe GoogleCloudDialogflowV2IntentMessageImage)+gcdvimcsiImage+  = lens _gcdvimcsiImage+      (\ s a -> s{_gcdvimcsiImage = a})++-- | Required. Title of the carousel item.+gcdvimcsiTitle :: Lens' GoogleCloudDialogflowV2IntentMessageCarouselSelectItem (Maybe Text)+gcdvimcsiTitle+  = lens _gcdvimcsiTitle+      (\ s a -> s{_gcdvimcsiTitle = a})++-- | Optional. The body text of the card.+gcdvimcsiDescription :: Lens' GoogleCloudDialogflowV2IntentMessageCarouselSelectItem (Maybe Text)+gcdvimcsiDescription+  = lens _gcdvimcsiDescription+      (\ s a -> s{_gcdvimcsiDescription = a})++-- | Required. Additional info about the option item.+gcdvimcsiInfo :: Lens' GoogleCloudDialogflowV2IntentMessageCarouselSelectItem (Maybe GoogleCloudDialogflowV2IntentMessageSelectItemInfo)+gcdvimcsiInfo+  = lens _gcdvimcsiInfo+      (\ s a -> s{_gcdvimcsiInfo = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageCarouselSelectItem+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageCarouselSelectItem"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageCarouselSelectItem'+                   <$>+                   (o .:? "image") <*> (o .:? "title") <*>+                     (o .:? "description")+                     <*> (o .:? "info"))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageCarouselSelectItem+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageCarouselSelectItem'{..}+          = object+              (catMaybes+                 [("image" .=) <$> _gcdvimcsiImage,+                  ("title" .=) <$> _gcdvimcsiTitle,+                  ("description" .=) <$> _gcdvimcsiDescription,+                  ("info" .=) <$> _gcdvimcsiInfo])++-- | Events allow for matching intents by event name instead of the natural+-- language input. For instance, input \`\` can trigger a personalized+-- welcome response. The parameter \`name\` may be used by the agent in the+-- response: \`\"Hello #welcome_event.name! What can I do for you+-- today?\"\`.+--+-- /See:/ 'googleCloudDialogflowV2EventInput' smart constructor.+data GoogleCloudDialogflowV2EventInput =+  GoogleCloudDialogflowV2EventInput'+    { _gcdveiLanguageCode :: !(Maybe Text)+    , _gcdveiName         :: !(Maybe Text)+    , _gcdveiParameters   :: !(Maybe GoogleCloudDialogflowV2EventInputParameters)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2EventInput' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdveiLanguageCode'+--+-- * 'gcdveiName'+--+-- * 'gcdveiParameters'+googleCloudDialogflowV2EventInput+    :: GoogleCloudDialogflowV2EventInput+googleCloudDialogflowV2EventInput =+  GoogleCloudDialogflowV2EventInput'+    { _gcdveiLanguageCode = Nothing+    , _gcdveiName = Nothing+    , _gcdveiParameters = Nothing+    }+++-- | Required. The language of this query. See [Language+-- Support](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/reference\/language)+-- for a list of the currently supported language codes. Note that queries+-- in the same session do not necessarily need to specify the same+-- language.+gcdveiLanguageCode :: Lens' GoogleCloudDialogflowV2EventInput (Maybe Text)+gcdveiLanguageCode+  = lens _gcdveiLanguageCode+      (\ s a -> s{_gcdveiLanguageCode = a})++-- | Required. The unique identifier of the event.+gcdveiName :: Lens' GoogleCloudDialogflowV2EventInput (Maybe Text)+gcdveiName+  = lens _gcdveiName (\ s a -> s{_gcdveiName = a})++-- | Optional. The collection of parameters associated with the event.+gcdveiParameters :: Lens' GoogleCloudDialogflowV2EventInput (Maybe GoogleCloudDialogflowV2EventInputParameters)+gcdveiParameters+  = lens _gcdveiParameters+      (\ s a -> s{_gcdveiParameters = a})++instance FromJSON GoogleCloudDialogflowV2EventInput+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2EventInput"+              (\ o ->+                 GoogleCloudDialogflowV2EventInput' <$>+                   (o .:? "languageCode") <*> (o .:? "name") <*>+                     (o .:? "parameters"))++instance ToJSON GoogleCloudDialogflowV2EventInput+         where+        toJSON GoogleCloudDialogflowV2EventInput'{..}+          = object+              (catMaybes+                 [("languageCode" .=) <$> _gcdveiLanguageCode,+                  ("name" .=) <$> _gcdveiName,+                  ("parameters" .=) <$> _gcdveiParameters])++-- | The simple response message containing speech or text.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageSimpleResponse' smart constructor.+data GoogleCloudDialogflowV2IntentMessageSimpleResponse =+  GoogleCloudDialogflowV2IntentMessageSimpleResponse'+    { _gcdvimsrDisplayText  :: !(Maybe Text)+    , _gcdvimsrSsml         :: !(Maybe Text)+    , _gcdvimsrTextToSpeech :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageSimpleResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimsrDisplayText'+--+-- * 'gcdvimsrSsml'+--+-- * 'gcdvimsrTextToSpeech'+googleCloudDialogflowV2IntentMessageSimpleResponse+    :: GoogleCloudDialogflowV2IntentMessageSimpleResponse+googleCloudDialogflowV2IntentMessageSimpleResponse =+  GoogleCloudDialogflowV2IntentMessageSimpleResponse'+    { _gcdvimsrDisplayText = Nothing+    , _gcdvimsrSsml = Nothing+    , _gcdvimsrTextToSpeech = Nothing+    }+++-- | Optional. The text to display.+gcdvimsrDisplayText :: Lens' GoogleCloudDialogflowV2IntentMessageSimpleResponse (Maybe Text)+gcdvimsrDisplayText+  = lens _gcdvimsrDisplayText+      (\ s a -> s{_gcdvimsrDisplayText = a})++-- | One of text_to_speech or ssml must be provided. Structured spoken+-- response to the user in the SSML format. Mutually exclusive with+-- text_to_speech.+gcdvimsrSsml :: Lens' GoogleCloudDialogflowV2IntentMessageSimpleResponse (Maybe Text)+gcdvimsrSsml+  = lens _gcdvimsrSsml (\ s a -> s{_gcdvimsrSsml = a})++-- | One of text_to_speech or ssml must be provided. The plain text of the+-- speech output. Mutually exclusive with ssml.+gcdvimsrTextToSpeech :: Lens' GoogleCloudDialogflowV2IntentMessageSimpleResponse (Maybe Text)+gcdvimsrTextToSpeech+  = lens _gcdvimsrTextToSpeech+      (\ s a -> s{_gcdvimsrTextToSpeech = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageSimpleResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageSimpleResponse"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageSimpleResponse'+                   <$>+                   (o .:? "displayText") <*> (o .:? "ssml") <*>+                     (o .:? "textToSpeech"))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageSimpleResponse+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageSimpleResponse'{..}+          = object+              (catMaybes+                 [("displayText" .=) <$> _gcdvimsrDisplayText,+                  ("ssml" .=) <$> _gcdvimsrSsml,+                  ("textToSpeech" .=) <$> _gcdvimsrTextToSpeech])++-- | 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:/ 'googleLongrunningOperationMetadata' smart constructor.+newtype GoogleLongrunningOperationMetadata =+  GoogleLongrunningOperationMetadata'+    { _glomAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleLongrunningOperationMetadata' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'glomAddtional'+googleLongrunningOperationMetadata+    :: HashMap Text JSONValue -- ^ 'glomAddtional'+    -> GoogleLongrunningOperationMetadata+googleLongrunningOperationMetadata pGlomAddtional_ =+  GoogleLongrunningOperationMetadata'+    {_glomAddtional = _Coerce # pGlomAddtional_}+++-- | Properties of the object. Contains field \'type with type URL.+glomAddtional :: Lens' GoogleLongrunningOperationMetadata (HashMap Text JSONValue)+glomAddtional+  = lens _glomAddtional+      (\ s a -> s{_glomAddtional = a})+      . _Coerce++instance FromJSON GoogleLongrunningOperationMetadata+         where+        parseJSON+          = withObject "GoogleLongrunningOperationMetadata"+              (\ o ->+                 GoogleLongrunningOperationMetadata' <$>+                   (parseJSONObject o))++instance ToJSON GoogleLongrunningOperationMetadata+         where+        toJSON = toJSON . _glomAddtional++-- | Represents an example that the agent is trained on.+--+-- /See:/ 'googleCloudDialogflowV2IntentTrainingPhrase' smart constructor.+data GoogleCloudDialogflowV2IntentTrainingPhrase =+  GoogleCloudDialogflowV2IntentTrainingPhrase'+    { _gcdvitpParts           :: !(Maybe [GoogleCloudDialogflowV2IntentTrainingPhrasePart])+    , _gcdvitpName            :: !(Maybe Text)+    , _gcdvitpTimesAddedCount :: !(Maybe (Textual Int32))+    , _gcdvitpType            :: !(Maybe GoogleCloudDialogflowV2IntentTrainingPhraseType)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentTrainingPhrase' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvitpParts'+--+-- * 'gcdvitpName'+--+-- * 'gcdvitpTimesAddedCount'+--+-- * 'gcdvitpType'+googleCloudDialogflowV2IntentTrainingPhrase+    :: GoogleCloudDialogflowV2IntentTrainingPhrase+googleCloudDialogflowV2IntentTrainingPhrase =+  GoogleCloudDialogflowV2IntentTrainingPhrase'+    { _gcdvitpParts = Nothing+    , _gcdvitpName = Nothing+    , _gcdvitpTimesAddedCount = Nothing+    , _gcdvitpType = Nothing+    }+++-- | Required. The ordered list of training phrase parts. The parts are+-- concatenated in order to form the training phrase. Note: The API does+-- not automatically annotate training phrases like the Dialogflow Console+-- does. Note: Do not forget to include whitespace at part boundaries, so+-- the training phrase is well formatted when the parts are concatenated.+-- If the training phrase does not need to be annotated with parameters,+-- you just need a single part with only the Part.text field set. If you+-- want to annotate the training phrase, you must create multiple parts,+-- where the fields of each part are populated in one of two ways: -+-- \`Part.text\` is set to a part of the phrase that has no parameters. -+-- \`Part.text\` is set to a part of the phrase that you want to annotate,+-- and the \`entity_type\`, \`alias\`, and \`user_defined\` fields are all+-- set.+gcdvitpParts :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrase [GoogleCloudDialogflowV2IntentTrainingPhrasePart]+gcdvitpParts+  = lens _gcdvitpParts (\ s a -> s{_gcdvitpParts = a})+      . _Default+      . _Coerce++-- | Output only. The unique identifier of this training phrase.+gcdvitpName :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrase (Maybe Text)+gcdvitpName+  = lens _gcdvitpName (\ s a -> s{_gcdvitpName = a})++-- | Optional. Indicates how many times this example was added to the intent.+-- Each time a developer adds an existing sample by editing an intent or+-- training, this counter is increased.+gcdvitpTimesAddedCount :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrase (Maybe Int32)+gcdvitpTimesAddedCount+  = lens _gcdvitpTimesAddedCount+      (\ s a -> s{_gcdvitpTimesAddedCount = a})+      . mapping _Coerce++-- | Required. The type of the training phrase.+gcdvitpType :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrase (Maybe GoogleCloudDialogflowV2IntentTrainingPhraseType)+gcdvitpType+  = lens _gcdvitpType (\ s a -> s{_gcdvitpType = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentTrainingPhrase+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentTrainingPhrase"+              (\ o ->+                 GoogleCloudDialogflowV2IntentTrainingPhrase' <$>+                   (o .:? "parts" .!= mempty) <*> (o .:? "name") <*>+                     (o .:? "timesAddedCount")+                     <*> (o .:? "type"))++instance ToJSON+           GoogleCloudDialogflowV2IntentTrainingPhrase+         where+        toJSON+          GoogleCloudDialogflowV2IntentTrainingPhrase'{..}+          = object+              (catMaybes+                 [("parts" .=) <$> _gcdvitpParts,+                  ("name" .=) <$> _gcdvitpName,+                  ("timesAddedCount" .=) <$> _gcdvitpTimesAddedCount,+                  ("type" .=) <$> _gcdvitpType])++-- | An item in the carousel.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageCarouselSelectItem' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem =+  GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem'+    { _gImage       :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)+    , _gTitle       :: !(Maybe Text)+    , _gDescription :: !(Maybe Text)+    , _gInfo        :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gImage'+--+-- * 'gTitle'+--+-- * 'gDescription'+--+-- * 'gInfo'+googleCloudDialogflowV2beta1IntentMessageCarouselSelectItem+    :: GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem+googleCloudDialogflowV2beta1IntentMessageCarouselSelectItem =+  GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem'+    { _gImage = Nothing+    , _gTitle = Nothing+    , _gDescription = Nothing+    , _gInfo = Nothing+    }+++-- | Optional. The image to display.+gImage :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem (Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)+gImage = lens _gImage (\ s a -> s{_gImage = a})++-- | Required. Title of the carousel item.+gTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem (Maybe Text)+gTitle = lens _gTitle (\ s a -> s{_gTitle = a})++-- | Optional. The body text of the card.+gDescription :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem (Maybe Text)+gDescription+  = lens _gDescription (\ s a -> s{_gDescription = a})++-- | Required. Additional info about the option item.+gInfo :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem (Maybe GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo)+gInfo = lens _gInfo (\ s a -> s{_gInfo = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem'+                   <$>+                   (o .:? "image") <*> (o .:? "title") <*>+                     (o .:? "description")+                     <*> (o .:? "info"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem'{..}+          = object+              (catMaybes+                 [("image" .=) <$> _gImage, ("title" .=) <$> _gTitle,+                  ("description" .=) <$> _gDescription,+                  ("info" .=) <$> _gInfo])++-- | The basic card message. Useful for displaying information.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageBasicCard' smart constructor.+data GoogleCloudDialogflowV2IntentMessageBasicCard =+  GoogleCloudDialogflowV2IntentMessageBasicCard'+    { _gcdvimbcImage         :: !(Maybe GoogleCloudDialogflowV2IntentMessageImage)+    , _gcdvimbcButtons       :: !(Maybe [GoogleCloudDialogflowV2IntentMessageBasicCardButton])+    , _gcdvimbcSubtitle      :: !(Maybe Text)+    , _gcdvimbcTitle         :: !(Maybe Text)+    , _gcdvimbcFormattedText :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageBasicCard' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimbcImage'+--+-- * 'gcdvimbcButtons'+--+-- * 'gcdvimbcSubtitle'+--+-- * 'gcdvimbcTitle'+--+-- * 'gcdvimbcFormattedText'+googleCloudDialogflowV2IntentMessageBasicCard+    :: GoogleCloudDialogflowV2IntentMessageBasicCard+googleCloudDialogflowV2IntentMessageBasicCard =+  GoogleCloudDialogflowV2IntentMessageBasicCard'+    { _gcdvimbcImage = Nothing+    , _gcdvimbcButtons = Nothing+    , _gcdvimbcSubtitle = Nothing+    , _gcdvimbcTitle = Nothing+    , _gcdvimbcFormattedText = Nothing+    }+++-- | Optional. The image for the card.+gcdvimbcImage :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCard (Maybe GoogleCloudDialogflowV2IntentMessageImage)+gcdvimbcImage+  = lens _gcdvimbcImage+      (\ s a -> s{_gcdvimbcImage = a})++-- | Optional. The collection of card buttons.+gcdvimbcButtons :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCard [GoogleCloudDialogflowV2IntentMessageBasicCardButton]+gcdvimbcButtons+  = lens _gcdvimbcButtons+      (\ s a -> s{_gcdvimbcButtons = a})+      . _Default+      . _Coerce++-- | Optional. The subtitle of the card.+gcdvimbcSubtitle :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCard (Maybe Text)+gcdvimbcSubtitle+  = lens _gcdvimbcSubtitle+      (\ s a -> s{_gcdvimbcSubtitle = a})++-- | Optional. The title of the card.+gcdvimbcTitle :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCard (Maybe Text)+gcdvimbcTitle+  = lens _gcdvimbcTitle+      (\ s a -> s{_gcdvimbcTitle = a})++-- | Required, unless image is present. The body text of the card.+gcdvimbcFormattedText :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCard (Maybe Text)+gcdvimbcFormattedText+  = lens _gcdvimbcFormattedText+      (\ s a -> s{_gcdvimbcFormattedText = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageBasicCard+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageBasicCard"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageBasicCard' <$>+                   (o .:? "image") <*> (o .:? "buttons" .!= mempty) <*>+                     (o .:? "subtitle")+                     <*> (o .:? "title")+                     <*> (o .:? "formattedText"))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageBasicCard+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageBasicCard'{..}+          = object+              (catMaybes+                 [("image" .=) <$> _gcdvimbcImage,+                  ("buttons" .=) <$> _gcdvimbcButtons,+                  ("subtitle" .=) <$> _gcdvimbcSubtitle,+                  ("title" .=) <$> _gcdvimbcTitle,+                  ("formattedText" .=) <$> _gcdvimbcFormattedText])++-- | The simple response message containing speech or text.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageSimpleResponse' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse =+  GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse'+    { _gDisplayText  :: !(Maybe Text)+    , _gSsml         :: !(Maybe Text)+    , _gTextToSpeech :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gDisplayText'+--+-- * 'gSsml'+--+-- * 'gTextToSpeech'+googleCloudDialogflowV2beta1IntentMessageSimpleResponse+    :: GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse+googleCloudDialogflowV2beta1IntentMessageSimpleResponse =+  GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse'+    {_gDisplayText = Nothing, _gSsml = Nothing, _gTextToSpeech = Nothing}+++-- | Optional. The text to display.+gDisplayText :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse (Maybe Text)+gDisplayText+  = lens _gDisplayText (\ s a -> s{_gDisplayText = a})++-- | One of text_to_speech or ssml must be provided. Structured spoken+-- response to the user in the SSML format. Mutually exclusive with+-- text_to_speech.+gSsml :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse (Maybe Text)+gSsml = lens _gSsml (\ s a -> s{_gSsml = a})++-- | One of text_to_speech or ssml must be provided. The plain text of the+-- speech output. Mutually exclusive with ssml.+gTextToSpeech :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse (Maybe Text)+gTextToSpeech+  = lens _gTextToSpeech+      (\ s a -> s{_gTextToSpeech = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse'+                   <$>+                   (o .:? "displayText") <*> (o .:? "ssml") <*>+                     (o .:? "textToSpeech"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageSimpleResponse'{..}+          = object+              (catMaybes+                 [("displayText" .=) <$> _gDisplayText,+                  ("ssml" .=) <$> _gSsml,+                  ("textToSpeech" .=) <$> _gTextToSpeech])++-- | Represents an intent. Intents convert a number of user expressions or+-- patterns into an action. An action is an extraction of a user command or+-- sentence semantics.+--+-- /See:/ 'googleCloudDialogflowV2Intent' smart constructor.+data GoogleCloudDialogflowV2Intent =+  GoogleCloudDialogflowV2Intent'+    { _gcdviDefaultResponsePlatforms :: !(Maybe [Text])+    , _gcdviWebhookState             :: !(Maybe GoogleCloudDialogflowV2IntentWebhookState)+    , _gcdviPriority                 :: !(Maybe (Textual Int32))+    , _gcdviAction                   :: !(Maybe Text)+    , _gcdviRootFollowupIntentName   :: !(Maybe Text)+    , _gcdviName                     :: !(Maybe Text)+    , _gcdviEvents                   :: !(Maybe [Text])+    , _gcdviParameters               :: !(Maybe [GoogleCloudDialogflowV2IntentParameter])+    , _gcdviDisplayName              :: !(Maybe Text)+    , _gcdviInputContextNames        :: !(Maybe [Text])+    , _gcdviMessages                 :: !(Maybe [GoogleCloudDialogflowV2IntentMessage])+    , _gcdviParentFollowupIntentName :: !(Maybe Text)+    , _gcdviOutputContexts           :: !(Maybe [GoogleCloudDialogflowV2Context])+    , _gcdviTrainingPhrases          :: !(Maybe [GoogleCloudDialogflowV2IntentTrainingPhrase])+    , _gcdviFollowupIntentInfo       :: !(Maybe [GoogleCloudDialogflowV2IntentFollowupIntentInfo])+    , _gcdviIsFallback               :: !(Maybe Bool)+    , _gcdviMlDisabled               :: !(Maybe Bool)+    , _gcdviResetContexts            :: !(Maybe Bool)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2Intent' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdviDefaultResponsePlatforms'+--+-- * 'gcdviWebhookState'+--+-- * 'gcdviPriority'+--+-- * 'gcdviAction'+--+-- * 'gcdviRootFollowupIntentName'+--+-- * 'gcdviName'+--+-- * 'gcdviEvents'+--+-- * 'gcdviParameters'+--+-- * 'gcdviDisplayName'+--+-- * 'gcdviInputContextNames'+--+-- * 'gcdviMessages'+--+-- * 'gcdviParentFollowupIntentName'+--+-- * 'gcdviOutputContexts'+--+-- * 'gcdviTrainingPhrases'+--+-- * 'gcdviFollowupIntentInfo'+--+-- * 'gcdviIsFallback'+--+-- * 'gcdviMlDisabled'+--+-- * 'gcdviResetContexts'+googleCloudDialogflowV2Intent+    :: GoogleCloudDialogflowV2Intent+googleCloudDialogflowV2Intent =+  GoogleCloudDialogflowV2Intent'+    { _gcdviDefaultResponsePlatforms = Nothing+    , _gcdviWebhookState = Nothing+    , _gcdviPriority = Nothing+    , _gcdviAction = Nothing+    , _gcdviRootFollowupIntentName = Nothing+    , _gcdviName = Nothing+    , _gcdviEvents = Nothing+    , _gcdviParameters = Nothing+    , _gcdviDisplayName = Nothing+    , _gcdviInputContextNames = Nothing+    , _gcdviMessages = Nothing+    , _gcdviParentFollowupIntentName = Nothing+    , _gcdviOutputContexts = Nothing+    , _gcdviTrainingPhrases = Nothing+    , _gcdviFollowupIntentInfo = Nothing+    , _gcdviIsFallback = Nothing+    , _gcdviMlDisabled = Nothing+    , _gcdviResetContexts = Nothing+    }+++-- | Optional. The list of platforms for which the first response will be+-- taken from among the messages assigned to the DEFAULT_PLATFORM.+gcdviDefaultResponsePlatforms :: Lens' GoogleCloudDialogflowV2Intent [Text]+gcdviDefaultResponsePlatforms+  = lens _gcdviDefaultResponsePlatforms+      (\ s a -> s{_gcdviDefaultResponsePlatforms = a})+      . _Default+      . _Coerce++-- | Optional. Indicates whether webhooks are enabled for the intent.+gcdviWebhookState :: Lens' GoogleCloudDialogflowV2Intent (Maybe GoogleCloudDialogflowV2IntentWebhookState)+gcdviWebhookState+  = lens _gcdviWebhookState+      (\ s a -> s{_gcdviWebhookState = a})++-- | Optional. The priority of this intent. Higher numbers represent higher+-- priorities. If this is zero or unspecified, we use the default priority+-- 500000. Negative numbers mean that the intent is disabled.+gcdviPriority :: Lens' GoogleCloudDialogflowV2Intent (Maybe Int32)+gcdviPriority+  = lens _gcdviPriority+      (\ s a -> s{_gcdviPriority = a})+      . mapping _Coerce++-- | Optional. The name of the action associated with the intent. Note: The+-- action name must not contain whitespaces.+gcdviAction :: Lens' GoogleCloudDialogflowV2Intent (Maybe Text)+gcdviAction+  = lens _gcdviAction (\ s a -> s{_gcdviAction = a})++-- | Read-only. The unique identifier of the root intent in the chain of+-- followup intents. It identifies the correct followup intents chain for+-- this intent. We populate this field only in the output. Format:+-- \`projects\/\/agent\/intents\/\`.+gcdviRootFollowupIntentName :: Lens' GoogleCloudDialogflowV2Intent (Maybe Text)+gcdviRootFollowupIntentName+  = lens _gcdviRootFollowupIntentName+      (\ s a -> s{_gcdviRootFollowupIntentName = a})++-- | The unique identifier of this intent. Required for Intents.UpdateIntent+-- and Intents.BatchUpdateIntents methods. Format:+-- \`projects\/\/agent\/intents\/\`.+gcdviName :: Lens' GoogleCloudDialogflowV2Intent (Maybe Text)+gcdviName+  = lens _gcdviName (\ s a -> s{_gcdviName = a})++-- | Optional. The collection of event names that trigger the intent. If the+-- collection of input contexts is not empty, all of the contexts must be+-- present in the active user session for an event to trigger this intent.+gcdviEvents :: Lens' GoogleCloudDialogflowV2Intent [Text]+gcdviEvents+  = lens _gcdviEvents (\ s a -> s{_gcdviEvents = a}) .+      _Default+      . _Coerce++-- | Optional. The collection of parameters associated with the intent.+gcdviParameters :: Lens' GoogleCloudDialogflowV2Intent [GoogleCloudDialogflowV2IntentParameter]+gcdviParameters+  = lens _gcdviParameters+      (\ s a -> s{_gcdviParameters = a})+      . _Default+      . _Coerce++-- | Required. The name of this intent.+gcdviDisplayName :: Lens' GoogleCloudDialogflowV2Intent (Maybe Text)+gcdviDisplayName+  = lens _gcdviDisplayName+      (\ s a -> s{_gcdviDisplayName = a})++-- | Optional. The list of context names required for this intent to be+-- triggered. Format: \`projects\/\/agent\/sessions\/-\/contexts\/\`.+gcdviInputContextNames :: Lens' GoogleCloudDialogflowV2Intent [Text]+gcdviInputContextNames+  = lens _gcdviInputContextNames+      (\ s a -> s{_gcdviInputContextNames = a})+      . _Default+      . _Coerce++-- | Optional. The collection of rich messages corresponding to the+-- \`Response\` field in the Dialogflow console.+gcdviMessages :: Lens' GoogleCloudDialogflowV2Intent [GoogleCloudDialogflowV2IntentMessage]+gcdviMessages+  = lens _gcdviMessages+      (\ s a -> s{_gcdviMessages = a})+      . _Default+      . _Coerce++-- | Read-only after creation. The unique identifier of the parent intent in+-- the chain of followup intents. You can set this field when creating an+-- intent, for example with CreateIntent or BatchUpdateIntents, in order to+-- make this intent a followup intent. It identifies the parent followup+-- intent. Format: \`projects\/\/agent\/intents\/\`.+gcdviParentFollowupIntentName :: Lens' GoogleCloudDialogflowV2Intent (Maybe Text)+gcdviParentFollowupIntentName+  = lens _gcdviParentFollowupIntentName+      (\ s a -> s{_gcdviParentFollowupIntentName = a})++-- | Optional. The collection of contexts that are activated when the intent+-- is matched. Context messages in this collection should not set the+-- parameters field. Setting the \`lifespan_count\` to 0 will reset the+-- context when the intent is matched. Format:+-- \`projects\/\/agent\/sessions\/-\/contexts\/\`.+gcdviOutputContexts :: Lens' GoogleCloudDialogflowV2Intent [GoogleCloudDialogflowV2Context]+gcdviOutputContexts+  = lens _gcdviOutputContexts+      (\ s a -> s{_gcdviOutputContexts = a})+      . _Default+      . _Coerce++-- | Optional. The collection of examples that the agent is trained on.+gcdviTrainingPhrases :: Lens' GoogleCloudDialogflowV2Intent [GoogleCloudDialogflowV2IntentTrainingPhrase]+gcdviTrainingPhrases+  = lens _gcdviTrainingPhrases+      (\ s a -> s{_gcdviTrainingPhrases = a})+      . _Default+      . _Coerce++-- | Read-only. Information about all followup intents that have this intent+-- as a direct or indirect parent. We populate this field only in the+-- output.+gcdviFollowupIntentInfo :: Lens' GoogleCloudDialogflowV2Intent [GoogleCloudDialogflowV2IntentFollowupIntentInfo]+gcdviFollowupIntentInfo+  = lens _gcdviFollowupIntentInfo+      (\ s a -> s{_gcdviFollowupIntentInfo = a})+      . _Default+      . _Coerce++-- | Optional. Indicates whether this is a fallback intent.+gcdviIsFallback :: Lens' GoogleCloudDialogflowV2Intent (Maybe Bool)+gcdviIsFallback+  = lens _gcdviIsFallback+      (\ s a -> s{_gcdviIsFallback = a})++-- | Optional. Indicates whether Machine Learning is disabled for the intent.+-- Note: If \`ml_diabled\` setting is set to true, then this intent is not+-- taken into account during inference in \`ML ONLY\` match mode. Also,+-- auto-markup in the UI is turned off.+gcdviMlDisabled :: Lens' GoogleCloudDialogflowV2Intent (Maybe Bool)+gcdviMlDisabled+  = lens _gcdviMlDisabled+      (\ s a -> s{_gcdviMlDisabled = a})++-- | Optional. Indicates whether to delete all contexts in the current+-- session when this intent is matched.+gcdviResetContexts :: Lens' GoogleCloudDialogflowV2Intent (Maybe Bool)+gcdviResetContexts+  = lens _gcdviResetContexts+      (\ s a -> s{_gcdviResetContexts = a})++instance FromJSON GoogleCloudDialogflowV2Intent where+        parseJSON+          = withObject "GoogleCloudDialogflowV2Intent"+              (\ o ->+                 GoogleCloudDialogflowV2Intent' <$>+                   (o .:? "defaultResponsePlatforms" .!= mempty) <*>+                     (o .:? "webhookState")+                     <*> (o .:? "priority")+                     <*> (o .:? "action")+                     <*> (o .:? "rootFollowupIntentName")+                     <*> (o .:? "name")+                     <*> (o .:? "events" .!= mempty)+                     <*> (o .:? "parameters" .!= mempty)+                     <*> (o .:? "displayName")+                     <*> (o .:? "inputContextNames" .!= mempty)+                     <*> (o .:? "messages" .!= mempty)+                     <*> (o .:? "parentFollowupIntentName")+                     <*> (o .:? "outputContexts" .!= mempty)+                     <*> (o .:? "trainingPhrases" .!= mempty)+                     <*> (o .:? "followupIntentInfo" .!= mempty)+                     <*> (o .:? "isFallback")+                     <*> (o .:? "mlDisabled")+                     <*> (o .:? "resetContexts"))++instance ToJSON GoogleCloudDialogflowV2Intent where+        toJSON GoogleCloudDialogflowV2Intent'{..}+          = object+              (catMaybes+                 [("defaultResponsePlatforms" .=) <$>+                    _gcdviDefaultResponsePlatforms,+                  ("webhookState" .=) <$> _gcdviWebhookState,+                  ("priority" .=) <$> _gcdviPriority,+                  ("action" .=) <$> _gcdviAction,+                  ("rootFollowupIntentName" .=) <$>+                    _gcdviRootFollowupIntentName,+                  ("name" .=) <$> _gcdviName,+                  ("events" .=) <$> _gcdviEvents,+                  ("parameters" .=) <$> _gcdviParameters,+                  ("displayName" .=) <$> _gcdviDisplayName,+                  ("inputContextNames" .=) <$> _gcdviInputContextNames,+                  ("messages" .=) <$> _gcdviMessages,+                  ("parentFollowupIntentName" .=) <$>+                    _gcdviParentFollowupIntentName,+                  ("outputContexts" .=) <$> _gcdviOutputContexts,+                  ("trainingPhrases" .=) <$> _gcdviTrainingPhrases,+                  ("followupIntentInfo" .=) <$>+                    _gcdviFollowupIntentInfo,+                  ("isFallback" .=) <$> _gcdviIsFallback,+                  ("mlDisabled" .=) <$> _gcdviMlDisabled,+                  ("resetContexts" .=) <$> _gcdviResetContexts])++-- | The button object that appears at the bottom of a card.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageBasicCardButton' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton =+  GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton'+    { _gcdvimbcbOpenURIAction :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction)+    , _gcdvimbcbTitle         :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimbcbOpenURIAction'+--+-- * 'gcdvimbcbTitle'+googleCloudDialogflowV2beta1IntentMessageBasicCardButton+    :: GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton+googleCloudDialogflowV2beta1IntentMessageBasicCardButton =+  GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton'+    {_gcdvimbcbOpenURIAction = Nothing, _gcdvimbcbTitle = Nothing}+++-- | Required. Action to take when a user taps on the button.+gcdvimbcbOpenURIAction :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton (Maybe GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction)+gcdvimbcbOpenURIAction+  = lens _gcdvimbcbOpenURIAction+      (\ s a -> s{_gcdvimbcbOpenURIAction = a})++-- | Required. The title of the button.+gcdvimbcbTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton (Maybe Text)+gcdvimbcbTitle+  = lens _gcdvimbcbTitle+      (\ s a -> s{_gcdvimbcbTitle = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton'+                   <$> (o .:? "openUriAction") <*> (o .:? "title"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton'{..}+          = object+              (catMaybes+                 [("openUriAction" .=) <$> _gcdvimbcbOpenURIAction,+                  ("title" .=) <$> _gcdvimbcbTitle])++-- | The result of sentiment analysis as configured by+-- \`sentiment_analysis_request_config\`.+--+-- /See:/ 'googleCloudDialogflowV2SentimentAnalysisResult' smart constructor.+newtype GoogleCloudDialogflowV2SentimentAnalysisResult =+  GoogleCloudDialogflowV2SentimentAnalysisResult'+    { _gcdvsarQueryTextSentiment :: Maybe GoogleCloudDialogflowV2Sentiment+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2SentimentAnalysisResult' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvsarQueryTextSentiment'+googleCloudDialogflowV2SentimentAnalysisResult+    :: GoogleCloudDialogflowV2SentimentAnalysisResult+googleCloudDialogflowV2SentimentAnalysisResult =+  GoogleCloudDialogflowV2SentimentAnalysisResult'+    {_gcdvsarQueryTextSentiment = Nothing}+++-- | The sentiment analysis result for \`query_text\`.+gcdvsarQueryTextSentiment :: Lens' GoogleCloudDialogflowV2SentimentAnalysisResult (Maybe GoogleCloudDialogflowV2Sentiment)+gcdvsarQueryTextSentiment+  = lens _gcdvsarQueryTextSentiment+      (\ s a -> s{_gcdvsarQueryTextSentiment = a})++instance FromJSON+           GoogleCloudDialogflowV2SentimentAnalysisResult+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2SentimentAnalysisResult"+              (\ o ->+                 GoogleCloudDialogflowV2SentimentAnalysisResult' <$>+                   (o .:? "queryTextSentiment"))++instance ToJSON+           GoogleCloudDialogflowV2SentimentAnalysisResult+         where+        toJSON+          GoogleCloudDialogflowV2SentimentAnalysisResult'{..}+          = object+              (catMaybes+                 [("queryTextSentiment" .=) <$>+                    _gcdvsarQueryTextSentiment])++-- | The request message for EntityTypes.BatchCreateEntities.+--+-- /See:/ 'googleCloudDialogflowV2BatchCreateEntitiesRequest' smart constructor.+data GoogleCloudDialogflowV2BatchCreateEntitiesRequest =+  GoogleCloudDialogflowV2BatchCreateEntitiesRequest'+    { _gcdvbcerLanguageCode :: !(Maybe Text)+    , _gcdvbcerEntities     :: !(Maybe [GoogleCloudDialogflowV2EntityTypeEntity])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2BatchCreateEntitiesRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvbcerLanguageCode'+--+-- * 'gcdvbcerEntities'+googleCloudDialogflowV2BatchCreateEntitiesRequest+    :: GoogleCloudDialogflowV2BatchCreateEntitiesRequest+googleCloudDialogflowV2BatchCreateEntitiesRequest =+  GoogleCloudDialogflowV2BatchCreateEntitiesRequest'+    {_gcdvbcerLanguageCode = Nothing, _gcdvbcerEntities = Nothing}+++-- | Optional. The language of entity synonyms defined in \`entities\`. If+-- not specified, the agent\'s default language is used. [Many+-- languages](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/reference\/language)+-- are supported. Note: languages must be enabled in the agent before they+-- can be used.+gcdvbcerLanguageCode :: Lens' GoogleCloudDialogflowV2BatchCreateEntitiesRequest (Maybe Text)+gcdvbcerLanguageCode+  = lens _gcdvbcerLanguageCode+      (\ s a -> s{_gcdvbcerLanguageCode = a})++-- | Required. The entities to create.+gcdvbcerEntities :: Lens' GoogleCloudDialogflowV2BatchCreateEntitiesRequest [GoogleCloudDialogflowV2EntityTypeEntity]+gcdvbcerEntities+  = lens _gcdvbcerEntities+      (\ s a -> s{_gcdvbcerEntities = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2BatchCreateEntitiesRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2BatchCreateEntitiesRequest"+              (\ o ->+                 GoogleCloudDialogflowV2BatchCreateEntitiesRequest'+                   <$>+                   (o .:? "languageCode") <*>+                     (o .:? "entities" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2BatchCreateEntitiesRequest+         where+        toJSON+          GoogleCloudDialogflowV2BatchCreateEntitiesRequest'{..}+          = object+              (catMaybes+                 [("languageCode" .=) <$> _gcdvbcerLanguageCode,+                  ("entities" .=) <$> _gcdvbcerEntities])++-- | The collection of suggestions.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageSuggestions' smart constructor.+newtype GoogleCloudDialogflowV2beta1IntentMessageSuggestions =+  GoogleCloudDialogflowV2beta1IntentMessageSuggestions'+    { _gcdvimsSuggestions :: Maybe [GoogleCloudDialogflowV2beta1IntentMessageSuggestion]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageSuggestions' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimsSuggestions'+googleCloudDialogflowV2beta1IntentMessageSuggestions+    :: GoogleCloudDialogflowV2beta1IntentMessageSuggestions+googleCloudDialogflowV2beta1IntentMessageSuggestions =+  GoogleCloudDialogflowV2beta1IntentMessageSuggestions'+    {_gcdvimsSuggestions = Nothing}+++-- | Required. The list of suggested replies.+gcdvimsSuggestions :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSuggestions [GoogleCloudDialogflowV2beta1IntentMessageSuggestion]+gcdvimsSuggestions+  = lens _gcdvimsSuggestions+      (\ s a -> s{_gcdvimsSuggestions = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageSuggestions+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageSuggestions"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageSuggestions'+                   <$> (o .:? "suggestions" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageSuggestions+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageSuggestions'{..}+          = object+              (catMaybes+                 [("suggestions" .=) <$> _gcdvimsSuggestions])++-- | The request message for Intents.BatchDeleteIntents.+--+-- /See:/ 'googleCloudDialogflowV2BatchDeleteIntentsRequest' smart constructor.+newtype GoogleCloudDialogflowV2BatchDeleteIntentsRequest =+  GoogleCloudDialogflowV2BatchDeleteIntentsRequest'+    { _gcdvbdirIntents :: Maybe [GoogleCloudDialogflowV2Intent]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2BatchDeleteIntentsRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvbdirIntents'+googleCloudDialogflowV2BatchDeleteIntentsRequest+    :: GoogleCloudDialogflowV2BatchDeleteIntentsRequest+googleCloudDialogflowV2BatchDeleteIntentsRequest =+  GoogleCloudDialogflowV2BatchDeleteIntentsRequest' {_gcdvbdirIntents = Nothing}+++-- | Required. The collection of intents to delete. Only intent \`name\` must+-- be filled in.+gcdvbdirIntents :: Lens' GoogleCloudDialogflowV2BatchDeleteIntentsRequest [GoogleCloudDialogflowV2Intent]+gcdvbdirIntents+  = lens _gcdvbdirIntents+      (\ s a -> s{_gcdvbdirIntents = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2BatchDeleteIntentsRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2BatchDeleteIntentsRequest"+              (\ o ->+                 GoogleCloudDialogflowV2BatchDeleteIntentsRequest' <$>+                   (o .:? "intents" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2BatchDeleteIntentsRequest+         where+        toJSON+          GoogleCloudDialogflowV2BatchDeleteIntentsRequest'{..}+          = object+              (catMaybes [("intents" .=) <$> _gcdvbdirIntents])++-- | Represents the result of conversational query or event processing.+--+-- /See:/ 'googleCloudDialogflowV2QueryResult' smart constructor.+data GoogleCloudDialogflowV2QueryResult =+  GoogleCloudDialogflowV2QueryResult'+    { _gcdvqrLanguageCode                :: !(Maybe Text)+    , _gcdvqrAllRequiredParamsPresent    :: !(Maybe Bool)+    , _gcdvqrIntentDetectionConfidence   :: !(Maybe (Textual Double))+    , _gcdvqrFulfillmentMessages         :: !(Maybe [GoogleCloudDialogflowV2IntentMessage])+    , _gcdvqrSpeechRecognitionConfidence :: !(Maybe (Textual Double))+    , _gcdvqrAction                      :: !(Maybe Text)+    , _gcdvqrIntent                      :: !(Maybe GoogleCloudDialogflowV2Intent)+    , _gcdvqrSentimentAnalysisResult     :: !(Maybe GoogleCloudDialogflowV2SentimentAnalysisResult)+    , _gcdvqrQueryText                   :: !(Maybe Text)+    , _gcdvqrFulfillmentText             :: !(Maybe Text)+    , _gcdvqrParameters                  :: !(Maybe GoogleCloudDialogflowV2QueryResultParameters)+    , _gcdvqrWebhookPayload              :: !(Maybe GoogleCloudDialogflowV2QueryResultWebhookPayload)+    , _gcdvqrOutputContexts              :: !(Maybe [GoogleCloudDialogflowV2Context])+    , _gcdvqrWebhookSource               :: !(Maybe Text)+    , _gcdvqrDiagnosticInfo              :: !(Maybe GoogleCloudDialogflowV2QueryResultDiagnosticInfo)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2QueryResult' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvqrLanguageCode'+--+-- * 'gcdvqrAllRequiredParamsPresent'+--+-- * 'gcdvqrIntentDetectionConfidence'+--+-- * 'gcdvqrFulfillmentMessages'+--+-- * 'gcdvqrSpeechRecognitionConfidence'+--+-- * 'gcdvqrAction'+--+-- * 'gcdvqrIntent'+--+-- * 'gcdvqrSentimentAnalysisResult'+--+-- * 'gcdvqrQueryText'+--+-- * 'gcdvqrFulfillmentText'+--+-- * 'gcdvqrParameters'+--+-- * 'gcdvqrWebhookPayload'+--+-- * 'gcdvqrOutputContexts'+--+-- * 'gcdvqrWebhookSource'+--+-- * 'gcdvqrDiagnosticInfo'+googleCloudDialogflowV2QueryResult+    :: GoogleCloudDialogflowV2QueryResult+googleCloudDialogflowV2QueryResult =+  GoogleCloudDialogflowV2QueryResult'+    { _gcdvqrLanguageCode = Nothing+    , _gcdvqrAllRequiredParamsPresent = Nothing+    , _gcdvqrIntentDetectionConfidence = Nothing+    , _gcdvqrFulfillmentMessages = Nothing+    , _gcdvqrSpeechRecognitionConfidence = Nothing+    , _gcdvqrAction = Nothing+    , _gcdvqrIntent = Nothing+    , _gcdvqrSentimentAnalysisResult = Nothing+    , _gcdvqrQueryText = Nothing+    , _gcdvqrFulfillmentText = Nothing+    , _gcdvqrParameters = Nothing+    , _gcdvqrWebhookPayload = Nothing+    , _gcdvqrOutputContexts = Nothing+    , _gcdvqrWebhookSource = Nothing+    , _gcdvqrDiagnosticInfo = Nothing+    }+++-- | The language that was triggered during intent detection. See [Language+-- Support](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/reference\/language)+-- for a list of the currently supported language codes.+gcdvqrLanguageCode :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Text)+gcdvqrLanguageCode+  = lens _gcdvqrLanguageCode+      (\ s a -> s{_gcdvqrLanguageCode = a})++-- | This field is set to: - \`false\` if the matched intent has required+-- parameters and not all of the required parameter values have been+-- collected. - \`true\` if all required parameter values have been+-- collected, or if the matched intent doesn\'t contain any required+-- parameters.+gcdvqrAllRequiredParamsPresent :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Bool)+gcdvqrAllRequiredParamsPresent+  = lens _gcdvqrAllRequiredParamsPresent+      (\ s a -> s{_gcdvqrAllRequiredParamsPresent = a})++-- | The intent detection confidence. Values range from 0.0 (completely+-- uncertain) to 1.0 (completely certain). If there are \`multiple+-- knowledge_answers\` messages, this value is set to the greatest+-- \`knowledgeAnswers.match_confidence\` value in the list.+gcdvqrIntentDetectionConfidence :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Double)+gcdvqrIntentDetectionConfidence+  = lens _gcdvqrIntentDetectionConfidence+      (\ s a -> s{_gcdvqrIntentDetectionConfidence = a})+      . mapping _Coerce++-- | The collection of rich messages to present to the user.+gcdvqrFulfillmentMessages :: Lens' GoogleCloudDialogflowV2QueryResult [GoogleCloudDialogflowV2IntentMessage]+gcdvqrFulfillmentMessages+  = lens _gcdvqrFulfillmentMessages+      (\ s a -> s{_gcdvqrFulfillmentMessages = a})+      . _Default+      . _Coerce++-- | The Speech recognition confidence between 0.0 and 1.0. A higher number+-- indicates an estimated greater likelihood that the recognized words are+-- correct. The default of 0.0 is a sentinel value indicating that+-- confidence was not set. This field is not guaranteed to be accurate or+-- set. In particular this field isn\'t set for StreamingDetectIntent since+-- the streaming endpoint has separate confidence estimates per portion of+-- the audio in StreamingRecognitionResult.+gcdvqrSpeechRecognitionConfidence :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Double)+gcdvqrSpeechRecognitionConfidence+  = lens _gcdvqrSpeechRecognitionConfidence+      (\ s a -> s{_gcdvqrSpeechRecognitionConfidence = a})+      . mapping _Coerce++-- | The action name from the matched intent.+gcdvqrAction :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Text)+gcdvqrAction+  = lens _gcdvqrAction (\ s a -> s{_gcdvqrAction = a})++-- | The intent that matched the conversational query. Some, not all fields+-- are filled in this message, including but not limited to: \`name\`,+-- \`display_name\` and \`webhook_state\`.+gcdvqrIntent :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe GoogleCloudDialogflowV2Intent)+gcdvqrIntent+  = lens _gcdvqrIntent (\ s a -> s{_gcdvqrIntent = a})++-- | The sentiment analysis result, which depends on the+-- \`sentiment_analysis_request_config\` specified in the request.+gcdvqrSentimentAnalysisResult :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe GoogleCloudDialogflowV2SentimentAnalysisResult)+gcdvqrSentimentAnalysisResult+  = lens _gcdvqrSentimentAnalysisResult+      (\ s a -> s{_gcdvqrSentimentAnalysisResult = a})++-- | The original conversational query text: - If natural language text was+-- provided as input, \`query_text\` contains a copy of the input. - If+-- natural language speech audio was provided as input, \`query_text\`+-- contains the speech recognition result. If speech recognizer produced+-- multiple alternatives, a particular one is picked. - If an event was+-- provided as input, \`query_text\` is not set.+gcdvqrQueryText :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Text)+gcdvqrQueryText+  = lens _gcdvqrQueryText+      (\ s a -> s{_gcdvqrQueryText = a})++-- | The text to be pronounced to the user or shown on the screen. Note: This+-- is a legacy field, \`fulfillment_messages\` should be preferred.+gcdvqrFulfillmentText :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Text)+gcdvqrFulfillmentText+  = lens _gcdvqrFulfillmentText+      (\ s a -> s{_gcdvqrFulfillmentText = a})++-- | The collection of extracted parameters.+gcdvqrParameters :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe GoogleCloudDialogflowV2QueryResultParameters)+gcdvqrParameters+  = lens _gcdvqrParameters+      (\ s a -> s{_gcdvqrParameters = a})++-- | If the query was fulfilled by a webhook call, this field is set to the+-- value of the \`payload\` field returned in the webhook response.+gcdvqrWebhookPayload :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe GoogleCloudDialogflowV2QueryResultWebhookPayload)+gcdvqrWebhookPayload+  = lens _gcdvqrWebhookPayload+      (\ s a -> s{_gcdvqrWebhookPayload = a})++-- | The collection of output contexts. If applicable,+-- \`output_contexts.parameters\` contains entries with name \`.original\`+-- containing the original parameter values before the query.+gcdvqrOutputContexts :: Lens' GoogleCloudDialogflowV2QueryResult [GoogleCloudDialogflowV2Context]+gcdvqrOutputContexts+  = lens _gcdvqrOutputContexts+      (\ s a -> s{_gcdvqrOutputContexts = a})+      . _Default+      . _Coerce++-- | If the query was fulfilled by a webhook call, this field is set to the+-- value of the \`source\` field returned in the webhook response.+gcdvqrWebhookSource :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe Text)+gcdvqrWebhookSource+  = lens _gcdvqrWebhookSource+      (\ s a -> s{_gcdvqrWebhookSource = a})++-- | The free-form diagnostic info. For example, this field could contain+-- webhook call latency. The string keys of the Struct\'s fields map can+-- change without notice.+gcdvqrDiagnosticInfo :: Lens' GoogleCloudDialogflowV2QueryResult (Maybe GoogleCloudDialogflowV2QueryResultDiagnosticInfo)+gcdvqrDiagnosticInfo+  = lens _gcdvqrDiagnosticInfo+      (\ s a -> s{_gcdvqrDiagnosticInfo = a})++instance FromJSON GoogleCloudDialogflowV2QueryResult+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2QueryResult"+              (\ o ->+                 GoogleCloudDialogflowV2QueryResult' <$>+                   (o .:? "languageCode") <*>+                     (o .:? "allRequiredParamsPresent")+                     <*> (o .:? "intentDetectionConfidence")+                     <*> (o .:? "fulfillmentMessages" .!= mempty)+                     <*> (o .:? "speechRecognitionConfidence")+                     <*> (o .:? "action")+                     <*> (o .:? "intent")+                     <*> (o .:? "sentimentAnalysisResult")+                     <*> (o .:? "queryText")+                     <*> (o .:? "fulfillmentText")+                     <*> (o .:? "parameters")+                     <*> (o .:? "webhookPayload")+                     <*> (o .:? "outputContexts" .!= mempty)+                     <*> (o .:? "webhookSource")+                     <*> (o .:? "diagnosticInfo"))++instance ToJSON GoogleCloudDialogflowV2QueryResult+         where+        toJSON GoogleCloudDialogflowV2QueryResult'{..}+          = object+              (catMaybes+                 [("languageCode" .=) <$> _gcdvqrLanguageCode,+                  ("allRequiredParamsPresent" .=) <$>+                    _gcdvqrAllRequiredParamsPresent,+                  ("intentDetectionConfidence" .=) <$>+                    _gcdvqrIntentDetectionConfidence,+                  ("fulfillmentMessages" .=) <$>+                    _gcdvqrFulfillmentMessages,+                  ("speechRecognitionConfidence" .=) <$>+                    _gcdvqrSpeechRecognitionConfidence,+                  ("action" .=) <$> _gcdvqrAction,+                  ("intent" .=) <$> _gcdvqrIntent,+                  ("sentimentAnalysisResult" .=) <$>+                    _gcdvqrSentimentAnalysisResult,+                  ("queryText" .=) <$> _gcdvqrQueryText,+                  ("fulfillmentText" .=) <$> _gcdvqrFulfillmentText,+                  ("parameters" .=) <$> _gcdvqrParameters,+                  ("webhookPayload" .=) <$> _gcdvqrWebhookPayload,+                  ("outputContexts" .=) <$> _gcdvqrOutputContexts,+                  ("webhookSource" .=) <$> _gcdvqrWebhookSource,+                  ("diagnosticInfo" .=) <$> _gcdvqrDiagnosticInfo])++-- | The request message for Intents.BatchUpdateIntents.+--+-- /See:/ 'googleCloudDialogflowV2BatchUpdateIntentsRequest' smart constructor.+data GoogleCloudDialogflowV2BatchUpdateIntentsRequest =+  GoogleCloudDialogflowV2BatchUpdateIntentsRequest'+    { _gcdvbuirLanguageCode      :: !(Maybe Text)+    , _gcdvbuirUpdateMask        :: !(Maybe GFieldMask)+    , _gcdvbuirIntentView        :: !(Maybe GoogleCloudDialogflowV2BatchUpdateIntentsRequestIntentView)+    , _gcdvbuirIntentBatchURI    :: !(Maybe Text)+    , _gcdvbuirIntentBatchInline :: !(Maybe GoogleCloudDialogflowV2IntentBatch)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2BatchUpdateIntentsRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvbuirLanguageCode'+--+-- * 'gcdvbuirUpdateMask'+--+-- * 'gcdvbuirIntentView'+--+-- * 'gcdvbuirIntentBatchURI'+--+-- * 'gcdvbuirIntentBatchInline'+googleCloudDialogflowV2BatchUpdateIntentsRequest+    :: GoogleCloudDialogflowV2BatchUpdateIntentsRequest+googleCloudDialogflowV2BatchUpdateIntentsRequest =+  GoogleCloudDialogflowV2BatchUpdateIntentsRequest'+    { _gcdvbuirLanguageCode = Nothing+    , _gcdvbuirUpdateMask = Nothing+    , _gcdvbuirIntentView = Nothing+    , _gcdvbuirIntentBatchURI = Nothing+    , _gcdvbuirIntentBatchInline = Nothing+    }+++-- | Optional. The language of training phrases, parameters and rich messages+-- defined in \`intents\`. If not specified, the agent\'s default language+-- is used. [Many+-- languages](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/reference\/language)+-- are supported. Note: languages must be enabled in the agent before they+-- can be used.+gcdvbuirLanguageCode :: Lens' GoogleCloudDialogflowV2BatchUpdateIntentsRequest (Maybe Text)+gcdvbuirLanguageCode+  = lens _gcdvbuirLanguageCode+      (\ s a -> s{_gcdvbuirLanguageCode = a})++-- | Optional. The mask to control which fields get updated.+gcdvbuirUpdateMask :: Lens' GoogleCloudDialogflowV2BatchUpdateIntentsRequest (Maybe GFieldMask)+gcdvbuirUpdateMask+  = lens _gcdvbuirUpdateMask+      (\ s a -> s{_gcdvbuirUpdateMask = a})++-- | Optional. The resource view to apply to the returned intent.+gcdvbuirIntentView :: Lens' GoogleCloudDialogflowV2BatchUpdateIntentsRequest (Maybe GoogleCloudDialogflowV2BatchUpdateIntentsRequestIntentView)+gcdvbuirIntentView+  = lens _gcdvbuirIntentView+      (\ s a -> s{_gcdvbuirIntentView = a})++-- | The URI to a Google Cloud Storage file containing intents to update or+-- create. The file format can either be a serialized proto (of IntentBatch+-- type) or JSON object. Note: The URI must start with \"gs:\/\/\".+gcdvbuirIntentBatchURI :: Lens' GoogleCloudDialogflowV2BatchUpdateIntentsRequest (Maybe Text)+gcdvbuirIntentBatchURI+  = lens _gcdvbuirIntentBatchURI+      (\ s a -> s{_gcdvbuirIntentBatchURI = a})++-- | The collection of intents to update or create.+gcdvbuirIntentBatchInline :: Lens' GoogleCloudDialogflowV2BatchUpdateIntentsRequest (Maybe GoogleCloudDialogflowV2IntentBatch)+gcdvbuirIntentBatchInline+  = lens _gcdvbuirIntentBatchInline+      (\ s a -> s{_gcdvbuirIntentBatchInline = a})++instance FromJSON+           GoogleCloudDialogflowV2BatchUpdateIntentsRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2BatchUpdateIntentsRequest"+              (\ o ->+                 GoogleCloudDialogflowV2BatchUpdateIntentsRequest' <$>+                   (o .:? "languageCode") <*> (o .:? "updateMask") <*>+                     (o .:? "intentView")+                     <*> (o .:? "intentBatchUri")+                     <*> (o .:? "intentBatchInline"))++instance ToJSON+           GoogleCloudDialogflowV2BatchUpdateIntentsRequest+         where+        toJSON+          GoogleCloudDialogflowV2BatchUpdateIntentsRequest'{..}+          = object+              (catMaybes+                 [("languageCode" .=) <$> _gcdvbuirLanguageCode,+                  ("updateMask" .=) <$> _gcdvbuirUpdateMask,+                  ("intentView" .=) <$> _gcdvbuirIntentView,+                  ("intentBatchUri" .=) <$> _gcdvbuirIntentBatchURI,+                  ("intentBatchInline" .=) <$>+                    _gcdvbuirIntentBatchInline])++-- | An object representing a latitude\/longitude pair. This is expressed as+-- a pair of doubles representing degrees latitude and degrees longitude.+-- Unless specified otherwise, this must conform to the+-- <http://www.unoosa.org/pdf/icg/2012/template/WGS_84.pdf WGS84 standard>.+-- Values must be within normalized ranges.+--+-- /See:/ 'googleTypeLatLng' smart constructor.+data GoogleTypeLatLng =+  GoogleTypeLatLng'+    { _gtllLatitude  :: !(Maybe (Textual Double))+    , _gtllLongitude :: !(Maybe (Textual Double))+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleTypeLatLng' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gtllLatitude'+--+-- * 'gtllLongitude'+googleTypeLatLng+    :: GoogleTypeLatLng+googleTypeLatLng =+  GoogleTypeLatLng' {_gtllLatitude = Nothing, _gtllLongitude = Nothing}+++-- | The latitude in degrees. It must be in the range [-90.0, +90.0].+gtllLatitude :: Lens' GoogleTypeLatLng (Maybe Double)+gtllLatitude+  = lens _gtllLatitude (\ s a -> s{_gtllLatitude = a})+      . mapping _Coerce++-- | The longitude in degrees. It must be in the range [-180.0, +180.0].+gtllLongitude :: Lens' GoogleTypeLatLng (Maybe Double)+gtllLongitude+  = lens _gtllLongitude+      (\ s a -> s{_gtllLongitude = a})+      . mapping _Coerce++instance FromJSON GoogleTypeLatLng where+        parseJSON+          = withObject "GoogleTypeLatLng"+              (\ o ->+                 GoogleTypeLatLng' <$>+                   (o .:? "latitude") <*> (o .:? "longitude"))++instance ToJSON GoogleTypeLatLng where+        toJSON GoogleTypeLatLng'{..}+          = object+              (catMaybes+                 [("latitude" .=) <$> _gtllLatitude,+                  ("longitude" .=) <$> _gtllLongitude])++-- | The response message for a webhook call.+--+-- /See:/ 'googleCloudDialogflowV2beta1WebhookResponse' smart constructor.+data GoogleCloudDialogflowV2beta1WebhookResponse =+  GoogleCloudDialogflowV2beta1WebhookResponse'+    { _gcdvwrFulfillmentMessages :: !(Maybe [GoogleCloudDialogflowV2beta1IntentMessage])+    , _gcdvwrPayload             :: !(Maybe GoogleCloudDialogflowV2beta1WebhookResponsePayload)+    , _gcdvwrFulfillmentText     :: !(Maybe Text)+    , _gcdvwrSource              :: !(Maybe Text)+    , _gcdvwrEndInteraction      :: !(Maybe Bool)+    , _gcdvwrOutputContexts      :: !(Maybe [GoogleCloudDialogflowV2beta1Context])+    , _gcdvwrFollowupEventInput  :: !(Maybe GoogleCloudDialogflowV2beta1EventInput)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1WebhookResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvwrFulfillmentMessages'+--+-- * 'gcdvwrPayload'+--+-- * 'gcdvwrFulfillmentText'+--+-- * 'gcdvwrSource'+--+-- * 'gcdvwrEndInteraction'+--+-- * 'gcdvwrOutputContexts'+--+-- * 'gcdvwrFollowupEventInput'+googleCloudDialogflowV2beta1WebhookResponse+    :: GoogleCloudDialogflowV2beta1WebhookResponse+googleCloudDialogflowV2beta1WebhookResponse =+  GoogleCloudDialogflowV2beta1WebhookResponse'+    { _gcdvwrFulfillmentMessages = Nothing+    , _gcdvwrPayload = Nothing+    , _gcdvwrFulfillmentText = Nothing+    , _gcdvwrSource = Nothing+    , _gcdvwrEndInteraction = Nothing+    , _gcdvwrOutputContexts = Nothing+    , _gcdvwrFollowupEventInput = Nothing+    }+++-- | Optional. The collection of rich messages to present to the user. This+-- value is passed directly to \`QueryResult.fulfillment_messages\`.+gcdvwrFulfillmentMessages :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse [GoogleCloudDialogflowV2beta1IntentMessage]+gcdvwrFulfillmentMessages+  = lens _gcdvwrFulfillmentMessages+      (\ s a -> s{_gcdvwrFulfillmentMessages = a})+      . _Default+      . _Coerce++-- | Optional. This value is passed directly to+-- \`QueryResult.webhook_payload\`. See the related+-- \`fulfillment_messages[i].payload field\`, which may be used as an+-- alternative to this field. This field can be used for Actions on Google+-- responses. It should have a structure similar to the JSON message shown+-- here. For more information, see [Actions on Google Webhook+-- Format](https:\/\/developers.google.com\/actions\/dialogflow\/webhook)+--+-- > {+-- >   "google": {+-- >     "expectUserResponse": true,+-- >     "richResponse": {+-- >       "items": [+-- >         {+-- >           "simpleResponse": {+-- >             "textToSpeech": "this is a simple response"+-- >           }+-- >         }+-- >       ]+-- >     }+-- >   }+-- > }+gcdvwrPayload :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse (Maybe GoogleCloudDialogflowV2beta1WebhookResponsePayload)+gcdvwrPayload+  = lens _gcdvwrPayload+      (\ s a -> s{_gcdvwrPayload = a})++-- | Optional. The text to be shown on the screen. This value is passed+-- directly to \`QueryResult.fulfillment_text\`.+gcdvwrFulfillmentText :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse (Maybe Text)+gcdvwrFulfillmentText+  = lens _gcdvwrFulfillmentText+      (\ s a -> s{_gcdvwrFulfillmentText = a})++-- | Optional. This value is passed directly to+-- \`QueryResult.webhook_source\`.+gcdvwrSource :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse (Maybe Text)+gcdvwrSource+  = lens _gcdvwrSource (\ s a -> s{_gcdvwrSource = a})++-- | Optional. Indicates that this intent ends an interaction. Some+-- integrations (e.g., Actions on Google or Dialogflow phone gateway) use+-- this information to close interaction with an end user. Default is+-- false.+gcdvwrEndInteraction :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse (Maybe Bool)+gcdvwrEndInteraction+  = lens _gcdvwrEndInteraction+      (\ s a -> s{_gcdvwrEndInteraction = a})++-- | Optional. The collection of output contexts. This value is passed+-- directly to \`QueryResult.output_contexts\`.+gcdvwrOutputContexts :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse [GoogleCloudDialogflowV2beta1Context]+gcdvwrOutputContexts+  = lens _gcdvwrOutputContexts+      (\ s a -> s{_gcdvwrOutputContexts = a})+      . _Default+      . _Coerce++-- | Optional. Makes the platform immediately invoke another \`DetectIntent\`+-- call internally with the specified event as input.+gcdvwrFollowupEventInput :: Lens' GoogleCloudDialogflowV2beta1WebhookResponse (Maybe GoogleCloudDialogflowV2beta1EventInput)+gcdvwrFollowupEventInput+  = lens _gcdvwrFollowupEventInput+      (\ s a -> s{_gcdvwrFollowupEventInput = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1WebhookResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1WebhookResponse"+              (\ o ->+                 GoogleCloudDialogflowV2beta1WebhookResponse' <$>+                   (o .:? "fulfillmentMessages" .!= mempty) <*>+                     (o .:? "payload")+                     <*> (o .:? "fulfillmentText")+                     <*> (o .:? "source")+                     <*> (o .:? "endInteraction")+                     <*> (o .:? "outputContexts" .!= mempty)+                     <*> (o .:? "followupEventInput"))++instance ToJSON+           GoogleCloudDialogflowV2beta1WebhookResponse+         where+        toJSON+          GoogleCloudDialogflowV2beta1WebhookResponse'{..}+          = object+              (catMaybes+                 [("fulfillmentMessages" .=) <$>+                    _gcdvwrFulfillmentMessages,+                  ("payload" .=) <$> _gcdvwrPayload,+                  ("fulfillmentText" .=) <$> _gcdvwrFulfillmentText,+                  ("source" .=) <$> _gcdvwrSource,+                  ("endInteraction" .=) <$> _gcdvwrEndInteraction,+                  ("outputContexts" .=) <$> _gcdvwrOutputContexts,+                  ("followupEventInput" .=) <$>+                    _gcdvwrFollowupEventInput])++-- | Optional. The collection of parameters associated with the event.+--+-- /See:/ 'googleCloudDialogflowV2beta1EventInputParameters' smart constructor.+newtype GoogleCloudDialogflowV2beta1EventInputParameters =+  GoogleCloudDialogflowV2beta1EventInputParameters'+    { _gcdveipAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1EventInputParameters' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdveipAddtional'+googleCloudDialogflowV2beta1EventInputParameters+    :: HashMap Text JSONValue -- ^ 'gcdveipAddtional'+    -> GoogleCloudDialogflowV2beta1EventInputParameters+googleCloudDialogflowV2beta1EventInputParameters pGcdveipAddtional_ =+  GoogleCloudDialogflowV2beta1EventInputParameters'+    {_gcdveipAddtional = _Coerce # pGcdveipAddtional_}+++-- | Properties of the object.+gcdveipAddtional :: Lens' GoogleCloudDialogflowV2beta1EventInputParameters (HashMap Text JSONValue)+gcdveipAddtional+  = lens _gcdveipAddtional+      (\ s a -> s{_gcdveipAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1EventInputParameters+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1EventInputParameters"+              (\ o ->+                 GoogleCloudDialogflowV2beta1EventInputParameters' <$>+                   (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2beta1EventInputParameters+         where+        toJSON = toJSON . _gcdveipAddtional++-- | Optional. This field is set to the value of the+-- \`QueryParameters.payload\` field passed in the request. Some+-- integrations that query a Dialogflow agent may provide additional+-- information in the payload. In particular for the Telephony Gateway this+-- field has the form:+--+-- > {+-- >  "telephony": {+-- >    "caller_id": "+18558363987"+-- >  }+-- > }+--+-- Note: The caller ID field (\`caller_id\`) will be redacted for Standard+-- Edition agents and populated with the caller ID in [E.164+-- format](https:\/\/en.wikipedia.org\/wiki\/E.164) for Enterprise Edition+-- agents.+--+-- /See:/ 'googleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload' smart constructor.+newtype GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload =+  GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload'+    { _gcdvodirpAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvodirpAddtional'+googleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload+    :: HashMap Text JSONValue -- ^ 'gcdvodirpAddtional'+    -> GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload+googleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload pGcdvodirpAddtional_ =+  GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload'+    {_gcdvodirpAddtional = _Coerce # pGcdvodirpAddtional_}+++-- | Properties of the object.+gcdvodirpAddtional :: Lens' GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload (HashMap Text JSONValue)+gcdvodirpAddtional+  = lens _gcdvodirpAddtional+      (\ s a -> s{_gcdvodirpAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload"+              (\ o ->+                 GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload'+                   <$> (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload+         where+        toJSON = toJSON . _gcdvodirpAddtional++-- | The quick replies response message.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageQuickReplies' smart constructor.+data GoogleCloudDialogflowV2IntentMessageQuickReplies =+  GoogleCloudDialogflowV2IntentMessageQuickReplies'+    { _gcdvimqrTitle        :: !(Maybe Text)+    , _gcdvimqrQuickReplies :: !(Maybe [Text])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageQuickReplies' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimqrTitle'+--+-- * 'gcdvimqrQuickReplies'+googleCloudDialogflowV2IntentMessageQuickReplies+    :: GoogleCloudDialogflowV2IntentMessageQuickReplies+googleCloudDialogflowV2IntentMessageQuickReplies =+  GoogleCloudDialogflowV2IntentMessageQuickReplies'+    {_gcdvimqrTitle = Nothing, _gcdvimqrQuickReplies = Nothing}+++-- | Optional. The title of the collection of quick replies.+gcdvimqrTitle :: Lens' GoogleCloudDialogflowV2IntentMessageQuickReplies (Maybe Text)+gcdvimqrTitle+  = lens _gcdvimqrTitle+      (\ s a -> s{_gcdvimqrTitle = a})++-- | Optional. The collection of quick replies.+gcdvimqrQuickReplies :: Lens' GoogleCloudDialogflowV2IntentMessageQuickReplies [Text]+gcdvimqrQuickReplies+  = lens _gcdvimqrQuickReplies+      (\ s a -> s{_gcdvimqrQuickReplies = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageQuickReplies+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageQuickReplies"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageQuickReplies' <$>+                   (o .:? "title") <*>+                     (o .:? "quickReplies" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageQuickReplies+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageQuickReplies'{..}+          = object+              (catMaybes+                 [("title" .=) <$> _gcdvimqrTitle,+                  ("quickReplies" .=) <$> _gcdvimqrQuickReplies])++-- | Represents the result of querying a Knowledge base.+--+-- /See:/ 'googleCloudDialogflowV2beta1KnowledgeAnswers' smart constructor.+newtype GoogleCloudDialogflowV2beta1KnowledgeAnswers =+  GoogleCloudDialogflowV2beta1KnowledgeAnswers'+    { _gcdvkaAnswers :: Maybe [GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1KnowledgeAnswers' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvkaAnswers'+googleCloudDialogflowV2beta1KnowledgeAnswers+    :: GoogleCloudDialogflowV2beta1KnowledgeAnswers+googleCloudDialogflowV2beta1KnowledgeAnswers =+  GoogleCloudDialogflowV2beta1KnowledgeAnswers' {_gcdvkaAnswers = Nothing}+++-- | A list of answers from Knowledge Connector.+gcdvkaAnswers :: Lens' GoogleCloudDialogflowV2beta1KnowledgeAnswers [GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer]+gcdvkaAnswers+  = lens _gcdvkaAnswers+      (\ s a -> s{_gcdvkaAnswers = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1KnowledgeAnswers+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1KnowledgeAnswers"+              (\ o ->+                 GoogleCloudDialogflowV2beta1KnowledgeAnswers' <$>+                   (o .:? "answers" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2beta1KnowledgeAnswers+         where+        toJSON+          GoogleCloudDialogflowV2beta1KnowledgeAnswers'{..}+          = object+              (catMaybes [("answers" .=) <$> _gcdvkaAnswers])++-- | Optional. Contains information about a button.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageCardButton' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessageCardButton =+  GoogleCloudDialogflowV2beta1IntentMessageCardButton'+    { _gcdvimcbText     :: !(Maybe Text)+    , _gcdvimcbPostback :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageCardButton' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimcbText'+--+-- * 'gcdvimcbPostback'+googleCloudDialogflowV2beta1IntentMessageCardButton+    :: GoogleCloudDialogflowV2beta1IntentMessageCardButton+googleCloudDialogflowV2beta1IntentMessageCardButton =+  GoogleCloudDialogflowV2beta1IntentMessageCardButton'+    {_gcdvimcbText = Nothing, _gcdvimcbPostback = Nothing}+++-- | Optional. The text to show on the button.+gcdvimcbText :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCardButton (Maybe Text)+gcdvimcbText+  = lens _gcdvimcbText (\ s a -> s{_gcdvimcbText = a})++-- | Optional. The text to send back to the Dialogflow API or a URI to open.+gcdvimcbPostback :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCardButton (Maybe Text)+gcdvimcbPostback+  = lens _gcdvimcbPostback+      (\ s a -> s{_gcdvimcbPostback = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageCardButton+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageCardButton"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageCardButton'+                   <$> (o .:? "text") <*> (o .:? "postback"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageCardButton+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageCardButton'{..}+          = object+              (catMaybes+                 [("text" .=) <$> _gcdvimcbText,+                  ("postback" .=) <$> _gcdvimcbPostback])++-- | Optional. The collection of parameters associated with this context.+-- Refer to [this+-- doc](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/intents-actions-parameters)+-- for syntax.+--+-- /See:/ 'googleCloudDialogflowV2beta1ContextParameters' smart constructor.+newtype GoogleCloudDialogflowV2beta1ContextParameters =+  GoogleCloudDialogflowV2beta1ContextParameters'+    { _gcdvcpAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1ContextParameters' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvcpAddtional'+googleCloudDialogflowV2beta1ContextParameters+    :: HashMap Text JSONValue -- ^ 'gcdvcpAddtional'+    -> GoogleCloudDialogflowV2beta1ContextParameters+googleCloudDialogflowV2beta1ContextParameters pGcdvcpAddtional_ =+  GoogleCloudDialogflowV2beta1ContextParameters'+    {_gcdvcpAddtional = _Coerce # pGcdvcpAddtional_}+++-- | Properties of the object.+gcdvcpAddtional :: Lens' GoogleCloudDialogflowV2beta1ContextParameters (HashMap Text JSONValue)+gcdvcpAddtional+  = lens _gcdvcpAddtional+      (\ s a -> s{_gcdvcpAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1ContextParameters+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1ContextParameters"+              (\ o ->+                 GoogleCloudDialogflowV2beta1ContextParameters' <$>+                   (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2beta1ContextParameters+         where+        toJSON = toJSON . _gcdvcpAddtional++-- | Optional. This field can be used to pass custom data into the webhook+-- associated with the agent. Arbitrary JSON objects are supported.+--+-- /See:/ 'googleCloudDialogflowV2QueryParametersPayload' smart constructor.+newtype GoogleCloudDialogflowV2QueryParametersPayload =+  GoogleCloudDialogflowV2QueryParametersPayload'+    { _gcdvqppAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2QueryParametersPayload' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvqppAddtional'+googleCloudDialogflowV2QueryParametersPayload+    :: HashMap Text JSONValue -- ^ 'gcdvqppAddtional'+    -> GoogleCloudDialogflowV2QueryParametersPayload+googleCloudDialogflowV2QueryParametersPayload pGcdvqppAddtional_ =+  GoogleCloudDialogflowV2QueryParametersPayload'+    {_gcdvqppAddtional = _Coerce # pGcdvqppAddtional_}+++-- | Properties of the object.+gcdvqppAddtional :: Lens' GoogleCloudDialogflowV2QueryParametersPayload (HashMap Text JSONValue)+gcdvqppAddtional+  = lens _gcdvqppAddtional+      (\ s a -> s{_gcdvqppAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2QueryParametersPayload+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2QueryParametersPayload"+              (\ o ->+                 GoogleCloudDialogflowV2QueryParametersPayload' <$>+                   (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2QueryParametersPayload+         where+        toJSON = toJSON . _gcdvqppAddtional++-- | The card for presenting a list of options to select from.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageListSelect' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessageListSelect =+  GoogleCloudDialogflowV2beta1IntentMessageListSelect'+    { _gcdvimlsItems :: !(Maybe [GoogleCloudDialogflowV2beta1IntentMessageListSelectItem])+    , _gcdvimlsTitle :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageListSelect' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimlsItems'+--+-- * 'gcdvimlsTitle'+googleCloudDialogflowV2beta1IntentMessageListSelect+    :: GoogleCloudDialogflowV2beta1IntentMessageListSelect+googleCloudDialogflowV2beta1IntentMessageListSelect =+  GoogleCloudDialogflowV2beta1IntentMessageListSelect'+    {_gcdvimlsItems = Nothing, _gcdvimlsTitle = Nothing}+++-- | Required. List items.+gcdvimlsItems :: Lens' GoogleCloudDialogflowV2beta1IntentMessageListSelect [GoogleCloudDialogflowV2beta1IntentMessageListSelectItem]+gcdvimlsItems+  = lens _gcdvimlsItems+      (\ s a -> s{_gcdvimlsItems = a})+      . _Default+      . _Coerce++-- | Optional. The overall title of the list.+gcdvimlsTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageListSelect (Maybe Text)+gcdvimlsTitle+  = lens _gcdvimlsTitle+      (\ s a -> s{_gcdvimlsTitle = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageListSelect+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageListSelect"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageListSelect'+                   <$> (o .:? "items" .!= mempty) <*> (o .:? "title"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageListSelect+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageListSelect'{..}+          = object+              (catMaybes+                 [("items" .=) <$> _gcdvimlsItems,+                  ("title" .=) <$> _gcdvimlsTitle])++-- | Plays audio from a file in Telephony Gateway.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio' smart constructor.+newtype GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio =+  GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio'+    { _gcdvimtpaAudioURI :: Maybe Text+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimtpaAudioURI'+googleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio+    :: GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio+googleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio =+  GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio'+    {_gcdvimtpaAudioURI = Nothing}+++-- | Required. URI to a Google Cloud Storage object containing the audio to+-- play, e.g., \"gs:\/\/bucket\/object\". The object must contain a single+-- channel (mono) of linear PCM audio (2 bytes \/ sample) at 8kHz. This+-- object must be readable by the+-- \`service-\'gcp-sa-dialogflow.iam.gserviceaccount.com\` service account+-- where is the number of the Telephony Gateway project (usually the same+-- as the Dialogflow agent project). If the Google Cloud Storage bucket is+-- in the Telephony Gateway project, this permission is added by default+-- when enabling the Dialogflow V2 API. For audio from other sources,+-- consider using the \`TelephonySynthesizeSpeech\` message with SSML.+gcdvimtpaAudioURI :: Lens' GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio (Maybe Text)+gcdvimtpaAudioURI+  = lens _gcdvimtpaAudioURI+      (\ s a -> s{_gcdvimtpaAudioURI = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio'+                   <$> (o .:? "audioUri"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio'{..}+          = object+              (catMaybes [("audioUri" .=) <$> _gcdvimtpaAudioURI])++-- | Configures the types of sentiment analysis to perform.+--+-- /See:/ 'googleCloudDialogflowV2SentimentAnalysisRequestConfig' smart constructor.+newtype GoogleCloudDialogflowV2SentimentAnalysisRequestConfig =+  GoogleCloudDialogflowV2SentimentAnalysisRequestConfig'+    { _gcdvsarcAnalyzeQueryTextSentiment :: Maybe Bool+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2SentimentAnalysisRequestConfig' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvsarcAnalyzeQueryTextSentiment'+googleCloudDialogflowV2SentimentAnalysisRequestConfig+    :: GoogleCloudDialogflowV2SentimentAnalysisRequestConfig+googleCloudDialogflowV2SentimentAnalysisRequestConfig =+  GoogleCloudDialogflowV2SentimentAnalysisRequestConfig'+    {_gcdvsarcAnalyzeQueryTextSentiment = Nothing}+++-- | Optional. Instructs the service to perform sentiment analysis on+-- \`query_text\`. If not provided, sentiment analysis is not performed on+-- \`query_text\`.+gcdvsarcAnalyzeQueryTextSentiment :: Lens' GoogleCloudDialogflowV2SentimentAnalysisRequestConfig (Maybe Bool)+gcdvsarcAnalyzeQueryTextSentiment+  = lens _gcdvsarcAnalyzeQueryTextSentiment+      (\ s a -> s{_gcdvsarcAnalyzeQueryTextSentiment = a})++instance FromJSON+           GoogleCloudDialogflowV2SentimentAnalysisRequestConfig+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2SentimentAnalysisRequestConfig"+              (\ o ->+                 GoogleCloudDialogflowV2SentimentAnalysisRequestConfig'+                   <$> (o .:? "analyzeQueryTextSentiment"))++instance ToJSON+           GoogleCloudDialogflowV2SentimentAnalysisRequestConfig+         where+        toJSON+          GoogleCloudDialogflowV2SentimentAnalysisRequestConfig'{..}+          = object+              (catMaybes+                 [("analyzeQueryTextSentiment" .=) <$>+                    _gcdvsarcAnalyzeQueryTextSentiment])++-- | Represents a part of a training phrase.+--+-- /See:/ 'googleCloudDialogflowV2IntentTrainingPhrasePart' smart constructor.+data GoogleCloudDialogflowV2IntentTrainingPhrasePart =+  GoogleCloudDialogflowV2IntentTrainingPhrasePart'+    { _gcdvitppText        :: !(Maybe Text)+    , _gcdvitppUserDefined :: !(Maybe Bool)+    , _gcdvitppEntityType  :: !(Maybe Text)+    , _gcdvitppAlias       :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentTrainingPhrasePart' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvitppText'+--+-- * 'gcdvitppUserDefined'+--+-- * 'gcdvitppEntityType'+--+-- * 'gcdvitppAlias'+googleCloudDialogflowV2IntentTrainingPhrasePart+    :: GoogleCloudDialogflowV2IntentTrainingPhrasePart+googleCloudDialogflowV2IntentTrainingPhrasePart =+  GoogleCloudDialogflowV2IntentTrainingPhrasePart'+    { _gcdvitppText = Nothing+    , _gcdvitppUserDefined = Nothing+    , _gcdvitppEntityType = Nothing+    , _gcdvitppAlias = Nothing+    }+++-- | Required. The text for this part.+gcdvitppText :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrasePart (Maybe Text)+gcdvitppText+  = lens _gcdvitppText (\ s a -> s{_gcdvitppText = a})++-- | Optional. Indicates whether the text was manually annotated. This field+-- is set to true when the Dialogflow Console is used to manually annotate+-- the part. When creating an annotated part with the API, you must set+-- this to true.+gcdvitppUserDefined :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrasePart (Maybe Bool)+gcdvitppUserDefined+  = lens _gcdvitppUserDefined+      (\ s a -> s{_gcdvitppUserDefined = a})++-- | Optional. The entity type name prefixed with \`\'\`. This field is+-- required for annotated parts of the training phrase.+gcdvitppEntityType :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrasePart (Maybe Text)+gcdvitppEntityType+  = lens _gcdvitppEntityType+      (\ s a -> s{_gcdvitppEntityType = a})++-- | Optional. The parameter name for the value extracted from the annotated+-- part of the example. This field is required for annotated parts of the+-- training phrase.+gcdvitppAlias :: Lens' GoogleCloudDialogflowV2IntentTrainingPhrasePart (Maybe Text)+gcdvitppAlias+  = lens _gcdvitppAlias+      (\ s a -> s{_gcdvitppAlias = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentTrainingPhrasePart+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentTrainingPhrasePart"+              (\ o ->+                 GoogleCloudDialogflowV2IntentTrainingPhrasePart' <$>+                   (o .:? "text") <*> (o .:? "userDefined") <*>+                     (o .:? "entityType")+                     <*> (o .:? "alias"))++instance ToJSON+           GoogleCloudDialogflowV2IntentTrainingPhrasePart+         where+        toJSON+          GoogleCloudDialogflowV2IntentTrainingPhrasePart'{..}+          = object+              (catMaybes+                 [("text" .=) <$> _gcdvitppText,+                  ("userDefined" .=) <$> _gcdvitppUserDefined,+                  ("entityType" .=) <$> _gcdvitppEntityType,+                  ("alias" .=) <$> _gcdvitppAlias])++-- | A generic empty message that you can re-use to avoid defining duplicated+-- empty messages in your APIs. A typical example is to use it as the+-- request or the response type of an API method. For instance: service Foo+-- { rpc Bar(google.protobuf.Empty) returns (google.protobuf.Empty); } The+-- JSON representation for \`Empty\` is empty JSON object \`{}\`.+--+-- /See:/ 'googleProtobufEmpty' smart constructor.+data GoogleProtobufEmpty =+  GoogleProtobufEmpty'+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleProtobufEmpty' with the minimum fields required to make a request.+--+googleProtobufEmpty+    :: GoogleProtobufEmpty+googleProtobufEmpty = GoogleProtobufEmpty'+++instance FromJSON GoogleProtobufEmpty where+        parseJSON+          = withObject "GoogleProtobufEmpty"+              (\ o -> pure GoogleProtobufEmpty')++instance ToJSON GoogleProtobufEmpty where+        toJSON = const emptyObject++-- | Optional. This value is passed directly to+-- \`QueryResult.webhook_payload\`. See the related+-- \`fulfillment_messages[i].payload field\`, which may be used as an+-- alternative to this field. This field can be used for Actions on Google+-- responses. It should have a structure similar to the JSON message shown+-- here. For more information, see [Actions on Google Webhook+-- Format](https:\/\/developers.google.com\/actions\/dialogflow\/webhook)+--+-- > {+-- >   "google": {+-- >     "expectUserResponse": true,+-- >     "richResponse": {+-- >       "items": [+-- >         {+-- >           "simpleResponse": {+-- >             "textToSpeech": "this is a simple response"+-- >           }+-- >         }+-- >       ]+-- >     }+-- >   }+-- > }+--+-- /See:/ 'googleCloudDialogflowV2beta1WebhookResponsePayload' smart constructor.+newtype GoogleCloudDialogflowV2beta1WebhookResponsePayload =+  GoogleCloudDialogflowV2beta1WebhookResponsePayload'+    { _gcdvwrpAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1WebhookResponsePayload' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvwrpAddtional'+googleCloudDialogflowV2beta1WebhookResponsePayload+    :: HashMap Text JSONValue -- ^ 'gcdvwrpAddtional'+    -> GoogleCloudDialogflowV2beta1WebhookResponsePayload+googleCloudDialogflowV2beta1WebhookResponsePayload pGcdvwrpAddtional_ =+  GoogleCloudDialogflowV2beta1WebhookResponsePayload'+    {_gcdvwrpAddtional = _Coerce # pGcdvwrpAddtional_}+++-- | Properties of the object.+gcdvwrpAddtional :: Lens' GoogleCloudDialogflowV2beta1WebhookResponsePayload (HashMap Text JSONValue)+gcdvwrpAddtional+  = lens _gcdvwrpAddtional+      (\ s a -> s{_gcdvwrpAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1WebhookResponsePayload+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1WebhookResponsePayload"+              (\ o ->+                 GoogleCloudDialogflowV2beta1WebhookResponsePayload'+                   <$> (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2beta1WebhookResponsePayload+         where+        toJSON = toJSON . _gcdvwrpAddtional++-- | The quick replies response message.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageQuickReplies' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessageQuickReplies =+  GoogleCloudDialogflowV2beta1IntentMessageQuickReplies'+    { _gcdvimqrsTitle        :: !(Maybe Text)+    , _gcdvimqrsQuickReplies :: !(Maybe [Text])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageQuickReplies' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimqrsTitle'+--+-- * 'gcdvimqrsQuickReplies'+googleCloudDialogflowV2beta1IntentMessageQuickReplies+    :: GoogleCloudDialogflowV2beta1IntentMessageQuickReplies+googleCloudDialogflowV2beta1IntentMessageQuickReplies =+  GoogleCloudDialogflowV2beta1IntentMessageQuickReplies'+    {_gcdvimqrsTitle = Nothing, _gcdvimqrsQuickReplies = Nothing}+++-- | Optional. The title of the collection of quick replies.+gcdvimqrsTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageQuickReplies (Maybe Text)+gcdvimqrsTitle+  = lens _gcdvimqrsTitle+      (\ s a -> s{_gcdvimqrsTitle = a})++-- | Optional. The collection of quick replies.+gcdvimqrsQuickReplies :: Lens' GoogleCloudDialogflowV2beta1IntentMessageQuickReplies [Text]+gcdvimqrsQuickReplies+  = lens _gcdvimqrsQuickReplies+      (\ s a -> s{_gcdvimqrsQuickReplies = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageQuickReplies+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageQuickReplies"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageQuickReplies'+                   <$>+                   (o .:? "title") <*>+                     (o .:? "quickReplies" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageQuickReplies+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageQuickReplies'{..}+          = object+              (catMaybes+                 [("title" .=) <$> _gcdvimqrsTitle,+                  ("quickReplies" .=) <$> _gcdvimqrsQuickReplies])++-- | The suggestion chip message that allows the user to jump out to the app+-- or website associated with this agent.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageLinkOutSuggestion' smart constructor.+data GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion =+  GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion'+    { _gcdvimlosURI             :: !(Maybe Text)+    , _gcdvimlosDestinationName :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimlosURI'+--+-- * 'gcdvimlosDestinationName'+googleCloudDialogflowV2IntentMessageLinkOutSuggestion+    :: GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion+googleCloudDialogflowV2IntentMessageLinkOutSuggestion =+  GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion'+    {_gcdvimlosURI = Nothing, _gcdvimlosDestinationName = Nothing}+++-- | Required. The URI of the app or site to open when the user taps the+-- suggestion chip.+gcdvimlosURI :: Lens' GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion (Maybe Text)+gcdvimlosURI+  = lens _gcdvimlosURI (\ s a -> s{_gcdvimlosURI = a})++-- | Required. The name of the app or site this chip is linking to.+gcdvimlosDestinationName :: Lens' GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion (Maybe Text)+gcdvimlosDestinationName+  = lens _gcdvimlosDestinationName+      (\ s a -> s{_gcdvimlosDestinationName = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion'+                   <$> (o .:? "uri") <*> (o .:? "destinationName"))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion'{..}+          = object+              (catMaybes+                 [("uri" .=) <$> _gcdvimlosURI,+                  ("destinationName" .=) <$>+                    _gcdvimlosDestinationName])++-- | The request message for Agents.ImportAgent.+--+-- /See:/ 'googleCloudDialogflowV2ImportAgentRequest' smart constructor.+data GoogleCloudDialogflowV2ImportAgentRequest =+  GoogleCloudDialogflowV2ImportAgentRequest'+    { _gcdviarAgentURI     :: !(Maybe Text)+    , _gcdviarAgentContent :: !(Maybe Bytes)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2ImportAgentRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdviarAgentURI'+--+-- * 'gcdviarAgentContent'+googleCloudDialogflowV2ImportAgentRequest+    :: GoogleCloudDialogflowV2ImportAgentRequest+googleCloudDialogflowV2ImportAgentRequest =+  GoogleCloudDialogflowV2ImportAgentRequest'+    {_gcdviarAgentURI = Nothing, _gcdviarAgentContent = Nothing}+++-- | The URI to a Google Cloud Storage file containing the agent to import.+-- Note: The URI must start with \"gs:\/\/\".+gcdviarAgentURI :: Lens' GoogleCloudDialogflowV2ImportAgentRequest (Maybe Text)+gcdviarAgentURI+  = lens _gcdviarAgentURI+      (\ s a -> s{_gcdviarAgentURI = a})++-- | The agent to import. Example for how to import an agent via the command+-- line:+--+-- > curl \+-- >   'https://dialogflow.googleapis.com/v2/projects/<project_name>/agent:import\+-- >    -X POST \+-- >    -H 'Authorization: Bearer '$(gcloud auth application-default+-- >    print-access-token) \+-- >    -H 'Accept: application/json' \+-- >    -H 'Content-Type: application/json' \+-- >    --compressed \+-- >    --data-binary "{+-- >       'agentContent': '$(cat <agent zip file> | base64 -w 0)'+-- >    }"+gcdviarAgentContent :: Lens' GoogleCloudDialogflowV2ImportAgentRequest (Maybe ByteString)+gcdviarAgentContent+  = lens _gcdviarAgentContent+      (\ s a -> s{_gcdviarAgentContent = a})+      . mapping _Bytes++instance FromJSON+           GoogleCloudDialogflowV2ImportAgentRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2ImportAgentRequest"+              (\ o ->+                 GoogleCloudDialogflowV2ImportAgentRequest' <$>+                   (o .:? "agentUri") <*> (o .:? "agentContent"))++instance ToJSON+           GoogleCloudDialogflowV2ImportAgentRequest+         where+        toJSON GoogleCloudDialogflowV2ImportAgentRequest'{..}+          = object+              (catMaybes+                 [("agentUri" .=) <$> _gcdviarAgentURI,+                  ("agentContent" .=) <$> _gcdviarAgentContent])++--+-- /See:/ 'googleRpcStatusDetailsItem' smart constructor.+newtype GoogleRpcStatusDetailsItem =+  GoogleRpcStatusDetailsItem'+    { _grsdiAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleRpcStatusDetailsItem' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'grsdiAddtional'+googleRpcStatusDetailsItem+    :: HashMap Text JSONValue -- ^ 'grsdiAddtional'+    -> GoogleRpcStatusDetailsItem+googleRpcStatusDetailsItem pGrsdiAddtional_ =+  GoogleRpcStatusDetailsItem' {_grsdiAddtional = _Coerce # pGrsdiAddtional_}+++-- | Properties of the object. Contains field \'type with type URL.+grsdiAddtional :: Lens' GoogleRpcStatusDetailsItem (HashMap Text JSONValue)+grsdiAddtional+  = lens _grsdiAddtional+      (\ s a -> s{_grsdiAddtional = a})+      . _Coerce++instance FromJSON GoogleRpcStatusDetailsItem where+        parseJSON+          = withObject "GoogleRpcStatusDetailsItem"+              (\ o ->+                 GoogleRpcStatusDetailsItem' <$> (parseJSONObject o))++instance ToJSON GoogleRpcStatusDetailsItem where+        toJSON = toJSON . _grsdiAddtional++-- | The response message for EntityTypes.BatchUpdateEntityTypes.+--+-- /See:/ 'googleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse' smart constructor.+newtype GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse =+  GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse'+    { _gcdvbuetrEntityTypes :: Maybe [GoogleCloudDialogflowV2beta1EntityType]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvbuetrEntityTypes'+googleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse+    :: GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse+googleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse =+  GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse'+    {_gcdvbuetrEntityTypes = Nothing}+++-- | The collection of updated or created entity types.+gcdvbuetrEntityTypes :: Lens' GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse [GoogleCloudDialogflowV2beta1EntityType]+gcdvbuetrEntityTypes+  = lens _gcdvbuetrEntityTypes+      (\ s a -> s{_gcdvbuetrEntityTypes = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse"+              (\ o ->+                 GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse'+                   <$> (o .:? "entityTypes" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse+         where+        toJSON+          GoogleCloudDialogflowV2beta1BatchUpdateEntityTypesResponse'{..}+          = object+              (catMaybes+                 [("entityTypes" .=) <$> _gcdvbuetrEntityTypes])++-- | Optional. The collection of parameters associated with this context.+-- Refer to [this+-- doc](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/intents-actions-parameters)+-- for syntax.+--+-- /See:/ 'googleCloudDialogflowV2ContextParameters' smart constructor.+newtype GoogleCloudDialogflowV2ContextParameters =+  GoogleCloudDialogflowV2ContextParameters'+    { _gAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2ContextParameters' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gAddtional'+googleCloudDialogflowV2ContextParameters+    :: HashMap Text JSONValue -- ^ 'gAddtional'+    -> GoogleCloudDialogflowV2ContextParameters+googleCloudDialogflowV2ContextParameters pGAddtional_ =+  GoogleCloudDialogflowV2ContextParameters'+    {_gAddtional = _Coerce # pGAddtional_}+++-- | Properties of the object.+gAddtional :: Lens' GoogleCloudDialogflowV2ContextParameters (HashMap Text JSONValue)+gAddtional+  = lens _gAddtional (\ s a -> s{_gAddtional = a}) .+      _Coerce++instance FromJSON+           GoogleCloudDialogflowV2ContextParameters+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2ContextParameters"+              (\ o ->+                 GoogleCloudDialogflowV2ContextParameters' <$>+                   (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2ContextParameters+         where+        toJSON = toJSON . _gAddtional++-- | Optional. Contains information about a button.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageCardButton' smart constructor.+data GoogleCloudDialogflowV2IntentMessageCardButton =+  GoogleCloudDialogflowV2IntentMessageCardButton'+    { _gText     :: !(Maybe Text)+    , _gPostback :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageCardButton' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gText'+--+-- * 'gPostback'+googleCloudDialogflowV2IntentMessageCardButton+    :: GoogleCloudDialogflowV2IntentMessageCardButton+googleCloudDialogflowV2IntentMessageCardButton =+  GoogleCloudDialogflowV2IntentMessageCardButton'+    {_gText = Nothing, _gPostback = Nothing}+++-- | Optional. The text to show on the button.+gText :: Lens' GoogleCloudDialogflowV2IntentMessageCardButton (Maybe Text)+gText = lens _gText (\ s a -> s{_gText = a})++-- | Optional. The text to send back to the Dialogflow API or a URI to open.+gPostback :: Lens' GoogleCloudDialogflowV2IntentMessageCardButton (Maybe Text)+gPostback+  = lens _gPostback (\ s a -> s{_gPostback = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageCardButton+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageCardButton"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageCardButton' <$>+                   (o .:? "text") <*> (o .:? "postback"))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageCardButton+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageCardButton'{..}+          = object+              (catMaybes+                 [("text" .=) <$> _gText,+                  ("postback" .=) <$> _gPostback])++-- | The card for presenting a list of options to select from.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageListSelect' smart constructor.+data GoogleCloudDialogflowV2IntentMessageListSelect =+  GoogleCloudDialogflowV2IntentMessageListSelect'+    { _gooItems :: !(Maybe [GoogleCloudDialogflowV2IntentMessageListSelectItem])+    , _gooTitle :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageListSelect' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gooItems'+--+-- * 'gooTitle'+googleCloudDialogflowV2IntentMessageListSelect+    :: GoogleCloudDialogflowV2IntentMessageListSelect+googleCloudDialogflowV2IntentMessageListSelect =+  GoogleCloudDialogflowV2IntentMessageListSelect'+    {_gooItems = Nothing, _gooTitle = Nothing}+++-- | Required. List items.+gooItems :: Lens' GoogleCloudDialogflowV2IntentMessageListSelect [GoogleCloudDialogflowV2IntentMessageListSelectItem]+gooItems+  = lens _gooItems (\ s a -> s{_gooItems = a}) .+      _Default+      . _Coerce++-- | Optional. The overall title of the list.+gooTitle :: Lens' GoogleCloudDialogflowV2IntentMessageListSelect (Maybe Text)+gooTitle = lens _gooTitle (\ s a -> s{_gooTitle = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageListSelect+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageListSelect"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageListSelect' <$>+                   (o .:? "items" .!= mempty) <*> (o .:? "title"))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageListSelect+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageListSelect'{..}+          = object+              (catMaybes+                 [("items" .=) <$> _gooItems,+                  ("title" .=) <$> _gooTitle])++-- | The card response message.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageCard' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessageCard =+  GoogleCloudDialogflowV2beta1IntentMessageCard'+    { _gcdvimcButtons  :: !(Maybe [GoogleCloudDialogflowV2beta1IntentMessageCardButton])+    , _gcdvimcImageURI :: !(Maybe Text)+    , _gcdvimcSubtitle :: !(Maybe Text)+    , _gcdvimcTitle    :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageCard' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimcButtons'+--+-- * 'gcdvimcImageURI'+--+-- * 'gcdvimcSubtitle'+--+-- * 'gcdvimcTitle'+googleCloudDialogflowV2beta1IntentMessageCard+    :: GoogleCloudDialogflowV2beta1IntentMessageCard+googleCloudDialogflowV2beta1IntentMessageCard =+  GoogleCloudDialogflowV2beta1IntentMessageCard'+    { _gcdvimcButtons = Nothing+    , _gcdvimcImageURI = Nothing+    , _gcdvimcSubtitle = Nothing+    , _gcdvimcTitle = Nothing+    }+++-- | Optional. The collection of card buttons.+gcdvimcButtons :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCard [GoogleCloudDialogflowV2beta1IntentMessageCardButton]+gcdvimcButtons+  = lens _gcdvimcButtons+      (\ s a -> s{_gcdvimcButtons = a})+      . _Default+      . _Coerce++-- | Optional. The public URI to an image file for the card.+gcdvimcImageURI :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCard (Maybe Text)+gcdvimcImageURI+  = lens _gcdvimcImageURI+      (\ s a -> s{_gcdvimcImageURI = a})++-- | Optional. The subtitle of the card.+gcdvimcSubtitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCard (Maybe Text)+gcdvimcSubtitle+  = lens _gcdvimcSubtitle+      (\ s a -> s{_gcdvimcSubtitle = a})++-- | Optional. The title of the card.+gcdvimcTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCard (Maybe Text)+gcdvimcTitle+  = lens _gcdvimcTitle (\ s a -> s{_gcdvimcTitle = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageCard+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageCard"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageCard' <$>+                   (o .:? "buttons" .!= mempty) <*> (o .:? "imageUri")+                     <*> (o .:? "subtitle")+                     <*> (o .:? "title"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageCard+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageCard'{..}+          = object+              (catMaybes+                 [("buttons" .=) <$> _gcdvimcButtons,+                  ("imageUri" .=) <$> _gcdvimcImageURI,+                  ("subtitle" .=) <$> _gcdvimcSubtitle,+                  ("title" .=) <$> _gcdvimcTitle])++-- | The request message for Agents.RestoreAgent.+--+-- /See:/ 'googleCloudDialogflowV2RestoreAgentRequest' smart constructor.+data GoogleCloudDialogflowV2RestoreAgentRequest =+  GoogleCloudDialogflowV2RestoreAgentRequest'+    { _gcdvrarAgentURI     :: !(Maybe Text)+    , _gcdvrarAgentContent :: !(Maybe Bytes)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2RestoreAgentRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvrarAgentURI'+--+-- * 'gcdvrarAgentContent'+googleCloudDialogflowV2RestoreAgentRequest+    :: GoogleCloudDialogflowV2RestoreAgentRequest+googleCloudDialogflowV2RestoreAgentRequest =+  GoogleCloudDialogflowV2RestoreAgentRequest'+    {_gcdvrarAgentURI = Nothing, _gcdvrarAgentContent = Nothing}+++-- | The URI to a Google Cloud Storage file containing the agent to restore.+-- Note: The URI must start with \"gs:\/\/\".+gcdvrarAgentURI :: Lens' GoogleCloudDialogflowV2RestoreAgentRequest (Maybe Text)+gcdvrarAgentURI+  = lens _gcdvrarAgentURI+      (\ s a -> s{_gcdvrarAgentURI = a})++-- | The agent to restore. Example for how to restore an agent via the+-- command line:+--+-- > curl \+-- >   'https://dialogflow.googleapis.com/v2/projects/<project_name>/agent:restore\+-- >    -X POST \+-- >    -H 'Authorization: Bearer '$(gcloud auth application-default+-- >    print-access-token) \+-- >    -H 'Accept: application/json' \+-- >    -H 'Content-Type: application/json' \+-- >    --compressed \+-- >    --data-binary "{+-- >        'agentContent': '$(cat <agent zip file> | base64 -w 0)'+-- >    }"+gcdvrarAgentContent :: Lens' GoogleCloudDialogflowV2RestoreAgentRequest (Maybe ByteString)+gcdvrarAgentContent+  = lens _gcdvrarAgentContent+      (\ s a -> s{_gcdvrarAgentContent = a})+      . mapping _Bytes++instance FromJSON+           GoogleCloudDialogflowV2RestoreAgentRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2RestoreAgentRequest"+              (\ o ->+                 GoogleCloudDialogflowV2RestoreAgentRequest' <$>+                   (o .:? "agentUri") <*> (o .:? "agentContent"))++instance ToJSON+           GoogleCloudDialogflowV2RestoreAgentRequest+         where+        toJSON+          GoogleCloudDialogflowV2RestoreAgentRequest'{..}+          = object+              (catMaybes+                 [("agentUri" .=) <$> _gcdvrarAgentURI,+                  ("agentContent" .=) <$> _gcdvrarAgentContent])++-- | The collection of suggestions.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageSuggestions' smart constructor.+newtype GoogleCloudDialogflowV2IntentMessageSuggestions =+  GoogleCloudDialogflowV2IntentMessageSuggestions'+    { _gSuggestions :: Maybe [GoogleCloudDialogflowV2IntentMessageSuggestion]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageSuggestions' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gSuggestions'+googleCloudDialogflowV2IntentMessageSuggestions+    :: GoogleCloudDialogflowV2IntentMessageSuggestions+googleCloudDialogflowV2IntentMessageSuggestions =+  GoogleCloudDialogflowV2IntentMessageSuggestions' {_gSuggestions = Nothing}+++-- | Required. The list of suggested replies.+gSuggestions :: Lens' GoogleCloudDialogflowV2IntentMessageSuggestions [GoogleCloudDialogflowV2IntentMessageSuggestion]+gSuggestions+  = lens _gSuggestions (\ s a -> s{_gSuggestions = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageSuggestions+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageSuggestions"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageSuggestions' <$>+                   (o .:? "suggestions" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageSuggestions+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageSuggestions'{..}+          = object+              (catMaybes [("suggestions" .=) <$> _gSuggestions])++-- | Opens the given URI.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction' smart constructor.+newtype GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction =+  GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction'+    { _gcdvimbcbouaURI :: Maybe Text+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimbcbouaURI'+googleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction+    :: GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction+googleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction =+  GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction'+    {_gcdvimbcbouaURI = Nothing}+++-- | Required. The HTTP or HTTPS scheme URI.+gcdvimbcbouaURI :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction (Maybe Text)+gcdvimbcbouaURI+  = lens _gcdvimbcbouaURI+      (\ s a -> s{_gcdvimbcbouaURI = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction'+                   <$> (o .:? "uri"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageBasicCardButtonOpenURIAction'{..}+          = object+              (catMaybes [("uri" .=) <$> _gcdvimbcbouaURI])++-- | Represents the parameters of the conversational query.+--+-- /See:/ 'googleCloudDialogflowV2QueryParameters' smart constructor.+data GoogleCloudDialogflowV2QueryParameters =+  GoogleCloudDialogflowV2QueryParameters'+    { _gcdvqpContexts                       :: !(Maybe [GoogleCloudDialogflowV2Context])+    , _gcdvqpSentimentAnalysisRequestConfig :: !(Maybe GoogleCloudDialogflowV2SentimentAnalysisRequestConfig)+    , _gcdvqpPayload                        :: !(Maybe GoogleCloudDialogflowV2QueryParametersPayload)+    , _gcdvqpGeoLocation                    :: !(Maybe GoogleTypeLatLng)+    , _gcdvqpTimeZone                       :: !(Maybe Text)+    , _gcdvqpSessionEntityTypes             :: !(Maybe [GoogleCloudDialogflowV2SessionEntityType])+    , _gcdvqpResetContexts                  :: !(Maybe Bool)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2QueryParameters' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvqpContexts'+--+-- * 'gcdvqpSentimentAnalysisRequestConfig'+--+-- * 'gcdvqpPayload'+--+-- * 'gcdvqpGeoLocation'+--+-- * 'gcdvqpTimeZone'+--+-- * 'gcdvqpSessionEntityTypes'+--+-- * 'gcdvqpResetContexts'+googleCloudDialogflowV2QueryParameters+    :: GoogleCloudDialogflowV2QueryParameters+googleCloudDialogflowV2QueryParameters =+  GoogleCloudDialogflowV2QueryParameters'+    { _gcdvqpContexts = Nothing+    , _gcdvqpSentimentAnalysisRequestConfig = Nothing+    , _gcdvqpPayload = Nothing+    , _gcdvqpGeoLocation = Nothing+    , _gcdvqpTimeZone = Nothing+    , _gcdvqpSessionEntityTypes = Nothing+    , _gcdvqpResetContexts = Nothing+    }+++-- | Optional. The collection of contexts to be activated before this query+-- is executed.+gcdvqpContexts :: Lens' GoogleCloudDialogflowV2QueryParameters [GoogleCloudDialogflowV2Context]+gcdvqpContexts+  = lens _gcdvqpContexts+      (\ s a -> s{_gcdvqpContexts = a})+      . _Default+      . _Coerce++-- | Optional. Configures the type of sentiment analysis to perform. If not+-- provided, sentiment analysis is not performed.+gcdvqpSentimentAnalysisRequestConfig :: Lens' GoogleCloudDialogflowV2QueryParameters (Maybe GoogleCloudDialogflowV2SentimentAnalysisRequestConfig)+gcdvqpSentimentAnalysisRequestConfig+  = lens _gcdvqpSentimentAnalysisRequestConfig+      (\ s a ->+         s{_gcdvqpSentimentAnalysisRequestConfig = a})++-- | Optional. This field can be used to pass custom data into the webhook+-- associated with the agent. Arbitrary JSON objects are supported.+gcdvqpPayload :: Lens' GoogleCloudDialogflowV2QueryParameters (Maybe GoogleCloudDialogflowV2QueryParametersPayload)+gcdvqpPayload+  = lens _gcdvqpPayload+      (\ s a -> s{_gcdvqpPayload = a})++-- | Optional. The geo location of this conversational query.+gcdvqpGeoLocation :: Lens' GoogleCloudDialogflowV2QueryParameters (Maybe GoogleTypeLatLng)+gcdvqpGeoLocation+  = lens _gcdvqpGeoLocation+      (\ s a -> s{_gcdvqpGeoLocation = a})++-- | Optional. The time zone of this conversational query from the [time zone+-- database](https:\/\/www.iana.org\/time-zones), e.g., America\/New_York,+-- Europe\/Paris. If not provided, the time zone specified in agent+-- settings is used.+gcdvqpTimeZone :: Lens' GoogleCloudDialogflowV2QueryParameters (Maybe Text)+gcdvqpTimeZone+  = lens _gcdvqpTimeZone+      (\ s a -> s{_gcdvqpTimeZone = a})++-- | Optional. Additional session entity types to replace or extend developer+-- entity types with. The entity synonyms apply to all languages and+-- persist for the session of this query.+gcdvqpSessionEntityTypes :: Lens' GoogleCloudDialogflowV2QueryParameters [GoogleCloudDialogflowV2SessionEntityType]+gcdvqpSessionEntityTypes+  = lens _gcdvqpSessionEntityTypes+      (\ s a -> s{_gcdvqpSessionEntityTypes = a})+      . _Default+      . _Coerce++-- | Optional. Specifies whether to delete all contexts in the current+-- session before the new ones are activated.+gcdvqpResetContexts :: Lens' GoogleCloudDialogflowV2QueryParameters (Maybe Bool)+gcdvqpResetContexts+  = lens _gcdvqpResetContexts+      (\ s a -> s{_gcdvqpResetContexts = a})++instance FromJSON+           GoogleCloudDialogflowV2QueryParameters+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2QueryParameters"+              (\ o ->+                 GoogleCloudDialogflowV2QueryParameters' <$>+                   (o .:? "contexts" .!= mempty) <*>+                     (o .:? "sentimentAnalysisRequestConfig")+                     <*> (o .:? "payload")+                     <*> (o .:? "geoLocation")+                     <*> (o .:? "timeZone")+                     <*> (o .:? "sessionEntityTypes" .!= mempty)+                     <*> (o .:? "resetContexts"))++instance ToJSON+           GoogleCloudDialogflowV2QueryParameters+         where+        toJSON GoogleCloudDialogflowV2QueryParameters'{..}+          = object+              (catMaybes+                 [("contexts" .=) <$> _gcdvqpContexts,+                  ("sentimentAnalysisRequestConfig" .=) <$>+                    _gcdvqpSentimentAnalysisRequestConfig,+                  ("payload" .=) <$> _gcdvqpPayload,+                  ("geoLocation" .=) <$> _gcdvqpGeoLocation,+                  ("timeZone" .=) <$> _gcdvqpTimeZone,+                  ("sessionEntityTypes" .=) <$>+                    _gcdvqpSessionEntityTypes,+                  ("resetContexts" .=) <$> _gcdvqpResetContexts])++-- | The suggestion chip message that the user can tap to quickly post a+-- reply to the conversation.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageSuggestion' smart constructor.+newtype GoogleCloudDialogflowV2beta1IntentMessageSuggestion =+  GoogleCloudDialogflowV2beta1IntentMessageSuggestion'+    { _gcdvimsTitle :: Maybe Text+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageSuggestion' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimsTitle'+googleCloudDialogflowV2beta1IntentMessageSuggestion+    :: GoogleCloudDialogflowV2beta1IntentMessageSuggestion+googleCloudDialogflowV2beta1IntentMessageSuggestion =+  GoogleCloudDialogflowV2beta1IntentMessageSuggestion' {_gcdvimsTitle = Nothing}+++-- | Required. The text shown the in the suggestion chip.+gcdvimsTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSuggestion (Maybe Text)+gcdvimsTitle+  = lens _gcdvimsTitle (\ s a -> s{_gcdvimsTitle = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageSuggestion+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageSuggestion"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageSuggestion'+                   <$> (o .:? "title"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageSuggestion+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageSuggestion'{..}+          = object (catMaybes [("title" .=) <$> _gcdvimsTitle])++-- | Represents the contents of the original request that was passed to the+-- \`[Streaming]DetectIntent\` call.+--+-- /See:/ 'googleCloudDialogflowV2beta1OriginalDetectIntentRequest' smart constructor.+data GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest =+  GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest'+    { _gcdvodirPayload :: !(Maybe GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload)+    , _gcdvodirVersion :: !(Maybe Text)+    , _gcdvodirSource  :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvodirPayload'+--+-- * 'gcdvodirVersion'+--+-- * 'gcdvodirSource'+googleCloudDialogflowV2beta1OriginalDetectIntentRequest+    :: GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest+googleCloudDialogflowV2beta1OriginalDetectIntentRequest =+  GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest'+    { _gcdvodirPayload = Nothing+    , _gcdvodirVersion = Nothing+    , _gcdvodirSource = Nothing+    }+++-- | Optional. This field is set to the value of the+-- \`QueryParameters.payload\` field passed in the request. Some+-- integrations that query a Dialogflow agent may provide additional+-- information in the payload. In particular for the Telephony Gateway this+-- field has the form:+--+-- > {+-- >  "telephony": {+-- >    "caller_id": "+18558363987"+-- >  }+-- > }+--+-- Note: The caller ID field (\`caller_id\`) will be redacted for Standard+-- Edition agents and populated with the caller ID in [E.164+-- format](https:\/\/en.wikipedia.org\/wiki\/E.164) for Enterprise Edition+-- agents.+gcdvodirPayload :: Lens' GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest (Maybe GoogleCloudDialogflowV2beta1OriginalDetectIntentRequestPayload)+gcdvodirPayload+  = lens _gcdvodirPayload+      (\ s a -> s{_gcdvodirPayload = a})++-- | Optional. The version of the protocol used for this request. This field+-- is AoG-specific.+gcdvodirVersion :: Lens' GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest (Maybe Text)+gcdvodirVersion+  = lens _gcdvodirVersion+      (\ s a -> s{_gcdvodirVersion = a})++-- | The source of this request, e.g., \`google\`, \`facebook\`, \`slack\`.+-- It is set by Dialogflow-owned servers.+gcdvodirSource :: Lens' GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest (Maybe Text)+gcdvodirSource+  = lens _gcdvodirSource+      (\ s a -> s{_gcdvodirSource = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest"+              (\ o ->+                 GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest'+                   <$>+                   (o .:? "payload") <*> (o .:? "version") <*>+                     (o .:? "source"))++instance ToJSON+           GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest+         where+        toJSON+          GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest'{..}+          = object+              (catMaybes+                 [("payload" .=) <$> _gcdvodirPayload,+                  ("version" .=) <$> _gcdvodirVersion,+                  ("source" .=) <$> _gcdvodirSource])++-- | Optional. The collection of parameters associated with the event.+--+-- /See:/ 'googleCloudDialogflowV2EventInputParameters' smart constructor.+newtype GoogleCloudDialogflowV2EventInputParameters =+  GoogleCloudDialogflowV2EventInputParameters'+    { _gcdveipsAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2EventInputParameters' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdveipsAddtional'+googleCloudDialogflowV2EventInputParameters+    :: HashMap Text JSONValue -- ^ 'gcdveipsAddtional'+    -> GoogleCloudDialogflowV2EventInputParameters+googleCloudDialogflowV2EventInputParameters pGcdveipsAddtional_ =+  GoogleCloudDialogflowV2EventInputParameters'+    {_gcdveipsAddtional = _Coerce # pGcdveipsAddtional_}+++-- | Properties of the object.+gcdveipsAddtional :: Lens' GoogleCloudDialogflowV2EventInputParameters (HashMap Text JSONValue)+gcdveipsAddtional+  = lens _gcdveipsAddtional+      (\ s a -> s{_gcdveipsAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2EventInputParameters+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2EventInputParameters"+              (\ o ->+                 GoogleCloudDialogflowV2EventInputParameters' <$>+                   (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2EventInputParameters+         where+        toJSON = toJSON . _gcdveipsAddtional++-- | The message returned from the DetectIntent method.+--+-- /See:/ 'googleCloudDialogflowV2DetectIntentResponse' smart constructor.+data GoogleCloudDialogflowV2DetectIntentResponse =+  GoogleCloudDialogflowV2DetectIntentResponse'+    { _gcdvdirOutputAudioConfig :: !(Maybe GoogleCloudDialogflowV2OutputAudioConfig)+    , _gcdvdirResponseId        :: !(Maybe Text)+    , _gcdvdirOutputAudio       :: !(Maybe Bytes)+    , _gcdvdirWebhookStatus     :: !(Maybe GoogleRpcStatus)+    , _gcdvdirQueryResult       :: !(Maybe GoogleCloudDialogflowV2QueryResult)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2DetectIntentResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvdirOutputAudioConfig'+--+-- * 'gcdvdirResponseId'+--+-- * 'gcdvdirOutputAudio'+--+-- * 'gcdvdirWebhookStatus'+--+-- * 'gcdvdirQueryResult'+googleCloudDialogflowV2DetectIntentResponse+    :: GoogleCloudDialogflowV2DetectIntentResponse+googleCloudDialogflowV2DetectIntentResponse =+  GoogleCloudDialogflowV2DetectIntentResponse'+    { _gcdvdirOutputAudioConfig = Nothing+    , _gcdvdirResponseId = Nothing+    , _gcdvdirOutputAudio = Nothing+    , _gcdvdirWebhookStatus = Nothing+    , _gcdvdirQueryResult = Nothing+    }+++-- | The config used by the speech synthesizer to generate the output audio.+gcdvdirOutputAudioConfig :: Lens' GoogleCloudDialogflowV2DetectIntentResponse (Maybe GoogleCloudDialogflowV2OutputAudioConfig)+gcdvdirOutputAudioConfig+  = lens _gcdvdirOutputAudioConfig+      (\ s a -> s{_gcdvdirOutputAudioConfig = a})++-- | The unique identifier of the response. It can be used to locate a+-- response in the training example set or for reporting issues.+gcdvdirResponseId :: Lens' GoogleCloudDialogflowV2DetectIntentResponse (Maybe Text)+gcdvdirResponseId+  = lens _gcdvdirResponseId+      (\ s a -> s{_gcdvdirResponseId = a})++-- | The audio data bytes encoded as specified in the request. Note: The+-- output audio is generated based on the values of default platform text+-- responses found in the \`query_result.fulfillment_messages\` field. If+-- multiple default text responses exist, they will be concatenated when+-- generating audio. If no default platform text responses exist, the+-- generated audio content will be empty.+gcdvdirOutputAudio :: Lens' GoogleCloudDialogflowV2DetectIntentResponse (Maybe ByteString)+gcdvdirOutputAudio+  = lens _gcdvdirOutputAudio+      (\ s a -> s{_gcdvdirOutputAudio = a})+      . mapping _Bytes++-- | Specifies the status of the webhook request.+gcdvdirWebhookStatus :: Lens' GoogleCloudDialogflowV2DetectIntentResponse (Maybe GoogleRpcStatus)+gcdvdirWebhookStatus+  = lens _gcdvdirWebhookStatus+      (\ s a -> s{_gcdvdirWebhookStatus = a})++-- | The selected results of the conversational query or event processing.+-- See \`alternative_query_results\` for additional potential results.+gcdvdirQueryResult :: Lens' GoogleCloudDialogflowV2DetectIntentResponse (Maybe GoogleCloudDialogflowV2QueryResult)+gcdvdirQueryResult+  = lens _gcdvdirQueryResult+      (\ s a -> s{_gcdvdirQueryResult = a})++instance FromJSON+           GoogleCloudDialogflowV2DetectIntentResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2DetectIntentResponse"+              (\ o ->+                 GoogleCloudDialogflowV2DetectIntentResponse' <$>+                   (o .:? "outputAudioConfig") <*> (o .:? "responseId")+                     <*> (o .:? "outputAudio")+                     <*> (o .:? "webhookStatus")+                     <*> (o .:? "queryResult"))++instance ToJSON+           GoogleCloudDialogflowV2DetectIntentResponse+         where+        toJSON+          GoogleCloudDialogflowV2DetectIntentResponse'{..}+          = object+              (catMaybes+                 [("outputAudioConfig" .=) <$>+                    _gcdvdirOutputAudioConfig,+                  ("responseId" .=) <$> _gcdvdirResponseId,+                  ("outputAudio" .=) <$> _gcdvdirOutputAudio,+                  ("webhookStatus" .=) <$> _gcdvdirWebhookStatus,+                  ("queryResult" .=) <$> _gcdvdirQueryResult])++-- | An item in the list.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageListSelectItem' smart constructor.+data GoogleCloudDialogflowV2IntentMessageListSelectItem =+  GoogleCloudDialogflowV2IntentMessageListSelectItem'+    { _gcdvimlsiImage       :: !(Maybe GoogleCloudDialogflowV2IntentMessageImage)+    , _gcdvimlsiTitle       :: !(Maybe Text)+    , _gcdvimlsiDescription :: !(Maybe Text)+    , _gcdvimlsiInfo        :: !(Maybe GoogleCloudDialogflowV2IntentMessageSelectItemInfo)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageListSelectItem' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimlsiImage'+--+-- * 'gcdvimlsiTitle'+--+-- * 'gcdvimlsiDescription'+--+-- * 'gcdvimlsiInfo'+googleCloudDialogflowV2IntentMessageListSelectItem+    :: GoogleCloudDialogflowV2IntentMessageListSelectItem+googleCloudDialogflowV2IntentMessageListSelectItem =+  GoogleCloudDialogflowV2IntentMessageListSelectItem'+    { _gcdvimlsiImage = Nothing+    , _gcdvimlsiTitle = Nothing+    , _gcdvimlsiDescription = Nothing+    , _gcdvimlsiInfo = Nothing+    }+++-- | Optional. The image to display.+gcdvimlsiImage :: Lens' GoogleCloudDialogflowV2IntentMessageListSelectItem (Maybe GoogleCloudDialogflowV2IntentMessageImage)+gcdvimlsiImage+  = lens _gcdvimlsiImage+      (\ s a -> s{_gcdvimlsiImage = a})++-- | Required. The title of the list item.+gcdvimlsiTitle :: Lens' GoogleCloudDialogflowV2IntentMessageListSelectItem (Maybe Text)+gcdvimlsiTitle+  = lens _gcdvimlsiTitle+      (\ s a -> s{_gcdvimlsiTitle = a})++-- | Optional. The main text describing the item.+gcdvimlsiDescription :: Lens' GoogleCloudDialogflowV2IntentMessageListSelectItem (Maybe Text)+gcdvimlsiDescription+  = lens _gcdvimlsiDescription+      (\ s a -> s{_gcdvimlsiDescription = a})++-- | Required. Additional information about this option.+gcdvimlsiInfo :: Lens' GoogleCloudDialogflowV2IntentMessageListSelectItem (Maybe GoogleCloudDialogflowV2IntentMessageSelectItemInfo)+gcdvimlsiInfo+  = lens _gcdvimlsiInfo+      (\ s a -> s{_gcdvimlsiInfo = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageListSelectItem+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageListSelectItem"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageListSelectItem'+                   <$>+                   (o .:? "image") <*> (o .:? "title") <*>+                     (o .:? "description")+                     <*> (o .:? "info"))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageListSelectItem+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageListSelectItem'{..}+          = object+              (catMaybes+                 [("image" .=) <$> _gcdvimlsiImage,+                  ("title" .=) <$> _gcdvimlsiTitle,+                  ("description" .=) <$> _gcdvimlsiDescription,+                  ("info" .=) <$> _gcdvimlsiInfo])++-- | The result of sentiment analysis as configured by+-- \`sentiment_analysis_request_config\`.+--+-- /See:/ 'googleCloudDialogflowV2beta1SentimentAnalysisResult' smart constructor.+newtype GoogleCloudDialogflowV2beta1SentimentAnalysisResult =+  GoogleCloudDialogflowV2beta1SentimentAnalysisResult'+    { _gQueryTextSentiment :: Maybe GoogleCloudDialogflowV2beta1Sentiment+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1SentimentAnalysisResult' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gQueryTextSentiment'+googleCloudDialogflowV2beta1SentimentAnalysisResult+    :: GoogleCloudDialogflowV2beta1SentimentAnalysisResult+googleCloudDialogflowV2beta1SentimentAnalysisResult =+  GoogleCloudDialogflowV2beta1SentimentAnalysisResult'+    {_gQueryTextSentiment = Nothing}+++-- | The sentiment analysis result for \`query_text\`.+gQueryTextSentiment :: Lens' GoogleCloudDialogflowV2beta1SentimentAnalysisResult (Maybe GoogleCloudDialogflowV2beta1Sentiment)+gQueryTextSentiment+  = lens _gQueryTextSentiment+      (\ s a -> s{_gQueryTextSentiment = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1SentimentAnalysisResult+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1SentimentAnalysisResult"+              (\ o ->+                 GoogleCloudDialogflowV2beta1SentimentAnalysisResult'+                   <$> (o .:? "queryTextSentiment"))++instance ToJSON+           GoogleCloudDialogflowV2beta1SentimentAnalysisResult+         where+        toJSON+          GoogleCloudDialogflowV2beta1SentimentAnalysisResult'{..}+          = object+              (catMaybes+                 [("queryTextSentiment" .=) <$> _gQueryTextSentiment])++-- | This message is a wrapper around a collection of entity types.+--+-- /See:/ 'googleCloudDialogflowV2EntityTypeBatch' smart constructor.+newtype GoogleCloudDialogflowV2EntityTypeBatch =+  GoogleCloudDialogflowV2EntityTypeBatch'+    { _gcdvetbEntityTypes :: Maybe [GoogleCloudDialogflowV2EntityType]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2EntityTypeBatch' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvetbEntityTypes'+googleCloudDialogflowV2EntityTypeBatch+    :: GoogleCloudDialogflowV2EntityTypeBatch+googleCloudDialogflowV2EntityTypeBatch =+  GoogleCloudDialogflowV2EntityTypeBatch' {_gcdvetbEntityTypes = Nothing}+++-- | A collection of entity types.+gcdvetbEntityTypes :: Lens' GoogleCloudDialogflowV2EntityTypeBatch [GoogleCloudDialogflowV2EntityType]+gcdvetbEntityTypes+  = lens _gcdvetbEntityTypes+      (\ s a -> s{_gcdvetbEntityTypes = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2EntityTypeBatch+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2EntityTypeBatch"+              (\ o ->+                 GoogleCloudDialogflowV2EntityTypeBatch' <$>+                   (o .:? "entityTypes" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2EntityTypeBatch+         where+        toJSON GoogleCloudDialogflowV2EntityTypeBatch'{..}+          = object+              (catMaybes+                 [("entityTypes" .=) <$> _gcdvetbEntityTypes])++-- | Description of which voice to use for speech synthesis.+--+-- /See:/ 'googleCloudDialogflowV2VoiceSelectionParams' smart constructor.+data GoogleCloudDialogflowV2VoiceSelectionParams =+  GoogleCloudDialogflowV2VoiceSelectionParams'+    { _gcdvvspSsmlGender :: !(Maybe GoogleCloudDialogflowV2VoiceSelectionParamsSsmlGender)+    , _gcdvvspName       :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2VoiceSelectionParams' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvvspSsmlGender'+--+-- * 'gcdvvspName'+googleCloudDialogflowV2VoiceSelectionParams+    :: GoogleCloudDialogflowV2VoiceSelectionParams+googleCloudDialogflowV2VoiceSelectionParams =+  GoogleCloudDialogflowV2VoiceSelectionParams'+    {_gcdvvspSsmlGender = Nothing, _gcdvvspName = Nothing}+++-- | Optional. The preferred gender of the voice. If not set, the service+-- will choose a voice based on the other parameters such as language_code+-- and name. Note that this is only a preference, not requirement. If a+-- voice of the appropriate gender is not available, the synthesizer should+-- substitute a voice with a different gender rather than failing the+-- request.+gcdvvspSsmlGender :: Lens' GoogleCloudDialogflowV2VoiceSelectionParams (Maybe GoogleCloudDialogflowV2VoiceSelectionParamsSsmlGender)+gcdvvspSsmlGender+  = lens _gcdvvspSsmlGender+      (\ s a -> s{_gcdvvspSsmlGender = a})++-- | Optional. The name of the voice. If not set, the service will choose a+-- voice based on the other parameters such as language_code and gender.+gcdvvspName :: Lens' GoogleCloudDialogflowV2VoiceSelectionParams (Maybe Text)+gcdvvspName+  = lens _gcdvvspName (\ s a -> s{_gcdvvspName = a})++instance FromJSON+           GoogleCloudDialogflowV2VoiceSelectionParams+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2VoiceSelectionParams"+              (\ o ->+                 GoogleCloudDialogflowV2VoiceSelectionParams' <$>+                   (o .:? "ssmlGender") <*> (o .:? "name"))++instance ToJSON+           GoogleCloudDialogflowV2VoiceSelectionParams+         where+        toJSON+          GoogleCloudDialogflowV2VoiceSelectionParams'{..}+          = object+              (catMaybes+                 [("ssmlGender" .=) <$> _gcdvvspSsmlGender,+                  ("name" .=) <$> _gcdvvspName])++-- | The free-form diagnostic info. For example, this field could contain+-- webhook call latency. The string keys of the Struct\'s fields map can+-- change without notice.+--+-- /See:/ 'googleCloudDialogflowV2QueryResultDiagnosticInfo' smart constructor.+newtype GoogleCloudDialogflowV2QueryResultDiagnosticInfo =+  GoogleCloudDialogflowV2QueryResultDiagnosticInfo'+    { _gcdvqrdiAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2QueryResultDiagnosticInfo' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvqrdiAddtional'+googleCloudDialogflowV2QueryResultDiagnosticInfo+    :: HashMap Text JSONValue -- ^ 'gcdvqrdiAddtional'+    -> GoogleCloudDialogflowV2QueryResultDiagnosticInfo+googleCloudDialogflowV2QueryResultDiagnosticInfo pGcdvqrdiAddtional_ =+  GoogleCloudDialogflowV2QueryResultDiagnosticInfo'+    {_gcdvqrdiAddtional = _Coerce # pGcdvqrdiAddtional_}+++-- | Properties of the object.+gcdvqrdiAddtional :: Lens' GoogleCloudDialogflowV2QueryResultDiagnosticInfo (HashMap Text JSONValue)+gcdvqrdiAddtional+  = lens _gcdvqrdiAddtional+      (\ s a -> s{_gcdvqrdiAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2QueryResultDiagnosticInfo+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2QueryResultDiagnosticInfo"+              (\ o ->+                 GoogleCloudDialogflowV2QueryResultDiagnosticInfo' <$>+                   (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2QueryResultDiagnosticInfo+         where+        toJSON = toJSON . _gcdvqrdiAddtional++-- | The text response message.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageText' smart constructor.+newtype GoogleCloudDialogflowV2IntentMessageText =+  GoogleCloudDialogflowV2IntentMessageText'+    { _gcdvimtText :: Maybe [Text]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageText' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimtText'+googleCloudDialogflowV2IntentMessageText+    :: GoogleCloudDialogflowV2IntentMessageText+googleCloudDialogflowV2IntentMessageText =+  GoogleCloudDialogflowV2IntentMessageText' {_gcdvimtText = Nothing}+++-- | Optional. The collection of the agent\'s responses.+gcdvimtText :: Lens' GoogleCloudDialogflowV2IntentMessageText [Text]+gcdvimtText+  = lens _gcdvimtText (\ s a -> s{_gcdvimtText = a}) .+      _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageText+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageText"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageText' <$>+                   (o .:? "text" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageText+         where+        toJSON GoogleCloudDialogflowV2IntentMessageText'{..}+          = object (catMaybes [("text" .=) <$> _gcdvimtText])++-- | The request to detect user\'s intent.+--+-- /See:/ 'googleCloudDialogflowV2DetectIntentRequest' smart constructor.+data GoogleCloudDialogflowV2DetectIntentRequest =+  GoogleCloudDialogflowV2DetectIntentRequest'+    { _gQueryInput        :: !(Maybe GoogleCloudDialogflowV2QueryInput)+    , _gOutputAudioConfig :: !(Maybe GoogleCloudDialogflowV2OutputAudioConfig)+    , _gInputAudio        :: !(Maybe Bytes)+    , _gQueryParams       :: !(Maybe GoogleCloudDialogflowV2QueryParameters)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2DetectIntentRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gQueryInput'+--+-- * 'gOutputAudioConfig'+--+-- * 'gInputAudio'+--+-- * 'gQueryParams'+googleCloudDialogflowV2DetectIntentRequest+    :: GoogleCloudDialogflowV2DetectIntentRequest+googleCloudDialogflowV2DetectIntentRequest =+  GoogleCloudDialogflowV2DetectIntentRequest'+    { _gQueryInput = Nothing+    , _gOutputAudioConfig = Nothing+    , _gInputAudio = Nothing+    , _gQueryParams = Nothing+    }+++-- | Required. The input specification. It can be set to: 1. an audio config+-- which instructs the speech recognizer how to process the speech audio,+-- 2. a conversational query in the form of text, or 3. an event that+-- specifies which intent to trigger.+gQueryInput :: Lens' GoogleCloudDialogflowV2DetectIntentRequest (Maybe GoogleCloudDialogflowV2QueryInput)+gQueryInput+  = lens _gQueryInput (\ s a -> s{_gQueryInput = a})++-- | Optional. Instructs the speech synthesizer how to generate the output+-- audio. If this field is not set and agent-level speech synthesizer is+-- not configured, no output audio is generated.+gOutputAudioConfig :: Lens' GoogleCloudDialogflowV2DetectIntentRequest (Maybe GoogleCloudDialogflowV2OutputAudioConfig)+gOutputAudioConfig+  = lens _gOutputAudioConfig+      (\ s a -> s{_gOutputAudioConfig = a})++-- | Optional. The natural language speech audio to be processed. This field+-- should be populated iff \`query_input\` is set to an input audio config.+-- A single request can contain up to 1 minute of speech audio data.+gInputAudio :: Lens' GoogleCloudDialogflowV2DetectIntentRequest (Maybe ByteString)+gInputAudio+  = lens _gInputAudio (\ s a -> s{_gInputAudio = a}) .+      mapping _Bytes++-- | Optional. The parameters of this query.+gQueryParams :: Lens' GoogleCloudDialogflowV2DetectIntentRequest (Maybe GoogleCloudDialogflowV2QueryParameters)+gQueryParams+  = lens _gQueryParams (\ s a -> s{_gQueryParams = a})++instance FromJSON+           GoogleCloudDialogflowV2DetectIntentRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2DetectIntentRequest"+              (\ o ->+                 GoogleCloudDialogflowV2DetectIntentRequest' <$>+                   (o .:? "queryInput") <*> (o .:? "outputAudioConfig")+                     <*> (o .:? "inputAudio")+                     <*> (o .:? "queryParams"))++instance ToJSON+           GoogleCloudDialogflowV2DetectIntentRequest+         where+        toJSON+          GoogleCloudDialogflowV2DetectIntentRequest'{..}+          = object+              (catMaybes+                 [("queryInput" .=) <$> _gQueryInput,+                  ("outputAudioConfig" .=) <$> _gOutputAudioConfig,+                  ("inputAudio" .=) <$> _gInputAudio,+                  ("queryParams" .=) <$> _gQueryParams])++-- | The collection of extracted parameters.+--+-- /See:/ 'googleCloudDialogflowV2beta1QueryResultParameters' smart constructor.+newtype GoogleCloudDialogflowV2beta1QueryResultParameters =+  GoogleCloudDialogflowV2beta1QueryResultParameters'+    { _gcdvqrpAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1QueryResultParameters' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvqrpAddtional'+googleCloudDialogflowV2beta1QueryResultParameters+    :: HashMap Text JSONValue -- ^ 'gcdvqrpAddtional'+    -> GoogleCloudDialogflowV2beta1QueryResultParameters+googleCloudDialogflowV2beta1QueryResultParameters pGcdvqrpAddtional_ =+  GoogleCloudDialogflowV2beta1QueryResultParameters'+    {_gcdvqrpAddtional = _Coerce # pGcdvqrpAddtional_}+++-- | Properties of the object.+gcdvqrpAddtional :: Lens' GoogleCloudDialogflowV2beta1QueryResultParameters (HashMap Text JSONValue)+gcdvqrpAddtional+  = lens _gcdvqrpAddtional+      (\ s a -> s{_gcdvqrpAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1QueryResultParameters+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1QueryResultParameters"+              (\ o ->+                 GoogleCloudDialogflowV2beta1QueryResultParameters'+                   <$> (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2beta1QueryResultParameters+         where+        toJSON = toJSON . _gcdvqrpAddtional++-- | The basic card message. Useful for displaying information.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageBasicCard' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessageBasicCard =+  GoogleCloudDialogflowV2beta1IntentMessageBasicCard'+    { _gcdvimbccImage         :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)+    , _gcdvimbccButtons       :: !(Maybe [GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton])+    , _gcdvimbccSubtitle      :: !(Maybe Text)+    , _gcdvimbccTitle         :: !(Maybe Text)+    , _gcdvimbccFormattedText :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageBasicCard' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimbccImage'+--+-- * 'gcdvimbccButtons'+--+-- * 'gcdvimbccSubtitle'+--+-- * 'gcdvimbccTitle'+--+-- * 'gcdvimbccFormattedText'+googleCloudDialogflowV2beta1IntentMessageBasicCard+    :: GoogleCloudDialogflowV2beta1IntentMessageBasicCard+googleCloudDialogflowV2beta1IntentMessageBasicCard =+  GoogleCloudDialogflowV2beta1IntentMessageBasicCard'+    { _gcdvimbccImage = Nothing+    , _gcdvimbccButtons = Nothing+    , _gcdvimbccSubtitle = Nothing+    , _gcdvimbccTitle = Nothing+    , _gcdvimbccFormattedText = Nothing+    }+++-- | Optional. The image for the card.+gcdvimbccImage :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCard (Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)+gcdvimbccImage+  = lens _gcdvimbccImage+      (\ s a -> s{_gcdvimbccImage = a})++-- | Optional. The collection of card buttons.+gcdvimbccButtons :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCard [GoogleCloudDialogflowV2beta1IntentMessageBasicCardButton]+gcdvimbccButtons+  = lens _gcdvimbccButtons+      (\ s a -> s{_gcdvimbccButtons = a})+      . _Default+      . _Coerce++-- | Optional. The subtitle of the card.+gcdvimbccSubtitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCard (Maybe Text)+gcdvimbccSubtitle+  = lens _gcdvimbccSubtitle+      (\ s a -> s{_gcdvimbccSubtitle = a})++-- | Optional. The title of the card.+gcdvimbccTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCard (Maybe Text)+gcdvimbccTitle+  = lens _gcdvimbccTitle+      (\ s a -> s{_gcdvimbccTitle = a})++-- | Required, unless image is present. The body text of the card.+gcdvimbccFormattedText :: Lens' GoogleCloudDialogflowV2beta1IntentMessageBasicCard (Maybe Text)+gcdvimbccFormattedText+  = lens _gcdvimbccFormattedText+      (\ s a -> s{_gcdvimbccFormattedText = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageBasicCard+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageBasicCard"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageBasicCard'+                   <$>+                   (o .:? "image") <*> (o .:? "buttons" .!= mempty) <*>+                     (o .:? "subtitle")+                     <*> (o .:? "title")+                     <*> (o .:? "formattedText"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageBasicCard+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageBasicCard'{..}+          = object+              (catMaybes+                 [("image" .=) <$> _gcdvimbccImage,+                  ("buttons" .=) <$> _gcdvimbccButtons,+                  ("subtitle" .=) <$> _gcdvimbccSubtitle,+                  ("title" .=) <$> _gcdvimbccTitle,+                  ("formattedText" .=) <$> _gcdvimbccFormattedText])++-- | Represents an example that the agent is trained on.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentTrainingPhrase' smart constructor.+data GoogleCloudDialogflowV2beta1IntentTrainingPhrase =+  GoogleCloudDialogflowV2beta1IntentTrainingPhrase'+    { _gParts           :: !(Maybe [GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart])+    , _gName            :: !(Maybe Text)+    , _gTimesAddedCount :: !(Maybe (Textual Int32))+    , _gType            :: !(Maybe GoogleCloudDialogflowV2beta1IntentTrainingPhraseType)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentTrainingPhrase' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gParts'+--+-- * 'gName'+--+-- * 'gTimesAddedCount'+--+-- * 'gType'+googleCloudDialogflowV2beta1IntentTrainingPhrase+    :: GoogleCloudDialogflowV2beta1IntentTrainingPhrase+googleCloudDialogflowV2beta1IntentTrainingPhrase =+  GoogleCloudDialogflowV2beta1IntentTrainingPhrase'+    { _gParts = Nothing+    , _gName = Nothing+    , _gTimesAddedCount = Nothing+    , _gType = Nothing+    }+++-- | Required. The ordered list of training phrase parts. The parts are+-- concatenated in order to form the training phrase. Note: The API does+-- not automatically annotate training phrases like the Dialogflow Console+-- does. Note: Do not forget to include whitespace at part boundaries, so+-- the training phrase is well formatted when the parts are concatenated.+-- If the training phrase does not need to be annotated with parameters,+-- you just need a single part with only the Part.text field set. If you+-- want to annotate the training phrase, you must create multiple parts,+-- where the fields of each part are populated in one of two ways: -+-- \`Part.text\` is set to a part of the phrase that has no parameters. -+-- \`Part.text\` is set to a part of the phrase that you want to annotate,+-- and the \`entity_type\`, \`alias\`, and \`user_defined\` fields are all+-- set.+gParts :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrase [GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart]+gParts+  = lens _gParts (\ s a -> s{_gParts = a}) . _Default .+      _Coerce++-- | Output only. The unique identifier of this training phrase.+gName :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrase (Maybe Text)+gName = lens _gName (\ s a -> s{_gName = a})++-- | Optional. Indicates how many times this example was added to the intent.+-- Each time a developer adds an existing sample by editing an intent or+-- training, this counter is increased.+gTimesAddedCount :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrase (Maybe Int32)+gTimesAddedCount+  = lens _gTimesAddedCount+      (\ s a -> s{_gTimesAddedCount = a})+      . mapping _Coerce++-- | Required. The type of the training phrase.+gType :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrase (Maybe GoogleCloudDialogflowV2beta1IntentTrainingPhraseType)+gType = lens _gType (\ s a -> s{_gType = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentTrainingPhrase+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentTrainingPhrase"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentTrainingPhrase' <$>+                   (o .:? "parts" .!= mempty) <*> (o .:? "name") <*>+                     (o .:? "timesAddedCount")+                     <*> (o .:? "type"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentTrainingPhrase+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentTrainingPhrase'{..}+          = object+              (catMaybes+                 [("parts" .=) <$> _gParts, ("name" .=) <$> _gName,+                  ("timesAddedCount" .=) <$> _gTimesAddedCount,+                  ("type" .=) <$> _gType])++-- | An answer from Knowledge Connector.+--+-- /See:/ 'googleCloudDialogflowV2beta1KnowledgeAnswersAnswer' smart constructor.+data GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer =+  GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer'+    { _gcdvkaaMatchConfidence      :: !(Maybe (Textual Double))+    , _gcdvkaaAnswer               :: !(Maybe Text)+    , _gcdvkaaSource               :: !(Maybe Text)+    , _gcdvkaaFaqQuestion          :: !(Maybe Text)+    , _gcdvkaaMatchConfidenceLevel :: !(Maybe GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswerMatchConfidenceLevel)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvkaaMatchConfidence'+--+-- * 'gcdvkaaAnswer'+--+-- * 'gcdvkaaSource'+--+-- * 'gcdvkaaFaqQuestion'+--+-- * 'gcdvkaaMatchConfidenceLevel'+googleCloudDialogflowV2beta1KnowledgeAnswersAnswer+    :: GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer+googleCloudDialogflowV2beta1KnowledgeAnswersAnswer =+  GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer'+    { _gcdvkaaMatchConfidence = Nothing+    , _gcdvkaaAnswer = Nothing+    , _gcdvkaaSource = Nothing+    , _gcdvkaaFaqQuestion = Nothing+    , _gcdvkaaMatchConfidenceLevel = Nothing+    }+++-- | The system\'s confidence score that this Knowledge answer is a good+-- match for this conversational query. The range is from 0.0 (completely+-- uncertain) to 1.0 (completely certain). Note: The confidence score is+-- likely to vary somewhat (possibly even for identical requests), as the+-- underlying model is under constant improvement. It may be deprecated in+-- the future. We recommend using \`match_confidence_level\` which should+-- be generally more stable.+gcdvkaaMatchConfidence :: Lens' GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer (Maybe Double)+gcdvkaaMatchConfidence+  = lens _gcdvkaaMatchConfidence+      (\ s a -> s{_gcdvkaaMatchConfidence = a})+      . mapping _Coerce++-- | The piece of text from the \`source\` knowledge base document that+-- answers this conversational query.+gcdvkaaAnswer :: Lens' GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer (Maybe Text)+gcdvkaaAnswer+  = lens _gcdvkaaAnswer+      (\ s a -> s{_gcdvkaaAnswer = a})++-- | Indicates which Knowledge Document this answer was extracted from.+-- Format: \`projects\/\/knowledgeBases\/\/documents\/\`.+gcdvkaaSource :: Lens' GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer (Maybe Text)+gcdvkaaSource+  = lens _gcdvkaaSource+      (\ s a -> s{_gcdvkaaSource = a})++-- | The corresponding FAQ question if the answer was extracted from a FAQ+-- Document, empty otherwise.+gcdvkaaFaqQuestion :: Lens' GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer (Maybe Text)+gcdvkaaFaqQuestion+  = lens _gcdvkaaFaqQuestion+      (\ s a -> s{_gcdvkaaFaqQuestion = a})++-- | The system\'s confidence level that this knowledge answer is a good+-- match for this conversational query. NOTE: The confidence level for a+-- given \`\` pair may change without notice, as it depends on models that+-- are constantly being improved. However, it will change less frequently+-- than the confidence score below, and should be preferred for referencing+-- the quality of an answer.+gcdvkaaMatchConfidenceLevel :: Lens' GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer (Maybe GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswerMatchConfidenceLevel)+gcdvkaaMatchConfidenceLevel+  = lens _gcdvkaaMatchConfidenceLevel+      (\ s a -> s{_gcdvkaaMatchConfidenceLevel = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer"+              (\ o ->+                 GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer'+                   <$>+                   (o .:? "matchConfidence") <*> (o .:? "answer") <*>+                     (o .:? "source")+                     <*> (o .:? "faqQuestion")+                     <*> (o .:? "matchConfidenceLevel"))++instance ToJSON+           GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer+         where+        toJSON+          GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswer'{..}+          = object+              (catMaybes+                 [("matchConfidence" .=) <$> _gcdvkaaMatchConfidence,+                  ("answer" .=) <$> _gcdvkaaAnswer,+                  ("source" .=) <$> _gcdvkaaSource,+                  ("faqQuestion" .=) <$> _gcdvkaaFaqQuestion,+                  ("matchConfidenceLevel" .=) <$>+                    _gcdvkaaMatchConfidenceLevel])++-- | Events allow for matching intents by event name instead of the natural+-- language input. For instance, input \`\` can trigger a personalized+-- welcome response. The parameter \`name\` may be used by the agent in the+-- response: \`\"Hello #welcome_event.name! What can I do for you+-- today?\"\`.+--+-- /See:/ 'googleCloudDialogflowV2beta1EventInput' smart constructor.+data GoogleCloudDialogflowV2beta1EventInput =+  GoogleCloudDialogflowV2beta1EventInput'+    { _gooLanguageCode :: !(Maybe Text)+    , _gooName         :: !(Maybe Text)+    , _gooParameters   :: !(Maybe GoogleCloudDialogflowV2beta1EventInputParameters)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1EventInput' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gooLanguageCode'+--+-- * 'gooName'+--+-- * 'gooParameters'+googleCloudDialogflowV2beta1EventInput+    :: GoogleCloudDialogflowV2beta1EventInput+googleCloudDialogflowV2beta1EventInput =+  GoogleCloudDialogflowV2beta1EventInput'+    {_gooLanguageCode = Nothing, _gooName = Nothing, _gooParameters = Nothing}+++-- | Required. The language of this query. See [Language+-- Support](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/reference\/language)+-- for a list of the currently supported language codes. Note that queries+-- in the same session do not necessarily need to specify the same+-- language.+gooLanguageCode :: Lens' GoogleCloudDialogflowV2beta1EventInput (Maybe Text)+gooLanguageCode+  = lens _gooLanguageCode+      (\ s a -> s{_gooLanguageCode = a})++-- | Required. The unique identifier of the event.+gooName :: Lens' GoogleCloudDialogflowV2beta1EventInput (Maybe Text)+gooName = lens _gooName (\ s a -> s{_gooName = a})++-- | Optional. The collection of parameters associated with the event.+gooParameters :: Lens' GoogleCloudDialogflowV2beta1EventInput (Maybe GoogleCloudDialogflowV2beta1EventInputParameters)+gooParameters+  = lens _gooParameters+      (\ s a -> s{_gooParameters = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1EventInput+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2beta1EventInput"+              (\ o ->+                 GoogleCloudDialogflowV2beta1EventInput' <$>+                   (o .:? "languageCode") <*> (o .:? "name") <*>+                     (o .:? "parameters"))++instance ToJSON+           GoogleCloudDialogflowV2beta1EventInput+         where+        toJSON GoogleCloudDialogflowV2beta1EventInput'{..}+          = object+              (catMaybes+                 [("languageCode" .=) <$> _gooLanguageCode,+                  ("name" .=) <$> _gooName,+                  ("parameters" .=) <$> _gooParameters])++-- | The request message for EntityTypes.BatchUpdateEntities.+--+-- /See:/ 'googleCloudDialogflowV2BatchUpdateEntitiesRequest' smart constructor.+data GoogleCloudDialogflowV2BatchUpdateEntitiesRequest =+  GoogleCloudDialogflowV2BatchUpdateEntitiesRequest'+    { _gcdvbuerLanguageCode :: !(Maybe Text)+    , _gcdvbuerUpdateMask   :: !(Maybe GFieldMask)+    , _gcdvbuerEntities     :: !(Maybe [GoogleCloudDialogflowV2EntityTypeEntity])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2BatchUpdateEntitiesRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvbuerLanguageCode'+--+-- * 'gcdvbuerUpdateMask'+--+-- * 'gcdvbuerEntities'+googleCloudDialogflowV2BatchUpdateEntitiesRequest+    :: GoogleCloudDialogflowV2BatchUpdateEntitiesRequest+googleCloudDialogflowV2BatchUpdateEntitiesRequest =+  GoogleCloudDialogflowV2BatchUpdateEntitiesRequest'+    { _gcdvbuerLanguageCode = Nothing+    , _gcdvbuerUpdateMask = Nothing+    , _gcdvbuerEntities = Nothing+    }+++-- | Optional. The language of entity synonyms defined in \`entities\`. If+-- not specified, the agent\'s default language is used. [Many+-- languages](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/reference\/language)+-- are supported. Note: languages must be enabled in the agent before they+-- can be used.+gcdvbuerLanguageCode :: Lens' GoogleCloudDialogflowV2BatchUpdateEntitiesRequest (Maybe Text)+gcdvbuerLanguageCode+  = lens _gcdvbuerLanguageCode+      (\ s a -> s{_gcdvbuerLanguageCode = a})++-- | Optional. The mask to control which fields get updated.+gcdvbuerUpdateMask :: Lens' GoogleCloudDialogflowV2BatchUpdateEntitiesRequest (Maybe GFieldMask)+gcdvbuerUpdateMask+  = lens _gcdvbuerUpdateMask+      (\ s a -> s{_gcdvbuerUpdateMask = a})++-- | Required. The entities to update or create.+gcdvbuerEntities :: Lens' GoogleCloudDialogflowV2BatchUpdateEntitiesRequest [GoogleCloudDialogflowV2EntityTypeEntity]+gcdvbuerEntities+  = lens _gcdvbuerEntities+      (\ s a -> s{_gcdvbuerEntities = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2BatchUpdateEntitiesRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2BatchUpdateEntitiesRequest"+              (\ o ->+                 GoogleCloudDialogflowV2BatchUpdateEntitiesRequest'+                   <$>+                   (o .:? "languageCode") <*> (o .:? "updateMask") <*>+                     (o .:? "entities" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2BatchUpdateEntitiesRequest+         where+        toJSON+          GoogleCloudDialogflowV2BatchUpdateEntitiesRequest'{..}+          = object+              (catMaybes+                 [("languageCode" .=) <$> _gcdvbuerLanguageCode,+                  ("updateMask" .=) <$> _gcdvbuerUpdateMask,+                  ("entities" .=) <$> _gcdvbuerEntities])++-- | Returns a response containing a custom, platform-specific payload. See+-- the Intent.Message.Platform type for a description of the structure that+-- may be required for your platform.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessagePayload' smart constructor.+newtype GoogleCloudDialogflowV2IntentMessagePayload =+  GoogleCloudDialogflowV2IntentMessagePayload'+    { _gooAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessagePayload' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gooAddtional'+googleCloudDialogflowV2IntentMessagePayload+    :: HashMap Text JSONValue -- ^ 'gooAddtional'+    -> GoogleCloudDialogflowV2IntentMessagePayload+googleCloudDialogflowV2IntentMessagePayload pGooAddtional_ =+  GoogleCloudDialogflowV2IntentMessagePayload'+    {_gooAddtional = _Coerce # pGooAddtional_}+++-- | Properties of the object.+gooAddtional :: Lens' GoogleCloudDialogflowV2IntentMessagePayload (HashMap Text JSONValue)+gooAddtional+  = lens _gooAddtional (\ s a -> s{_gooAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2IntentMessagePayload+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessagePayload"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessagePayload' <$>+                   (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessagePayload+         where+        toJSON = toJSON . _gooAddtional++-- | Metadata in google::longrunning::Operation for Knowledge operations.+--+-- /See:/ 'googleCloudDialogflowV2beta1KnowledgeOperationMetadata' smart constructor.+newtype GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata =+  GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata'+    { _gcdvkomState :: Maybe GoogleCloudDialogflowV2beta1KnowledgeOperationMetadataState+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvkomState'+googleCloudDialogflowV2beta1KnowledgeOperationMetadata+    :: GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata+googleCloudDialogflowV2beta1KnowledgeOperationMetadata =+  GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata'+    {_gcdvkomState = Nothing}+++-- | Required. The current state of this operation.+gcdvkomState :: Lens' GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata (Maybe GoogleCloudDialogflowV2beta1KnowledgeOperationMetadataState)+gcdvkomState+  = lens _gcdvkomState (\ s a -> s{_gcdvkomState = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata"+              (\ o ->+                 GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata'+                   <$> (o .:? "state"))++instance ToJSON+           GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata+         where+        toJSON+          GoogleCloudDialogflowV2beta1KnowledgeOperationMetadata'{..}+          = object (catMaybes [("state" .=) <$> _gcdvkomState])++-- | The request message for a webhook call.+--+-- /See:/ 'googleCloudDialogflowV2beta1WebhookRequest' smart constructor.+data GoogleCloudDialogflowV2beta1WebhookRequest =+  GoogleCloudDialogflowV2beta1WebhookRequest'+    { _gOriginalDetectIntentRequest :: !(Maybe GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest)+    , _gResponseId                  :: !(Maybe Text)+    , _gAlternativeQueryResults     :: !(Maybe [GoogleCloudDialogflowV2beta1QueryResult])+    , _gQueryResult                 :: !(Maybe GoogleCloudDialogflowV2beta1QueryResult)+    , _gSession                     :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1WebhookRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gOriginalDetectIntentRequest'+--+-- * 'gResponseId'+--+-- * 'gAlternativeQueryResults'+--+-- * 'gQueryResult'+--+-- * 'gSession'+googleCloudDialogflowV2beta1WebhookRequest+    :: GoogleCloudDialogflowV2beta1WebhookRequest+googleCloudDialogflowV2beta1WebhookRequest =+  GoogleCloudDialogflowV2beta1WebhookRequest'+    { _gOriginalDetectIntentRequest = Nothing+    , _gResponseId = Nothing+    , _gAlternativeQueryResults = Nothing+    , _gQueryResult = Nothing+    , _gSession = Nothing+    }+++-- | Optional. The contents of the original request that was passed to+-- \`[Streaming]DetectIntent\` call.+gOriginalDetectIntentRequest :: Lens' GoogleCloudDialogflowV2beta1WebhookRequest (Maybe GoogleCloudDialogflowV2beta1OriginalDetectIntentRequest)+gOriginalDetectIntentRequest+  = lens _gOriginalDetectIntentRequest+      (\ s a -> s{_gOriginalDetectIntentRequest = a})++-- | The unique identifier of the response. Contains the same value as+-- \`[Streaming]DetectIntentResponse.response_id\`.+gResponseId :: Lens' GoogleCloudDialogflowV2beta1WebhookRequest (Maybe Text)+gResponseId+  = lens _gResponseId (\ s a -> s{_gResponseId = a})++-- | Alternative query results from KnowledgeService.+gAlternativeQueryResults :: Lens' GoogleCloudDialogflowV2beta1WebhookRequest [GoogleCloudDialogflowV2beta1QueryResult]+gAlternativeQueryResults+  = lens _gAlternativeQueryResults+      (\ s a -> s{_gAlternativeQueryResults = a})+      . _Default+      . _Coerce++-- | The result of the conversational query or event processing. Contains the+-- same value as \`[Streaming]DetectIntentResponse.query_result\`.+gQueryResult :: Lens' GoogleCloudDialogflowV2beta1WebhookRequest (Maybe GoogleCloudDialogflowV2beta1QueryResult)+gQueryResult+  = lens _gQueryResult (\ s a -> s{_gQueryResult = a})++-- | The unique identifier of detectIntent request session. Can be used to+-- identify end-user inside webhook implementation. Format:+-- \`projects\/\/agent\/sessions\/\`, or+-- \`projects\/\/agent\/environments\/\/users\/\/sessions\/\`.+gSession :: Lens' GoogleCloudDialogflowV2beta1WebhookRequest (Maybe Text)+gSession = lens _gSession (\ s a -> s{_gSession = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1WebhookRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1WebhookRequest"+              (\ o ->+                 GoogleCloudDialogflowV2beta1WebhookRequest' <$>+                   (o .:? "originalDetectIntentRequest") <*>+                     (o .:? "responseId")+                     <*> (o .:? "alternativeQueryResults" .!= mempty)+                     <*> (o .:? "queryResult")+                     <*> (o .:? "session"))++instance ToJSON+           GoogleCloudDialogflowV2beta1WebhookRequest+         where+        toJSON+          GoogleCloudDialogflowV2beta1WebhookRequest'{..}+          = object+              (catMaybes+                 [("originalDetectIntentRequest" .=) <$>+                    _gOriginalDetectIntentRequest,+                  ("responseId" .=) <$> _gResponseId,+                  ("alternativeQueryResults" .=) <$>+                    _gAlternativeQueryResults,+                  ("queryResult" .=) <$> _gQueryResult,+                  ("session" .=) <$> _gSession])++-- | The text response message.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageText' smart constructor.+newtype GoogleCloudDialogflowV2beta1IntentMessageText =+  GoogleCloudDialogflowV2beta1IntentMessageText'+    { _gooText :: Maybe [Text]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageText' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gooText'+googleCloudDialogflowV2beta1IntentMessageText+    :: GoogleCloudDialogflowV2beta1IntentMessageText+googleCloudDialogflowV2beta1IntentMessageText =+  GoogleCloudDialogflowV2beta1IntentMessageText' {_gooText = Nothing}+++-- | Optional. The collection of the agent\'s responses.+gooText :: Lens' GoogleCloudDialogflowV2beta1IntentMessageText [Text]+gooText+  = lens _gooText (\ s a -> s{_gooText = a}) . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageText+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageText"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageText' <$>+                   (o .:? "text" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageText+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageText'{..}+          = object (catMaybes [("text" .=) <$> _gooText])++-- | The collection of simple response candidates. This message in+-- \`QueryResult.fulfillment_messages\` and+-- \`WebhookResponse.fulfillment_messages\` should contain only one+-- \`SimpleResponse\`.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageSimpleResponses' smart constructor.+newtype GoogleCloudDialogflowV2IntentMessageSimpleResponses =+  GoogleCloudDialogflowV2IntentMessageSimpleResponses'+    { _gSimpleResponses :: Maybe [GoogleCloudDialogflowV2IntentMessageSimpleResponse]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageSimpleResponses' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gSimpleResponses'+googleCloudDialogflowV2IntentMessageSimpleResponses+    :: GoogleCloudDialogflowV2IntentMessageSimpleResponses+googleCloudDialogflowV2IntentMessageSimpleResponses =+  GoogleCloudDialogflowV2IntentMessageSimpleResponses'+    {_gSimpleResponses = Nothing}+++-- | Required. The list of simple responses.+gSimpleResponses :: Lens' GoogleCloudDialogflowV2IntentMessageSimpleResponses [GoogleCloudDialogflowV2IntentMessageSimpleResponse]+gSimpleResponses+  = lens _gSimpleResponses+      (\ s a -> s{_gSimpleResponses = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageSimpleResponses+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageSimpleResponses"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageSimpleResponses'+                   <$> (o .:? "simpleResponses" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageSimpleResponses+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageSimpleResponses'{..}+          = object+              (catMaybes+                 [("simpleResponses" .=) <$> _gSimpleResponses])++-- | Represents a single followup intent in the chain.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentFollowupIntentInfo' smart constructor.+data GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo =+  GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo'+    { _gFollowupIntentName       :: !(Maybe Text)+    , _gParentFollowupIntentName :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gFollowupIntentName'+--+-- * 'gParentFollowupIntentName'+googleCloudDialogflowV2beta1IntentFollowupIntentInfo+    :: GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo+googleCloudDialogflowV2beta1IntentFollowupIntentInfo =+  GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo'+    {_gFollowupIntentName = Nothing, _gParentFollowupIntentName = Nothing}+++-- | The unique identifier of the followup intent. Format:+-- \`projects\/\/agent\/intents\/\`.+gFollowupIntentName :: Lens' GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo (Maybe Text)+gFollowupIntentName+  = lens _gFollowupIntentName+      (\ s a -> s{_gFollowupIntentName = a})++-- | The unique identifier of the followup intent\'s parent. Format:+-- \`projects\/\/agent\/intents\/\`.+gParentFollowupIntentName :: Lens' GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo (Maybe Text)+gParentFollowupIntentName+  = lens _gParentFollowupIntentName+      (\ s a -> s{_gParentFollowupIntentName = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo'+                   <$>+                   (o .:? "followupIntentName") <*>+                     (o .:? "parentFollowupIntentName"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo'{..}+          = object+              (catMaybes+                 [("followupIntentName" .=) <$> _gFollowupIntentName,+                  ("parentFollowupIntentName" .=) <$>+                    _gParentFollowupIntentName])++-- | The collection of extracted parameters.+--+-- /See:/ 'googleCloudDialogflowV2QueryResultParameters' smart constructor.+newtype GoogleCloudDialogflowV2QueryResultParameters =+  GoogleCloudDialogflowV2QueryResultParameters'+    { _gcdvqrpsAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2QueryResultParameters' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvqrpsAddtional'+googleCloudDialogflowV2QueryResultParameters+    :: HashMap Text JSONValue -- ^ 'gcdvqrpsAddtional'+    -> GoogleCloudDialogflowV2QueryResultParameters+googleCloudDialogflowV2QueryResultParameters pGcdvqrpsAddtional_ =+  GoogleCloudDialogflowV2QueryResultParameters'+    {_gcdvqrpsAddtional = _Coerce # pGcdvqrpsAddtional_}+++-- | Properties of the object.+gcdvqrpsAddtional :: Lens' GoogleCloudDialogflowV2QueryResultParameters (HashMap Text JSONValue)+gcdvqrpsAddtional+  = lens _gcdvqrpsAddtional+      (\ s a -> s{_gcdvqrpsAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2QueryResultParameters+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2QueryResultParameters"+              (\ o ->+                 GoogleCloudDialogflowV2QueryResultParameters' <$>+                   (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2QueryResultParameters+         where+        toJSON = toJSON . _gcdvqrpsAddtional++-- | The free-form diagnostic info. For example, this field could contain+-- webhook call latency. The string keys of the Struct\'s fields map can+-- change without notice.+--+-- /See:/ 'googleCloudDialogflowV2beta1QueryResultDiagnosticInfo' smart constructor.+newtype GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo =+  GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo'+    { _gcdvqrdicAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvqrdicAddtional'+googleCloudDialogflowV2beta1QueryResultDiagnosticInfo+    :: HashMap Text JSONValue -- ^ 'gcdvqrdicAddtional'+    -> GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo+googleCloudDialogflowV2beta1QueryResultDiagnosticInfo pGcdvqrdicAddtional_ =+  GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo'+    {_gcdvqrdicAddtional = _Coerce # pGcdvqrdicAddtional_}+++-- | Properties of the object.+gcdvqrdicAddtional :: Lens' GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo (HashMap Text JSONValue)+gcdvqrdicAddtional+  = lens _gcdvqrdicAddtional+      (\ s a -> s{_gcdvqrdicAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo"+              (\ o ->+                 GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo'+                   <$> (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo+         where+        toJSON = toJSON . _gcdvqrdicAddtional++-- | The request message for EntityTypes.BatchDeleteEntities.+--+-- /See:/ 'googleCloudDialogflowV2BatchDeleteEntitiesRequest' smart constructor.+data GoogleCloudDialogflowV2BatchDeleteEntitiesRequest =+  GoogleCloudDialogflowV2BatchDeleteEntitiesRequest'+    { _gcdvbderLanguageCode :: !(Maybe Text)+    , _gcdvbderEntityValues :: !(Maybe [Text])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2BatchDeleteEntitiesRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvbderLanguageCode'+--+-- * 'gcdvbderEntityValues'+googleCloudDialogflowV2BatchDeleteEntitiesRequest+    :: GoogleCloudDialogflowV2BatchDeleteEntitiesRequest+googleCloudDialogflowV2BatchDeleteEntitiesRequest =+  GoogleCloudDialogflowV2BatchDeleteEntitiesRequest'+    {_gcdvbderLanguageCode = Nothing, _gcdvbderEntityValues = Nothing}+++-- | Optional. The language of entity synonyms defined in \`entities\`. If+-- not specified, the agent\'s default language is used. [Many+-- languages](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/reference\/language)+-- are supported. Note: languages must be enabled in the agent before they+-- can be used.+gcdvbderLanguageCode :: Lens' GoogleCloudDialogflowV2BatchDeleteEntitiesRequest (Maybe Text)+gcdvbderLanguageCode+  = lens _gcdvbderLanguageCode+      (\ s a -> s{_gcdvbderLanguageCode = a})++-- | Required. The canonical \`values\` of the entities to delete. Note that+-- these are not fully-qualified names, i.e. they don\'t start with+-- \`projects\/\`.+gcdvbderEntityValues :: Lens' GoogleCloudDialogflowV2BatchDeleteEntitiesRequest [Text]+gcdvbderEntityValues+  = lens _gcdvbderEntityValues+      (\ s a -> s{_gcdvbderEntityValues = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2BatchDeleteEntitiesRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2BatchDeleteEntitiesRequest"+              (\ o ->+                 GoogleCloudDialogflowV2BatchDeleteEntitiesRequest'+                   <$>+                   (o .:? "languageCode") <*>+                     (o .:? "entityValues" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2BatchDeleteEntitiesRequest+         where+        toJSON+          GoogleCloudDialogflowV2BatchDeleteEntitiesRequest'{..}+          = object+              (catMaybes+                 [("languageCode" .=) <$> _gcdvbderLanguageCode,+                  ("entityValues" .=) <$> _gcdvbderEntityValues])++-- | The response message for Intents.BatchUpdateIntents.+--+-- /See:/ 'googleCloudDialogflowV2BatchUpdateIntentsResponse' smart constructor.+newtype GoogleCloudDialogflowV2BatchUpdateIntentsResponse =+  GoogleCloudDialogflowV2BatchUpdateIntentsResponse'+    { _gIntents :: Maybe [GoogleCloudDialogflowV2Intent]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2BatchUpdateIntentsResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gIntents'+googleCloudDialogflowV2BatchUpdateIntentsResponse+    :: GoogleCloudDialogflowV2BatchUpdateIntentsResponse+googleCloudDialogflowV2BatchUpdateIntentsResponse =+  GoogleCloudDialogflowV2BatchUpdateIntentsResponse' {_gIntents = Nothing}+++-- | The collection of updated or created intents.+gIntents :: Lens' GoogleCloudDialogflowV2BatchUpdateIntentsResponse [GoogleCloudDialogflowV2Intent]+gIntents+  = lens _gIntents (\ s a -> s{_gIntents = a}) .+      _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2BatchUpdateIntentsResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2BatchUpdateIntentsResponse"+              (\ o ->+                 GoogleCloudDialogflowV2BatchUpdateIntentsResponse'+                   <$> (o .:? "intents" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2BatchUpdateIntentsResponse+         where+        toJSON+          GoogleCloudDialogflowV2BatchUpdateIntentsResponse'{..}+          = object (catMaybes [("intents" .=) <$> _gIntents])++-- | The response message for EntityTypes.ListEntityTypes.+--+-- /See:/ 'googleCloudDialogflowV2ListEntityTypesResponse' smart constructor.+data GoogleCloudDialogflowV2ListEntityTypesResponse =+  GoogleCloudDialogflowV2ListEntityTypesResponse'+    { _gcdvletrNextPageToken :: !(Maybe Text)+    , _gcdvletrEntityTypes   :: !(Maybe [GoogleCloudDialogflowV2EntityType])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2ListEntityTypesResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvletrNextPageToken'+--+-- * 'gcdvletrEntityTypes'+googleCloudDialogflowV2ListEntityTypesResponse+    :: GoogleCloudDialogflowV2ListEntityTypesResponse+googleCloudDialogflowV2ListEntityTypesResponse =+  GoogleCloudDialogflowV2ListEntityTypesResponse'+    {_gcdvletrNextPageToken = Nothing, _gcdvletrEntityTypes = Nothing}+++-- | Token to retrieve the next page of results, or empty if there are no+-- more results in the list.+gcdvletrNextPageToken :: Lens' GoogleCloudDialogflowV2ListEntityTypesResponse (Maybe Text)+gcdvletrNextPageToken+  = lens _gcdvletrNextPageToken+      (\ s a -> s{_gcdvletrNextPageToken = a})++-- | The list of agent entity types. There will be a maximum number of items+-- returned based on the page_size field in the request.+gcdvletrEntityTypes :: Lens' GoogleCloudDialogflowV2ListEntityTypesResponse [GoogleCloudDialogflowV2EntityType]+gcdvletrEntityTypes+  = lens _gcdvletrEntityTypes+      (\ s a -> s{_gcdvletrEntityTypes = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2ListEntityTypesResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2ListEntityTypesResponse"+              (\ o ->+                 GoogleCloudDialogflowV2ListEntityTypesResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "entityTypes" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2ListEntityTypesResponse+         where+        toJSON+          GoogleCloudDialogflowV2ListEntityTypesResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _gcdvletrNextPageToken,+                  ("entityTypes" .=) <$> _gcdvletrEntityTypes])++-- | Represents a conversational agent.+--+-- /See:/ 'googleCloudDialogflowV2Agent' smart constructor.+data GoogleCloudDialogflowV2Agent =+  GoogleCloudDialogflowV2Agent'+    { _gcdvaParent                  :: !(Maybe Text)+    , _gcdvaDefaultLanguageCode     :: !(Maybe Text)+    , _gcdvaEnableLogging           :: !(Maybe Bool)+    , _gcdvaClassificationThreshold :: !(Maybe (Textual Double))+    , _gcdvaAvatarURI               :: !(Maybe Text)+    , _gcdvaSupportedLanguageCodes  :: !(Maybe [Text])+    , _gcdvaDisplayName             :: !(Maybe Text)+    , _gcdvaMatchMode               :: !(Maybe GoogleCloudDialogflowV2AgentMatchMode)+    , _gcdvaTimeZone                :: !(Maybe Text)+    , _gcdvaDescription             :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2Agent' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvaParent'+--+-- * 'gcdvaDefaultLanguageCode'+--+-- * 'gcdvaEnableLogging'+--+-- * 'gcdvaClassificationThreshold'+--+-- * 'gcdvaAvatarURI'+--+-- * 'gcdvaSupportedLanguageCodes'+--+-- * 'gcdvaDisplayName'+--+-- * 'gcdvaMatchMode'+--+-- * 'gcdvaTimeZone'+--+-- * 'gcdvaDescription'+googleCloudDialogflowV2Agent+    :: GoogleCloudDialogflowV2Agent+googleCloudDialogflowV2Agent =+  GoogleCloudDialogflowV2Agent'+    { _gcdvaParent = Nothing+    , _gcdvaDefaultLanguageCode = Nothing+    , _gcdvaEnableLogging = Nothing+    , _gcdvaClassificationThreshold = Nothing+    , _gcdvaAvatarURI = Nothing+    , _gcdvaSupportedLanguageCodes = Nothing+    , _gcdvaDisplayName = Nothing+    , _gcdvaMatchMode = Nothing+    , _gcdvaTimeZone = Nothing+    , _gcdvaDescription = Nothing+    }+++-- | Required. The project of this agent. Format: \`projects\/\`.+gcdvaParent :: Lens' GoogleCloudDialogflowV2Agent (Maybe Text)+gcdvaParent+  = lens _gcdvaParent (\ s a -> s{_gcdvaParent = a})++-- | Required. The default language of the agent as a language tag. See+-- [Language+-- Support](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/reference\/language)+-- for a list of the currently supported language codes. This field cannot+-- be set by the \`Update\` method.+gcdvaDefaultLanguageCode :: Lens' GoogleCloudDialogflowV2Agent (Maybe Text)+gcdvaDefaultLanguageCode+  = lens _gcdvaDefaultLanguageCode+      (\ s a -> s{_gcdvaDefaultLanguageCode = a})++-- | Optional. Determines whether this agent should log conversation queries.+gcdvaEnableLogging :: Lens' GoogleCloudDialogflowV2Agent (Maybe Bool)+gcdvaEnableLogging+  = lens _gcdvaEnableLogging+      (\ s a -> s{_gcdvaEnableLogging = a})++-- | Optional. To filter out false positive results and still get variety in+-- matched natural language inputs for your agent, you can tune the machine+-- learning classification threshold. If the returned score value is less+-- than the threshold value, then a fallback intent will be triggered or,+-- if there are no fallback intents defined, no intent will be triggered.+-- The score values range from 0.0 (completely uncertain) to 1.0+-- (completely certain). If set to 0.0, the default of 0.3 is used.+gcdvaClassificationThreshold :: Lens' GoogleCloudDialogflowV2Agent (Maybe Double)+gcdvaClassificationThreshold+  = lens _gcdvaClassificationThreshold+      (\ s a -> s{_gcdvaClassificationThreshold = a})+      . mapping _Coerce++-- | Optional. The URI of the agent\'s avatar. Avatars are used throughout+-- the Dialogflow console and in the self-hosted [Web+-- Demo](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/integrations\/web-demo)+-- integration.+gcdvaAvatarURI :: Lens' GoogleCloudDialogflowV2Agent (Maybe Text)+gcdvaAvatarURI+  = lens _gcdvaAvatarURI+      (\ s a -> s{_gcdvaAvatarURI = a})++-- | Optional. The list of all languages supported by this agent (except for+-- the \`default_language_code\`).+gcdvaSupportedLanguageCodes :: Lens' GoogleCloudDialogflowV2Agent [Text]+gcdvaSupportedLanguageCodes+  = lens _gcdvaSupportedLanguageCodes+      (\ s a -> s{_gcdvaSupportedLanguageCodes = a})+      . _Default+      . _Coerce++-- | Required. The name of this agent.+gcdvaDisplayName :: Lens' GoogleCloudDialogflowV2Agent (Maybe Text)+gcdvaDisplayName+  = lens _gcdvaDisplayName+      (\ s a -> s{_gcdvaDisplayName = a})++-- | Optional. Determines how intents are detected from user queries.+gcdvaMatchMode :: Lens' GoogleCloudDialogflowV2Agent (Maybe GoogleCloudDialogflowV2AgentMatchMode)+gcdvaMatchMode+  = lens _gcdvaMatchMode+      (\ s a -> s{_gcdvaMatchMode = a})++-- | Required. The time zone of this agent from the [time zone+-- database](https:\/\/www.iana.org\/time-zones), e.g., America\/New_York,+-- Europe\/Paris.+gcdvaTimeZone :: Lens' GoogleCloudDialogflowV2Agent (Maybe Text)+gcdvaTimeZone+  = lens _gcdvaTimeZone+      (\ s a -> s{_gcdvaTimeZone = a})++-- | Optional. The description of this agent. The maximum length is 500+-- characters. If exceeded, the request is rejected.+gcdvaDescription :: Lens' GoogleCloudDialogflowV2Agent (Maybe Text)+gcdvaDescription+  = lens _gcdvaDescription+      (\ s a -> s{_gcdvaDescription = a})++instance FromJSON GoogleCloudDialogflowV2Agent where+        parseJSON+          = withObject "GoogleCloudDialogflowV2Agent"+              (\ o ->+                 GoogleCloudDialogflowV2Agent' <$>+                   (o .:? "parent") <*> (o .:? "defaultLanguageCode")+                     <*> (o .:? "enableLogging")+                     <*> (o .:? "classificationThreshold")+                     <*> (o .:? "avatarUri")+                     <*> (o .:? "supportedLanguageCodes" .!= mempty)+                     <*> (o .:? "displayName")+                     <*> (o .:? "matchMode")+                     <*> (o .:? "timeZone")+                     <*> (o .:? "description"))++instance ToJSON GoogleCloudDialogflowV2Agent where+        toJSON GoogleCloudDialogflowV2Agent'{..}+          = object+              (catMaybes+                 [("parent" .=) <$> _gcdvaParent,+                  ("defaultLanguageCode" .=) <$>+                    _gcdvaDefaultLanguageCode,+                  ("enableLogging" .=) <$> _gcdvaEnableLogging,+                  ("classificationThreshold" .=) <$>+                    _gcdvaClassificationThreshold,+                  ("avatarUri" .=) <$> _gcdvaAvatarURI,+                  ("supportedLanguageCodes" .=) <$>+                    _gcdvaSupportedLanguageCodes,+                  ("displayName" .=) <$> _gcdvaDisplayName,+                  ("matchMode" .=) <$> _gcdvaMatchMode,+                  ("timeZone" .=) <$> _gcdvaTimeZone,+                  ("description" .=) <$> _gcdvaDescription])++-- | Corresponds to the \`Response\` field in the Dialogflow console.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessage' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessage =+  GoogleCloudDialogflowV2beta1IntentMessage'+    { _gcdvimCard                      :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageCard)+    , _gcdvimImage                     :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)+    , _gcdvimPlatform                  :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessagePlatform)+    , _gcdvimLinkOutSuggestion         :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion)+    , _gcdvimText                      :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageText)+    , _gcdvimCarouselSelect            :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect)+    , _gcdvimTelephonySynthesizeSpeech :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech)+    , _gcdvimSimpleResponses           :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses)+    , _gcdvimPayload                   :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessagePayload)+    , _gcdvimTelephonyTransferCall     :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall)+    , _gcdvimSuggestions               :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageSuggestions)+    , _gcdvimListSelect                :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageListSelect)+    , _gcdvimTelephonyPlayAudio        :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio)+    , _gcdvimBasicCard                 :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageBasicCard)+    , _gcdvimQuickReplies              :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageQuickReplies)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessage' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimCard'+--+-- * 'gcdvimImage'+--+-- * 'gcdvimPlatform'+--+-- * 'gcdvimLinkOutSuggestion'+--+-- * 'gcdvimText'+--+-- * 'gcdvimCarouselSelect'+--+-- * 'gcdvimTelephonySynthesizeSpeech'+--+-- * 'gcdvimSimpleResponses'+--+-- * 'gcdvimPayload'+--+-- * 'gcdvimTelephonyTransferCall'+--+-- * 'gcdvimSuggestions'+--+-- * 'gcdvimListSelect'+--+-- * 'gcdvimTelephonyPlayAudio'+--+-- * 'gcdvimBasicCard'+--+-- * 'gcdvimQuickReplies'+googleCloudDialogflowV2beta1IntentMessage+    :: GoogleCloudDialogflowV2beta1IntentMessage+googleCloudDialogflowV2beta1IntentMessage =+  GoogleCloudDialogflowV2beta1IntentMessage'+    { _gcdvimCard = Nothing+    , _gcdvimImage = Nothing+    , _gcdvimPlatform = Nothing+    , _gcdvimLinkOutSuggestion = Nothing+    , _gcdvimText = Nothing+    , _gcdvimCarouselSelect = Nothing+    , _gcdvimTelephonySynthesizeSpeech = Nothing+    , _gcdvimSimpleResponses = Nothing+    , _gcdvimPayload = Nothing+    , _gcdvimTelephonyTransferCall = Nothing+    , _gcdvimSuggestions = Nothing+    , _gcdvimListSelect = Nothing+    , _gcdvimTelephonyPlayAudio = Nothing+    , _gcdvimBasicCard = Nothing+    , _gcdvimQuickReplies = Nothing+    }+++-- | Displays a card.+gcdvimCard :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageCard)+gcdvimCard+  = lens _gcdvimCard (\ s a -> s{_gcdvimCard = a})++-- | Displays an image.+gcdvimImage :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)+gcdvimImage+  = lens _gcdvimImage (\ s a -> s{_gcdvimImage = a})++-- | Optional. The platform that this message is intended for.+gcdvimPlatform :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessagePlatform)+gcdvimPlatform+  = lens _gcdvimPlatform+      (\ s a -> s{_gcdvimPlatform = a})++-- | Displays a link out suggestion chip for Actions on Google.+gcdvimLinkOutSuggestion :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion)+gcdvimLinkOutSuggestion+  = lens _gcdvimLinkOutSuggestion+      (\ s a -> s{_gcdvimLinkOutSuggestion = a})++-- | Returns a text response.+gcdvimText :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageText)+gcdvimText+  = lens _gcdvimText (\ s a -> s{_gcdvimText = a})++-- | Displays a carousel card for Actions on Google.+gcdvimCarouselSelect :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect)+gcdvimCarouselSelect+  = lens _gcdvimCarouselSelect+      (\ s a -> s{_gcdvimCarouselSelect = a})++-- | Synthesizes speech in Telephony Gateway.+gcdvimTelephonySynthesizeSpeech :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech)+gcdvimTelephonySynthesizeSpeech+  = lens _gcdvimTelephonySynthesizeSpeech+      (\ s a -> s{_gcdvimTelephonySynthesizeSpeech = a})++-- | Returns a voice or text-only response for Actions on Google.+gcdvimSimpleResponses :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageSimpleResponses)+gcdvimSimpleResponses+  = lens _gcdvimSimpleResponses+      (\ s a -> s{_gcdvimSimpleResponses = a})++-- | Returns a response containing a custom, platform-specific payload. See+-- the Intent.Message.Platform type for a description of the structure that+-- may be required for your platform.+gcdvimPayload :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessagePayload)+gcdvimPayload+  = lens _gcdvimPayload+      (\ s a -> s{_gcdvimPayload = a})++-- | Transfers the call in Telephony Gateway.+gcdvimTelephonyTransferCall :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall)+gcdvimTelephonyTransferCall+  = lens _gcdvimTelephonyTransferCall+      (\ s a -> s{_gcdvimTelephonyTransferCall = a})++-- | Displays suggestion chips for Actions on Google.+gcdvimSuggestions :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageSuggestions)+gcdvimSuggestions+  = lens _gcdvimSuggestions+      (\ s a -> s{_gcdvimSuggestions = a})++-- | Displays a list card for Actions on Google.+gcdvimListSelect :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageListSelect)+gcdvimListSelect+  = lens _gcdvimListSelect+      (\ s a -> s{_gcdvimListSelect = a})++-- | Plays audio from a file in Telephony Gateway.+gcdvimTelephonyPlayAudio :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageTelephonyPlayAudio)+gcdvimTelephonyPlayAudio+  = lens _gcdvimTelephonyPlayAudio+      (\ s a -> s{_gcdvimTelephonyPlayAudio = a})++-- | Displays a basic card for Actions on Google.+gcdvimBasicCard :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageBasicCard)+gcdvimBasicCard+  = lens _gcdvimBasicCard+      (\ s a -> s{_gcdvimBasicCard = a})++-- | Displays quick replies.+gcdvimQuickReplies :: Lens' GoogleCloudDialogflowV2beta1IntentMessage (Maybe GoogleCloudDialogflowV2beta1IntentMessageQuickReplies)+gcdvimQuickReplies+  = lens _gcdvimQuickReplies+      (\ s a -> s{_gcdvimQuickReplies = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessage+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessage"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessage' <$>+                   (o .:? "card") <*> (o .:? "image") <*>+                     (o .:? "platform")+                     <*> (o .:? "linkOutSuggestion")+                     <*> (o .:? "text")+                     <*> (o .:? "carouselSelect")+                     <*> (o .:? "telephonySynthesizeSpeech")+                     <*> (o .:? "simpleResponses")+                     <*> (o .:? "payload")+                     <*> (o .:? "telephonyTransferCall")+                     <*> (o .:? "suggestions")+                     <*> (o .:? "listSelect")+                     <*> (o .:? "telephonyPlayAudio")+                     <*> (o .:? "basicCard")+                     <*> (o .:? "quickReplies"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessage+         where+        toJSON GoogleCloudDialogflowV2beta1IntentMessage'{..}+          = object+              (catMaybes+                 [("card" .=) <$> _gcdvimCard,+                  ("image" .=) <$> _gcdvimImage,+                  ("platform" .=) <$> _gcdvimPlatform,+                  ("linkOutSuggestion" .=) <$>+                    _gcdvimLinkOutSuggestion,+                  ("text" .=) <$> _gcdvimText,+                  ("carouselSelect" .=) <$> _gcdvimCarouselSelect,+                  ("telephonySynthesizeSpeech" .=) <$>+                    _gcdvimTelephonySynthesizeSpeech,+                  ("simpleResponses" .=) <$> _gcdvimSimpleResponses,+                  ("payload" .=) <$> _gcdvimPayload,+                  ("telephonyTransferCall" .=) <$>+                    _gcdvimTelephonyTransferCall,+                  ("suggestions" .=) <$> _gcdvimSuggestions,+                  ("listSelect" .=) <$> _gcdvimListSelect,+                  ("telephonyPlayAudio" .=) <$>+                    _gcdvimTelephonyPlayAudio,+                  ("basicCard" .=) <$> _gcdvimBasicCard,+                  ("quickReplies" .=) <$> _gcdvimQuickReplies])++-- | Additional info about the select item for when it is triggered in a+-- dialog.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageSelectItemInfo' smart constructor.+data GoogleCloudDialogflowV2IntentMessageSelectItemInfo =+  GoogleCloudDialogflowV2IntentMessageSelectItemInfo'+    { _gcdvimsiiKey      :: !(Maybe Text)+    , _gcdvimsiiSynonyms :: !(Maybe [Text])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageSelectItemInfo' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimsiiKey'+--+-- * 'gcdvimsiiSynonyms'+googleCloudDialogflowV2IntentMessageSelectItemInfo+    :: GoogleCloudDialogflowV2IntentMessageSelectItemInfo+googleCloudDialogflowV2IntentMessageSelectItemInfo =+  GoogleCloudDialogflowV2IntentMessageSelectItemInfo'+    {_gcdvimsiiKey = Nothing, _gcdvimsiiSynonyms = Nothing}+++-- | Required. A unique key that will be sent back to the agent if this+-- response is given.+gcdvimsiiKey :: Lens' GoogleCloudDialogflowV2IntentMessageSelectItemInfo (Maybe Text)+gcdvimsiiKey+  = lens _gcdvimsiiKey (\ s a -> s{_gcdvimsiiKey = a})++-- | Optional. A list of synonyms that can also be used to trigger this item+-- in dialog.+gcdvimsiiSynonyms :: Lens' GoogleCloudDialogflowV2IntentMessageSelectItemInfo [Text]+gcdvimsiiSynonyms+  = lens _gcdvimsiiSynonyms+      (\ s a -> s{_gcdvimsiiSynonyms = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageSelectItemInfo+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageSelectItemInfo"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageSelectItemInfo'+                   <$> (o .:? "key") <*> (o .:? "synonyms" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageSelectItemInfo+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageSelectItemInfo'{..}+          = object+              (catMaybes+                 [("key" .=) <$> _gcdvimsiiKey,+                  ("synonyms" .=) <$> _gcdvimsiiSynonyms])++-- | The sentiment, such as positive\/negative feeling or association, for a+-- unit of analysis, such as the query text.+--+-- /See:/ 'googleCloudDialogflowV2beta1Sentiment' smart constructor.+data GoogleCloudDialogflowV2beta1Sentiment =+  GoogleCloudDialogflowV2beta1Sentiment'+    { _gcdvsScore     :: !(Maybe (Textual Double))+    , _gcdvsMagnitude :: !(Maybe (Textual Double))+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1Sentiment' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvsScore'+--+-- * 'gcdvsMagnitude'+googleCloudDialogflowV2beta1Sentiment+    :: GoogleCloudDialogflowV2beta1Sentiment+googleCloudDialogflowV2beta1Sentiment =+  GoogleCloudDialogflowV2beta1Sentiment'+    {_gcdvsScore = Nothing, _gcdvsMagnitude = Nothing}+++-- | Sentiment score between -1.0 (negative sentiment) and 1.0 (positive+-- sentiment).+gcdvsScore :: Lens' GoogleCloudDialogflowV2beta1Sentiment (Maybe Double)+gcdvsScore+  = lens _gcdvsScore (\ s a -> s{_gcdvsScore = a}) .+      mapping _Coerce++-- | A non-negative number in the [0, +inf) range, which represents the+-- absolute magnitude of sentiment, regardless of score (positive or+-- negative).+gcdvsMagnitude :: Lens' GoogleCloudDialogflowV2beta1Sentiment (Maybe Double)+gcdvsMagnitude+  = lens _gcdvsMagnitude+      (\ s a -> s{_gcdvsMagnitude = a})+      . mapping _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1Sentiment+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2beta1Sentiment"+              (\ o ->+                 GoogleCloudDialogflowV2beta1Sentiment' <$>+                   (o .:? "score") <*> (o .:? "magnitude"))++instance ToJSON GoogleCloudDialogflowV2beta1Sentiment+         where+        toJSON GoogleCloudDialogflowV2beta1Sentiment'{..}+          = object+              (catMaybes+                 [("score" .=) <$> _gcdvsScore,+                  ("magnitude" .=) <$> _gcdvsMagnitude])++-- | The request message for EntityTypes.BatchDeleteEntityTypes.+--+-- /See:/ 'googleCloudDialogflowV2BatchDeleteEntityTypesRequest' smart constructor.+newtype GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest =+  GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest'+    { _gcdvbdetrEntityTypeNames :: Maybe [Text]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvbdetrEntityTypeNames'+googleCloudDialogflowV2BatchDeleteEntityTypesRequest+    :: GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest+googleCloudDialogflowV2BatchDeleteEntityTypesRequest =+  GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest'+    {_gcdvbdetrEntityTypeNames = Nothing}+++-- | Required. The names entity types to delete. All names must point to the+-- same agent as \`parent\`.+gcdvbdetrEntityTypeNames :: Lens' GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest [Text]+gcdvbdetrEntityTypeNames+  = lens _gcdvbdetrEntityTypeNames+      (\ s a -> s{_gcdvbdetrEntityTypeNames = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest"+              (\ o ->+                 GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest'+                   <$> (o .:? "entityTypeNames" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest+         where+        toJSON+          GoogleCloudDialogflowV2BatchDeleteEntityTypesRequest'{..}+          = object+              (catMaybes+                 [("entityTypeNames" .=) <$>+                    _gcdvbdetrEntityTypeNames])++-- | Represents the query input. It can contain either: 1. An audio config+-- which instructs the speech recognizer how to process the speech audio.+-- 2. A conversational query in the form of text,. 3. An event that+-- specifies which intent to trigger.+--+-- /See:/ 'googleCloudDialogflowV2QueryInput' smart constructor.+data GoogleCloudDialogflowV2QueryInput =+  GoogleCloudDialogflowV2QueryInput'+    { _gcdvqiAudioConfig :: !(Maybe GoogleCloudDialogflowV2InputAudioConfig)+    , _gcdvqiEvent       :: !(Maybe GoogleCloudDialogflowV2EventInput)+    , _gcdvqiText        :: !(Maybe GoogleCloudDialogflowV2TextInput)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2QueryInput' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvqiAudioConfig'+--+-- * 'gcdvqiEvent'+--+-- * 'gcdvqiText'+googleCloudDialogflowV2QueryInput+    :: GoogleCloudDialogflowV2QueryInput+googleCloudDialogflowV2QueryInput =+  GoogleCloudDialogflowV2QueryInput'+    { _gcdvqiAudioConfig = Nothing+    , _gcdvqiEvent = Nothing+    , _gcdvqiText = Nothing+    }+++-- | Instructs the speech recognizer how to process the speech audio.+gcdvqiAudioConfig :: Lens' GoogleCloudDialogflowV2QueryInput (Maybe GoogleCloudDialogflowV2InputAudioConfig)+gcdvqiAudioConfig+  = lens _gcdvqiAudioConfig+      (\ s a -> s{_gcdvqiAudioConfig = a})++-- | The event to be processed.+gcdvqiEvent :: Lens' GoogleCloudDialogflowV2QueryInput (Maybe GoogleCloudDialogflowV2EventInput)+gcdvqiEvent+  = lens _gcdvqiEvent (\ s a -> s{_gcdvqiEvent = a})++-- | The natural language text to be processed.+gcdvqiText :: Lens' GoogleCloudDialogflowV2QueryInput (Maybe GoogleCloudDialogflowV2TextInput)+gcdvqiText+  = lens _gcdvqiText (\ s a -> s{_gcdvqiText = a})++instance FromJSON GoogleCloudDialogflowV2QueryInput+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2QueryInput"+              (\ o ->+                 GoogleCloudDialogflowV2QueryInput' <$>+                   (o .:? "audioConfig") <*> (o .:? "event") <*>+                     (o .:? "text"))++instance ToJSON GoogleCloudDialogflowV2QueryInput+         where+        toJSON GoogleCloudDialogflowV2QueryInput'{..}+          = object+              (catMaybes+                 [("audioConfig" .=) <$> _gcdvqiAudioConfig,+                  ("event" .=) <$> _gcdvqiEvent,+                  ("text" .=) <$> _gcdvqiText])++-- | The request message for Agents.ExportAgent.+--+-- /See:/ 'googleCloudDialogflowV2ExportAgentRequest' smart constructor.+newtype GoogleCloudDialogflowV2ExportAgentRequest =+  GoogleCloudDialogflowV2ExportAgentRequest'+    { _gcdvearAgentURI :: Maybe Text+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2ExportAgentRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvearAgentURI'+googleCloudDialogflowV2ExportAgentRequest+    :: GoogleCloudDialogflowV2ExportAgentRequest+googleCloudDialogflowV2ExportAgentRequest =+  GoogleCloudDialogflowV2ExportAgentRequest' {_gcdvearAgentURI = Nothing}+++-- | Optional. The [Google Cloud+-- Storage](https:\/\/cloud.google.com\/storage\/docs\/) URI to export the+-- agent to. The format of this URI must be \`gs:\/\/\/\`. If left+-- unspecified, the serialized agent is returned inline.+gcdvearAgentURI :: Lens' GoogleCloudDialogflowV2ExportAgentRequest (Maybe Text)+gcdvearAgentURI+  = lens _gcdvearAgentURI+      (\ s a -> s{_gcdvearAgentURI = a})++instance FromJSON+           GoogleCloudDialogflowV2ExportAgentRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2ExportAgentRequest"+              (\ o ->+                 GoogleCloudDialogflowV2ExportAgentRequest' <$>+                   (o .:? "agentUri"))++instance ToJSON+           GoogleCloudDialogflowV2ExportAgentRequest+         where+        toJSON GoogleCloudDialogflowV2ExportAgentRequest'{..}+          = object+              (catMaybes [("agentUri" .=) <$> _gcdvearAgentURI])++-- | The card for presenting a carousel of options to select from.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageCarouselSelect' smart constructor.+newtype GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect =+  GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect'+    { _gcdvimcsItems :: Maybe [GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimcsItems'+googleCloudDialogflowV2beta1IntentMessageCarouselSelect+    :: GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect+googleCloudDialogflowV2beta1IntentMessageCarouselSelect =+  GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect'+    {_gcdvimcsItems = Nothing}+++-- | Required. Carousel items.+gcdvimcsItems :: Lens' GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect [GoogleCloudDialogflowV2beta1IntentMessageCarouselSelectItem]+gcdvimcsItems+  = lens _gcdvimcsItems+      (\ s a -> s{_gcdvimcsItems = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect'+                   <$> (o .:? "items" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageCarouselSelect'{..}+          = object+              (catMaybes [("items" .=) <$> _gcdvimcsItems])++-- | Represents a context.+--+-- /See:/ 'googleCloudDialogflowV2beta1Context' smart constructor.+data GoogleCloudDialogflowV2beta1Context =+  GoogleCloudDialogflowV2beta1Context'+    { _gcdvcLifespanCount :: !(Maybe (Textual Int32))+    , _gcdvcName          :: !(Maybe Text)+    , _gcdvcParameters    :: !(Maybe GoogleCloudDialogflowV2beta1ContextParameters)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1Context' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvcLifespanCount'+--+-- * 'gcdvcName'+--+-- * 'gcdvcParameters'+googleCloudDialogflowV2beta1Context+    :: GoogleCloudDialogflowV2beta1Context+googleCloudDialogflowV2beta1Context =+  GoogleCloudDialogflowV2beta1Context'+    { _gcdvcLifespanCount = Nothing+    , _gcdvcName = Nothing+    , _gcdvcParameters = Nothing+    }+++-- | Optional. The number of conversational query requests after which the+-- context expires. If set to \`0\` (the default) the context expires+-- immediately. Contexts expire automatically after 20 minutes if there are+-- no matching queries.+gcdvcLifespanCount :: Lens' GoogleCloudDialogflowV2beta1Context (Maybe Int32)+gcdvcLifespanCount+  = lens _gcdvcLifespanCount+      (\ s a -> s{_gcdvcLifespanCount = a})+      . mapping _Coerce++-- | Required. The unique identifier of the context. Format:+-- \`projects\/\/agent\/sessions\/\/contexts\/\`, or+-- \`projects\/\/agent\/environments\/\/users\/\/sessions\/\/contexts\/\`.+-- The \`Context ID\` is always converted to lowercase, may only contain+-- characters in a-zA-Z0-9_-% and may be at most 250 bytes long. If+-- \`Environment ID\` is not specified, we assume default \'draft\'+-- environment. If \`User ID\` is not specified, we assume default \'-\'+-- user.+gcdvcName :: Lens' GoogleCloudDialogflowV2beta1Context (Maybe Text)+gcdvcName+  = lens _gcdvcName (\ s a -> s{_gcdvcName = a})++-- | Optional. The collection of parameters associated with this context.+-- Refer to [this+-- doc](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/intents-actions-parameters)+-- for syntax.+gcdvcParameters :: Lens' GoogleCloudDialogflowV2beta1Context (Maybe GoogleCloudDialogflowV2beta1ContextParameters)+gcdvcParameters+  = lens _gcdvcParameters+      (\ s a -> s{_gcdvcParameters = a})++instance FromJSON GoogleCloudDialogflowV2beta1Context+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2beta1Context"+              (\ o ->+                 GoogleCloudDialogflowV2beta1Context' <$>+                   (o .:? "lifespanCount") <*> (o .:? "name") <*>+                     (o .:? "parameters"))++instance ToJSON GoogleCloudDialogflowV2beta1Context+         where+        toJSON GoogleCloudDialogflowV2beta1Context'{..}+          = object+              (catMaybes+                 [("lifespanCount" .=) <$> _gcdvcLifespanCount,+                  ("name" .=) <$> _gcdvcName,+                  ("parameters" .=) <$> _gcdvcParameters])++-- | The request message for EntityTypes.BatchUpdateEntityTypes.+--+-- /See:/ 'googleCloudDialogflowV2BatchUpdateEntityTypesRequest' smart constructor.+data GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest =+  GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest'+    { _gcdvbuetrLanguageCode          :: !(Maybe Text)+    , _gcdvbuetrUpdateMask            :: !(Maybe GFieldMask)+    , _gcdvbuetrEntityTypeBatchInline :: !(Maybe GoogleCloudDialogflowV2EntityTypeBatch)+    , _gcdvbuetrEntityTypeBatchURI    :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvbuetrLanguageCode'+--+-- * 'gcdvbuetrUpdateMask'+--+-- * 'gcdvbuetrEntityTypeBatchInline'+--+-- * 'gcdvbuetrEntityTypeBatchURI'+googleCloudDialogflowV2BatchUpdateEntityTypesRequest+    :: GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest+googleCloudDialogflowV2BatchUpdateEntityTypesRequest =+  GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest'+    { _gcdvbuetrLanguageCode = Nothing+    , _gcdvbuetrUpdateMask = Nothing+    , _gcdvbuetrEntityTypeBatchInline = Nothing+    , _gcdvbuetrEntityTypeBatchURI = Nothing+    }+++-- | Optional. The language of entity synonyms defined in \`entity_types\`.+-- If not specified, the agent\'s default language is used. [Many+-- languages](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/reference\/language)+-- are supported. Note: languages must be enabled in the agent before they+-- can be used.+gcdvbuetrLanguageCode :: Lens' GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest (Maybe Text)+gcdvbuetrLanguageCode+  = lens _gcdvbuetrLanguageCode+      (\ s a -> s{_gcdvbuetrLanguageCode = a})++-- | Optional. The mask to control which fields get updated.+gcdvbuetrUpdateMask :: Lens' GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest (Maybe GFieldMask)+gcdvbuetrUpdateMask+  = lens _gcdvbuetrUpdateMask+      (\ s a -> s{_gcdvbuetrUpdateMask = a})++-- | The collection of entity types to update or create.+gcdvbuetrEntityTypeBatchInline :: Lens' GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest (Maybe GoogleCloudDialogflowV2EntityTypeBatch)+gcdvbuetrEntityTypeBatchInline+  = lens _gcdvbuetrEntityTypeBatchInline+      (\ s a -> s{_gcdvbuetrEntityTypeBatchInline = a})++-- | The URI to a Google Cloud Storage file containing entity types to update+-- or create. The file format can either be a serialized proto (of+-- EntityBatch type) or a JSON object. Note: The URI must start with+-- \"gs:\/\/\".+gcdvbuetrEntityTypeBatchURI :: Lens' GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest (Maybe Text)+gcdvbuetrEntityTypeBatchURI+  = lens _gcdvbuetrEntityTypeBatchURI+      (\ s a -> s{_gcdvbuetrEntityTypeBatchURI = a})++instance FromJSON+           GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest"+              (\ o ->+                 GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest'+                   <$>+                   (o .:? "languageCode") <*> (o .:? "updateMask") <*>+                     (o .:? "entityTypeBatchInline")+                     <*> (o .:? "entityTypeBatchUri"))++instance ToJSON+           GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest+         where+        toJSON+          GoogleCloudDialogflowV2BatchUpdateEntityTypesRequest'{..}+          = object+              (catMaybes+                 [("languageCode" .=) <$> _gcdvbuetrLanguageCode,+                  ("updateMask" .=) <$> _gcdvbuetrUpdateMask,+                  ("entityTypeBatchInline" .=) <$>+                    _gcdvbuetrEntityTypeBatchInline,+                  ("entityTypeBatchUri" .=) <$>+                    _gcdvbuetrEntityTypeBatchURI])++-- | 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:/ 'googleLongrunningOperationResponse' smart constructor.+newtype GoogleLongrunningOperationResponse =+  GoogleLongrunningOperationResponse'+    { _glorAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleLongrunningOperationResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'glorAddtional'+googleLongrunningOperationResponse+    :: HashMap Text JSONValue -- ^ 'glorAddtional'+    -> GoogleLongrunningOperationResponse+googleLongrunningOperationResponse pGlorAddtional_ =+  GoogleLongrunningOperationResponse'+    {_glorAddtional = _Coerce # pGlorAddtional_}+++-- | Properties of the object. Contains field \'type with type URL.+glorAddtional :: Lens' GoogleLongrunningOperationResponse (HashMap Text JSONValue)+glorAddtional+  = lens _glorAddtional+      (\ s a -> s{_glorAddtional = a})+      . _Coerce++instance FromJSON GoogleLongrunningOperationResponse+         where+        parseJSON+          = withObject "GoogleLongrunningOperationResponse"+              (\ o ->+                 GoogleLongrunningOperationResponse' <$>+                   (parseJSONObject o))++instance ToJSON GoogleLongrunningOperationResponse+         where+        toJSON = toJSON . _glorAddtional++-- | Synthesizes speech and plays back the synthesized audio to the caller in+-- Telephony Gateway. Telephony Gateway takes the synthesizer settings from+-- \`DetectIntentResponse.output_audio_config\` which can either be set at+-- request-level or can come from the agent-level synthesizer config.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech =+  GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech'+    { _gcdvimtssText :: !(Maybe Text)+    , _gcdvimtssSsml :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimtssText'+--+-- * 'gcdvimtssSsml'+googleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech+    :: GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech+googleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech =+  GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech'+    {_gcdvimtssText = Nothing, _gcdvimtssSsml = Nothing}+++-- | The raw text to be synthesized.+gcdvimtssText :: Lens' GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech (Maybe Text)+gcdvimtssText+  = lens _gcdvimtssText+      (\ s a -> s{_gcdvimtssText = a})++-- | The SSML to be synthesized. For more information, see+-- [SSML](https:\/\/developers.google.com\/actions\/reference\/ssml).+gcdvimtssSsml :: Lens' GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech (Maybe Text)+gcdvimtssSsml+  = lens _gcdvimtssSsml+      (\ s a -> s{_gcdvimtssSsml = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech'+                   <$> (o .:? "text") <*> (o .:? "ssml"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageTelephonySynthesizeSpeech'{..}+          = object+              (catMaybes+                 [("text" .=) <$> _gcdvimtssText,+                  ("ssml" .=) <$> _gcdvimtssSsml])++-- | An item in the list.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageListSelectItem' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessageListSelectItem =+  GoogleCloudDialogflowV2beta1IntentMessageListSelectItem'+    { _gcdvimlsicImage       :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)+    , _gcdvimlsicTitle       :: !(Maybe Text)+    , _gcdvimlsicDescription :: !(Maybe Text)+    , _gcdvimlsicInfo        :: !(Maybe GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageListSelectItem' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimlsicImage'+--+-- * 'gcdvimlsicTitle'+--+-- * 'gcdvimlsicDescription'+--+-- * 'gcdvimlsicInfo'+googleCloudDialogflowV2beta1IntentMessageListSelectItem+    :: GoogleCloudDialogflowV2beta1IntentMessageListSelectItem+googleCloudDialogflowV2beta1IntentMessageListSelectItem =+  GoogleCloudDialogflowV2beta1IntentMessageListSelectItem'+    { _gcdvimlsicImage = Nothing+    , _gcdvimlsicTitle = Nothing+    , _gcdvimlsicDescription = Nothing+    , _gcdvimlsicInfo = Nothing+    }+++-- | Optional. The image to display.+gcdvimlsicImage :: Lens' GoogleCloudDialogflowV2beta1IntentMessageListSelectItem (Maybe GoogleCloudDialogflowV2beta1IntentMessageImage)+gcdvimlsicImage+  = lens _gcdvimlsicImage+      (\ s a -> s{_gcdvimlsicImage = a})++-- | Required. The title of the list item.+gcdvimlsicTitle :: Lens' GoogleCloudDialogflowV2beta1IntentMessageListSelectItem (Maybe Text)+gcdvimlsicTitle+  = lens _gcdvimlsicTitle+      (\ s a -> s{_gcdvimlsicTitle = a})++-- | Optional. The main text describing the item.+gcdvimlsicDescription :: Lens' GoogleCloudDialogflowV2beta1IntentMessageListSelectItem (Maybe Text)+gcdvimlsicDescription+  = lens _gcdvimlsicDescription+      (\ s a -> s{_gcdvimlsicDescription = a})++-- | Required. Additional information about this option.+gcdvimlsicInfo :: Lens' GoogleCloudDialogflowV2beta1IntentMessageListSelectItem (Maybe GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo)+gcdvimlsicInfo+  = lens _gcdvimlsicInfo+      (\ s a -> s{_gcdvimlsicInfo = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageListSelectItem+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageListSelectItem"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageListSelectItem'+                   <$>+                   (o .:? "image") <*> (o .:? "title") <*>+                     (o .:? "description")+                     <*> (o .:? "info"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageListSelectItem+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageListSelectItem'{..}+          = object+              (catMaybes+                 [("image" .=) <$> _gcdvimlsicImage,+                  ("title" .=) <$> _gcdvimlsicTitle,+                  ("description" .=) <$> _gcdvimlsicDescription,+                  ("info" .=) <$> _gcdvimlsicInfo])++-- | The suggestion chip message that the user can tap to quickly post a+-- reply to the conversation.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageSuggestion' smart constructor.+newtype GoogleCloudDialogflowV2IntentMessageSuggestion =+  GoogleCloudDialogflowV2IntentMessageSuggestion'+    { _gcdvimscTitle :: Maybe Text+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageSuggestion' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimscTitle'+googleCloudDialogflowV2IntentMessageSuggestion+    :: GoogleCloudDialogflowV2IntentMessageSuggestion+googleCloudDialogflowV2IntentMessageSuggestion =+  GoogleCloudDialogflowV2IntentMessageSuggestion' {_gcdvimscTitle = Nothing}+++-- | Required. The text shown the in the suggestion chip.+gcdvimscTitle :: Lens' GoogleCloudDialogflowV2IntentMessageSuggestion (Maybe Text)+gcdvimscTitle+  = lens _gcdvimscTitle+      (\ s a -> s{_gcdvimscTitle = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageSuggestion+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageSuggestion"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageSuggestion' <$>+                   (o .:? "title"))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageSuggestion+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageSuggestion'{..}+          = object+              (catMaybes [("title" .=) <$> _gcdvimscTitle])++-- | An **entity entry** for an associated entity type.+--+-- /See:/ 'googleCloudDialogflowV2beta1EntityTypeEntity' smart constructor.+data GoogleCloudDialogflowV2beta1EntityTypeEntity =+  GoogleCloudDialogflowV2beta1EntityTypeEntity'+    { _gcdveteValue    :: !(Maybe Text)+    , _gcdveteSynonyms :: !(Maybe [Text])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1EntityTypeEntity' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdveteValue'+--+-- * 'gcdveteSynonyms'+googleCloudDialogflowV2beta1EntityTypeEntity+    :: GoogleCloudDialogflowV2beta1EntityTypeEntity+googleCloudDialogflowV2beta1EntityTypeEntity =+  GoogleCloudDialogflowV2beta1EntityTypeEntity'+    {_gcdveteValue = Nothing, _gcdveteSynonyms = Nothing}+++-- | Required. The primary value associated with this entity entry. For+-- example, if the entity type is *vegetable*, the value could be+-- *scallions*. For \`KIND_MAP\` entity types: * A canonical value to be+-- used in place of synonyms. For \`KIND_LIST\` entity types: * A string+-- that can contain references to other entity types (with or without+-- aliases).+gcdveteValue :: Lens' GoogleCloudDialogflowV2beta1EntityTypeEntity (Maybe Text)+gcdveteValue+  = lens _gcdveteValue (\ s a -> s{_gcdveteValue = a})++-- | Required. A collection of value synonyms. For example, if the entity+-- type is *vegetable*, and \`value\` is *scallions*, a synonym could be+-- *green onions*. For \`KIND_LIST\` entity types: * This collection must+-- contain exactly one synonym equal to \`value\`.+gcdveteSynonyms :: Lens' GoogleCloudDialogflowV2beta1EntityTypeEntity [Text]+gcdveteSynonyms+  = lens _gcdveteSynonyms+      (\ s a -> s{_gcdveteSynonyms = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1EntityTypeEntity+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1EntityTypeEntity"+              (\ o ->+                 GoogleCloudDialogflowV2beta1EntityTypeEntity' <$>+                   (o .:? "value") <*> (o .:? "synonyms" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2beta1EntityTypeEntity+         where+        toJSON+          GoogleCloudDialogflowV2beta1EntityTypeEntity'{..}+          = object+              (catMaybes+                 [("value" .=) <$> _gcdveteValue,+                  ("synonyms" .=) <$> _gcdveteSynonyms])++-- | Represents an entity type. Entity types serve as a tool for extracting+-- parameter values from natural language queries.+--+-- /See:/ 'googleCloudDialogflowV2EntityType' smart constructor.+data GoogleCloudDialogflowV2EntityType =+  GoogleCloudDialogflowV2EntityType'+    { _gcdvetEntities          :: !(Maybe [GoogleCloudDialogflowV2EntityTypeEntity])+    , _gcdvetKind              :: !(Maybe GoogleCloudDialogflowV2EntityTypeKind)+    , _gcdvetName              :: !(Maybe Text)+    , _gcdvetAutoExpansionMode :: !(Maybe GoogleCloudDialogflowV2EntityTypeAutoExpansionMode)+    , _gcdvetDisplayName       :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2EntityType' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvetEntities'+--+-- * 'gcdvetKind'+--+-- * 'gcdvetName'+--+-- * 'gcdvetAutoExpansionMode'+--+-- * 'gcdvetDisplayName'+googleCloudDialogflowV2EntityType+    :: GoogleCloudDialogflowV2EntityType+googleCloudDialogflowV2EntityType =+  GoogleCloudDialogflowV2EntityType'+    { _gcdvetEntities = Nothing+    , _gcdvetKind = Nothing+    , _gcdvetName = Nothing+    , _gcdvetAutoExpansionMode = Nothing+    , _gcdvetDisplayName = Nothing+    }+++-- | Optional. The collection of entity entries associated with the entity+-- type.+gcdvetEntities :: Lens' GoogleCloudDialogflowV2EntityType [GoogleCloudDialogflowV2EntityTypeEntity]+gcdvetEntities+  = lens _gcdvetEntities+      (\ s a -> s{_gcdvetEntities = a})+      . _Default+      . _Coerce++-- | Required. Indicates the kind of entity type.+gcdvetKind :: Lens' GoogleCloudDialogflowV2EntityType (Maybe GoogleCloudDialogflowV2EntityTypeKind)+gcdvetKind+  = lens _gcdvetKind (\ s a -> s{_gcdvetKind = a})++-- | The unique identifier of the entity type. Required for+-- EntityTypes.UpdateEntityType and EntityTypes.BatchUpdateEntityTypes+-- methods. Format: \`projects\/\/agent\/entityTypes\/\`.+gcdvetName :: Lens' GoogleCloudDialogflowV2EntityType (Maybe Text)+gcdvetName+  = lens _gcdvetName (\ s a -> s{_gcdvetName = a})++-- | Optional. Indicates whether the entity type can be automatically+-- expanded.+gcdvetAutoExpansionMode :: Lens' GoogleCloudDialogflowV2EntityType (Maybe GoogleCloudDialogflowV2EntityTypeAutoExpansionMode)+gcdvetAutoExpansionMode+  = lens _gcdvetAutoExpansionMode+      (\ s a -> s{_gcdvetAutoExpansionMode = a})++-- | Required. The name of the entity type.+gcdvetDisplayName :: Lens' GoogleCloudDialogflowV2EntityType (Maybe Text)+gcdvetDisplayName+  = lens _gcdvetDisplayName+      (\ s a -> s{_gcdvetDisplayName = a})++instance FromJSON GoogleCloudDialogflowV2EntityType+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2EntityType"+              (\ o ->+                 GoogleCloudDialogflowV2EntityType' <$>+                   (o .:? "entities" .!= mempty) <*> (o .:? "kind") <*>+                     (o .:? "name")+                     <*> (o .:? "autoExpansionMode")+                     <*> (o .:? "displayName"))++instance ToJSON GoogleCloudDialogflowV2EntityType+         where+        toJSON GoogleCloudDialogflowV2EntityType'{..}+          = object+              (catMaybes+                 [("entities" .=) <$> _gcdvetEntities,+                  ("kind" .=) <$> _gcdvetKind,+                  ("name" .=) <$> _gcdvetName,+                  ("autoExpansionMode" .=) <$>+                    _gcdvetAutoExpansionMode,+                  ("displayName" .=) <$> _gcdvetDisplayName])++-- | Represents the natural language text to be processed.+--+-- /See:/ 'googleCloudDialogflowV2TextInput' smart constructor.+data GoogleCloudDialogflowV2TextInput =+  GoogleCloudDialogflowV2TextInput'+    { _gcdvtiLanguageCode :: !(Maybe Text)+    , _gcdvtiText         :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2TextInput' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvtiLanguageCode'+--+-- * 'gcdvtiText'+googleCloudDialogflowV2TextInput+    :: GoogleCloudDialogflowV2TextInput+googleCloudDialogflowV2TextInput =+  GoogleCloudDialogflowV2TextInput'+    {_gcdvtiLanguageCode = Nothing, _gcdvtiText = Nothing}+++-- | Required. The language of this conversational query. See [Language+-- Support](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/reference\/language)+-- for a list of the currently supported language codes. Note that queries+-- in the same session do not necessarily need to specify the same+-- language.+gcdvtiLanguageCode :: Lens' GoogleCloudDialogflowV2TextInput (Maybe Text)+gcdvtiLanguageCode+  = lens _gcdvtiLanguageCode+      (\ s a -> s{_gcdvtiLanguageCode = a})++-- | Required. The UTF-8 encoded natural language text to be processed. Text+-- length must not exceed 256 characters.+gcdvtiText :: Lens' GoogleCloudDialogflowV2TextInput (Maybe Text)+gcdvtiText+  = lens _gcdvtiText (\ s a -> s{_gcdvtiText = a})++instance FromJSON GoogleCloudDialogflowV2TextInput+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2TextInput"+              (\ o ->+                 GoogleCloudDialogflowV2TextInput' <$>+                   (o .:? "languageCode") <*> (o .:? "text"))++instance ToJSON GoogleCloudDialogflowV2TextInput+         where+        toJSON GoogleCloudDialogflowV2TextInput'{..}+          = object+              (catMaybes+                 [("languageCode" .=) <$> _gcdvtiLanguageCode,+                  ("text" .=) <$> _gcdvtiText])++-- | Opens the given URI.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction' smart constructor.+newtype GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction =+  GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction'+    { _gcdvimbcbouriaURI :: Maybe Text+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimbcbouriaURI'+googleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction+    :: GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction+googleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction =+  GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction'+    {_gcdvimbcbouriaURI = Nothing}+++-- | Required. The HTTP or HTTPS scheme URI.+gcdvimbcbouriaURI :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction (Maybe Text)+gcdvimbcbouriaURI+  = lens _gcdvimbcbouriaURI+      (\ s a -> s{_gcdvimbcbouriaURI = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction'+                   <$> (o .:? "uri"))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction'{..}+          = object+              (catMaybes [("uri" .=) <$> _gcdvimbcbouriaURI])++-- | The card response message.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageCard' smart constructor.+data GoogleCloudDialogflowV2IntentMessageCard =+  GoogleCloudDialogflowV2IntentMessageCard'+    { _gcdvimccButtons  :: !(Maybe [GoogleCloudDialogflowV2IntentMessageCardButton])+    , _gcdvimccImageURI :: !(Maybe Text)+    , _gcdvimccSubtitle :: !(Maybe Text)+    , _gcdvimccTitle    :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageCard' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimccButtons'+--+-- * 'gcdvimccImageURI'+--+-- * 'gcdvimccSubtitle'+--+-- * 'gcdvimccTitle'+googleCloudDialogflowV2IntentMessageCard+    :: GoogleCloudDialogflowV2IntentMessageCard+googleCloudDialogflowV2IntentMessageCard =+  GoogleCloudDialogflowV2IntentMessageCard'+    { _gcdvimccButtons = Nothing+    , _gcdvimccImageURI = Nothing+    , _gcdvimccSubtitle = Nothing+    , _gcdvimccTitle = Nothing+    }+++-- | Optional. The collection of card buttons.+gcdvimccButtons :: Lens' GoogleCloudDialogflowV2IntentMessageCard [GoogleCloudDialogflowV2IntentMessageCardButton]+gcdvimccButtons+  = lens _gcdvimccButtons+      (\ s a -> s{_gcdvimccButtons = a})+      . _Default+      . _Coerce++-- | Optional. The public URI to an image file for the card.+gcdvimccImageURI :: Lens' GoogleCloudDialogflowV2IntentMessageCard (Maybe Text)+gcdvimccImageURI+  = lens _gcdvimccImageURI+      (\ s a -> s{_gcdvimccImageURI = a})++-- | Optional. The subtitle of the card.+gcdvimccSubtitle :: Lens' GoogleCloudDialogflowV2IntentMessageCard (Maybe Text)+gcdvimccSubtitle+  = lens _gcdvimccSubtitle+      (\ s a -> s{_gcdvimccSubtitle = a})++-- | Optional. The title of the card.+gcdvimccTitle :: Lens' GoogleCloudDialogflowV2IntentMessageCard (Maybe Text)+gcdvimccTitle+  = lens _gcdvimccTitle+      (\ s a -> s{_gcdvimccTitle = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageCard+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageCard"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageCard' <$>+                   (o .:? "buttons" .!= mempty) <*> (o .:? "imageUri")+                     <*> (o .:? "subtitle")+                     <*> (o .:? "title"))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageCard+         where+        toJSON GoogleCloudDialogflowV2IntentMessageCard'{..}+          = object+              (catMaybes+                 [("buttons" .=) <$> _gcdvimccButtons,+                  ("imageUri" .=) <$> _gcdvimccImageURI,+                  ("subtitle" .=) <$> _gcdvimccSubtitle,+                  ("title" .=) <$> _gcdvimccTitle])++-- | Represents the contents of the original request that was passed to the+-- \`[Streaming]DetectIntent\` call.+--+-- /See:/ 'googleCloudDialogflowV2OriginalDetectIntentRequest' smart constructor.+data GoogleCloudDialogflowV2OriginalDetectIntentRequest =+  GoogleCloudDialogflowV2OriginalDetectIntentRequest'+    { _gPayload :: !(Maybe GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload)+    , _gVersion :: !(Maybe Text)+    , _gSource  :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2OriginalDetectIntentRequest' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gPayload'+--+-- * 'gVersion'+--+-- * 'gSource'+googleCloudDialogflowV2OriginalDetectIntentRequest+    :: GoogleCloudDialogflowV2OriginalDetectIntentRequest+googleCloudDialogflowV2OriginalDetectIntentRequest =+  GoogleCloudDialogflowV2OriginalDetectIntentRequest'+    {_gPayload = Nothing, _gVersion = Nothing, _gSource = Nothing}+++-- | Optional. This field is set to the value of the+-- \`QueryParameters.payload\` field passed in the request. Some+-- integrations that query a Dialogflow agent may provide additional+-- information in the payload. In particular for the Telephony Gateway this+-- field has the form:+--+-- > {+-- >  "telephony": {+-- >    "caller_id": "+18558363987"+-- >  }+-- > }+--+-- Note: The caller ID field (\`caller_id\`) will be redacted for Standard+-- Edition agents and populated with the caller ID in [E.164+-- format](https:\/\/en.wikipedia.org\/wiki\/E.164) for Enterprise Edition+-- agents.+gPayload :: Lens' GoogleCloudDialogflowV2OriginalDetectIntentRequest (Maybe GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload)+gPayload = lens _gPayload (\ s a -> s{_gPayload = a})++-- | Optional. The version of the protocol used for this request. This field+-- is AoG-specific.+gVersion :: Lens' GoogleCloudDialogflowV2OriginalDetectIntentRequest (Maybe Text)+gVersion = lens _gVersion (\ s a -> s{_gVersion = a})++-- | The source of this request, e.g., \`google\`, \`facebook\`, \`slack\`.+-- It is set by Dialogflow-owned servers.+gSource :: Lens' GoogleCloudDialogflowV2OriginalDetectIntentRequest (Maybe Text)+gSource = lens _gSource (\ s a -> s{_gSource = a})++instance FromJSON+           GoogleCloudDialogflowV2OriginalDetectIntentRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2OriginalDetectIntentRequest"+              (\ o ->+                 GoogleCloudDialogflowV2OriginalDetectIntentRequest'+                   <$>+                   (o .:? "payload") <*> (o .:? "version") <*>+                     (o .:? "source"))++instance ToJSON+           GoogleCloudDialogflowV2OriginalDetectIntentRequest+         where+        toJSON+          GoogleCloudDialogflowV2OriginalDetectIntentRequest'{..}+          = object+              (catMaybes+                 [("payload" .=) <$> _gPayload,+                  ("version" .=) <$> _gVersion,+                  ("source" .=) <$> _gSource])++-- | The image response message.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageImage' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessageImage =+  GoogleCloudDialogflowV2beta1IntentMessageImage'+    { _gcdvimiAccessibilityText :: !(Maybe Text)+    , _gcdvimiImageURI          :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageImage' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimiAccessibilityText'+--+-- * 'gcdvimiImageURI'+googleCloudDialogflowV2beta1IntentMessageImage+    :: GoogleCloudDialogflowV2beta1IntentMessageImage+googleCloudDialogflowV2beta1IntentMessageImage =+  GoogleCloudDialogflowV2beta1IntentMessageImage'+    {_gcdvimiAccessibilityText = Nothing, _gcdvimiImageURI = Nothing}+++-- | A text description of the image to be used for accessibility, e.g.,+-- screen readers. Required if image_uri is set for CarouselSelect.+gcdvimiAccessibilityText :: Lens' GoogleCloudDialogflowV2beta1IntentMessageImage (Maybe Text)+gcdvimiAccessibilityText+  = lens _gcdvimiAccessibilityText+      (\ s a -> s{_gcdvimiAccessibilityText = a})++-- | Optional. The public URI to an image file.+gcdvimiImageURI :: Lens' GoogleCloudDialogflowV2beta1IntentMessageImage (Maybe Text)+gcdvimiImageURI+  = lens _gcdvimiImageURI+      (\ s a -> s{_gcdvimiImageURI = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageImage+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageImage"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageImage' <$>+                   (o .:? "accessibilityText") <*> (o .:? "imageUri"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageImage+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageImage'{..}+          = object+              (catMaybes+                 [("accessibilityText" .=) <$>+                    _gcdvimiAccessibilityText,+                  ("imageUri" .=) <$> _gcdvimiImageURI])++-- | Instructs the speech synthesizer how to generate the output audio+-- content.+--+-- /See:/ 'googleCloudDialogflowV2OutputAudioConfig' smart constructor.+data GoogleCloudDialogflowV2OutputAudioConfig =+  GoogleCloudDialogflowV2OutputAudioConfig'+    { _gcdvoacSampleRateHertz        :: !(Maybe (Textual Int32))+    , _gcdvoacSynthesizeSpeechConfig :: !(Maybe GoogleCloudDialogflowV2SynthesizeSpeechConfig)+    , _gcdvoacAudioEncoding          :: !(Maybe GoogleCloudDialogflowV2OutputAudioConfigAudioEncoding)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2OutputAudioConfig' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvoacSampleRateHertz'+--+-- * 'gcdvoacSynthesizeSpeechConfig'+--+-- * 'gcdvoacAudioEncoding'+googleCloudDialogflowV2OutputAudioConfig+    :: GoogleCloudDialogflowV2OutputAudioConfig+googleCloudDialogflowV2OutputAudioConfig =+  GoogleCloudDialogflowV2OutputAudioConfig'+    { _gcdvoacSampleRateHertz = Nothing+    , _gcdvoacSynthesizeSpeechConfig = Nothing+    , _gcdvoacAudioEncoding = Nothing+    }+++-- | Optional. The synthesis sample rate (in hertz) for this audio. If not+-- provided, then the synthesizer will use the default sample rate based on+-- the audio encoding. If this is different from the voice\'s natural+-- sample rate, then the synthesizer will honor this request by converting+-- to the desired sample rate (which might result in worse audio quality).+gcdvoacSampleRateHertz :: Lens' GoogleCloudDialogflowV2OutputAudioConfig (Maybe Int32)+gcdvoacSampleRateHertz+  = lens _gcdvoacSampleRateHertz+      (\ s a -> s{_gcdvoacSampleRateHertz = a})+      . mapping _Coerce++-- | Optional. Configuration of how speech should be synthesized.+gcdvoacSynthesizeSpeechConfig :: Lens' GoogleCloudDialogflowV2OutputAudioConfig (Maybe GoogleCloudDialogflowV2SynthesizeSpeechConfig)+gcdvoacSynthesizeSpeechConfig+  = lens _gcdvoacSynthesizeSpeechConfig+      (\ s a -> s{_gcdvoacSynthesizeSpeechConfig = a})++-- | Required. Audio encoding of the synthesized audio content.+gcdvoacAudioEncoding :: Lens' GoogleCloudDialogflowV2OutputAudioConfig (Maybe GoogleCloudDialogflowV2OutputAudioConfigAudioEncoding)+gcdvoacAudioEncoding+  = lens _gcdvoacAudioEncoding+      (\ s a -> s{_gcdvoacAudioEncoding = a})++instance FromJSON+           GoogleCloudDialogflowV2OutputAudioConfig+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2OutputAudioConfig"+              (\ o ->+                 GoogleCloudDialogflowV2OutputAudioConfig' <$>+                   (o .:? "sampleRateHertz") <*>+                     (o .:? "synthesizeSpeechConfig")+                     <*> (o .:? "audioEncoding"))++instance ToJSON+           GoogleCloudDialogflowV2OutputAudioConfig+         where+        toJSON GoogleCloudDialogflowV2OutputAudioConfig'{..}+          = object+              (catMaybes+                 [("sampleRateHertz" .=) <$> _gcdvoacSampleRateHertz,+                  ("synthesizeSpeechConfig" .=) <$>+                    _gcdvoacSynthesizeSpeechConfig,+                  ("audioEncoding" .=) <$> _gcdvoacAudioEncoding])++-- | The response message for Agents.ExportAgent.+--+-- /See:/ 'googleCloudDialogflowV2ExportAgentResponse' smart constructor.+data GoogleCloudDialogflowV2ExportAgentResponse =+  GoogleCloudDialogflowV2ExportAgentResponse'+    { _gAgentURI     :: !(Maybe Text)+    , _gAgentContent :: !(Maybe Bytes)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2ExportAgentResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gAgentURI'+--+-- * 'gAgentContent'+googleCloudDialogflowV2ExportAgentResponse+    :: GoogleCloudDialogflowV2ExportAgentResponse+googleCloudDialogflowV2ExportAgentResponse =+  GoogleCloudDialogflowV2ExportAgentResponse'+    {_gAgentURI = Nothing, _gAgentContent = Nothing}+++-- | The URI to a file containing the exported agent. This field is populated+-- only if \`agent_uri\` is specified in \`ExportAgentRequest\`.+gAgentURI :: Lens' GoogleCloudDialogflowV2ExportAgentResponse (Maybe Text)+gAgentURI+  = lens _gAgentURI (\ s a -> s{_gAgentURI = a})++-- | The exported agent. Example for how to export an agent to a zip file via+-- a command line:+--+-- > curl \+-- >   'https://dialogflow.googleapis.com/v2/projects/<project_name>/agent:export'\+-- >   -X POST \+-- >   -H 'Authorization: Bearer '$(gcloud auth application-default+-- >   print-access-token) \+-- >   -H 'Accept: application/json' \+-- >   -H 'Content-Type: application/json' \+-- >   --compressed \+-- >   --data-binary '{}' \+-- > | grep agentContent | sed -e 's/.*"agentContent": "\([^"]*\)".*/\1/' \+-- > | base64 --decode > <agent zip file>+gAgentContent :: Lens' GoogleCloudDialogflowV2ExportAgentResponse (Maybe ByteString)+gAgentContent+  = lens _gAgentContent+      (\ s a -> s{_gAgentContent = a})+      . mapping _Bytes++instance FromJSON+           GoogleCloudDialogflowV2ExportAgentResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2ExportAgentResponse"+              (\ o ->+                 GoogleCloudDialogflowV2ExportAgentResponse' <$>+                   (o .:? "agentUri") <*> (o .:? "agentContent"))++instance ToJSON+           GoogleCloudDialogflowV2ExportAgentResponse+         where+        toJSON+          GoogleCloudDialogflowV2ExportAgentResponse'{..}+          = object+              (catMaybes+                 [("agentUri" .=) <$> _gAgentURI,+                  ("agentContent" .=) <$> _gAgentContent])++-- | Optional. This value is passed directly to+-- \`QueryResult.webhook_payload\`. See the related+-- \`fulfillment_messages[i].payload field\`, which may be used as an+-- alternative to this field. This field can be used for Actions on Google+-- responses. It should have a structure similar to the JSON message shown+-- here. For more information, see [Actions on Google Webhook+-- Format](https:\/\/developers.google.com\/actions\/dialogflow\/webhook)+--+-- > {+-- >   "google": {+-- >     "expectUserResponse": true,+-- >     "richResponse": {+-- >       "items": [+-- >         {+-- >           "simpleResponse": {+-- >             "textToSpeech": "this is a simple response"+-- >           }+-- >         }+-- >       ]+-- >     }+-- >   }+-- > }+--+-- /See:/ 'googleCloudDialogflowV2WebhookResponsePayload' smart constructor.+newtype GoogleCloudDialogflowV2WebhookResponsePayload =+  GoogleCloudDialogflowV2WebhookResponsePayload'+    { _gcdvwrpcAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2WebhookResponsePayload' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvwrpcAddtional'+googleCloudDialogflowV2WebhookResponsePayload+    :: HashMap Text JSONValue -- ^ 'gcdvwrpcAddtional'+    -> GoogleCloudDialogflowV2WebhookResponsePayload+googleCloudDialogflowV2WebhookResponsePayload pGcdvwrpcAddtional_ =+  GoogleCloudDialogflowV2WebhookResponsePayload'+    {_gcdvwrpcAddtional = _Coerce # pGcdvwrpcAddtional_}+++-- | Properties of the object.+gcdvwrpcAddtional :: Lens' GoogleCloudDialogflowV2WebhookResponsePayload (HashMap Text JSONValue)+gcdvwrpcAddtional+  = lens _gcdvwrpcAddtional+      (\ s a -> s{_gcdvwrpcAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2WebhookResponsePayload+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2WebhookResponsePayload"+              (\ o ->+                 GoogleCloudDialogflowV2WebhookResponsePayload' <$>+                   (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2WebhookResponsePayload+         where+        toJSON = toJSON . _gcdvwrpcAddtional++-- | The suggestion chip message that allows the user to jump out to the app+-- or website associated with this agent.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion =+  GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion'+    { _gURI             :: !(Maybe Text)+    , _gDestinationName :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gURI'+--+-- * 'gDestinationName'+googleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion+    :: GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion+googleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion =+  GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion'+    {_gURI = Nothing, _gDestinationName = Nothing}+++-- | Required. The URI of the app or site to open when the user taps the+-- suggestion chip.+gURI :: Lens' GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion (Maybe Text)+gURI = lens _gURI (\ s a -> s{_gURI = a})++-- | Required. The name of the app or site this chip is linking to.+gDestinationName :: Lens' GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion (Maybe Text)+gDestinationName+  = lens _gDestinationName+      (\ s a -> s{_gDestinationName = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion'+                   <$> (o .:? "uri") <*> (o .:? "destinationName"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageLinkOutSuggestion'{..}+          = object+              (catMaybes+                 [("uri" .=) <$> _gURI,+                  ("destinationName" .=) <$> _gDestinationName])++-- | The response message for Intents.ListIntents.+--+-- /See:/ 'googleCloudDialogflowV2ListIntentsResponse' smart constructor.+data GoogleCloudDialogflowV2ListIntentsResponse =+  GoogleCloudDialogflowV2ListIntentsResponse'+    { _gcdvlirIntents       :: !(Maybe [GoogleCloudDialogflowV2Intent])+    , _gcdvlirNextPageToken :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2ListIntentsResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvlirIntents'+--+-- * 'gcdvlirNextPageToken'+googleCloudDialogflowV2ListIntentsResponse+    :: GoogleCloudDialogflowV2ListIntentsResponse+googleCloudDialogflowV2ListIntentsResponse =+  GoogleCloudDialogflowV2ListIntentsResponse'+    {_gcdvlirIntents = Nothing, _gcdvlirNextPageToken = Nothing}+++-- | The list of agent intents. There will be a maximum number of items+-- returned based on the page_size field in the request.+gcdvlirIntents :: Lens' GoogleCloudDialogflowV2ListIntentsResponse [GoogleCloudDialogflowV2Intent]+gcdvlirIntents+  = lens _gcdvlirIntents+      (\ s a -> s{_gcdvlirIntents = a})+      . _Default+      . _Coerce++-- | Token to retrieve the next page of results, or empty if there are no+-- more results in the list.+gcdvlirNextPageToken :: Lens' GoogleCloudDialogflowV2ListIntentsResponse (Maybe Text)+gcdvlirNextPageToken+  = lens _gcdvlirNextPageToken+      (\ s a -> s{_gcdvlirNextPageToken = a})++instance FromJSON+           GoogleCloudDialogflowV2ListIntentsResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2ListIntentsResponse"+              (\ o ->+                 GoogleCloudDialogflowV2ListIntentsResponse' <$>+                   (o .:? "intents" .!= mempty) <*>+                     (o .:? "nextPageToken"))++instance ToJSON+           GoogleCloudDialogflowV2ListIntentsResponse+         where+        toJSON+          GoogleCloudDialogflowV2ListIntentsResponse'{..}+          = object+              (catMaybes+                 [("intents" .=) <$> _gcdvlirIntents,+                  ("nextPageToken" .=) <$> _gcdvlirNextPageToken])++-- | The response message for EntityTypes.BatchUpdateEntityTypes.+--+-- /See:/ 'googleCloudDialogflowV2BatchUpdateEntityTypesResponse' smart constructor.+newtype GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse =+  GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse'+    { _gEntityTypes :: Maybe [GoogleCloudDialogflowV2EntityType]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gEntityTypes'+googleCloudDialogflowV2BatchUpdateEntityTypesResponse+    :: GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse+googleCloudDialogflowV2BatchUpdateEntityTypesResponse =+  GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse'+    {_gEntityTypes = Nothing}+++-- | The collection of updated or created entity types.+gEntityTypes :: Lens' GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse [GoogleCloudDialogflowV2EntityType]+gEntityTypes+  = lens _gEntityTypes (\ s a -> s{_gEntityTypes = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse"+              (\ o ->+                 GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse'+                   <$> (o .:? "entityTypes" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse+         where+        toJSON+          GoogleCloudDialogflowV2BatchUpdateEntityTypesResponse'{..}+          = object+              (catMaybes [("entityTypes" .=) <$> _gEntityTypes])++-- | If the query was fulfilled by a webhook call, this field is set to the+-- value of the \`payload\` field returned in the webhook response.+--+-- /See:/ 'googleCloudDialogflowV2QueryResultWebhookPayload' smart constructor.+newtype GoogleCloudDialogflowV2QueryResultWebhookPayload =+  GoogleCloudDialogflowV2QueryResultWebhookPayload'+    { _gcdvqrwpAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2QueryResultWebhookPayload' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvqrwpAddtional'+googleCloudDialogflowV2QueryResultWebhookPayload+    :: HashMap Text JSONValue -- ^ 'gcdvqrwpAddtional'+    -> GoogleCloudDialogflowV2QueryResultWebhookPayload+googleCloudDialogflowV2QueryResultWebhookPayload pGcdvqrwpAddtional_ =+  GoogleCloudDialogflowV2QueryResultWebhookPayload'+    {_gcdvqrwpAddtional = _Coerce # pGcdvqrwpAddtional_}+++-- | Properties of the object.+gcdvqrwpAddtional :: Lens' GoogleCloudDialogflowV2QueryResultWebhookPayload (HashMap Text JSONValue)+gcdvqrwpAddtional+  = lens _gcdvqrwpAddtional+      (\ s a -> s{_gcdvqrwpAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2QueryResultWebhookPayload+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2QueryResultWebhookPayload"+              (\ o ->+                 GoogleCloudDialogflowV2QueryResultWebhookPayload' <$>+                   (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2QueryResultWebhookPayload+         where+        toJSON = toJSON . _gcdvqrwpAddtional++-- | Represents intent parameters.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentParameter' smart constructor.+data GoogleCloudDialogflowV2beta1IntentParameter =+  GoogleCloudDialogflowV2beta1IntentParameter'+    { _gcdvipValue                 :: !(Maybe Text)+    , _gcdvipName                  :: !(Maybe Text)+    , _gcdvipPrompts               :: !(Maybe [Text])+    , _gcdvipMandatory             :: !(Maybe Bool)+    , _gcdvipDisplayName           :: !(Maybe Text)+    , _gcdvipDefaultValue          :: !(Maybe Text)+    , _gcdvipIsList                :: !(Maybe Bool)+    , _gcdvipEntityTypeDisplayName :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentParameter' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvipValue'+--+-- * 'gcdvipName'+--+-- * 'gcdvipPrompts'+--+-- * 'gcdvipMandatory'+--+-- * 'gcdvipDisplayName'+--+-- * 'gcdvipDefaultValue'+--+-- * 'gcdvipIsList'+--+-- * 'gcdvipEntityTypeDisplayName'+googleCloudDialogflowV2beta1IntentParameter+    :: GoogleCloudDialogflowV2beta1IntentParameter+googleCloudDialogflowV2beta1IntentParameter =+  GoogleCloudDialogflowV2beta1IntentParameter'+    { _gcdvipValue = Nothing+    , _gcdvipName = Nothing+    , _gcdvipPrompts = Nothing+    , _gcdvipMandatory = Nothing+    , _gcdvipDisplayName = Nothing+    , _gcdvipDefaultValue = Nothing+    , _gcdvipIsList = Nothing+    , _gcdvipEntityTypeDisplayName = Nothing+    }+++-- | Optional. The definition of the parameter value. It can be: - a constant+-- string, - a parameter value defined as \`$parameter_name\`, - an+-- original parameter value defined as \`$parameter_name.original\`, - a+-- parameter value from some context defined as+-- \`#context_name.parameter_name\`.+gcdvipValue :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Text)+gcdvipValue+  = lens _gcdvipValue (\ s a -> s{_gcdvipValue = a})++-- | The unique identifier of this parameter.+gcdvipName :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Text)+gcdvipName+  = lens _gcdvipName (\ s a -> s{_gcdvipName = a})++-- | Optional. The collection of prompts that the agent can present to the+-- user in order to collect value for the parameter.+gcdvipPrompts :: Lens' GoogleCloudDialogflowV2beta1IntentParameter [Text]+gcdvipPrompts+  = lens _gcdvipPrompts+      (\ s a -> s{_gcdvipPrompts = a})+      . _Default+      . _Coerce++-- | Optional. Indicates whether the parameter is required. That is, whether+-- the intent cannot be completed without collecting the parameter value.+gcdvipMandatory :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Bool)+gcdvipMandatory+  = lens _gcdvipMandatory+      (\ s a -> s{_gcdvipMandatory = a})++-- | Required. The name of the parameter.+gcdvipDisplayName :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Text)+gcdvipDisplayName+  = lens _gcdvipDisplayName+      (\ s a -> s{_gcdvipDisplayName = a})++-- | Optional. The default value to use when the \`value\` yields an empty+-- result. Default values can be extracted from contexts by using the+-- following syntax: \`#context_name.parameter_name\`.+gcdvipDefaultValue :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Text)+gcdvipDefaultValue+  = lens _gcdvipDefaultValue+      (\ s a -> s{_gcdvipDefaultValue = a})++-- | Optional. Indicates whether the parameter represents a list of values.+gcdvipIsList :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Bool)+gcdvipIsList+  = lens _gcdvipIsList (\ s a -> s{_gcdvipIsList = a})++-- | Optional. The name of the entity type, prefixed with \`\'\`, that+-- describes values of the parameter. If the parameter is required, this+-- must be provided.+gcdvipEntityTypeDisplayName :: Lens' GoogleCloudDialogflowV2beta1IntentParameter (Maybe Text)+gcdvipEntityTypeDisplayName+  = lens _gcdvipEntityTypeDisplayName+      (\ s a -> s{_gcdvipEntityTypeDisplayName = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentParameter+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentParameter"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentParameter' <$>+                   (o .:? "value") <*> (o .:? "name") <*>+                     (o .:? "prompts" .!= mempty)+                     <*> (o .:? "mandatory")+                     <*> (o .:? "displayName")+                     <*> (o .:? "defaultValue")+                     <*> (o .:? "isList")+                     <*> (o .:? "entityTypeDisplayName"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentParameter+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentParameter'{..}+          = object+              (catMaybes+                 [("value" .=) <$> _gcdvipValue,+                  ("name" .=) <$> _gcdvipName,+                  ("prompts" .=) <$> _gcdvipPrompts,+                  ("mandatory" .=) <$> _gcdvipMandatory,+                  ("displayName" .=) <$> _gcdvipDisplayName,+                  ("defaultValue" .=) <$> _gcdvipDefaultValue,+                  ("isList" .=) <$> _gcdvipIsList,+                  ("entityTypeDisplayName" .=) <$>+                    _gcdvipEntityTypeDisplayName])++-- | Represents intent parameters.+--+-- /See:/ 'googleCloudDialogflowV2IntentParameter' smart constructor.+data GoogleCloudDialogflowV2IntentParameter =+  GoogleCloudDialogflowV2IntentParameter'+    { _gcdvipcValue                 :: !(Maybe Text)+    , _gcdvipcName                  :: !(Maybe Text)+    , _gcdvipcPrompts               :: !(Maybe [Text])+    , _gcdvipcMandatory             :: !(Maybe Bool)+    , _gcdvipcDisplayName           :: !(Maybe Text)+    , _gcdvipcDefaultValue          :: !(Maybe Text)+    , _gcdvipcIsList                :: !(Maybe Bool)+    , _gcdvipcEntityTypeDisplayName :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentParameter' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvipcValue'+--+-- * 'gcdvipcName'+--+-- * 'gcdvipcPrompts'+--+-- * 'gcdvipcMandatory'+--+-- * 'gcdvipcDisplayName'+--+-- * 'gcdvipcDefaultValue'+--+-- * 'gcdvipcIsList'+--+-- * 'gcdvipcEntityTypeDisplayName'+googleCloudDialogflowV2IntentParameter+    :: GoogleCloudDialogflowV2IntentParameter+googleCloudDialogflowV2IntentParameter =+  GoogleCloudDialogflowV2IntentParameter'+    { _gcdvipcValue = Nothing+    , _gcdvipcName = Nothing+    , _gcdvipcPrompts = Nothing+    , _gcdvipcMandatory = Nothing+    , _gcdvipcDisplayName = Nothing+    , _gcdvipcDefaultValue = Nothing+    , _gcdvipcIsList = Nothing+    , _gcdvipcEntityTypeDisplayName = Nothing+    }+++-- | Optional. The definition of the parameter value. It can be: - a constant+-- string, - a parameter value defined as \`$parameter_name\`, - an+-- original parameter value defined as \`$parameter_name.original\`, - a+-- parameter value from some context defined as+-- \`#context_name.parameter_name\`.+gcdvipcValue :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Text)+gcdvipcValue+  = lens _gcdvipcValue (\ s a -> s{_gcdvipcValue = a})++-- | The unique identifier of this parameter.+gcdvipcName :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Text)+gcdvipcName+  = lens _gcdvipcName (\ s a -> s{_gcdvipcName = a})++-- | Optional. The collection of prompts that the agent can present to the+-- user in order to collect value for the parameter.+gcdvipcPrompts :: Lens' GoogleCloudDialogflowV2IntentParameter [Text]+gcdvipcPrompts+  = lens _gcdvipcPrompts+      (\ s a -> s{_gcdvipcPrompts = a})+      . _Default+      . _Coerce++-- | Optional. Indicates whether the parameter is required. That is, whether+-- the intent cannot be completed without collecting the parameter value.+gcdvipcMandatory :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Bool)+gcdvipcMandatory+  = lens _gcdvipcMandatory+      (\ s a -> s{_gcdvipcMandatory = a})++-- | Required. The name of the parameter.+gcdvipcDisplayName :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Text)+gcdvipcDisplayName+  = lens _gcdvipcDisplayName+      (\ s a -> s{_gcdvipcDisplayName = a})++-- | Optional. The default value to use when the \`value\` yields an empty+-- result. Default values can be extracted from contexts by using the+-- following syntax: \`#context_name.parameter_name\`.+gcdvipcDefaultValue :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Text)+gcdvipcDefaultValue+  = lens _gcdvipcDefaultValue+      (\ s a -> s{_gcdvipcDefaultValue = a})++-- | Optional. Indicates whether the parameter represents a list of values.+gcdvipcIsList :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Bool)+gcdvipcIsList+  = lens _gcdvipcIsList+      (\ s a -> s{_gcdvipcIsList = a})++-- | Optional. The name of the entity type, prefixed with \`\'\`, that+-- describes values of the parameter. If the parameter is required, this+-- must be provided.+gcdvipcEntityTypeDisplayName :: Lens' GoogleCloudDialogflowV2IntentParameter (Maybe Text)+gcdvipcEntityTypeDisplayName+  = lens _gcdvipcEntityTypeDisplayName+      (\ s a -> s{_gcdvipcEntityTypeDisplayName = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentParameter+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2IntentParameter"+              (\ o ->+                 GoogleCloudDialogflowV2IntentParameter' <$>+                   (o .:? "value") <*> (o .:? "name") <*>+                     (o .:? "prompts" .!= mempty)+                     <*> (o .:? "mandatory")+                     <*> (o .:? "displayName")+                     <*> (o .:? "defaultValue")+                     <*> (o .:? "isList")+                     <*> (o .:? "entityTypeDisplayName"))++instance ToJSON+           GoogleCloudDialogflowV2IntentParameter+         where+        toJSON GoogleCloudDialogflowV2IntentParameter'{..}+          = object+              (catMaybes+                 [("value" .=) <$> _gcdvipcValue,+                  ("name" .=) <$> _gcdvipcName,+                  ("prompts" .=) <$> _gcdvipcPrompts,+                  ("mandatory" .=) <$> _gcdvipcMandatory,+                  ("displayName" .=) <$> _gcdvipcDisplayName,+                  ("defaultValue" .=) <$> _gcdvipcDefaultValue,+                  ("isList" .=) <$> _gcdvipcIsList,+                  ("entityTypeDisplayName" .=) <$>+                    _gcdvipcEntityTypeDisplayName])++-- | If the query was fulfilled by a webhook call, this field is set to the+-- value of the \`payload\` field returned in the webhook response.+--+-- /See:/ 'googleCloudDialogflowV2beta1QueryResultWebhookPayload' smart constructor.+newtype GoogleCloudDialogflowV2beta1QueryResultWebhookPayload =+  GoogleCloudDialogflowV2beta1QueryResultWebhookPayload'+    { _gcdvqrwpcAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1QueryResultWebhookPayload' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvqrwpcAddtional'+googleCloudDialogflowV2beta1QueryResultWebhookPayload+    :: HashMap Text JSONValue -- ^ 'gcdvqrwpcAddtional'+    -> GoogleCloudDialogflowV2beta1QueryResultWebhookPayload+googleCloudDialogflowV2beta1QueryResultWebhookPayload pGcdvqrwpcAddtional_ =+  GoogleCloudDialogflowV2beta1QueryResultWebhookPayload'+    {_gcdvqrwpcAddtional = _Coerce # pGcdvqrwpcAddtional_}+++-- | Properties of the object.+gcdvqrwpcAddtional :: Lens' GoogleCloudDialogflowV2beta1QueryResultWebhookPayload (HashMap Text JSONValue)+gcdvqrwpcAddtional+  = lens _gcdvqrwpcAddtional+      (\ s a -> s{_gcdvqrwpcAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1QueryResultWebhookPayload+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1QueryResultWebhookPayload"+              (\ o ->+                 GoogleCloudDialogflowV2beta1QueryResultWebhookPayload'+                   <$> (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2beta1QueryResultWebhookPayload+         where+        toJSON = toJSON . _gcdvqrwpcAddtional++-- | Represents a part of a training phrase.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentTrainingPhrasePart' smart constructor.+data GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart =+  GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart'+    { _gcdvitppcText        :: !(Maybe Text)+    , _gcdvitppcUserDefined :: !(Maybe Bool)+    , _gcdvitppcEntityType  :: !(Maybe Text)+    , _gcdvitppcAlias       :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvitppcText'+--+-- * 'gcdvitppcUserDefined'+--+-- * 'gcdvitppcEntityType'+--+-- * 'gcdvitppcAlias'+googleCloudDialogflowV2beta1IntentTrainingPhrasePart+    :: GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart+googleCloudDialogflowV2beta1IntentTrainingPhrasePart =+  GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart'+    { _gcdvitppcText = Nothing+    , _gcdvitppcUserDefined = Nothing+    , _gcdvitppcEntityType = Nothing+    , _gcdvitppcAlias = Nothing+    }+++-- | Required. The text for this part.+gcdvitppcText :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart (Maybe Text)+gcdvitppcText+  = lens _gcdvitppcText+      (\ s a -> s{_gcdvitppcText = a})++-- | Optional. Indicates whether the text was manually annotated. This field+-- is set to true when the Dialogflow Console is used to manually annotate+-- the part. When creating an annotated part with the API, you must set+-- this to true.+gcdvitppcUserDefined :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart (Maybe Bool)+gcdvitppcUserDefined+  = lens _gcdvitppcUserDefined+      (\ s a -> s{_gcdvitppcUserDefined = a})++-- | Optional. The entity type name prefixed with \`\'\`. This field is+-- required for annotated parts of the training phrase.+gcdvitppcEntityType :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart (Maybe Text)+gcdvitppcEntityType+  = lens _gcdvitppcEntityType+      (\ s a -> s{_gcdvitppcEntityType = a})++-- | Optional. The parameter name for the value extracted from the annotated+-- part of the example. This field is required for annotated parts of the+-- training phrase.+gcdvitppcAlias :: Lens' GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart (Maybe Text)+gcdvitppcAlias+  = lens _gcdvitppcAlias+      (\ s a -> s{_gcdvitppcAlias = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart'+                   <$>+                   (o .:? "text") <*> (o .:? "userDefined") <*>+                     (o .:? "entityType")+                     <*> (o .:? "alias"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentTrainingPhrasePart'{..}+          = object+              (catMaybes+                 [("text" .=) <$> _gcdvitppcText,+                  ("userDefined" .=) <$> _gcdvitppcUserDefined,+                  ("entityType" .=) <$> _gcdvitppcEntityType,+                  ("alias" .=) <$> _gcdvitppcAlias])++-- | The response message for Contexts.ListContexts.+--+-- /See:/ 'googleCloudDialogflowV2ListContextsResponse' smart constructor.+data GoogleCloudDialogflowV2ListContextsResponse =+  GoogleCloudDialogflowV2ListContextsResponse'+    { _gcdvlcrContexts      :: !(Maybe [GoogleCloudDialogflowV2Context])+    , _gcdvlcrNextPageToken :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2ListContextsResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvlcrContexts'+--+-- * 'gcdvlcrNextPageToken'+googleCloudDialogflowV2ListContextsResponse+    :: GoogleCloudDialogflowV2ListContextsResponse+googleCloudDialogflowV2ListContextsResponse =+  GoogleCloudDialogflowV2ListContextsResponse'+    {_gcdvlcrContexts = Nothing, _gcdvlcrNextPageToken = Nothing}+++-- | The list of contexts. There will be a maximum number of items returned+-- based on the page_size field in the request.+gcdvlcrContexts :: Lens' GoogleCloudDialogflowV2ListContextsResponse [GoogleCloudDialogflowV2Context]+gcdvlcrContexts+  = lens _gcdvlcrContexts+      (\ s a -> s{_gcdvlcrContexts = a})+      . _Default+      . _Coerce++-- | Token to retrieve the next page of results, or empty if there are no+-- more results in the list.+gcdvlcrNextPageToken :: Lens' GoogleCloudDialogflowV2ListContextsResponse (Maybe Text)+gcdvlcrNextPageToken+  = lens _gcdvlcrNextPageToken+      (\ s a -> s{_gcdvlcrNextPageToken = a})++instance FromJSON+           GoogleCloudDialogflowV2ListContextsResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2ListContextsResponse"+              (\ o ->+                 GoogleCloudDialogflowV2ListContextsResponse' <$>+                   (o .:? "contexts" .!= mempty) <*>+                     (o .:? "nextPageToken"))++instance ToJSON+           GoogleCloudDialogflowV2ListContextsResponse+         where+        toJSON+          GoogleCloudDialogflowV2ListContextsResponse'{..}+          = object+              (catMaybes+                 [("contexts" .=) <$> _gcdvlcrContexts,+                  ("nextPageToken" .=) <$> _gcdvlcrNextPageToken])++-- | Transfers the call in Telephony Gateway.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall' smart constructor.+newtype GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall =+  GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall'+    { _gcdvimttcPhoneNumber :: Maybe Text+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimttcPhoneNumber'+googleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall+    :: GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall+googleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall =+  GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall'+    {_gcdvimttcPhoneNumber = Nothing}+++-- | Required. The phone number to transfer the call to in [E.164+-- format](https:\/\/en.wikipedia.org\/wiki\/E.164). We currently only+-- allow transferring to US numbers (+1xxxyyyzzzz).+gcdvimttcPhoneNumber :: Lens' GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall (Maybe Text)+gcdvimttcPhoneNumber+  = lens _gcdvimttcPhoneNumber+      (\ s a -> s{_gcdvimttcPhoneNumber = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall'+                   <$> (o .:? "phoneNumber"))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageTelephonyTransferCall'{..}+          = object+              (catMaybes+                 [("phoneNumber" .=) <$> _gcdvimttcPhoneNumber])++-- | The response message for Agents.ExportAgent.+--+-- /See:/ 'googleCloudDialogflowV2beta1ExportAgentResponse' smart constructor.+data GoogleCloudDialogflowV2beta1ExportAgentResponse =+  GoogleCloudDialogflowV2beta1ExportAgentResponse'+    { _gooAgentURI     :: !(Maybe Text)+    , _gooAgentContent :: !(Maybe Bytes)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1ExportAgentResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gooAgentURI'+--+-- * 'gooAgentContent'+googleCloudDialogflowV2beta1ExportAgentResponse+    :: GoogleCloudDialogflowV2beta1ExportAgentResponse+googleCloudDialogflowV2beta1ExportAgentResponse =+  GoogleCloudDialogflowV2beta1ExportAgentResponse'+    {_gooAgentURI = Nothing, _gooAgentContent = Nothing}+++-- | The URI to a file containing the exported agent. This field is populated+-- only if \`agent_uri\` is specified in \`ExportAgentRequest\`.+gooAgentURI :: Lens' GoogleCloudDialogflowV2beta1ExportAgentResponse (Maybe Text)+gooAgentURI+  = lens _gooAgentURI (\ s a -> s{_gooAgentURI = a})++-- | The exported agent. Example for how to export an agent to a zip file via+-- a command line:+--+-- > curl \+-- >   'https://dialogflow.googleapis.com/v2beta1/projects/<project_name>/agent:export'\+-- >   -X POST \+-- >   -H 'Authorization: Bearer '$(gcloud auth application-default+-- >   print-access-token) \+-- >   -H 'Accept: application/json' \+-- >   -H 'Content-Type: application/json' \+-- >   --compressed \+-- >   --data-binary '{}' \+-- > | grep agentContent | sed -e 's/.*"agentContent": "\([^"]*\)".*/\1/' \+-- > | base64 --decode > <agent zip file>+gooAgentContent :: Lens' GoogleCloudDialogflowV2beta1ExportAgentResponse (Maybe ByteString)+gooAgentContent+  = lens _gooAgentContent+      (\ s a -> s{_gooAgentContent = a})+      . mapping _Bytes++instance FromJSON+           GoogleCloudDialogflowV2beta1ExportAgentResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1ExportAgentResponse"+              (\ o ->+                 GoogleCloudDialogflowV2beta1ExportAgentResponse' <$>+                   (o .:? "agentUri") <*> (o .:? "agentContent"))++instance ToJSON+           GoogleCloudDialogflowV2beta1ExportAgentResponse+         where+        toJSON+          GoogleCloudDialogflowV2beta1ExportAgentResponse'{..}+          = object+              (catMaybes+                 [("agentUri" .=) <$> _gooAgentURI,+                  ("agentContent" .=) <$> _gooAgentContent])++-- | Optional. This field is set to the value of the+-- \`QueryParameters.payload\` field passed in the request. Some+-- integrations that query a Dialogflow agent may provide additional+-- information in the payload. In particular for the Telephony Gateway this+-- field has the form:+--+-- > {+-- >  "telephony": {+-- >    "caller_id": "+18558363987"+-- >  }+-- > }+--+-- Note: The caller ID field (\`caller_id\`) will be redacted for Standard+-- Edition agents and populated with the caller ID in [E.164+-- format](https:\/\/en.wikipedia.org\/wiki\/E.164) for Enterprise Edition+-- agents.+--+-- /See:/ 'googleCloudDialogflowV2OriginalDetectIntentRequestPayload' smart constructor.+newtype GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload =+  GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload'+    { _gcdvodirpcAddtional :: HashMap Text JSONValue+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvodirpcAddtional'+googleCloudDialogflowV2OriginalDetectIntentRequestPayload+    :: HashMap Text JSONValue -- ^ 'gcdvodirpcAddtional'+    -> GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload+googleCloudDialogflowV2OriginalDetectIntentRequestPayload pGcdvodirpcAddtional_ =+  GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload'+    {_gcdvodirpcAddtional = _Coerce # pGcdvodirpcAddtional_}+++-- | Properties of the object.+gcdvodirpcAddtional :: Lens' GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload (HashMap Text JSONValue)+gcdvodirpcAddtional+  = lens _gcdvodirpcAddtional+      (\ s a -> s{_gcdvodirpcAddtional = a})+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload"+              (\ o ->+                 GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload'+                   <$> (parseJSONObject o))++instance ToJSON+           GoogleCloudDialogflowV2OriginalDetectIntentRequestPayload+         where+        toJSON = toJSON . _gcdvodirpcAddtional++-- | Represents a session entity type. Extends or replaces a developer entity+-- type at the user session level (we refer to the entity types defined at+-- the agent level as \"developer entity types\"). Note: session entity+-- types apply to all queries, regardless of the language.+--+-- /See:/ 'googleCloudDialogflowV2SessionEntityType' smart constructor.+data GoogleCloudDialogflowV2SessionEntityType =+  GoogleCloudDialogflowV2SessionEntityType'+    { _gcdvSetEntityOverrideMode :: !(Maybe GoogleCloudDialogflowV2SessionEntityTypeEntityOverrideMode)+    , _gcdvSetEntities           :: !(Maybe [GoogleCloudDialogflowV2EntityTypeEntity])+    , _gcdvSetName               :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2SessionEntityType' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvSetEntityOverrideMode'+--+-- * 'gcdvSetEntities'+--+-- * 'gcdvSetName'+googleCloudDialogflowV2SessionEntityType+    :: GoogleCloudDialogflowV2SessionEntityType+googleCloudDialogflowV2SessionEntityType =+  GoogleCloudDialogflowV2SessionEntityType'+    { _gcdvSetEntityOverrideMode = Nothing+    , _gcdvSetEntities = Nothing+    , _gcdvSetName = Nothing+    }+++-- | Required. Indicates whether the additional data should override or+-- supplement the developer entity type definition.+gcdvSetEntityOverrideMode :: Lens' GoogleCloudDialogflowV2SessionEntityType (Maybe GoogleCloudDialogflowV2SessionEntityTypeEntityOverrideMode)+gcdvSetEntityOverrideMode+  = lens _gcdvSetEntityOverrideMode+      (\ s a -> s{_gcdvSetEntityOverrideMode = a})++-- | Required. The collection of entities associated with this session entity+-- type.+gcdvSetEntities :: Lens' GoogleCloudDialogflowV2SessionEntityType [GoogleCloudDialogflowV2EntityTypeEntity]+gcdvSetEntities+  = lens _gcdvSetEntities+      (\ s a -> s{_gcdvSetEntities = a})+      . _Default+      . _Coerce++-- | Required. The unique identifier of this session entity type. Format:+-- \`projects\/\/agent\/sessions\/\/entityTypes\/\`. \`\` must be the+-- display name of an existing entity type in the same agent that will be+-- overridden or supplemented.+gcdvSetName :: Lens' GoogleCloudDialogflowV2SessionEntityType (Maybe Text)+gcdvSetName+  = lens _gcdvSetName (\ s a -> s{_gcdvSetName = a})++instance FromJSON+           GoogleCloudDialogflowV2SessionEntityType+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2SessionEntityType"+              (\ o ->+                 GoogleCloudDialogflowV2SessionEntityType' <$>+                   (o .:? "entityOverrideMode") <*>+                     (o .:? "entities" .!= mempty)+                     <*> (o .:? "name"))++instance ToJSON+           GoogleCloudDialogflowV2SessionEntityType+         where+        toJSON GoogleCloudDialogflowV2SessionEntityType'{..}+          = object+              (catMaybes+                 [("entityOverrideMode" .=) <$>+                    _gcdvSetEntityOverrideMode,+                  ("entities" .=) <$> _gcdvSetEntities,+                  ("name" .=) <$> _gcdvSetName])++-- | An **entity entry** for an associated entity type.+--+-- /See:/ 'googleCloudDialogflowV2EntityTypeEntity' smart constructor.+data GoogleCloudDialogflowV2EntityTypeEntity =+  GoogleCloudDialogflowV2EntityTypeEntity'+    { _gValue    :: !(Maybe Text)+    , _gSynonyms :: !(Maybe [Text])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2EntityTypeEntity' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gValue'+--+-- * 'gSynonyms'+googleCloudDialogflowV2EntityTypeEntity+    :: GoogleCloudDialogflowV2EntityTypeEntity+googleCloudDialogflowV2EntityTypeEntity =+  GoogleCloudDialogflowV2EntityTypeEntity'+    {_gValue = Nothing, _gSynonyms = Nothing}+++-- | Required. The primary value associated with this entity entry. For+-- example, if the entity type is *vegetable*, the value could be+-- *scallions*. For \`KIND_MAP\` entity types: * A canonical value to be+-- used in place of synonyms. For \`KIND_LIST\` entity types: * A string+-- that can contain references to other entity types (with or without+-- aliases).+gValue :: Lens' GoogleCloudDialogflowV2EntityTypeEntity (Maybe Text)+gValue = lens _gValue (\ s a -> s{_gValue = a})++-- | Required. A collection of value synonyms. For example, if the entity+-- type is *vegetable*, and \`value\` is *scallions*, a synonym could be+-- *green onions*. For \`KIND_LIST\` entity types: * This collection must+-- contain exactly one synonym equal to \`value\`.+gSynonyms :: Lens' GoogleCloudDialogflowV2EntityTypeEntity [Text]+gSynonyms+  = lens _gSynonyms (\ s a -> s{_gSynonyms = a}) .+      _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2EntityTypeEntity+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2EntityTypeEntity"+              (\ o ->+                 GoogleCloudDialogflowV2EntityTypeEntity' <$>+                   (o .:? "value") <*> (o .:? "synonyms" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2EntityTypeEntity+         where+        toJSON GoogleCloudDialogflowV2EntityTypeEntity'{..}+          = object+              (catMaybes+                 [("value" .=) <$> _gValue,+                  ("synonyms" .=) <$> _gSynonyms])++-- | Represents the result of conversational query or event processing.+--+-- /See:/ 'googleCloudDialogflowV2beta1QueryResult' smart constructor.+data GoogleCloudDialogflowV2beta1QueryResult =+  GoogleCloudDialogflowV2beta1QueryResult'+    { _gLanguageCode                :: !(Maybe Text)+    , _gAllRequiredParamsPresent    :: !(Maybe Bool)+    , _gIntentDetectionConfidence   :: !(Maybe (Textual Double))+    , _gFulfillmentMessages         :: !(Maybe [GoogleCloudDialogflowV2beta1IntentMessage])+    , _gKnowledgeAnswers            :: !(Maybe GoogleCloudDialogflowV2beta1KnowledgeAnswers)+    , _gSpeechRecognitionConfidence :: !(Maybe (Textual Double))+    , _gAction                      :: !(Maybe Text)+    , _gIntent                      :: !(Maybe GoogleCloudDialogflowV2beta1Intent)+    , _gSentimentAnalysisResult     :: !(Maybe GoogleCloudDialogflowV2beta1SentimentAnalysisResult)+    , _gQueryText                   :: !(Maybe Text)+    , _gFulfillmentText             :: !(Maybe Text)+    , _gParameters                  :: !(Maybe GoogleCloudDialogflowV2beta1QueryResultParameters)+    , _gWebhookPayload              :: !(Maybe GoogleCloudDialogflowV2beta1QueryResultWebhookPayload)+    , _gOutputContexts              :: !(Maybe [GoogleCloudDialogflowV2beta1Context])+    , _gWebhookSource               :: !(Maybe Text)+    , _gDiagnosticInfo              :: !(Maybe GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1QueryResult' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gLanguageCode'+--+-- * 'gAllRequiredParamsPresent'+--+-- * 'gIntentDetectionConfidence'+--+-- * 'gFulfillmentMessages'+--+-- * 'gKnowledgeAnswers'+--+-- * 'gSpeechRecognitionConfidence'+--+-- * 'gAction'+--+-- * 'gIntent'+--+-- * 'gSentimentAnalysisResult'+--+-- * 'gQueryText'+--+-- * 'gFulfillmentText'+--+-- * 'gParameters'+--+-- * 'gWebhookPayload'+--+-- * 'gOutputContexts'+--+-- * 'gWebhookSource'+--+-- * 'gDiagnosticInfo'+googleCloudDialogflowV2beta1QueryResult+    :: GoogleCloudDialogflowV2beta1QueryResult+googleCloudDialogflowV2beta1QueryResult =+  GoogleCloudDialogflowV2beta1QueryResult'+    { _gLanguageCode = Nothing+    , _gAllRequiredParamsPresent = Nothing+    , _gIntentDetectionConfidence = Nothing+    , _gFulfillmentMessages = Nothing+    , _gKnowledgeAnswers = Nothing+    , _gSpeechRecognitionConfidence = Nothing+    , _gAction = Nothing+    , _gIntent = Nothing+    , _gSentimentAnalysisResult = Nothing+    , _gQueryText = Nothing+    , _gFulfillmentText = Nothing+    , _gParameters = Nothing+    , _gWebhookPayload = Nothing+    , _gOutputContexts = Nothing+    , _gWebhookSource = Nothing+    , _gDiagnosticInfo = Nothing+    }+++-- | The language that was triggered during intent detection. See [Language+-- Support](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/reference\/language)+-- for a list of the currently supported language codes.+gLanguageCode :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Text)+gLanguageCode+  = lens _gLanguageCode+      (\ s a -> s{_gLanguageCode = a})++-- | This field is set to: - \`false\` if the matched intent has required+-- parameters and not all of the required parameter values have been+-- collected. - \`true\` if all required parameter values have been+-- collected, or if the matched intent doesn\'t contain any required+-- parameters.+gAllRequiredParamsPresent :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Bool)+gAllRequiredParamsPresent+  = lens _gAllRequiredParamsPresent+      (\ s a -> s{_gAllRequiredParamsPresent = a})++-- | The intent detection confidence. Values range from 0.0 (completely+-- uncertain) to 1.0 (completely certain). If there are \`multiple+-- knowledge_answers\` messages, this value is set to the greatest+-- \`knowledgeAnswers.match_confidence\` value in the list.+gIntentDetectionConfidence :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Double)+gIntentDetectionConfidence+  = lens _gIntentDetectionConfidence+      (\ s a -> s{_gIntentDetectionConfidence = a})+      . mapping _Coerce++-- | The collection of rich messages to present to the user.+gFulfillmentMessages :: Lens' GoogleCloudDialogflowV2beta1QueryResult [GoogleCloudDialogflowV2beta1IntentMessage]+gFulfillmentMessages+  = lens _gFulfillmentMessages+      (\ s a -> s{_gFulfillmentMessages = a})+      . _Default+      . _Coerce++-- | The result from Knowledge Connector (if any), ordered by decreasing+-- \`KnowledgeAnswers.match_confidence\`.+gKnowledgeAnswers :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe GoogleCloudDialogflowV2beta1KnowledgeAnswers)+gKnowledgeAnswers+  = lens _gKnowledgeAnswers+      (\ s a -> s{_gKnowledgeAnswers = a})++-- | The Speech recognition confidence between 0.0 and 1.0. A higher number+-- indicates an estimated greater likelihood that the recognized words are+-- correct. The default of 0.0 is a sentinel value indicating that+-- confidence was not set. This field is not guaranteed to be accurate or+-- set. In particular this field isn\'t set for StreamingDetectIntent since+-- the streaming endpoint has separate confidence estimates per portion of+-- the audio in StreamingRecognitionResult.+gSpeechRecognitionConfidence :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Double)+gSpeechRecognitionConfidence+  = lens _gSpeechRecognitionConfidence+      (\ s a -> s{_gSpeechRecognitionConfidence = a})+      . mapping _Coerce++-- | The action name from the matched intent.+gAction :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Text)+gAction = lens _gAction (\ s a -> s{_gAction = a})++-- | The intent that matched the conversational query. Some, not all fields+-- are filled in this message, including but not limited to: \`name\`,+-- \`display_name\` and \`webhook_state\`.+gIntent :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe GoogleCloudDialogflowV2beta1Intent)+gIntent = lens _gIntent (\ s a -> s{_gIntent = a})++-- | The sentiment analysis result, which depends on the+-- \`sentiment_analysis_request_config\` specified in the request.+gSentimentAnalysisResult :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe GoogleCloudDialogflowV2beta1SentimentAnalysisResult)+gSentimentAnalysisResult+  = lens _gSentimentAnalysisResult+      (\ s a -> s{_gSentimentAnalysisResult = a})++-- | The original conversational query text: - If natural language text was+-- provided as input, \`query_text\` contains a copy of the input. - If+-- natural language speech audio was provided as input, \`query_text\`+-- contains the speech recognition result. If speech recognizer produced+-- multiple alternatives, a particular one is picked. - If an event was+-- provided as input, \`query_text\` is not set.+gQueryText :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Text)+gQueryText+  = lens _gQueryText (\ s a -> s{_gQueryText = a})++-- | The text to be pronounced to the user or shown on the screen. Note: This+-- is a legacy field, \`fulfillment_messages\` should be preferred.+gFulfillmentText :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Text)+gFulfillmentText+  = lens _gFulfillmentText+      (\ s a -> s{_gFulfillmentText = a})++-- | The collection of extracted parameters.+gParameters :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe GoogleCloudDialogflowV2beta1QueryResultParameters)+gParameters+  = lens _gParameters (\ s a -> s{_gParameters = a})++-- | If the query was fulfilled by a webhook call, this field is set to the+-- value of the \`payload\` field returned in the webhook response.+gWebhookPayload :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe GoogleCloudDialogflowV2beta1QueryResultWebhookPayload)+gWebhookPayload+  = lens _gWebhookPayload+      (\ s a -> s{_gWebhookPayload = a})++-- | The collection of output contexts. If applicable,+-- \`output_contexts.parameters\` contains entries with name \`.original\`+-- containing the original parameter values before the query.+gOutputContexts :: Lens' GoogleCloudDialogflowV2beta1QueryResult [GoogleCloudDialogflowV2beta1Context]+gOutputContexts+  = lens _gOutputContexts+      (\ s a -> s{_gOutputContexts = a})+      . _Default+      . _Coerce++-- | If the query was fulfilled by a webhook call, this field is set to the+-- value of the \`source\` field returned in the webhook response.+gWebhookSource :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe Text)+gWebhookSource+  = lens _gWebhookSource+      (\ s a -> s{_gWebhookSource = a})++-- | The free-form diagnostic info. For example, this field could contain+-- webhook call latency. The string keys of the Struct\'s fields map can+-- change without notice.+gDiagnosticInfo :: Lens' GoogleCloudDialogflowV2beta1QueryResult (Maybe GoogleCloudDialogflowV2beta1QueryResultDiagnosticInfo)+gDiagnosticInfo+  = lens _gDiagnosticInfo+      (\ s a -> s{_gDiagnosticInfo = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1QueryResult+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1QueryResult"+              (\ o ->+                 GoogleCloudDialogflowV2beta1QueryResult' <$>+                   (o .:? "languageCode") <*>+                     (o .:? "allRequiredParamsPresent")+                     <*> (o .:? "intentDetectionConfidence")+                     <*> (o .:? "fulfillmentMessages" .!= mempty)+                     <*> (o .:? "knowledgeAnswers")+                     <*> (o .:? "speechRecognitionConfidence")+                     <*> (o .:? "action")+                     <*> (o .:? "intent")+                     <*> (o .:? "sentimentAnalysisResult")+                     <*> (o .:? "queryText")+                     <*> (o .:? "fulfillmentText")+                     <*> (o .:? "parameters")+                     <*> (o .:? "webhookPayload")+                     <*> (o .:? "outputContexts" .!= mempty)+                     <*> (o .:? "webhookSource")+                     <*> (o .:? "diagnosticInfo"))++instance ToJSON+           GoogleCloudDialogflowV2beta1QueryResult+         where+        toJSON GoogleCloudDialogflowV2beta1QueryResult'{..}+          = object+              (catMaybes+                 [("languageCode" .=) <$> _gLanguageCode,+                  ("allRequiredParamsPresent" .=) <$>+                    _gAllRequiredParamsPresent,+                  ("intentDetectionConfidence" .=) <$>+                    _gIntentDetectionConfidence,+                  ("fulfillmentMessages" .=) <$> _gFulfillmentMessages,+                  ("knowledgeAnswers" .=) <$> _gKnowledgeAnswers,+                  ("speechRecognitionConfidence" .=) <$>+                    _gSpeechRecognitionConfidence,+                  ("action" .=) <$> _gAction,+                  ("intent" .=) <$> _gIntent,+                  ("sentimentAnalysisResult" .=) <$>+                    _gSentimentAnalysisResult,+                  ("queryText" .=) <$> _gQueryText,+                  ("fulfillmentText" .=) <$> _gFulfillmentText,+                  ("parameters" .=) <$> _gParameters,+                  ("webhookPayload" .=) <$> _gWebhookPayload,+                  ("outputContexts" .=) <$> _gOutputContexts,+                  ("webhookSource" .=) <$> _gWebhookSource,+                  ("diagnosticInfo" .=) <$> _gDiagnosticInfo])++-- | The image response message.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageImage' smart constructor.+data GoogleCloudDialogflowV2IntentMessageImage =+  GoogleCloudDialogflowV2IntentMessageImage'+    { _gAccessibilityText :: !(Maybe Text)+    , _gImageURI          :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageImage' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gAccessibilityText'+--+-- * 'gImageURI'+googleCloudDialogflowV2IntentMessageImage+    :: GoogleCloudDialogflowV2IntentMessageImage+googleCloudDialogflowV2IntentMessageImage =+  GoogleCloudDialogflowV2IntentMessageImage'+    {_gAccessibilityText = Nothing, _gImageURI = Nothing}+++-- | Optional. A text description of the image to be used for accessibility,+-- e.g., screen readers.+gAccessibilityText :: Lens' GoogleCloudDialogflowV2IntentMessageImage (Maybe Text)+gAccessibilityText+  = lens _gAccessibilityText+      (\ s a -> s{_gAccessibilityText = a})++-- | Optional. The public URI to an image file.+gImageURI :: Lens' GoogleCloudDialogflowV2IntentMessageImage (Maybe Text)+gImageURI+  = lens _gImageURI (\ s a -> s{_gImageURI = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageImage+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageImage"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageImage' <$>+                   (o .:? "accessibilityText") <*> (o .:? "imageUri"))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageImage+         where+        toJSON GoogleCloudDialogflowV2IntentMessageImage'{..}+          = object+              (catMaybes+                 [("accessibilityText" .=) <$> _gAccessibilityText,+                  ("imageUri" .=) <$> _gImageURI])++-- | The response message for a webhook call.+--+-- /See:/ 'googleCloudDialogflowV2WebhookResponse' smart constructor.+data GoogleCloudDialogflowV2WebhookResponse =+  GoogleCloudDialogflowV2WebhookResponse'+    { _gooFulfillmentMessages :: !(Maybe [GoogleCloudDialogflowV2IntentMessage])+    , _gooPayload             :: !(Maybe GoogleCloudDialogflowV2WebhookResponsePayload)+    , _gooFulfillmentText     :: !(Maybe Text)+    , _gooSource              :: !(Maybe Text)+    , _gooOutputContexts      :: !(Maybe [GoogleCloudDialogflowV2Context])+    , _gooFollowupEventInput  :: !(Maybe GoogleCloudDialogflowV2EventInput)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2WebhookResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gooFulfillmentMessages'+--+-- * 'gooPayload'+--+-- * 'gooFulfillmentText'+--+-- * 'gooSource'+--+-- * 'gooOutputContexts'+--+-- * 'gooFollowupEventInput'+googleCloudDialogflowV2WebhookResponse+    :: GoogleCloudDialogflowV2WebhookResponse+googleCloudDialogflowV2WebhookResponse =+  GoogleCloudDialogflowV2WebhookResponse'+    { _gooFulfillmentMessages = Nothing+    , _gooPayload = Nothing+    , _gooFulfillmentText = Nothing+    , _gooSource = Nothing+    , _gooOutputContexts = Nothing+    , _gooFollowupEventInput = Nothing+    }+++-- | Optional. The collection of rich messages to present to the user. This+-- value is passed directly to \`QueryResult.fulfillment_messages\`.+gooFulfillmentMessages :: Lens' GoogleCloudDialogflowV2WebhookResponse [GoogleCloudDialogflowV2IntentMessage]+gooFulfillmentMessages+  = lens _gooFulfillmentMessages+      (\ s a -> s{_gooFulfillmentMessages = a})+      . _Default+      . _Coerce++-- | Optional. This value is passed directly to+-- \`QueryResult.webhook_payload\`. See the related+-- \`fulfillment_messages[i].payload field\`, which may be used as an+-- alternative to this field. This field can be used for Actions on Google+-- responses. It should have a structure similar to the JSON message shown+-- here. For more information, see [Actions on Google Webhook+-- Format](https:\/\/developers.google.com\/actions\/dialogflow\/webhook)+--+-- > {+-- >   "google": {+-- >     "expectUserResponse": true,+-- >     "richResponse": {+-- >       "items": [+-- >         {+-- >           "simpleResponse": {+-- >             "textToSpeech": "this is a simple response"+-- >           }+-- >         }+-- >       ]+-- >     }+-- >   }+-- > }+gooPayload :: Lens' GoogleCloudDialogflowV2WebhookResponse (Maybe GoogleCloudDialogflowV2WebhookResponsePayload)+gooPayload+  = lens _gooPayload (\ s a -> s{_gooPayload = a})++-- | Optional. The text to be shown on the screen. This value is passed+-- directly to \`QueryResult.fulfillment_text\`.+gooFulfillmentText :: Lens' GoogleCloudDialogflowV2WebhookResponse (Maybe Text)+gooFulfillmentText+  = lens _gooFulfillmentText+      (\ s a -> s{_gooFulfillmentText = a})++-- | Optional. This value is passed directly to+-- \`QueryResult.webhook_source\`.+gooSource :: Lens' GoogleCloudDialogflowV2WebhookResponse (Maybe Text)+gooSource+  = lens _gooSource (\ s a -> s{_gooSource = a})++-- | Optional. The collection of output contexts. This value is passed+-- directly to \`QueryResult.output_contexts\`.+gooOutputContexts :: Lens' GoogleCloudDialogflowV2WebhookResponse [GoogleCloudDialogflowV2Context]+gooOutputContexts+  = lens _gooOutputContexts+      (\ s a -> s{_gooOutputContexts = a})+      . _Default+      . _Coerce++-- | Optional. Makes the platform immediately invoke another \`DetectIntent\`+-- call internally with the specified event as input.+gooFollowupEventInput :: Lens' GoogleCloudDialogflowV2WebhookResponse (Maybe GoogleCloudDialogflowV2EventInput)+gooFollowupEventInput+  = lens _gooFollowupEventInput+      (\ s a -> s{_gooFollowupEventInput = a})++instance FromJSON+           GoogleCloudDialogflowV2WebhookResponse+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2WebhookResponse"+              (\ o ->+                 GoogleCloudDialogflowV2WebhookResponse' <$>+                   (o .:? "fulfillmentMessages" .!= mempty) <*>+                     (o .:? "payload")+                     <*> (o .:? "fulfillmentText")+                     <*> (o .:? "source")+                     <*> (o .:? "outputContexts" .!= mempty)+                     <*> (o .:? "followupEventInput"))++instance ToJSON+           GoogleCloudDialogflowV2WebhookResponse+         where+        toJSON GoogleCloudDialogflowV2WebhookResponse'{..}+          = object+              (catMaybes+                 [("fulfillmentMessages" .=) <$>+                    _gooFulfillmentMessages,+                  ("payload" .=) <$> _gooPayload,+                  ("fulfillmentText" .=) <$> _gooFulfillmentText,+                  ("source" .=) <$> _gooSource,+                  ("outputContexts" .=) <$> _gooOutputContexts,+                  ("followupEventInput" .=) <$>+                    _gooFollowupEventInput])++-- | The request message for Agents.TrainAgent.+--+-- /See:/ 'googleCloudDialogflowV2TrainAgentRequest' smart constructor.+data GoogleCloudDialogflowV2TrainAgentRequest =+  GoogleCloudDialogflowV2TrainAgentRequest'+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2TrainAgentRequest' with the minimum fields required to make a request.+--+googleCloudDialogflowV2TrainAgentRequest+    :: GoogleCloudDialogflowV2TrainAgentRequest+googleCloudDialogflowV2TrainAgentRequest =+  GoogleCloudDialogflowV2TrainAgentRequest'+++instance FromJSON+           GoogleCloudDialogflowV2TrainAgentRequest+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2TrainAgentRequest"+              (\ o ->+                 pure GoogleCloudDialogflowV2TrainAgentRequest')++instance ToJSON+           GoogleCloudDialogflowV2TrainAgentRequest+         where+        toJSON = const emptyObject++-- | This message is a wrapper around a collection of intents.+--+-- /See:/ 'googleCloudDialogflowV2IntentBatch' smart constructor.+newtype GoogleCloudDialogflowV2IntentBatch =+  GoogleCloudDialogflowV2IntentBatch'+    { _gcdvibIntents :: Maybe [GoogleCloudDialogflowV2Intent]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentBatch' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvibIntents'+googleCloudDialogflowV2IntentBatch+    :: GoogleCloudDialogflowV2IntentBatch+googleCloudDialogflowV2IntentBatch =+  GoogleCloudDialogflowV2IntentBatch' {_gcdvibIntents = Nothing}+++-- | A collection of intents.+gcdvibIntents :: Lens' GoogleCloudDialogflowV2IntentBatch [GoogleCloudDialogflowV2Intent]+gcdvibIntents+  = lens _gcdvibIntents+      (\ s a -> s{_gcdvibIntents = a})+      . _Default+      . _Coerce++instance FromJSON GoogleCloudDialogflowV2IntentBatch+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2IntentBatch"+              (\ o ->+                 GoogleCloudDialogflowV2IntentBatch' <$>+                   (o .:? "intents" .!= mempty))++instance ToJSON GoogleCloudDialogflowV2IntentBatch+         where+        toJSON GoogleCloudDialogflowV2IntentBatch'{..}+          = object+              (catMaybes [("intents" .=) <$> _gcdvibIntents])++-- | Represents an entity type. Entity types serve as a tool for extracting+-- parameter values from natural language queries.+--+-- /See:/ 'googleCloudDialogflowV2beta1EntityType' smart constructor.+data GoogleCloudDialogflowV2beta1EntityType =+  GoogleCloudDialogflowV2beta1EntityType'+    { _gcdvetcEntities          :: !(Maybe [GoogleCloudDialogflowV2beta1EntityTypeEntity])+    , _gcdvetcKind              :: !(Maybe GoogleCloudDialogflowV2beta1EntityTypeKind)+    , _gcdvetcName              :: !(Maybe Text)+    , _gcdvetcAutoExpansionMode :: !(Maybe GoogleCloudDialogflowV2beta1EntityTypeAutoExpansionMode)+    , _gcdvetcDisplayName       :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1EntityType' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvetcEntities'+--+-- * 'gcdvetcKind'+--+-- * 'gcdvetcName'+--+-- * 'gcdvetcAutoExpansionMode'+--+-- * 'gcdvetcDisplayName'+googleCloudDialogflowV2beta1EntityType+    :: GoogleCloudDialogflowV2beta1EntityType+googleCloudDialogflowV2beta1EntityType =+  GoogleCloudDialogflowV2beta1EntityType'+    { _gcdvetcEntities = Nothing+    , _gcdvetcKind = Nothing+    , _gcdvetcName = Nothing+    , _gcdvetcAutoExpansionMode = Nothing+    , _gcdvetcDisplayName = Nothing+    }+++-- | Optional. The collection of entity entries associated with the entity+-- type.+gcdvetcEntities :: Lens' GoogleCloudDialogflowV2beta1EntityType [GoogleCloudDialogflowV2beta1EntityTypeEntity]+gcdvetcEntities+  = lens _gcdvetcEntities+      (\ s a -> s{_gcdvetcEntities = a})+      . _Default+      . _Coerce++-- | Required. Indicates the kind of entity type.+gcdvetcKind :: Lens' GoogleCloudDialogflowV2beta1EntityType (Maybe GoogleCloudDialogflowV2beta1EntityTypeKind)+gcdvetcKind+  = lens _gcdvetcKind (\ s a -> s{_gcdvetcKind = a})++-- | The unique identifier of the entity type. Required for+-- EntityTypes.UpdateEntityType and EntityTypes.BatchUpdateEntityTypes+-- methods. Format: \`projects\/\/agent\/entityTypes\/\`.+gcdvetcName :: Lens' GoogleCloudDialogflowV2beta1EntityType (Maybe Text)+gcdvetcName+  = lens _gcdvetcName (\ s a -> s{_gcdvetcName = a})++-- | Optional. Indicates whether the entity type can be automatically+-- expanded.+gcdvetcAutoExpansionMode :: Lens' GoogleCloudDialogflowV2beta1EntityType (Maybe GoogleCloudDialogflowV2beta1EntityTypeAutoExpansionMode)+gcdvetcAutoExpansionMode+  = lens _gcdvetcAutoExpansionMode+      (\ s a -> s{_gcdvetcAutoExpansionMode = a})++-- | Required. The name of the entity type.+gcdvetcDisplayName :: Lens' GoogleCloudDialogflowV2beta1EntityType (Maybe Text)+gcdvetcDisplayName+  = lens _gcdvetcDisplayName+      (\ s a -> s{_gcdvetcDisplayName = a})++instance FromJSON+           GoogleCloudDialogflowV2beta1EntityType+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2beta1EntityType"+              (\ o ->+                 GoogleCloudDialogflowV2beta1EntityType' <$>+                   (o .:? "entities" .!= mempty) <*> (o .:? "kind") <*>+                     (o .:? "name")+                     <*> (o .:? "autoExpansionMode")+                     <*> (o .:? "displayName"))++instance ToJSON+           GoogleCloudDialogflowV2beta1EntityType+         where+        toJSON GoogleCloudDialogflowV2beta1EntityType'{..}+          = object+              (catMaybes+                 [("entities" .=) <$> _gcdvetcEntities,+                  ("kind" .=) <$> _gcdvetcKind,+                  ("name" .=) <$> _gcdvetcName,+                  ("autoExpansionMode" .=) <$>+                    _gcdvetcAutoExpansionMode,+                  ("displayName" .=) <$> _gcdvetcDisplayName])++-- | The response message for Agents.SearchAgents.+--+-- /See:/ 'googleCloudDialogflowV2SearchAgentsResponse' smart constructor.+data GoogleCloudDialogflowV2SearchAgentsResponse =+  GoogleCloudDialogflowV2SearchAgentsResponse'+    { _gcdvsarNextPageToken :: !(Maybe Text)+    , _gcdvsarAgents        :: !(Maybe [GoogleCloudDialogflowV2Agent])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2SearchAgentsResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvsarNextPageToken'+--+-- * 'gcdvsarAgents'+googleCloudDialogflowV2SearchAgentsResponse+    :: GoogleCloudDialogflowV2SearchAgentsResponse+googleCloudDialogflowV2SearchAgentsResponse =+  GoogleCloudDialogflowV2SearchAgentsResponse'+    {_gcdvsarNextPageToken = Nothing, _gcdvsarAgents = Nothing}+++-- | Token to retrieve the next page of results, or empty if there are no+-- more results in the list.+gcdvsarNextPageToken :: Lens' GoogleCloudDialogflowV2SearchAgentsResponse (Maybe Text)+gcdvsarNextPageToken+  = lens _gcdvsarNextPageToken+      (\ s a -> s{_gcdvsarNextPageToken = a})++-- | The list of agents. There will be a maximum number of items returned+-- based on the page_size field in the request.+gcdvsarAgents :: Lens' GoogleCloudDialogflowV2SearchAgentsResponse [GoogleCloudDialogflowV2Agent]+gcdvsarAgents+  = lens _gcdvsarAgents+      (\ s a -> s{_gcdvsarAgents = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2SearchAgentsResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2SearchAgentsResponse"+              (\ o ->+                 GoogleCloudDialogflowV2SearchAgentsResponse' <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "agents" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2SearchAgentsResponse+         where+        toJSON+          GoogleCloudDialogflowV2SearchAgentsResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _gcdvsarNextPageToken,+                  ("agents" .=) <$> _gcdvsarAgents])++-- | The response message for SessionEntityTypes.ListSessionEntityTypes.+--+-- /See:/ 'googleCloudDialogflowV2ListSessionEntityTypesResponse' smart constructor.+data GoogleCloudDialogflowV2ListSessionEntityTypesResponse =+  GoogleCloudDialogflowV2ListSessionEntityTypesResponse'+    { _gcdvlSetrNextPageToken      :: !(Maybe Text)+    , _gcdvlSetrSessionEntityTypes :: !(Maybe [GoogleCloudDialogflowV2SessionEntityType])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2ListSessionEntityTypesResponse' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvlSetrNextPageToken'+--+-- * 'gcdvlSetrSessionEntityTypes'+googleCloudDialogflowV2ListSessionEntityTypesResponse+    :: GoogleCloudDialogflowV2ListSessionEntityTypesResponse+googleCloudDialogflowV2ListSessionEntityTypesResponse =+  GoogleCloudDialogflowV2ListSessionEntityTypesResponse'+    {_gcdvlSetrNextPageToken = Nothing, _gcdvlSetrSessionEntityTypes = Nothing}+++-- | Token to retrieve the next page of results, or empty if there are no+-- more results in the list.+gcdvlSetrNextPageToken :: Lens' GoogleCloudDialogflowV2ListSessionEntityTypesResponse (Maybe Text)+gcdvlSetrNextPageToken+  = lens _gcdvlSetrNextPageToken+      (\ s a -> s{_gcdvlSetrNextPageToken = a})++-- | The list of session entity types. There will be a maximum number of+-- items returned based on the page_size field in the request.+gcdvlSetrSessionEntityTypes :: Lens' GoogleCloudDialogflowV2ListSessionEntityTypesResponse [GoogleCloudDialogflowV2SessionEntityType]+gcdvlSetrSessionEntityTypes+  = lens _gcdvlSetrSessionEntityTypes+      (\ s a -> s{_gcdvlSetrSessionEntityTypes = a})+      . _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2ListSessionEntityTypesResponse+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2ListSessionEntityTypesResponse"+              (\ o ->+                 GoogleCloudDialogflowV2ListSessionEntityTypesResponse'+                   <$>+                   (o .:? "nextPageToken") <*>+                     (o .:? "sessionEntityTypes" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2ListSessionEntityTypesResponse+         where+        toJSON+          GoogleCloudDialogflowV2ListSessionEntityTypesResponse'{..}+          = object+              (catMaybes+                 [("nextPageToken" .=) <$> _gcdvlSetrNextPageToken,+                  ("sessionEntityTypes" .=) <$>+                    _gcdvlSetrSessionEntityTypes])++-- | This resource represents a long-running operation that is the result of+-- a network API call.+--+-- /See:/ 'googleLongrunningOperation' smart constructor.+data GoogleLongrunningOperation =+  GoogleLongrunningOperation'+    { _gloDone     :: !(Maybe Bool)+    , _gloError    :: !(Maybe GoogleRpcStatus)+    , _gloResponse :: !(Maybe GoogleLongrunningOperationResponse)+    , _gloName     :: !(Maybe Text)+    , _gloMetadata :: !(Maybe GoogleLongrunningOperationMetadata)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleLongrunningOperation' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gloDone'+--+-- * 'gloError'+--+-- * 'gloResponse'+--+-- * 'gloName'+--+-- * 'gloMetadata'+googleLongrunningOperation+    :: GoogleLongrunningOperation+googleLongrunningOperation =+  GoogleLongrunningOperation'+    { _gloDone = Nothing+    , _gloError = Nothing+    , _gloResponse = Nothing+    , _gloName = Nothing+    , _gloMetadata = 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.+gloDone :: Lens' GoogleLongrunningOperation (Maybe Bool)+gloDone = lens _gloDone (\ s a -> s{_gloDone = a})++-- | The error result of the operation in case of failure or cancellation.+gloError :: Lens' GoogleLongrunningOperation (Maybe GoogleRpcStatus)+gloError = lens _gloError (\ s a -> s{_gloError = 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\`.+gloResponse :: Lens' GoogleLongrunningOperation (Maybe GoogleLongrunningOperationResponse)+gloResponse+  = lens _gloResponse (\ s a -> s{_gloResponse = 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\`.+gloName :: Lens' GoogleLongrunningOperation (Maybe Text)+gloName = lens _gloName (\ s a -> s{_gloName = 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.+gloMetadata :: Lens' GoogleLongrunningOperation (Maybe GoogleLongrunningOperationMetadata)+gloMetadata+  = lens _gloMetadata (\ s a -> s{_gloMetadata = a})++instance FromJSON GoogleLongrunningOperation where+        parseJSON+          = withObject "GoogleLongrunningOperation"+              (\ o ->+                 GoogleLongrunningOperation' <$>+                   (o .:? "done") <*> (o .:? "error") <*>+                     (o .:? "response")+                     <*> (o .:? "name")+                     <*> (o .:? "metadata"))++instance ToJSON GoogleLongrunningOperation where+        toJSON GoogleLongrunningOperation'{..}+          = object+              (catMaybes+                 [("done" .=) <$> _gloDone,+                  ("error" .=) <$> _gloError,+                  ("response" .=) <$> _gloResponse,+                  ("name" .=) <$> _gloName,+                  ("metadata" .=) <$> _gloMetadata])++-- | Corresponds to the \`Response\` field in the Dialogflow console.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessage' smart constructor.+data GoogleCloudDialogflowV2IntentMessage =+  GoogleCloudDialogflowV2IntentMessage'+    { _gcdvimcCard              :: !(Maybe GoogleCloudDialogflowV2IntentMessageCard)+    , _gcdvimcImage             :: !(Maybe GoogleCloudDialogflowV2IntentMessageImage)+    , _gcdvimcPlatform          :: !(Maybe GoogleCloudDialogflowV2IntentMessagePlatform)+    , _gcdvimcLinkOutSuggestion :: !(Maybe GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion)+    , _gcdvimcText              :: !(Maybe GoogleCloudDialogflowV2IntentMessageText)+    , _gcdvimcCarouselSelect    :: !(Maybe GoogleCloudDialogflowV2IntentMessageCarouselSelect)+    , _gcdvimcSimpleResponses   :: !(Maybe GoogleCloudDialogflowV2IntentMessageSimpleResponses)+    , _gcdvimcPayload           :: !(Maybe GoogleCloudDialogflowV2IntentMessagePayload)+    , _gcdvimcSuggestions       :: !(Maybe GoogleCloudDialogflowV2IntentMessageSuggestions)+    , _gcdvimcListSelect        :: !(Maybe GoogleCloudDialogflowV2IntentMessageListSelect)+    , _gcdvimcBasicCard         :: !(Maybe GoogleCloudDialogflowV2IntentMessageBasicCard)+    , _gcdvimcQuickReplies      :: !(Maybe GoogleCloudDialogflowV2IntentMessageQuickReplies)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessage' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimcCard'+--+-- * 'gcdvimcImage'+--+-- * 'gcdvimcPlatform'+--+-- * 'gcdvimcLinkOutSuggestion'+--+-- * 'gcdvimcText'+--+-- * 'gcdvimcCarouselSelect'+--+-- * 'gcdvimcSimpleResponses'+--+-- * 'gcdvimcPayload'+--+-- * 'gcdvimcSuggestions'+--+-- * 'gcdvimcListSelect'+--+-- * 'gcdvimcBasicCard'+--+-- * 'gcdvimcQuickReplies'+googleCloudDialogflowV2IntentMessage+    :: GoogleCloudDialogflowV2IntentMessage+googleCloudDialogflowV2IntentMessage =+  GoogleCloudDialogflowV2IntentMessage'+    { _gcdvimcCard = Nothing+    , _gcdvimcImage = Nothing+    , _gcdvimcPlatform = Nothing+    , _gcdvimcLinkOutSuggestion = Nothing+    , _gcdvimcText = Nothing+    , _gcdvimcCarouselSelect = Nothing+    , _gcdvimcSimpleResponses = Nothing+    , _gcdvimcPayload = Nothing+    , _gcdvimcSuggestions = Nothing+    , _gcdvimcListSelect = Nothing+    , _gcdvimcBasicCard = Nothing+    , _gcdvimcQuickReplies = Nothing+    }+++-- | The card response.+gcdvimcCard :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageCard)+gcdvimcCard+  = lens _gcdvimcCard (\ s a -> s{_gcdvimcCard = a})++-- | The image response.+gcdvimcImage :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageImage)+gcdvimcImage+  = lens _gcdvimcImage (\ s a -> s{_gcdvimcImage = a})++-- | Optional. The platform that this message is intended for.+gcdvimcPlatform :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessagePlatform)+gcdvimcPlatform+  = lens _gcdvimcPlatform+      (\ s a -> s{_gcdvimcPlatform = a})++-- | The link out suggestion chip for Actions on Google.+gcdvimcLinkOutSuggestion :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageLinkOutSuggestion)+gcdvimcLinkOutSuggestion+  = lens _gcdvimcLinkOutSuggestion+      (\ s a -> s{_gcdvimcLinkOutSuggestion = a})++-- | The text response.+gcdvimcText :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageText)+gcdvimcText+  = lens _gcdvimcText (\ s a -> s{_gcdvimcText = a})++-- | The carousel card response for Actions on Google.+gcdvimcCarouselSelect :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageCarouselSelect)+gcdvimcCarouselSelect+  = lens _gcdvimcCarouselSelect+      (\ s a -> s{_gcdvimcCarouselSelect = a})++-- | The voice and text-only responses for Actions on Google.+gcdvimcSimpleResponses :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageSimpleResponses)+gcdvimcSimpleResponses+  = lens _gcdvimcSimpleResponses+      (\ s a -> s{_gcdvimcSimpleResponses = a})++-- | Returns a response containing a custom, platform-specific payload. See+-- the Intent.Message.Platform type for a description of the structure that+-- may be required for your platform.+gcdvimcPayload :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessagePayload)+gcdvimcPayload+  = lens _gcdvimcPayload+      (\ s a -> s{_gcdvimcPayload = a})++-- | The suggestion chips for Actions on Google.+gcdvimcSuggestions :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageSuggestions)+gcdvimcSuggestions+  = lens _gcdvimcSuggestions+      (\ s a -> s{_gcdvimcSuggestions = a})++-- | The list card response for Actions on Google.+gcdvimcListSelect :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageListSelect)+gcdvimcListSelect+  = lens _gcdvimcListSelect+      (\ s a -> s{_gcdvimcListSelect = a})++-- | The basic card response for Actions on Google.+gcdvimcBasicCard :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageBasicCard)+gcdvimcBasicCard+  = lens _gcdvimcBasicCard+      (\ s a -> s{_gcdvimcBasicCard = a})++-- | The quick replies response.+gcdvimcQuickReplies :: Lens' GoogleCloudDialogflowV2IntentMessage (Maybe GoogleCloudDialogflowV2IntentMessageQuickReplies)+gcdvimcQuickReplies+  = lens _gcdvimcQuickReplies+      (\ s a -> s{_gcdvimcQuickReplies = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentMessage+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2IntentMessage"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessage' <$>+                   (o .:? "card") <*> (o .:? "image") <*>+                     (o .:? "platform")+                     <*> (o .:? "linkOutSuggestion")+                     <*> (o .:? "text")+                     <*> (o .:? "carouselSelect")+                     <*> (o .:? "simpleResponses")+                     <*> (o .:? "payload")+                     <*> (o .:? "suggestions")+                     <*> (o .:? "listSelect")+                     <*> (o .:? "basicCard")+                     <*> (o .:? "quickReplies"))++instance ToJSON GoogleCloudDialogflowV2IntentMessage+         where+        toJSON GoogleCloudDialogflowV2IntentMessage'{..}+          = object+              (catMaybes+                 [("card" .=) <$> _gcdvimcCard,+                  ("image" .=) <$> _gcdvimcImage,+                  ("platform" .=) <$> _gcdvimcPlatform,+                  ("linkOutSuggestion" .=) <$>+                    _gcdvimcLinkOutSuggestion,+                  ("text" .=) <$> _gcdvimcText,+                  ("carouselSelect" .=) <$> _gcdvimcCarouselSelect,+                  ("simpleResponses" .=) <$> _gcdvimcSimpleResponses,+                  ("payload" .=) <$> _gcdvimcPayload,+                  ("suggestions" .=) <$> _gcdvimcSuggestions,+                  ("listSelect" .=) <$> _gcdvimcListSelect,+                  ("basicCard" .=) <$> _gcdvimcBasicCard,+                  ("quickReplies" .=) <$> _gcdvimcQuickReplies])++-- | The card for presenting a carousel of options to select from.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageCarouselSelect' smart constructor.+newtype GoogleCloudDialogflowV2IntentMessageCarouselSelect =+  GoogleCloudDialogflowV2IntentMessageCarouselSelect'+    { _gItems :: Maybe [GoogleCloudDialogflowV2IntentMessageCarouselSelectItem]+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageCarouselSelect' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gItems'+googleCloudDialogflowV2IntentMessageCarouselSelect+    :: GoogleCloudDialogflowV2IntentMessageCarouselSelect+googleCloudDialogflowV2IntentMessageCarouselSelect =+  GoogleCloudDialogflowV2IntentMessageCarouselSelect' {_gItems = Nothing}+++-- | Required. Carousel items.+gItems :: Lens' GoogleCloudDialogflowV2IntentMessageCarouselSelect [GoogleCloudDialogflowV2IntentMessageCarouselSelectItem]+gItems+  = lens _gItems (\ s a -> s{_gItems = a}) . _Default .+      _Coerce++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageCarouselSelect+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageCarouselSelect"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageCarouselSelect'+                   <$> (o .:? "items" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageCarouselSelect+         where+        toJSON+          GoogleCloudDialogflowV2IntentMessageCarouselSelect'{..}+          = object (catMaybes [("items" .=) <$> _gItems])++-- | The sentiment, such as positive\/negative feeling or association, for a+-- unit of analysis, such as the query text.+--+-- /See:/ 'googleCloudDialogflowV2Sentiment' smart constructor.+data GoogleCloudDialogflowV2Sentiment =+  GoogleCloudDialogflowV2Sentiment'+    { _gScore     :: !(Maybe (Textual Double))+    , _gMagnitude :: !(Maybe (Textual Double))+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2Sentiment' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gScore'+--+-- * 'gMagnitude'+googleCloudDialogflowV2Sentiment+    :: GoogleCloudDialogflowV2Sentiment+googleCloudDialogflowV2Sentiment =+  GoogleCloudDialogflowV2Sentiment' {_gScore = Nothing, _gMagnitude = Nothing}+++-- | Sentiment score between -1.0 (negative sentiment) and 1.0 (positive+-- sentiment).+gScore :: Lens' GoogleCloudDialogflowV2Sentiment (Maybe Double)+gScore+  = lens _gScore (\ s a -> s{_gScore = a}) .+      mapping _Coerce++-- | A non-negative number in the [0, +inf) range, which represents the+-- absolute magnitude of sentiment, regardless of score (positive or+-- negative).+gMagnitude :: Lens' GoogleCloudDialogflowV2Sentiment (Maybe Double)+gMagnitude+  = lens _gMagnitude (\ s a -> s{_gMagnitude = a}) .+      mapping _Coerce++instance FromJSON GoogleCloudDialogflowV2Sentiment+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2Sentiment"+              (\ o ->+                 GoogleCloudDialogflowV2Sentiment' <$>+                   (o .:? "score") <*> (o .:? "magnitude"))++instance ToJSON GoogleCloudDialogflowV2Sentiment+         where+        toJSON GoogleCloudDialogflowV2Sentiment'{..}+          = object+              (catMaybes+                 [("score" .=) <$> _gScore,+                  ("magnitude" .=) <$> _gMagnitude])++-- | Additional info about the select item for when it is triggered in a+-- dialog.+--+-- /See:/ 'googleCloudDialogflowV2beta1IntentMessageSelectItemInfo' smart constructor.+data GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo =+  GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo'+    { _gooKey      :: !(Maybe Text)+    , _gooSynonyms :: !(Maybe [Text])+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gooKey'+--+-- * 'gooSynonyms'+googleCloudDialogflowV2beta1IntentMessageSelectItemInfo+    :: GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo+googleCloudDialogflowV2beta1IntentMessageSelectItemInfo =+  GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo'+    {_gooKey = Nothing, _gooSynonyms = Nothing}+++-- | Required. A unique key that will be sent back to the agent if this+-- response is given.+gooKey :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo (Maybe Text)+gooKey = lens _gooKey (\ s a -> s{_gooKey = a})++-- | Optional. A list of synonyms that can also be used to trigger this item+-- in dialog.+gooSynonyms :: Lens' GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo [Text]+gooSynonyms+  = lens _gooSynonyms (\ s a -> s{_gooSynonyms = a}) .+      _Default+      . _Coerce++instance FromJSON+           GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo"+              (\ o ->+                 GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo'+                   <$> (o .:? "key") <*> (o .:? "synonyms" .!= mempty))++instance ToJSON+           GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo+         where+        toJSON+          GoogleCloudDialogflowV2beta1IntentMessageSelectItemInfo'{..}+          = object+              (catMaybes+                 [("key" .=) <$> _gooKey,+                  ("synonyms" .=) <$> _gooSynonyms])++-- | Represents an intent. Intents convert a number of user expressions or+-- patterns into an action. An action is an extraction of a user command or+-- sentence semantics.+--+-- /See:/ 'googleCloudDialogflowV2beta1Intent' smart constructor.+data GoogleCloudDialogflowV2beta1Intent =+  GoogleCloudDialogflowV2beta1Intent'+    { _gcdvicDefaultResponsePlatforms :: !(Maybe [Text])+    , _gcdvicWebhookState             :: !(Maybe GoogleCloudDialogflowV2beta1IntentWebhookState)+    , _gcdvicMlEnabled                :: !(Maybe Bool)+    , _gcdvicPriority                 :: !(Maybe (Textual Int32))+    , _gcdvicAction                   :: !(Maybe Text)+    , _gcdvicRootFollowupIntentName   :: !(Maybe Text)+    , _gcdvicName                     :: !(Maybe Text)+    , _gcdvicEvents                   :: !(Maybe [Text])+    , _gcdvicParameters               :: !(Maybe [GoogleCloudDialogflowV2beta1IntentParameter])+    , _gcdvicDisplayName              :: !(Maybe Text)+    , _gcdvicInputContextNames        :: !(Maybe [Text])+    , _gcdvicEndInteraction           :: !(Maybe Bool)+    , _gcdvicMessages                 :: !(Maybe [GoogleCloudDialogflowV2beta1IntentMessage])+    , _gcdvicParentFollowupIntentName :: !(Maybe Text)+    , _gcdvicOutputContexts           :: !(Maybe [GoogleCloudDialogflowV2beta1Context])+    , _gcdvicTrainingPhrases          :: !(Maybe [GoogleCloudDialogflowV2beta1IntentTrainingPhrase])+    , _gcdvicFollowupIntentInfo       :: !(Maybe [GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo])+    , _gcdvicIsFallback               :: !(Maybe Bool)+    , _gcdvicMlDisabled               :: !(Maybe Bool)+    , _gcdvicResetContexts            :: !(Maybe Bool)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2beta1Intent' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvicDefaultResponsePlatforms'+--+-- * 'gcdvicWebhookState'+--+-- * 'gcdvicMlEnabled'+--+-- * 'gcdvicPriority'+--+-- * 'gcdvicAction'+--+-- * 'gcdvicRootFollowupIntentName'+--+-- * 'gcdvicName'+--+-- * 'gcdvicEvents'+--+-- * 'gcdvicParameters'+--+-- * 'gcdvicDisplayName'+--+-- * 'gcdvicInputContextNames'+--+-- * 'gcdvicEndInteraction'+--+-- * 'gcdvicMessages'+--+-- * 'gcdvicParentFollowupIntentName'+--+-- * 'gcdvicOutputContexts'+--+-- * 'gcdvicTrainingPhrases'+--+-- * 'gcdvicFollowupIntentInfo'+--+-- * 'gcdvicIsFallback'+--+-- * 'gcdvicMlDisabled'+--+-- * 'gcdvicResetContexts'+googleCloudDialogflowV2beta1Intent+    :: GoogleCloudDialogflowV2beta1Intent+googleCloudDialogflowV2beta1Intent =+  GoogleCloudDialogflowV2beta1Intent'+    { _gcdvicDefaultResponsePlatforms = Nothing+    , _gcdvicWebhookState = Nothing+    , _gcdvicMlEnabled = Nothing+    , _gcdvicPriority = Nothing+    , _gcdvicAction = Nothing+    , _gcdvicRootFollowupIntentName = Nothing+    , _gcdvicName = Nothing+    , _gcdvicEvents = Nothing+    , _gcdvicParameters = Nothing+    , _gcdvicDisplayName = Nothing+    , _gcdvicInputContextNames = Nothing+    , _gcdvicEndInteraction = Nothing+    , _gcdvicMessages = Nothing+    , _gcdvicParentFollowupIntentName = Nothing+    , _gcdvicOutputContexts = Nothing+    , _gcdvicTrainingPhrases = Nothing+    , _gcdvicFollowupIntentInfo = Nothing+    , _gcdvicIsFallback = Nothing+    , _gcdvicMlDisabled = Nothing+    , _gcdvicResetContexts = Nothing+    }+++-- | Optional. The list of platforms for which the first response will be+-- taken from among the messages assigned to the DEFAULT_PLATFORM.+gcdvicDefaultResponsePlatforms :: Lens' GoogleCloudDialogflowV2beta1Intent [Text]+gcdvicDefaultResponsePlatforms+  = lens _gcdvicDefaultResponsePlatforms+      (\ s a -> s{_gcdvicDefaultResponsePlatforms = a})+      . _Default+      . _Coerce++-- | Optional. Indicates whether webhooks are enabled for the intent.+gcdvicWebhookState :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe GoogleCloudDialogflowV2beta1IntentWebhookState)+gcdvicWebhookState+  = lens _gcdvicWebhookState+      (\ s a -> s{_gcdvicWebhookState = a})++-- | Optional. Indicates whether Machine Learning is enabled for the intent.+-- Note: If \`ml_enabled\` setting is set to false, then this intent is not+-- taken into account during inference in \`ML ONLY\` match mode. Also,+-- auto-markup in the UI is turned off. DEPRECATED! Please use+-- \`ml_disabled\` field instead. NOTE: If both \`ml_enabled\` and+-- \`ml_disabled\` are either not set or false, then the default value is+-- determined as follows: - Before April 15th, 2018 the default is:+-- ml_enabled = false \/ ml_disabled = true. - After April 15th, 2018 the+-- default is: ml_enabled = true \/ ml_disabled = false.+gcdvicMlEnabled :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Bool)+gcdvicMlEnabled+  = lens _gcdvicMlEnabled+      (\ s a -> s{_gcdvicMlEnabled = a})++-- | Optional. The priority of this intent. Higher numbers represent higher+-- priorities. If this is zero or unspecified, we use the default priority+-- 500000. Negative numbers mean that the intent is disabled.+gcdvicPriority :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Int32)+gcdvicPriority+  = lens _gcdvicPriority+      (\ s a -> s{_gcdvicPriority = a})+      . mapping _Coerce++-- | Optional. The name of the action associated with the intent. Note: The+-- action name must not contain whitespaces.+gcdvicAction :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Text)+gcdvicAction+  = lens _gcdvicAction (\ s a -> s{_gcdvicAction = a})++-- | Read-only. The unique identifier of the root intent in the chain of+-- followup intents. It identifies the correct followup intents chain for+-- this intent. We populate this field only in the output. Format:+-- \`projects\/\/agent\/intents\/\`.+gcdvicRootFollowupIntentName :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Text)+gcdvicRootFollowupIntentName+  = lens _gcdvicRootFollowupIntentName+      (\ s a -> s{_gcdvicRootFollowupIntentName = a})++-- | The unique identifier of this intent. Required for Intents.UpdateIntent+-- and Intents.BatchUpdateIntents methods. Format:+-- \`projects\/\/agent\/intents\/\`.+gcdvicName :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Text)+gcdvicName+  = lens _gcdvicName (\ s a -> s{_gcdvicName = a})++-- | Optional. The collection of event names that trigger the intent. If the+-- collection of input contexts is not empty, all of the contexts must be+-- present in the active user session for an event to trigger this intent.+gcdvicEvents :: Lens' GoogleCloudDialogflowV2beta1Intent [Text]+gcdvicEvents+  = lens _gcdvicEvents (\ s a -> s{_gcdvicEvents = a})+      . _Default+      . _Coerce++-- | Optional. The collection of parameters associated with the intent.+gcdvicParameters :: Lens' GoogleCloudDialogflowV2beta1Intent [GoogleCloudDialogflowV2beta1IntentParameter]+gcdvicParameters+  = lens _gcdvicParameters+      (\ s a -> s{_gcdvicParameters = a})+      . _Default+      . _Coerce++-- | Required. The name of this intent.+gcdvicDisplayName :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Text)+gcdvicDisplayName+  = lens _gcdvicDisplayName+      (\ s a -> s{_gcdvicDisplayName = a})++-- | Optional. The list of context names required for this intent to be+-- triggered. Format: \`projects\/\/agent\/sessions\/-\/contexts\/\`.+gcdvicInputContextNames :: Lens' GoogleCloudDialogflowV2beta1Intent [Text]+gcdvicInputContextNames+  = lens _gcdvicInputContextNames+      (\ s a -> s{_gcdvicInputContextNames = a})+      . _Default+      . _Coerce++-- | Optional. Indicates that this intent ends an interaction. Some+-- integrations (e.g., Actions on Google or Dialogflow phone gateway) use+-- this information to close interaction with an end user. Default is+-- false.+gcdvicEndInteraction :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Bool)+gcdvicEndInteraction+  = lens _gcdvicEndInteraction+      (\ s a -> s{_gcdvicEndInteraction = a})++-- | Optional. The collection of rich messages corresponding to the+-- \`Response\` field in the Dialogflow console.+gcdvicMessages :: Lens' GoogleCloudDialogflowV2beta1Intent [GoogleCloudDialogflowV2beta1IntentMessage]+gcdvicMessages+  = lens _gcdvicMessages+      (\ s a -> s{_gcdvicMessages = a})+      . _Default+      . _Coerce++-- | Read-only after creation. The unique identifier of the parent intent in+-- the chain of followup intents. You can set this field when creating an+-- intent, for example with CreateIntent or BatchUpdateIntents, in order to+-- make this intent a followup intent. It identifies the parent followup+-- intent. Format: \`projects\/\/agent\/intents\/\`.+gcdvicParentFollowupIntentName :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Text)+gcdvicParentFollowupIntentName+  = lens _gcdvicParentFollowupIntentName+      (\ s a -> s{_gcdvicParentFollowupIntentName = a})++-- | Optional. The collection of contexts that are activated when the intent+-- is matched. Context messages in this collection should not set the+-- parameters field. Setting the \`lifespan_count\` to 0 will reset the+-- context when the intent is matched. Format:+-- \`projects\/\/agent\/sessions\/-\/contexts\/\`.+gcdvicOutputContexts :: Lens' GoogleCloudDialogflowV2beta1Intent [GoogleCloudDialogflowV2beta1Context]+gcdvicOutputContexts+  = lens _gcdvicOutputContexts+      (\ s a -> s{_gcdvicOutputContexts = a})+      . _Default+      . _Coerce++-- | Optional. The collection of examples that the agent is trained on.+gcdvicTrainingPhrases :: Lens' GoogleCloudDialogflowV2beta1Intent [GoogleCloudDialogflowV2beta1IntentTrainingPhrase]+gcdvicTrainingPhrases+  = lens _gcdvicTrainingPhrases+      (\ s a -> s{_gcdvicTrainingPhrases = a})+      . _Default+      . _Coerce++-- | Read-only. Information about all followup intents that have this intent+-- as a direct or indirect parent. We populate this field only in the+-- output.+gcdvicFollowupIntentInfo :: Lens' GoogleCloudDialogflowV2beta1Intent [GoogleCloudDialogflowV2beta1IntentFollowupIntentInfo]+gcdvicFollowupIntentInfo+  = lens _gcdvicFollowupIntentInfo+      (\ s a -> s{_gcdvicFollowupIntentInfo = a})+      . _Default+      . _Coerce++-- | Optional. Indicates whether this is a fallback intent.+gcdvicIsFallback :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Bool)+gcdvicIsFallback+  = lens _gcdvicIsFallback+      (\ s a -> s{_gcdvicIsFallback = a})++-- | Optional. Indicates whether Machine Learning is disabled for the intent.+-- Note: If \`ml_disabled\` setting is set to true, then this intent is not+-- taken into account during inference in \`ML ONLY\` match mode. Also,+-- auto-markup in the UI is turned off.+gcdvicMlDisabled :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Bool)+gcdvicMlDisabled+  = lens _gcdvicMlDisabled+      (\ s a -> s{_gcdvicMlDisabled = a})++-- | Optional. Indicates whether to delete all contexts in the current+-- session when this intent is matched.+gcdvicResetContexts :: Lens' GoogleCloudDialogflowV2beta1Intent (Maybe Bool)+gcdvicResetContexts+  = lens _gcdvicResetContexts+      (\ s a -> s{_gcdvicResetContexts = a})++instance FromJSON GoogleCloudDialogflowV2beta1Intent+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2beta1Intent"+              (\ o ->+                 GoogleCloudDialogflowV2beta1Intent' <$>+                   (o .:? "defaultResponsePlatforms" .!= mempty) <*>+                     (o .:? "webhookState")+                     <*> (o .:? "mlEnabled")+                     <*> (o .:? "priority")+                     <*> (o .:? "action")+                     <*> (o .:? "rootFollowupIntentName")+                     <*> (o .:? "name")+                     <*> (o .:? "events" .!= mempty)+                     <*> (o .:? "parameters" .!= mempty)+                     <*> (o .:? "displayName")+                     <*> (o .:? "inputContextNames" .!= mempty)+                     <*> (o .:? "endInteraction")+                     <*> (o .:? "messages" .!= mempty)+                     <*> (o .:? "parentFollowupIntentName")+                     <*> (o .:? "outputContexts" .!= mempty)+                     <*> (o .:? "trainingPhrases" .!= mempty)+                     <*> (o .:? "followupIntentInfo" .!= mempty)+                     <*> (o .:? "isFallback")+                     <*> (o .:? "mlDisabled")+                     <*> (o .:? "resetContexts"))++instance ToJSON GoogleCloudDialogflowV2beta1Intent+         where+        toJSON GoogleCloudDialogflowV2beta1Intent'{..}+          = object+              (catMaybes+                 [("defaultResponsePlatforms" .=) <$>+                    _gcdvicDefaultResponsePlatforms,+                  ("webhookState" .=) <$> _gcdvicWebhookState,+                  ("mlEnabled" .=) <$> _gcdvicMlEnabled,+                  ("priority" .=) <$> _gcdvicPriority,+                  ("action" .=) <$> _gcdvicAction,+                  ("rootFollowupIntentName" .=) <$>+                    _gcdvicRootFollowupIntentName,+                  ("name" .=) <$> _gcdvicName,+                  ("events" .=) <$> _gcdvicEvents,+                  ("parameters" .=) <$> _gcdvicParameters,+                  ("displayName" .=) <$> _gcdvicDisplayName,+                  ("inputContextNames" .=) <$>+                    _gcdvicInputContextNames,+                  ("endInteraction" .=) <$> _gcdvicEndInteraction,+                  ("messages" .=) <$> _gcdvicMessages,+                  ("parentFollowupIntentName" .=) <$>+                    _gcdvicParentFollowupIntentName,+                  ("outputContexts" .=) <$> _gcdvicOutputContexts,+                  ("trainingPhrases" .=) <$> _gcdvicTrainingPhrases,+                  ("followupIntentInfo" .=) <$>+                    _gcdvicFollowupIntentInfo,+                  ("isFallback" .=) <$> _gcdvicIsFallback,+                  ("mlDisabled" .=) <$> _gcdvicMlDisabled,+                  ("resetContexts" .=) <$> _gcdvicResetContexts])++-- | Represents a context.+--+-- /See:/ 'googleCloudDialogflowV2Context' smart constructor.+data GoogleCloudDialogflowV2Context =+  GoogleCloudDialogflowV2Context'+    { _gcdvccLifespanCount :: !(Maybe (Textual Int32))+    , _gcdvccName          :: !(Maybe Text)+    , _gcdvccParameters    :: !(Maybe GoogleCloudDialogflowV2ContextParameters)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2Context' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvccLifespanCount'+--+-- * 'gcdvccName'+--+-- * 'gcdvccParameters'+googleCloudDialogflowV2Context+    :: GoogleCloudDialogflowV2Context+googleCloudDialogflowV2Context =+  GoogleCloudDialogflowV2Context'+    { _gcdvccLifespanCount = Nothing+    , _gcdvccName = Nothing+    , _gcdvccParameters = Nothing+    }+++-- | Optional. The number of conversational query requests after which the+-- context expires. If set to \`0\` (the default) the context expires+-- immediately. Contexts expire automatically after 20 minutes if there are+-- no matching queries.+gcdvccLifespanCount :: Lens' GoogleCloudDialogflowV2Context (Maybe Int32)+gcdvccLifespanCount+  = lens _gcdvccLifespanCount+      (\ s a -> s{_gcdvccLifespanCount = a})+      . mapping _Coerce++-- | Required. The unique identifier of the context. Format:+-- \`projects\/\/agent\/sessions\/\/contexts\/\`. The \`Context ID\` is+-- always converted to lowercase, may only contain characters in+-- [a-zA-Z0-9_-%] and may be at most 250 bytes long.+gcdvccName :: Lens' GoogleCloudDialogflowV2Context (Maybe Text)+gcdvccName+  = lens _gcdvccName (\ s a -> s{_gcdvccName = a})++-- | Optional. The collection of parameters associated with this context.+-- Refer to [this+-- doc](https:\/\/cloud.google.com\/dialogflow-enterprise\/docs\/intents-actions-parameters)+-- for syntax.+gcdvccParameters :: Lens' GoogleCloudDialogflowV2Context (Maybe GoogleCloudDialogflowV2ContextParameters)+gcdvccParameters+  = lens _gcdvccParameters+      (\ s a -> s{_gcdvccParameters = a})++instance FromJSON GoogleCloudDialogflowV2Context+         where+        parseJSON+          = withObject "GoogleCloudDialogflowV2Context"+              (\ o ->+                 GoogleCloudDialogflowV2Context' <$>+                   (o .:? "lifespanCount") <*> (o .:? "name") <*>+                     (o .:? "parameters"))++instance ToJSON GoogleCloudDialogflowV2Context where+        toJSON GoogleCloudDialogflowV2Context'{..}+          = object+              (catMaybes+                 [("lifespanCount" .=) <$> _gcdvccLifespanCount,+                  ("name" .=) <$> _gcdvccName,+                  ("parameters" .=) <$> _gcdvccParameters])++-- | The button object that appears at the bottom of a card.+--+-- /See:/ 'googleCloudDialogflowV2IntentMessageBasicCardButton' smart constructor.+data GoogleCloudDialogflowV2IntentMessageBasicCardButton =+  GoogleCloudDialogflowV2IntentMessageBasicCardButton'+    { _gcdvimbcbcOpenURIAction :: !(Maybe GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction)+    , _gcdvimbcbcTitle         :: !(Maybe Text)+    }+  deriving (Eq, Show, Data, Typeable, Generic)+++-- | Creates a value of 'GoogleCloudDialogflowV2IntentMessageBasicCardButton' with the minimum fields required to make a request.+--+-- Use one of the following lenses to modify other fields as desired:+--+-- * 'gcdvimbcbcOpenURIAction'+--+-- * 'gcdvimbcbcTitle'+googleCloudDialogflowV2IntentMessageBasicCardButton+    :: GoogleCloudDialogflowV2IntentMessageBasicCardButton+googleCloudDialogflowV2IntentMessageBasicCardButton =+  GoogleCloudDialogflowV2IntentMessageBasicCardButton'+    {_gcdvimbcbcOpenURIAction = Nothing, _gcdvimbcbcTitle = Nothing}+++-- | Required. Action to take when a user taps on the button.+gcdvimbcbcOpenURIAction :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCardButton (Maybe GoogleCloudDialogflowV2IntentMessageBasicCardButtonOpenURIAction)+gcdvimbcbcOpenURIAction+  = lens _gcdvimbcbcOpenURIAction+      (\ s a -> s{_gcdvimbcbcOpenURIAction = a})++-- | Required. The title of the button.+gcdvimbcbcTitle :: Lens' GoogleCloudDialogflowV2IntentMessageBasicCardButton (Maybe Text)+gcdvimbcbcTitle+  = lens _gcdvimbcbcTitle+      (\ s a -> s{_gcdvimbcbcTitle = a})++instance FromJSON+           GoogleCloudDialogflowV2IntentMessageBasicCardButton+         where+        parseJSON+          = withObject+              "GoogleCloudDialogflowV2IntentMessageBasicCardButton"+              (\ o ->+                 GoogleCloudDialogflowV2IntentMessageBasicCardButton'+                   <$> (o .:? "openUriAction") <*> (o .:? "title"))++instance ToJSON+           GoogleCloudDialogflowV2IntentMessageBasicCardButton          where         toJSON           GoogleCloudDialogflowV2IntentMessageBasicCardButton'{..}