module Stratosphere.ManagedBlockchain.Member.NetworkFabricConfigurationProperty (
NetworkFabricConfigurationProperty(..),
mkNetworkFabricConfigurationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data NetworkFabricConfigurationProperty
=
NetworkFabricConfigurationProperty {NetworkFabricConfigurationProperty -> ()
haddock_workaround_ :: (),
NetworkFabricConfigurationProperty -> Value Text
edition :: (Value Prelude.Text)}
deriving stock (NetworkFabricConfigurationProperty
-> NetworkFabricConfigurationProperty -> Bool
(NetworkFabricConfigurationProperty
-> NetworkFabricConfigurationProperty -> Bool)
-> (NetworkFabricConfigurationProperty
-> NetworkFabricConfigurationProperty -> Bool)
-> Eq NetworkFabricConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: NetworkFabricConfigurationProperty
-> NetworkFabricConfigurationProperty -> Bool
== :: NetworkFabricConfigurationProperty
-> NetworkFabricConfigurationProperty -> Bool
$c/= :: NetworkFabricConfigurationProperty
-> NetworkFabricConfigurationProperty -> Bool
/= :: NetworkFabricConfigurationProperty
-> NetworkFabricConfigurationProperty -> Bool
Prelude.Eq, Int -> NetworkFabricConfigurationProperty -> ShowS
[NetworkFabricConfigurationProperty] -> ShowS
NetworkFabricConfigurationProperty -> String
(Int -> NetworkFabricConfigurationProperty -> ShowS)
-> (NetworkFabricConfigurationProperty -> String)
-> ([NetworkFabricConfigurationProperty] -> ShowS)
-> Show NetworkFabricConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> NetworkFabricConfigurationProperty -> ShowS
showsPrec :: Int -> NetworkFabricConfigurationProperty -> ShowS
$cshow :: NetworkFabricConfigurationProperty -> String
show :: NetworkFabricConfigurationProperty -> String
$cshowList :: [NetworkFabricConfigurationProperty] -> ShowS
showList :: [NetworkFabricConfigurationProperty] -> ShowS
Prelude.Show)
mkNetworkFabricConfigurationProperty ::
Value Prelude.Text -> NetworkFabricConfigurationProperty
mkNetworkFabricConfigurationProperty :: Value Text -> NetworkFabricConfigurationProperty
mkNetworkFabricConfigurationProperty Value Text
edition
= NetworkFabricConfigurationProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), edition :: Value Text
edition = Value Text
edition}
instance ToResourceProperties NetworkFabricConfigurationProperty where
toResourceProperties :: NetworkFabricConfigurationProperty -> ResourceProperties
toResourceProperties NetworkFabricConfigurationProperty {()
Value Text
haddock_workaround_ :: NetworkFabricConfigurationProperty -> ()
edition :: NetworkFabricConfigurationProperty -> Value Text
haddock_workaround_ :: ()
edition :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::ManagedBlockchain::Member.NetworkFabricConfiguration",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"Edition" 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
edition]}
instance JSON.ToJSON NetworkFabricConfigurationProperty where
toJSON :: NetworkFabricConfigurationProperty -> Value
toJSON NetworkFabricConfigurationProperty {()
Value Text
haddock_workaround_ :: NetworkFabricConfigurationProperty -> ()
edition :: NetworkFabricConfigurationProperty -> Value Text
haddock_workaround_ :: ()
edition :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object [Key
"Edition" 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
edition]
instance Property "Edition" NetworkFabricConfigurationProperty where
type PropertyType "Edition" NetworkFabricConfigurationProperty = Value Prelude.Text
set :: PropertyType "Edition" NetworkFabricConfigurationProperty
-> NetworkFabricConfigurationProperty
-> NetworkFabricConfigurationProperty
set PropertyType "Edition" NetworkFabricConfigurationProperty
newValue NetworkFabricConfigurationProperty {()
Value Text
haddock_workaround_ :: NetworkFabricConfigurationProperty -> ()
edition :: NetworkFabricConfigurationProperty -> Value Text
haddock_workaround_ :: ()
edition :: Value Text
..}
= NetworkFabricConfigurationProperty {edition :: Value Text
edition = PropertyType "Edition" NetworkFabricConfigurationProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}