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