module Stratosphere.Bedrock.DataAutomationProject.StandardOutputConfigurationProperty (
        module Exports, StandardOutputConfigurationProperty(..),
        mkStandardOutputConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Bedrock.DataAutomationProject.AudioStandardOutputConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Bedrock.DataAutomationProject.DocumentStandardOutputConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Bedrock.DataAutomationProject.ImageStandardOutputConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.Bedrock.DataAutomationProject.VideoStandardOutputConfigurationProperty as Exports
import Stratosphere.ResourceProperties
data StandardOutputConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-dataautomationproject-standardoutputconfiguration.html>
    StandardOutputConfigurationProperty {StandardOutputConfigurationProperty -> ()
haddock_workaround_ :: (),
                                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-dataautomationproject-standardoutputconfiguration.html#cfn-bedrock-dataautomationproject-standardoutputconfiguration-audio>
                                         StandardOutputConfigurationProperty
-> Maybe AudioStandardOutputConfigurationProperty
audio :: (Prelude.Maybe AudioStandardOutputConfigurationProperty),
                                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-dataautomationproject-standardoutputconfiguration.html#cfn-bedrock-dataautomationproject-standardoutputconfiguration-document>
                                         StandardOutputConfigurationProperty
-> Maybe DocumentStandardOutputConfigurationProperty
document :: (Prelude.Maybe DocumentStandardOutputConfigurationProperty),
                                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-dataautomationproject-standardoutputconfiguration.html#cfn-bedrock-dataautomationproject-standardoutputconfiguration-image>
                                         StandardOutputConfigurationProperty
-> Maybe ImageStandardOutputConfigurationProperty
image :: (Prelude.Maybe ImageStandardOutputConfigurationProperty),
                                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-bedrock-dataautomationproject-standardoutputconfiguration.html#cfn-bedrock-dataautomationproject-standardoutputconfiguration-video>
                                         StandardOutputConfigurationProperty
-> Maybe VideoStandardOutputConfigurationProperty
video :: (Prelude.Maybe VideoStandardOutputConfigurationProperty)}
  deriving stock (StandardOutputConfigurationProperty
-> StandardOutputConfigurationProperty -> Bool
(StandardOutputConfigurationProperty
 -> StandardOutputConfigurationProperty -> Bool)
-> (StandardOutputConfigurationProperty
    -> StandardOutputConfigurationProperty -> Bool)
-> Eq StandardOutputConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: StandardOutputConfigurationProperty
-> StandardOutputConfigurationProperty -> Bool
== :: StandardOutputConfigurationProperty
-> StandardOutputConfigurationProperty -> Bool
$c/= :: StandardOutputConfigurationProperty
-> StandardOutputConfigurationProperty -> Bool
/= :: StandardOutputConfigurationProperty
-> StandardOutputConfigurationProperty -> Bool
Prelude.Eq, Int -> StandardOutputConfigurationProperty -> ShowS
[StandardOutputConfigurationProperty] -> ShowS
StandardOutputConfigurationProperty -> String
(Int -> StandardOutputConfigurationProperty -> ShowS)
-> (StandardOutputConfigurationProperty -> String)
-> ([StandardOutputConfigurationProperty] -> ShowS)
-> Show StandardOutputConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> StandardOutputConfigurationProperty -> ShowS
showsPrec :: Int -> StandardOutputConfigurationProperty -> ShowS
$cshow :: StandardOutputConfigurationProperty -> String
show :: StandardOutputConfigurationProperty -> String
$cshowList :: [StandardOutputConfigurationProperty] -> ShowS
showList :: [StandardOutputConfigurationProperty] -> ShowS
Prelude.Show)
mkStandardOutputConfigurationProperty ::
  StandardOutputConfigurationProperty
mkStandardOutputConfigurationProperty :: StandardOutputConfigurationProperty
mkStandardOutputConfigurationProperty
  = StandardOutputConfigurationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), audio :: Maybe AudioStandardOutputConfigurationProperty
audio = Maybe AudioStandardOutputConfigurationProperty
forall a. Maybe a
Prelude.Nothing,
       document :: Maybe DocumentStandardOutputConfigurationProperty
document = Maybe DocumentStandardOutputConfigurationProperty
forall a. Maybe a
Prelude.Nothing, image :: Maybe ImageStandardOutputConfigurationProperty
image = Maybe ImageStandardOutputConfigurationProperty
forall a. Maybe a
Prelude.Nothing,
       video :: Maybe VideoStandardOutputConfigurationProperty
video = Maybe VideoStandardOutputConfigurationProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties StandardOutputConfigurationProperty where
  toResourceProperties :: StandardOutputConfigurationProperty -> ResourceProperties
