module Stratosphere.Bedrock.DataAutomationProject.DocumentOutputFormatProperty (
module Exports, DocumentOutputFormatProperty(..),
mkDocumentOutputFormatProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Bedrock.DataAutomationProject.DocumentOutputAdditionalFileFormatProperty as Exports
import {-# SOURCE #-} Stratosphere.Bedrock.DataAutomationProject.DocumentOutputTextFormatProperty as Exports
import Stratosphere.ResourceProperties
data DocumentOutputFormatProperty
=
DocumentOutputFormatProperty {DocumentOutputFormatProperty -> ()
haddock_workaround_ :: (),
DocumentOutputFormatProperty
-> DocumentOutputAdditionalFileFormatProperty
additionalFileFormat :: DocumentOutputAdditionalFileFormatProperty,
DocumentOutputFormatProperty -> DocumentOutputTextFormatProperty
textFormat :: DocumentOutputTextFormatProperty}
deriving stock (DocumentOutputFormatProperty
-> DocumentOutputFormatProperty -> Bool
(DocumentOutputFormatProperty
-> DocumentOutputFormatProperty -> Bool)
-> (DocumentOutputFormatProperty
-> DocumentOutputFormatProperty -> Bool)
-> Eq DocumentOutputFormatProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DocumentOutputFormatProperty
-> DocumentOutputFormatProperty -> Bool
== :: DocumentOutputFormatProperty
-> DocumentOutputFormatProperty -> Bool
$c/= :: DocumentOutputFormatProperty
-> DocumentOutputFormatProperty -> Bool
/= :: DocumentOutputFormatProperty
-> DocumentOutputFormatProperty -> Bool
Prelude.Eq, Int -> DocumentOutputFormatProperty -> ShowS
[DocumentOutputFormatProperty] -> ShowS
DocumentOutputFormatProperty -> String
(Int -> DocumentOutputFormatProperty -> ShowS)
-> (DocumentOutputFormatProperty -> String)
-> ([DocumentOutputFormatProperty] -> ShowS)
-> Show DocumentOutputFormatProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DocumentOutputFormatProperty -> ShowS
showsPrec :: Int -> DocumentOutputFormatProperty -> ShowS
$cshow :: DocumentOutputFormatProperty -> String
show :: DocumentOutputFormatProperty -> String
$cshowList :: [DocumentOutputFormatProperty] -> ShowS
showList :: [DocumentOutputFormatProperty] -> ShowS
Prelude.Show)
mkDocumentOutputFormatProperty ::
DocumentOutputAdditionalFileFormatProperty
-> DocumentOutputTextFormatProperty -> DocumentOutputFormatProperty
mkDocumentOutputFormatProperty :: DocumentOutputAdditionalFileFormatProperty
-> DocumentOutputTextFormatProperty -> DocumentOutputFormatProperty
mkDocumentOutputFormatProperty DocumentOutputAdditionalFileFormatProperty
additionalFileFormat DocumentOutputTextFormatProperty
textFormat
= DocumentOutputFormatProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
additionalFileFormat :: DocumentOutputAdditionalFileFormatProperty
additionalFileFormat = DocumentOutputAdditionalFileFormatProperty
additionalFileFormat,
textFormat :: DocumentOutputTextFormatProperty
textFormat = DocumentOutputTextFormatProperty
textFormat}
instance ToResourceProperties DocumentOutputFormatProperty where
toResourceProperties :: DocumentOutputFormatProperty -> ResourceProperties
toResourceProperties DocumentOutputFormatProperty {()
DocumentOutputAdditionalFileFormatProperty
DocumentOutputTextFormatProperty
haddock_workaround_ :: DocumentOutputFormatProperty -> ()
additionalFileFormat :: DocumentOutputFormatProperty
-> DocumentOutputAdditionalFileFormatProperty
textFormat :: DocumentOutputFormatProperty -> DocumentOutputTextFormatProperty
haddock_workaround_ :: ()
additionalFileFormat :: DocumentOutputAdditionalFileFormatProperty
textFormat :: DocumentOutputTextFormatProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Bedrock::DataAutomationProject.DocumentOutputFormat",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"AdditionalFileFormat" Key -> DocumentOutputAdditionalFileFormatProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= DocumentOutputAdditionalFileFormatProperty
additionalFileFormat,
Key
"TextFormat" Key -> DocumentOutputTextFormatProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= DocumentOutputTextFormatProperty
textFormat]}
instance JSON.ToJSON DocumentOutputFormatProperty where
toJSON :: DocumentOutputFormatProperty -> Value
toJSON DocumentOutputFormatProperty {()
DocumentOutputAdditionalFileFormatProperty
DocumentOutputTextFormatProperty
haddock_workaround_ :: DocumentOutputFormatProperty -> ()
additionalFileFormat :: DocumentOutputFormatProperty
-> DocumentOutputAdditionalFileFormatProperty
textFormat :: DocumentOutputFormatProperty -> DocumentOutputTextFormatProperty
haddock_workaround_ :: ()
additionalFileFormat :: DocumentOutputAdditionalFileFormatProperty
textFormat :: DocumentOutputTextFormatProperty
..}
= [(Key, Value)] -> Value
JSON.object
[Key
"AdditionalFileFormat" Key -> DocumentOutputAdditionalFileFormatProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= DocumentOutputAdditionalFileFormatProperty
additionalFileFormat,
Key
"TextFormat" Key -> DocumentOutputTextFormatProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= DocumentOutputTextFormatProperty
textFormat]
instance Property "AdditionalFileFormat" DocumentOutputFormatProperty where
type PropertyType "AdditionalFileFormat" DocumentOutputFormatProperty = DocumentOutputAdditionalFileFormatProperty
set :: PropertyType "AdditionalFileFormat" DocumentOutputFormatProperty
-> DocumentOutputFormatProperty -> DocumentOutputFormatProperty
set PropertyType "AdditionalFileFormat" DocumentOutputFormatProperty
newValue DocumentOutputFormatProperty {()
DocumentOutputAdditionalFileFormatProperty
DocumentOutputTextFormatProperty
haddock_workaround_ :: DocumentOutputFormatProperty -> ()
additionalFileFormat :: DocumentOutputFormatProperty
-> DocumentOutputAdditionalFileFormatProperty
textFormat :: DocumentOutputFormatProperty -> DocumentOutputTextFormatProperty
haddock_workaround_ :: ()
additionalFileFormat :: DocumentOutputAdditionalFileFormatProperty
textFormat :: DocumentOutputTextFormatProperty
..}
= DocumentOutputFormatProperty
{additionalFileFormat :: DocumentOutputAdditionalFileFormatProperty
additionalFileFormat = PropertyType "AdditionalFileFormat" DocumentOutputFormatProperty
DocumentOutputAdditionalFileFormatProperty
newValue, ()
DocumentOutputTextFormatProperty
haddock_workaround_ :: ()
textFormat :: DocumentOutputTextFormatProperty
haddock_workaround_ :: ()
textFormat :: DocumentOutputTextFormatProperty
..}
instance Property "TextFormat" DocumentOutputFormatProperty where
type PropertyType "TextFormat" DocumentOutputFormatProperty = DocumentOutputTextFormatProperty
set :: PropertyType "TextFormat" DocumentOutputFormatProperty
-> DocumentOutputFormatProperty -> DocumentOutputFormatProperty
set PropertyType "TextFormat" DocumentOutputFormatProperty
newValue DocumentOutputFormatProperty {()
DocumentOutputAdditionalFileFormatProperty
DocumentOutputTextFormatProperty
haddock_workaround_ :: DocumentOutputFormatProperty -> ()
additionalFileFormat :: DocumentOutputFormatProperty
-> DocumentOutputAdditionalFileFormatProperty
textFormat :: DocumentOutputFormatProperty -> DocumentOutputTextFormatProperty
haddock_workaround_ :: ()
additionalFileFormat :: DocumentOutputAdditionalFileFormatProperty
textFormat :: DocumentOutputTextFormatProperty
..}
= DocumentOutputFormatProperty {textFormat :: DocumentOutputTextFormatProperty
textFormat = PropertyType "TextFormat" DocumentOutputFormatProperty
DocumentOutputTextFormatProperty
newValue, ()
DocumentOutputAdditionalFileFormatProperty
haddock_workaround_ :: ()
additionalFileFormat :: DocumentOutputAdditionalFileFormatProperty
haddock_workaround_ :: ()
additionalFileFormat :: DocumentOutputAdditionalFileFormatProperty
..}