module Stratosphere.Bedrock.DataAutomationProject.SpeakerLabelingConfigurationProperty (
        SpeakerLabelingConfigurationProperty(..),
        mkSpeakerLabelingConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data SpeakerLabelingConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-dataautomationproject-speakerlabelingconfiguration.html>
    SpeakerLabelingConfigurationProperty {SpeakerLabelingConfigurationProperty -> ()
haddock_workaround_ :: (),
                                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-dataautomationproject-speakerlabelingconfiguration.html#cfn-bedrock-dataautomationproject-speakerlabelingconfiguration-state>
                                          SpeakerLabelingConfigurationProperty -> Value Text
state :: (Value Prelude.Text)}
  deriving stock (SpeakerLabelingConfigurationProperty
-> SpeakerLabelingConfigurationProperty -> Bool
(SpeakerLabelingConfigurationProperty
 -> SpeakerLabelingConfigurationProperty -> Bool)
-> (SpeakerLabelingConfigurationProperty
    -> SpeakerLabelingConfigurationProperty -> Bool)
-> Eq SpeakerLabelingConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SpeakerLabelingConfigurationProperty
-> SpeakerLabelingConfigurationProperty -> Bool
== :: SpeakerLabelingConfigurationProperty
-> SpeakerLabelingConfigurationProperty -> Bool
$c/= :: SpeakerLabelingConfigurationProperty
-> SpeakerLabelingConfigurationProperty -> Bool
/= :: SpeakerLabelingConfigurationProperty
-> SpeakerLabelingConfigurationProperty -> Bool
Prelude.Eq, Int -> SpeakerLabelingConfigurationProperty -> ShowS
[SpeakerLabelingConfigurationProperty] -> ShowS
SpeakerLabelingConfigurationProperty -> String
(Int -> SpeakerLabelingConfigurationProperty -> ShowS)
-> (SpeakerLabelingConfigurationProperty -> String)
-> ([SpeakerLabelingConfigurationProperty] -> ShowS)
-> Show SpeakerLabelingConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SpeakerLabelingConfigurationProperty -> ShowS
showsPrec :: Int -> SpeakerLabelingConfigurationProperty -> ShowS
$cshow :: SpeakerLabelingConfigurationProperty -> String
show :: SpeakerLabelingConfigurationProperty -> String
$cshowList :: [SpeakerLabelingConfigurationProperty] -> ShowS
showList :: [SpeakerLabelingConfigurationProperty] -> ShowS
Prelude.Show)
mkSpeakerLabelingConfigurationProperty ::
  Value Prelude.Text -> SpeakerLabelingConfigurationProperty
mkSpeakerLabelingConfigurationProperty :: Value Text -> SpeakerLabelingConfigurationProperty
mkSpeakerLabelingConfigurationProperty Value Text
state
  = SpeakerLabelingConfigurationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), state :: Value Text
state = Value Text
state}
instance ToResourceProperties SpeakerLabelingConfigurationProperty where
  toResourceProperties :: SpeakerLabelingConfigurationProperty -> ResourceProperties
toResourceProperties SpeakerLabelingConfigurationProperty {()
Value Text
haddock_workaround_ :: SpeakerLabelingConfigurationProperty -> ()
state :: SpeakerLabelingConfigurationProperty -> Value Text
haddock_workaround_ :: ()
state :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Bedrock::DataAutomationProject.SpeakerLabelingConfiguration",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False, properties :: Object
properties = [Key
"State" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
state]}
instance JSON.ToJSON SpeakerLabelingConfigurationProperty where
  toJSON :: SpeakerLabelingConfigurationProperty -> Value
toJSON SpeakerLabelingConfigurationProperty {()
Value Text
haddock_workaround_ :: SpeakerLabelingConfigurationProperty -> ()
state :: SpeakerLabelingConfigurationProperty -> Value Text
haddock_workaround_ :: ()
state :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"State" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
state]
instance Property "State" SpeakerLabelingConfigurationProperty where
  type PropertyType "State" SpeakerLabelingConfigurationProperty = Value Prelude.Text
  set :: PropertyType "State" SpeakerLabelingConfigurationProperty
-> SpeakerLabelingConfigurationProperty
-> SpeakerLabelingConfigurationProperty
set PropertyType "State" SpeakerLabelingConfigurationProperty
newValue SpeakerLabelingConfigurationProperty {()
Value Text
haddock_workaround_ :: SpeakerLabelingConfigurationProperty -> ()
state :: SpeakerLabelingConfigurationProperty -> Value Text
haddock_workaround_ :: ()
state :: Value Text
..}
    = SpeakerLabelingConfigurationProperty {state :: Value Text
state = PropertyType "State" SpeakerLabelingConfigurationProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}