toResourceProperties StandardOutputConfigurationProperty {Maybe DocumentStandardOutputConfigurationProperty
Maybe ImageStandardOutputConfigurationProperty
Maybe AudioStandardOutputConfigurationProperty
Maybe VideoStandardOutputConfigurationProperty
()
haddock_workaround_ :: StandardOutputConfigurationProperty -> ()
audio :: StandardOutputConfigurationProperty
-> Maybe AudioStandardOutputConfigurationProperty
document :: StandardOutputConfigurationProperty
-> Maybe DocumentStandardOutputConfigurationProperty
image :: StandardOutputConfigurationProperty
-> Maybe ImageStandardOutputConfigurationProperty
video :: StandardOutputConfigurationProperty
-> Maybe VideoStandardOutputConfigurationProperty
haddock_workaround_ :: ()
audio :: Maybe AudioStandardOutputConfigurationProperty
document :: Maybe DocumentStandardOutputConfigurationProperty
image :: Maybe ImageStandardOutputConfigurationProperty
video :: Maybe VideoStandardOutputConfigurationProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Bedrock::DataAutomationProject.StandardOutputConfiguration",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [Key -> AudioStandardOutputConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Audio" (AudioStandardOutputConfigurationProperty -> (Key, Value))
-> Maybe AudioStandardOutputConfigurationProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AudioStandardOutputConfigurationProperty
audio,
                            Key -> DocumentStandardOutputConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Document" (DocumentStandardOutputConfigurationProperty -> (Key, Value))
-> Maybe DocumentStandardOutputConfigurationProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DocumentStandardOutputConfigurationProperty
document,
                            Key -> ImageStandardOutputConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Image" (ImageStandardOutputConfigurationProperty -> (Key, Value))
-> Maybe ImageStandardOutputConfigurationProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ImageStandardOutputConfigurationProperty
image,
                            Key -> VideoStandardOutputConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Video" (VideoStandardOutputConfigurationProperty -> (Key, Value))
-> Maybe VideoStandardOutputConfigurationProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe VideoStandardOutputConfigurationProperty
video])}
instance JSON.ToJSON StandardOutputConfigurationProperty where
  toJSON :: StandardOutputConfigurationProperty -> Value
toJSON StandardOutputConfigurationProperty {Maybe DocumentStandardOutputConfigurationProperty
Maybe ImageStandardOutputConfigurationProperty
Maybe AudioStandardOutputConfigurationProperty
Maybe VideoStandardOutputConfigurationProperty
()
haddock_workaround_ :: StandardOutputConfigurationProperty -> ()
audio :: StandardOutputConfigurationProperty
-> Maybe AudioStandardOutputConfigurationProperty
document :: StandardOutputConfigurationProperty
-> Maybe DocumentStandardOutputConfigurationProperty
image :: StandardOutputConfigurationProperty
-> Maybe ImageStandardOutputConfigurationProperty
video :: StandardOutputConfigurationProperty
-> Maybe VideoStandardOutputConfigurationProperty
haddock_workaround_ :: ()
audio :: Maybe AudioStandardOutputConfigurationProperty
document :: Maybe DocumentStandardOutputConfigurationProperty
image :: Maybe ImageStandardOutputConfigurationProperty
video :: Maybe VideoStandardOutputConfigurationProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [Key -> AudioStandardOutputConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Audio" (AudioStandardOutputConfigurationProperty -> (Key, Value))
-> Maybe AudioStandardOutputConfigurationProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AudioStandardOutputConfigurationProperty
audio,
               Key -> DocumentStandardOutputConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Document" (DocumentStandardOutputConfigurationProperty -> (Key, Value))
-> Maybe DocumentStandardOutputConfigurationProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DocumentStandardOutputConfigurationProperty
document,
               Key -> ImageStandardOutputConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Image" (ImageStandardOutputConfigurationProperty -> (Key, Value))
-> Maybe ImageStandardOutputConfigurationProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ImageStandardOutputConfigurationProperty
image,
               Key -> VideoStandardOutputConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Video" (VideoStandardOutputConfigurationProperty -> (Key, Value))
-> Maybe VideoStandardOutputConfigurationProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe VideoStandardOutputConfigurationProperty
video]))
instance Property "Audio" StandardOutputConfigurationProperty where
  type PropertyType "Audio" StandardOutputConfigurationProperty = AudioStandardOutputConfigurationProperty
  set :: PropertyType "Audio" StandardOutputConfigurationProperty
