{-# LANGUAGE DeriveDataTypeable #-}
{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# LANGUAGE OverloadedStrings #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
module Network.Google.DialogFlow.Types.Sum where
import Network.Google.Prelude hiding (Bytes)
data GoogleCloudDialogflowV2BatchUpdateIntentsRequestIntentView
= IntentViewUnspecified
| IntentViewFull
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2BatchUpdateIntentsRequestIntentView
instance FromHttpApiData GoogleCloudDialogflowV2BatchUpdateIntentsRequestIntentView where
parseQueryParam = \case
"INTENT_VIEW_UNSPECIFIED" -> Right IntentViewUnspecified
"INTENT_VIEW_FULL" -> Right IntentViewFull
x -> Left ("Unable to parse GoogleCloudDialogflowV2BatchUpdateIntentsRequestIntentView from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2BatchUpdateIntentsRequestIntentView where
toQueryParam = \case
IntentViewUnspecified -> "INTENT_VIEW_UNSPECIFIED"
IntentViewFull -> "INTENT_VIEW_FULL"
instance FromJSON GoogleCloudDialogflowV2BatchUpdateIntentsRequestIntentView where
parseJSON = parseJSONText "GoogleCloudDialogflowV2BatchUpdateIntentsRequestIntentView"
instance ToJSON GoogleCloudDialogflowV2BatchUpdateIntentsRequestIntentView where
toJSON = toJSONText
data GoogleCloudDialogflowV2beta1IntentTrainingPhraseType
= TypeUnspecified
| Example
| Template
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2beta1IntentTrainingPhraseType
instance FromHttpApiData GoogleCloudDialogflowV2beta1IntentTrainingPhraseType where
parseQueryParam = \case
"TYPE_UNSPECIFIED" -> Right TypeUnspecified
"EXAMPLE" -> Right Example
"TEMPLATE" -> Right Template
x -> Left ("Unable to parse GoogleCloudDialogflowV2beta1IntentTrainingPhraseType from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2beta1IntentTrainingPhraseType where
toQueryParam = \case
TypeUnspecified -> "TYPE_UNSPECIFIED"
Example -> "EXAMPLE"
Template -> "TEMPLATE"
instance FromJSON GoogleCloudDialogflowV2beta1IntentTrainingPhraseType where
parseJSON = parseJSONText "GoogleCloudDialogflowV2beta1IntentTrainingPhraseType"
instance ToJSON GoogleCloudDialogflowV2beta1IntentTrainingPhraseType where
toJSON = toJSONText
data GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswerMatchConfidenceLevel
= MatchConfidenceLevelUnspecified
| Low
| Medium
| High
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswerMatchConfidenceLevel
instance FromHttpApiData GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswerMatchConfidenceLevel where
parseQueryParam = \case
"MATCH_CONFIDENCE_LEVEL_UNSPECIFIED" -> Right MatchConfidenceLevelUnspecified
"LOW" -> Right Low
"MEDIUM" -> Right Medium
"HIGH" -> Right High
x -> Left ("Unable to parse GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswerMatchConfidenceLevel from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswerMatchConfidenceLevel where
toQueryParam = \case
MatchConfidenceLevelUnspecified -> "MATCH_CONFIDENCE_LEVEL_UNSPECIFIED"
Low -> "LOW"
Medium -> "MEDIUM"
High -> "HIGH"
instance FromJSON GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswerMatchConfidenceLevel where
parseJSON = parseJSONText "GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswerMatchConfidenceLevel"
instance ToJSON GoogleCloudDialogflowV2beta1KnowledgeAnswersAnswerMatchConfidenceLevel where
toJSON = toJSONText
data GoogleCloudDialogflowV2beta1KnowledgeOperationMetadataState
= StateUnspecified
| Pending
| Running
| Done
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2beta1KnowledgeOperationMetadataState
instance FromHttpApiData GoogleCloudDialogflowV2beta1KnowledgeOperationMetadataState where
parseQueryParam = \case
"STATE_UNSPECIFIED" -> Right StateUnspecified
"PENDING" -> Right Pending
"RUNNING" -> Right Running
"DONE" -> Right Done
x -> Left ("Unable to parse GoogleCloudDialogflowV2beta1KnowledgeOperationMetadataState from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2beta1KnowledgeOperationMetadataState where
toQueryParam = \case
StateUnspecified -> "STATE_UNSPECIFIED"
Pending -> "PENDING"
Running -> "RUNNING"
Done -> "DONE"
instance FromJSON GoogleCloudDialogflowV2beta1KnowledgeOperationMetadataState where
parseJSON = parseJSONText "GoogleCloudDialogflowV2beta1KnowledgeOperationMetadataState"
instance ToJSON GoogleCloudDialogflowV2beta1KnowledgeOperationMetadataState where
toJSON = toJSONText
data GoogleCloudDialogflowV2IntentMessagePlatform
= PlatformUnspecified
| Facebook
| Slack
| Telegram
| Kik
| Skype
| Line
| Viber
| ActionsOnGoogle
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2IntentMessagePlatform
instance FromHttpApiData GoogleCloudDialogflowV2IntentMessagePlatform where
parseQueryParam = \case
"PLATFORM_UNSPECIFIED" -> Right PlatformUnspecified
"FACEBOOK" -> Right Facebook
"SLACK" -> Right Slack
"TELEGRAM" -> Right Telegram
"KIK" -> Right Kik
"SKYPE" -> Right Skype
"LINE" -> Right Line
"VIBER" -> Right Viber
"ACTIONS_ON_GOOGLE" -> Right ActionsOnGoogle
x -> Left ("Unable to parse GoogleCloudDialogflowV2IntentMessagePlatform from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2IntentMessagePlatform where
toQueryParam = \case
PlatformUnspecified -> "PLATFORM_UNSPECIFIED"
Facebook -> "FACEBOOK"
Slack -> "SLACK"
Telegram -> "TELEGRAM"
Kik -> "KIK"
Skype -> "SKYPE"
Line -> "LINE"
Viber -> "VIBER"
ActionsOnGoogle -> "ACTIONS_ON_GOOGLE"
instance FromJSON GoogleCloudDialogflowV2IntentMessagePlatform where
parseJSON = parseJSONText "GoogleCloudDialogflowV2IntentMessagePlatform"
instance ToJSON GoogleCloudDialogflowV2IntentMessagePlatform where
toJSON = toJSONText
data GoogleCloudDialogflowV2IntentTrainingPhraseType
= GCDVITPTTypeUnspecified
| GCDVITPTExample
| GCDVITPTTemplate
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2IntentTrainingPhraseType
instance FromHttpApiData GoogleCloudDialogflowV2IntentTrainingPhraseType where
parseQueryParam = \case
"TYPE_UNSPECIFIED" -> Right GCDVITPTTypeUnspecified
"EXAMPLE" -> Right GCDVITPTExample
"TEMPLATE" -> Right GCDVITPTTemplate
x -> Left ("Unable to parse GoogleCloudDialogflowV2IntentTrainingPhraseType from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2IntentTrainingPhraseType where
toQueryParam = \case
GCDVITPTTypeUnspecified -> "TYPE_UNSPECIFIED"
GCDVITPTExample -> "EXAMPLE"
GCDVITPTTemplate -> "TEMPLATE"
instance FromJSON GoogleCloudDialogflowV2IntentTrainingPhraseType where
parseJSON = parseJSONText "GoogleCloudDialogflowV2IntentTrainingPhraseType"
instance ToJSON GoogleCloudDialogflowV2IntentTrainingPhraseType where
toJSON = toJSONText
data GoogleCloudDialogflowV2AgentMatchMode
= MatchModeUnspecified
| MatchModeHybrid
| MatchModeMlOnly
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2AgentMatchMode
instance FromHttpApiData GoogleCloudDialogflowV2AgentMatchMode where
parseQueryParam = \case
"MATCH_MODE_UNSPECIFIED" -> Right MatchModeUnspecified
"MATCH_MODE_HYBRID" -> Right MatchModeHybrid
"MATCH_MODE_ML_ONLY" -> Right MatchModeMlOnly
x -> Left ("Unable to parse GoogleCloudDialogflowV2AgentMatchMode from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2AgentMatchMode where
toQueryParam = \case
MatchModeUnspecified -> "MATCH_MODE_UNSPECIFIED"
MatchModeHybrid -> "MATCH_MODE_HYBRID"
MatchModeMlOnly -> "MATCH_MODE_ML_ONLY"
instance FromJSON GoogleCloudDialogflowV2AgentMatchMode where
parseJSON = parseJSONText "GoogleCloudDialogflowV2AgentMatchMode"
instance ToJSON GoogleCloudDialogflowV2AgentMatchMode where
toJSON = toJSONText
data GoogleCloudDialogflowV2SessionEntityTypeEntityOverrideMode
= EntityOverrideModeUnspecified
| EntityOverrideModeOverride
| EntityOverrideModeSupplement
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2SessionEntityTypeEntityOverrideMode
instance FromHttpApiData GoogleCloudDialogflowV2SessionEntityTypeEntityOverrideMode where
parseQueryParam = \case
"ENTITY_OVERRIDE_MODE_UNSPECIFIED" -> Right EntityOverrideModeUnspecified
"ENTITY_OVERRIDE_MODE_OVERRIDE" -> Right EntityOverrideModeOverride
"ENTITY_OVERRIDE_MODE_SUPPLEMENT" -> Right EntityOverrideModeSupplement
x -> Left ("Unable to parse GoogleCloudDialogflowV2SessionEntityTypeEntityOverrideMode from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2SessionEntityTypeEntityOverrideMode where
toQueryParam = \case
EntityOverrideModeUnspecified -> "ENTITY_OVERRIDE_MODE_UNSPECIFIED"
EntityOverrideModeOverride -> "ENTITY_OVERRIDE_MODE_OVERRIDE"
EntityOverrideModeSupplement -> "ENTITY_OVERRIDE_MODE_SUPPLEMENT"
instance FromJSON GoogleCloudDialogflowV2SessionEntityTypeEntityOverrideMode where
parseJSON = parseJSONText "GoogleCloudDialogflowV2SessionEntityTypeEntityOverrideMode"
instance ToJSON GoogleCloudDialogflowV2SessionEntityTypeEntityOverrideMode where
toJSON = toJSONText
data Xgafv
= X1
| X2
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable Xgafv
instance FromHttpApiData Xgafv where
parseQueryParam = \case
"1" -> Right X1
"2" -> Right X2
x -> Left ("Unable to parse Xgafv from: " <> x)
instance ToHttpApiData Xgafv where
toQueryParam = \case
X1 -> "1"
X2 -> "2"
instance FromJSON Xgafv where
parseJSON = parseJSONText "Xgafv"
instance ToJSON Xgafv where
toJSON = toJSONText
data GoogleCloudDialogflowV2beta1IntentMessagePlatform
= GCDVIMPPlatformUnspecified
| GCDVIMPFacebook
| GCDVIMPSlack
| GCDVIMPTelegram
| GCDVIMPKik
| GCDVIMPSkype
| GCDVIMPLine
| GCDVIMPViber
| GCDVIMPActionsOnGoogle
| GCDVIMPTelephony
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2beta1IntentMessagePlatform
instance FromHttpApiData GoogleCloudDialogflowV2beta1IntentMessagePlatform where
parseQueryParam = \case
"PLATFORM_UNSPECIFIED" -> Right GCDVIMPPlatformUnspecified
"FACEBOOK" -> Right GCDVIMPFacebook
"SLACK" -> Right GCDVIMPSlack
"TELEGRAM" -> Right GCDVIMPTelegram
"KIK" -> Right GCDVIMPKik
"SKYPE" -> Right GCDVIMPSkype
"LINE" -> Right GCDVIMPLine
"VIBER" -> Right GCDVIMPViber
"ACTIONS_ON_GOOGLE" -> Right GCDVIMPActionsOnGoogle
"TELEPHONY" -> Right GCDVIMPTelephony
x -> Left ("Unable to parse GoogleCloudDialogflowV2beta1IntentMessagePlatform from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2beta1IntentMessagePlatform where
toQueryParam = \case
GCDVIMPPlatformUnspecified -> "PLATFORM_UNSPECIFIED"
GCDVIMPFacebook -> "FACEBOOK"
GCDVIMPSlack -> "SLACK"
GCDVIMPTelegram -> "TELEGRAM"
GCDVIMPKik -> "KIK"
GCDVIMPSkype -> "SKYPE"
GCDVIMPLine -> "LINE"
GCDVIMPViber -> "VIBER"
GCDVIMPActionsOnGoogle -> "ACTIONS_ON_GOOGLE"
GCDVIMPTelephony -> "TELEPHONY"
instance FromJSON GoogleCloudDialogflowV2beta1IntentMessagePlatform where
parseJSON = parseJSONText "GoogleCloudDialogflowV2beta1IntentMessagePlatform"
instance ToJSON GoogleCloudDialogflowV2beta1IntentMessagePlatform where
toJSON = toJSONText
data GoogleCloudDialogflowV2EntityTypeKind
= KindUnspecified
| KindMap
| KindList
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2EntityTypeKind
instance FromHttpApiData GoogleCloudDialogflowV2EntityTypeKind where
parseQueryParam = \case
"KIND_UNSPECIFIED" -> Right KindUnspecified
"KIND_MAP" -> Right KindMap
"KIND_LIST" -> Right KindList
x -> Left ("Unable to parse GoogleCloudDialogflowV2EntityTypeKind from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2EntityTypeKind where
toQueryParam = \case
KindUnspecified -> "KIND_UNSPECIFIED"
KindMap -> "KIND_MAP"
KindList -> "KIND_LIST"
instance FromJSON GoogleCloudDialogflowV2EntityTypeKind where
parseJSON = parseJSONText "GoogleCloudDialogflowV2EntityTypeKind"
instance ToJSON GoogleCloudDialogflowV2EntityTypeKind where
toJSON = toJSONText
data GoogleCloudDialogflowV2beta1IntentWebhookState
= WebhookStateUnspecified
| WebhookStateEnabled
| WebhookStateEnabledForSlotFilling
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2beta1IntentWebhookState
instance FromHttpApiData GoogleCloudDialogflowV2beta1IntentWebhookState where
parseQueryParam = \case
"WEBHOOK_STATE_UNSPECIFIED" -> Right WebhookStateUnspecified
"WEBHOOK_STATE_ENABLED" -> Right WebhookStateEnabled
"WEBHOOK_STATE_ENABLED_FOR_SLOT_FILLING" -> Right WebhookStateEnabledForSlotFilling
x -> Left ("Unable to parse GoogleCloudDialogflowV2beta1IntentWebhookState from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2beta1IntentWebhookState where
toQueryParam = \case
WebhookStateUnspecified -> "WEBHOOK_STATE_UNSPECIFIED"
WebhookStateEnabled -> "WEBHOOK_STATE_ENABLED"
WebhookStateEnabledForSlotFilling -> "WEBHOOK_STATE_ENABLED_FOR_SLOT_FILLING"
instance FromJSON GoogleCloudDialogflowV2beta1IntentWebhookState where
parseJSON = parseJSONText "GoogleCloudDialogflowV2beta1IntentWebhookState"
instance ToJSON GoogleCloudDialogflowV2beta1IntentWebhookState where
toJSON = toJSONText
data GoogleCloudDialogflowV2EntityTypeAutoExpansionMode
= AutoExpansionModeUnspecified
| AutoExpansionModeDefault
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2EntityTypeAutoExpansionMode
instance FromHttpApiData GoogleCloudDialogflowV2EntityTypeAutoExpansionMode where
parseQueryParam = \case
"AUTO_EXPANSION_MODE_UNSPECIFIED" -> Right AutoExpansionModeUnspecified
"AUTO_EXPANSION_MODE_DEFAULT" -> Right AutoExpansionModeDefault
x -> Left ("Unable to parse GoogleCloudDialogflowV2EntityTypeAutoExpansionMode from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2EntityTypeAutoExpansionMode where
toQueryParam = \case
AutoExpansionModeUnspecified -> "AUTO_EXPANSION_MODE_UNSPECIFIED"
AutoExpansionModeDefault -> "AUTO_EXPANSION_MODE_DEFAULT"
instance FromJSON GoogleCloudDialogflowV2EntityTypeAutoExpansionMode where
parseJSON = parseJSONText "GoogleCloudDialogflowV2EntityTypeAutoExpansionMode"
instance ToJSON GoogleCloudDialogflowV2EntityTypeAutoExpansionMode where
toJSON = toJSONText
data GoogleCloudDialogflowV2beta1EntityTypeAutoExpansionMode
= GCDVETAEMAutoExpansionModeUnspecified
| GCDVETAEMAutoExpansionModeDefault
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2beta1EntityTypeAutoExpansionMode
instance FromHttpApiData GoogleCloudDialogflowV2beta1EntityTypeAutoExpansionMode where
parseQueryParam = \case
"AUTO_EXPANSION_MODE_UNSPECIFIED" -> Right GCDVETAEMAutoExpansionModeUnspecified
"AUTO_EXPANSION_MODE_DEFAULT" -> Right GCDVETAEMAutoExpansionModeDefault
x -> Left ("Unable to parse GoogleCloudDialogflowV2beta1EntityTypeAutoExpansionMode from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2beta1EntityTypeAutoExpansionMode where
toQueryParam = \case
GCDVETAEMAutoExpansionModeUnspecified -> "AUTO_EXPANSION_MODE_UNSPECIFIED"
GCDVETAEMAutoExpansionModeDefault -> "AUTO_EXPANSION_MODE_DEFAULT"
instance FromJSON GoogleCloudDialogflowV2beta1EntityTypeAutoExpansionMode where
parseJSON = parseJSONText "GoogleCloudDialogflowV2beta1EntityTypeAutoExpansionMode"
instance ToJSON GoogleCloudDialogflowV2beta1EntityTypeAutoExpansionMode where
toJSON = toJSONText
data GoogleCloudDialogflowV2beta1EntityTypeKind
= GCDVETKKindUnspecified
| GCDVETKKindMap
| GCDVETKKindList
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2beta1EntityTypeKind
instance FromHttpApiData GoogleCloudDialogflowV2beta1EntityTypeKind where
parseQueryParam = \case
"KIND_UNSPECIFIED" -> Right GCDVETKKindUnspecified
"KIND_MAP" -> Right GCDVETKKindMap
"KIND_LIST" -> Right GCDVETKKindList
x -> Left ("Unable to parse GoogleCloudDialogflowV2beta1EntityTypeKind from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2beta1EntityTypeKind where
toQueryParam = \case
GCDVETKKindUnspecified -> "KIND_UNSPECIFIED"
GCDVETKKindMap -> "KIND_MAP"
GCDVETKKindList -> "KIND_LIST"
instance FromJSON GoogleCloudDialogflowV2beta1EntityTypeKind where
parseJSON = parseJSONText "GoogleCloudDialogflowV2beta1EntityTypeKind"
instance ToJSON GoogleCloudDialogflowV2beta1EntityTypeKind where
toJSON = toJSONText
data GoogleCloudDialogflowV2IntentWebhookState
= GCDVIWSWebhookStateUnspecified
| GCDVIWSWebhookStateEnabled
| GCDVIWSWebhookStateEnabledForSlotFilling
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2IntentWebhookState
instance FromHttpApiData GoogleCloudDialogflowV2IntentWebhookState where
parseQueryParam = \case
"WEBHOOK_STATE_UNSPECIFIED" -> Right GCDVIWSWebhookStateUnspecified
"WEBHOOK_STATE_ENABLED" -> Right GCDVIWSWebhookStateEnabled
"WEBHOOK_STATE_ENABLED_FOR_SLOT_FILLING" -> Right GCDVIWSWebhookStateEnabledForSlotFilling
x -> Left ("Unable to parse GoogleCloudDialogflowV2IntentWebhookState from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2IntentWebhookState where
toQueryParam = \case
GCDVIWSWebhookStateUnspecified -> "WEBHOOK_STATE_UNSPECIFIED"
GCDVIWSWebhookStateEnabled -> "WEBHOOK_STATE_ENABLED"
GCDVIWSWebhookStateEnabledForSlotFilling -> "WEBHOOK_STATE_ENABLED_FOR_SLOT_FILLING"
instance FromJSON GoogleCloudDialogflowV2IntentWebhookState where
parseJSON = parseJSONText "GoogleCloudDialogflowV2IntentWebhookState"
instance ToJSON GoogleCloudDialogflowV2IntentWebhookState where
toJSON = toJSONText
data GoogleCloudDialogflowV2InputAudioConfigAudioEncoding
= AudioEncodingUnspecified
| AudioEncodingLinear16
| AudioEncodingFlac
| AudioEncodingMulaw
| AudioEncodingAmr
| AudioEncodingAmrWb
| AudioEncodingOggOpus
| AudioEncodingSpeexWithHeaderByte
deriving (Eq, Ord, Enum, Read, Show, Data, Typeable, Generic)
instance Hashable GoogleCloudDialogflowV2InputAudioConfigAudioEncoding
instance FromHttpApiData GoogleCloudDialogflowV2InputAudioConfigAudioEncoding where
parseQueryParam = \case
"AUDIO_ENCODING_UNSPECIFIED" -> Right AudioEncodingUnspecified
"AUDIO_ENCODING_LINEAR_16" -> Right AudioEncodingLinear16
"AUDIO_ENCODING_FLAC" -> Right AudioEncodingFlac
"AUDIO_ENCODING_MULAW" -> Right AudioEncodingMulaw
"AUDIO_ENCODING_AMR" -> Right AudioEncodingAmr
"AUDIO_ENCODING_AMR_WB" -> Right AudioEncodingAmrWb
"AUDIO_ENCODING_OGG_OPUS" -> Right AudioEncodingOggOpus
"AUDIO_ENCODING_SPEEX_WITH_HEADER_BYTE" -> Right AudioEncodingSpeexWithHeaderByte
x -> Left ("Unable to parse GoogleCloudDialogflowV2InputAudioConfigAudioEncoding from: " <> x)
instance ToHttpApiData GoogleCloudDialogflowV2InputAudioConfigAudioEncoding where
toQueryParam = \case
AudioEncodingUnspecified -> "AUDIO_ENCODING_UNSPECIFIED"
AudioEncodingLinear16 -> "AUDIO_ENCODING_LINEAR_16"
AudioEncodingFlac -> "AUDIO_ENCODING_FLAC"
AudioEncodingMulaw -> "AUDIO_ENCODING_MULAW"
AudioEncodingAmr -> "AUDIO_ENCODING_AMR"
AudioEncodingAmrWb -> "AUDIO_ENCODING_AMR_WB"
AudioEncodingOggOpus -> "AUDIO_ENCODING_OGG_OPUS"
AudioEncodingSpeexWithHeaderByte -> "AUDIO_ENCODING_SPEEX_WITH_HEADER_BYTE"
instance FromJSON GoogleCloudDialogflowV2InputAudioConfigAudioEncoding where
parseJSON = parseJSONText "GoogleCloudDialogflowV2InputAudioConfigAudioEncoding"
instance ToJSON GoogleCloudDialogflowV2InputAudioConfigAudioEncoding where
toJSON = toJSONText