module Stratosphere.SageMaker.ModelPackage.DataSourceProperty (
        module Exports, DataSourceProperty(..), mkDataSourceProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.SageMaker.ModelPackage.S3DataSourceProperty as Exports
import Stratosphere.ResourceProperties
data DataSourceProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-modelpackage-datasource.html>
    DataSourceProperty {DataSourceProperty -> ()
haddock_workaround_ :: (),
                        -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-modelpackage-datasource.html#cfn-sagemaker-modelpackage-datasource-s3datasource>
                        DataSourceProperty -> S3DataSourceProperty
s3DataSource :: S3DataSourceProperty}
  deriving stock (DataSourceProperty -> DataSourceProperty -> Bool
(DataSourceProperty -> DataSourceProperty -> Bool)
-> (DataSourceProperty -> DataSourceProperty -> Bool)
-> Eq DataSourceProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DataSourceProperty -> DataSourceProperty -> Bool
== :: DataSourceProperty -> DataSourceProperty -> Bool
$c/= :: DataSourceProperty -> DataSourceProperty -> Bool
/= :: DataSourceProperty -> DataSourceProperty -> Bool
Prelude.Eq, Int -> DataSourceProperty -> ShowS
[DataSourceProperty] -> ShowS
DataSourceProperty -> String
(Int -> DataSourceProperty -> ShowS)
-> (DataSourceProperty -> String)
-> ([DataSourceProperty] -> ShowS)
-> Show DataSourceProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DataSourceProperty -> ShowS
showsPrec :: Int -> DataSourceProperty -> ShowS
$cshow :: DataSourceProperty -> String
show :: DataSourceProperty -> String
$cshowList :: [DataSourceProperty] -> ShowS
showList :: [DataSourceProperty] -> ShowS
Prelude.Show)
mkDataSourceProperty :: S3DataSourceProperty -> DataSourceProperty
mkDataSourceProperty :: S3DataSourceProperty -> DataSourceProperty
mkDataSourceProperty S3DataSourceProperty
s3DataSource
  = DataSourceProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), s3DataSource :: S3DataSourceProperty
s3DataSource = S3DataSourceProperty
s3DataSource}
instance ToResourceProperties DataSourceProperty where
  toResourceProperties :: DataSourceProperty -> ResourceProperties
toResourceProperties DataSourceProperty {()
S3DataSourceProperty
haddock_workaround_ :: DataSourceProperty -> ()
s3DataSource :: DataSourceProperty -> S3DataSourceProperty
haddock_workaround_ :: ()
s3DataSource :: S3DataSourceProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::SageMaker::ModelPackage.DataSource",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"S3DataSource" Key -> S3DataSourceProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= S3DataSourceProperty
s3DataSource]}
instance JSON.ToJSON DataSourceProperty where
  toJSON :: DataSourceProperty -> Value
toJSON DataSourceProperty {()
S3DataSourceProperty
haddock_workaround_ :: DataSourceProperty -> ()
s3DataSource :: DataSourceProperty -> S3DataSourceProperty
haddock_workaround_ :: ()
s3DataSource :: S3DataSourceProperty
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"S3DataSource" Key -> S3DataSourceProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= S3DataSourceProperty
s3DataSource]
instance Property "S3DataSource" DataSourceProperty where
  type PropertyType "S3DataSource" DataSourceProperty = S3DataSourceProperty
  set :: PropertyType "S3DataSource" DataSourceProperty
-> DataSourceProperty -> DataSourceProperty
set PropertyType "S3DataSource" DataSourceProperty
newValue DataSourceProperty {()
S3DataSourceProperty
haddock_workaround_ :: DataSourceProperty -> ()
s3DataSource :: DataSourceProperty -> S3DataSourceProperty
haddock_workaround_ :: ()
s3DataSource :: S3DataSourceProperty
..}
    = DataSourceProperty {s3DataSource :: S3DataSourceProperty
s3DataSource = PropertyType "S3DataSource" DataSourceProperty
S3DataSourceProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}