-> StandardOutputConfigurationProperty
-> StandardOutputConfigurationProperty
set PropertyType "Audio" StandardOutputConfigurationProperty
newValue StandardOutputConfigurationProperty {Maybe DocumentStandardOutputConfigurationProperty
Maybe ImageStandardOutputConfigurationProperty
Maybe AudioStandardOutputConfigurationProperty
Maybe VideoStandardOutputConfigurationProperty
()
haddock_workaround_ :: StandardOutputConfigurationProperty -> ()
audio :: StandardOutputConfigurationProperty
-> Maybe AudioStandardOutputConfigurationProperty
document :: StandardOutputConfigurationProperty
-> Maybe DocumentStandardOutputConfigurationProperty
image :: StandardOutputConfigurationProperty
-> Maybe ImageStandardOutputConfigurationProperty
video :: StandardOutputConfigurationProperty
-> Maybe VideoStandardOutputConfigurationProperty
haddock_workaround_ :: ()
audio :: Maybe AudioStandardOutputConfigurationProperty
document :: Maybe DocumentStandardOutputConfigurationProperty
image :: Maybe ImageStandardOutputConfigurationProperty
video :: Maybe VideoStandardOutputConfigurationProperty
..}
    = StandardOutputConfigurationProperty
        {audio :: Maybe AudioStandardOutputConfigurationProperty
audio = AudioStandardOutputConfigurationProperty
-> Maybe AudioStandardOutputConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Audio" StandardOutputConfigurationProperty
AudioStandardOutputConfigurationProperty
newValue, Maybe DocumentStandardOutputConfigurationProperty
Maybe ImageStandardOutputConfigurationProperty
Maybe VideoStandardOutputConfigurationProperty
()
haddock_workaround_ :: ()
document :: Maybe DocumentStandardOutputConfigurationProperty
image :: Maybe ImageStandardOutputConfigurationProperty
video :: Maybe VideoStandardOutputConfigurationProperty
haddock_workaround_ :: ()
document :: Maybe DocumentStandardOutputConfigurationProperty
image :: Maybe ImageStandardOutputConfigurationProperty
video :: Maybe VideoStandardOutputConfigurationProperty
..}
instance Property "Document" StandardOutputConfigurationProperty where
  type PropertyType "Document" StandardOutputConfigurationProperty = DocumentStandardOutputConfigurationProperty
  set :: PropertyType "Document" StandardOutputConfigurationProperty
-> StandardOutputConfigurationProperty
-> StandardOutputConfigurationProperty
set PropertyType "Document" StandardOutputConfigurationProperty
newValue StandardOutputConfigurationProperty {Maybe DocumentStandardOutputConfigurationProperty
Maybe ImageStandardOutputConfigurationProperty
Maybe AudioStandardOutputConfigurationProperty
Maybe VideoStandardOutputConfigurationProperty
()
haddock_workaround_ :: StandardOutputConfigurationProperty -> ()
audio :: StandardOutputConfigurationProperty
-> Maybe AudioStandardOutputConfigurationProperty
document :: StandardOutputConfigurationProperty
-> Maybe DocumentStandardOutputConfigurationProperty
image :: StandardOutputConfigurationProperty
-> Maybe ImageStandardOutputConfigurationProperty
video :: StandardOutputConfigurationProperty
-> Maybe VideoStandardOutputConfigurationProperty
haddock_workaround_ :: ()
audio :: Maybe AudioStandardOutputConfigurationProperty
document :: Maybe DocumentStandardOutputConfigurationProperty
image :: Maybe ImageStandardOutputConfigurationProperty
video :: Maybe VideoStandardOutputConfigurationProperty
..}
    = StandardOutputConfigurationProperty
        {document :: Maybe DocumentStandardOutputConfigurationProperty
document = DocumentStandardOutputConfigurationProperty
-> Maybe DocumentStandardOutputConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Document" StandardOutputConfigurationProperty
DocumentStandardOutputConfigurationProperty
newValue, Maybe ImageStandardOutputConfigurationProperty
Maybe AudioStandardOutputConfigurationProperty
Maybe VideoStandardOutputConfigurationProperty
()
haddock_workaround_ :: ()
audio :: Maybe AudioStandardOutputConfigurationProperty
image :: Maybe ImageStandardOutputConfigurationProperty
video :: Maybe VideoStandardOutputConfigurationProperty
haddock_workaround_ :: ()
audio :: Maybe AudioStandardOutputConfigurationProperty
image :: Maybe ImageStandardOutputConfigurationProperty
video :: Maybe VideoStandardOutputConfigurationProperty
..}
instance Property "Image" StandardOutputConfigurationProperty where
  type PropertyType "Image" StandardOutputConfigurationProperty = ImageStandardOutputConfigurationProperty
  set :: PropertyType "Image" StandardOutputConfigurationProperty
-> StandardOutputConfigurationProperty
-> StandardOutputConfigurationProperty
set PropertyType "Image" StandardOutputConfigurationProperty
newValue StandardOutputConfigurationProperty {Maybe DocumentStandardOutputConfigurationProperty
Maybe ImageStandardOutputConfigurationProperty
Maybe AudioStandardOutputConfigurationProperty
Maybe VideoStandardOutputConfigurationProperty
()
haddock_workaround_ :: StandardOutputConfigurationProperty -> ()
audio :: StandardOutputConfigurationProperty
-> Maybe AudioStandardOutputConfigurationProperty
document :: StandardOutputConfigurationProperty
-> Maybe DocumentStandardOutputConfigurationProperty
image :: StandardOutputConfigurationProperty
-> Maybe ImageStandardOutputConfigurationProperty
video :: StandardOutputConfigurationProperty
-> Maybe VideoStandardOutputConfigurationProperty
haddock_workaround_ :: ()
audio :: Maybe AudioStandardOutputConfigurationProperty
document :: Maybe DocumentStandardOutputConfigurationProperty
image :: Maybe ImageStandardOutputConfigurationProperty
video :: Maybe VideoStandardOutputConfigurationProperty
..}
    = StandardOutputConfigurationProperty
        {image :: Maybe ImageStandardOutputConfigurationProperty
image = ImageStandardOutputConfigurationProperty
-> Maybe ImageStandardOutputConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Image" StandardOutputConfigurationProperty
ImageStandardOutputConfigurationProperty
newValue, Maybe DocumentStandardOutputConfigurationProperty
Maybe AudioStandardOutputConfigurationProperty
Maybe VideoStandardOutputConfigurationProperty
()
haddock_workaround_ :: ()
audio :: Maybe AudioStandardOutputConfigurationProperty
document :: Maybe DocumentStandardOutputConfigurationProperty
video :: Maybe VideoStandardOutputConfigurationProperty
haddock_workaround_ :: ()
audio :: Maybe AudioStandardOutputConfigurationProperty
document :: Maybe DocumentStandardOutputConfigurationProperty
video :: Maybe VideoStandardOutputConfigurationProperty
..}
instance Property "Video" StandardOutputConfigurationProperty where
  type PropertyType "Video" StandardOutputConfigurationProperty = VideoStandardOutputConfigurationProperty
  set :: PropertyType "Video" StandardOutputConfigurationProperty
-> StandardOutputConfigurationProperty
-> StandardOutputConfigurationProperty
set PropertyType "Video" StandardOutputConfigurationProperty
newValue StandardOutputConfigurationProperty {Maybe DocumentStandardOutputConfigurationProperty
Maybe ImageStandardOutputConfigurationProperty
Maybe AudioStandardOutputConfigurationProperty
Maybe VideoStandardOutputConfigurationProperty
()
haddock_workaround_ :: StandardOutputConfigurationProperty -> ()
audio :: StandardOutputConfigurationProperty
-> Maybe AudioStandardOutputConfigurationProperty
document :: StandardOutputConfigurationProperty
-> Maybe DocumentStandardOutputConfigurationProperty
image :: StandardOutputConfigurationProperty
-> Maybe ImageStandardOutputConfigurationProperty
video :: StandardOutputConfigurationProperty
-> Maybe VideoStandardOutputConfigurationProperty
haddock_workaround_ :: ()
audio :: Maybe AudioStandardOutputConfigurationProperty
document :: Maybe DocumentStandardOutputConfigurationProperty
image :: Maybe ImageStandardOutputConfigurationProperty
video :: Maybe VideoStandardOutputConfigurationProperty
..}
    = StandardOutputConfigurationProperty
        {video :: Maybe VideoStandardOutputConfigurationProperty
video = VideoStandardOutputConfigurationProperty
-> Maybe VideoStandardOutputConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Video" StandardOutputConfigurationProperty
VideoStandardOutputConfigurationProperty
newValue, Maybe DocumentStandardOutputConfigurationProperty
Maybe ImageStandardOutputConfigurationProperty
Maybe AudioStandardOutputConfigurationProperty
()
haddock_workaround_ :: ()
audio :: Maybe AudioStandardOutputConfigurationProperty
document :: Maybe DocumentStandardOutputConfigurationProperty
image :: Maybe ImageStandardOutputConfigurationProperty
haddock_workaround_ :: ()
audio :: Maybe AudioStandardOutputConfigurationProperty
document :: Maybe DocumentStandardOutputConfigurationProperty
image :: Maybe ImageStandardOutputConfigurationProperty
..}