module Stratosphere.AppMesh.VirtualService.VirtualRouterServiceProviderProperty (
        VirtualRouterServiceProviderProperty(..),
        mkVirtualRouterServiceProviderProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data VirtualRouterServiceProviderProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualrouterserviceprovider.html>
    VirtualRouterServiceProviderProperty {VirtualRouterServiceProviderProperty -> ()
haddock_workaround_ :: (),
                                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualrouterserviceprovider.html#cfn-appmesh-virtualservice-virtualrouterserviceprovider-virtualroutername>
                                          VirtualRouterServiceProviderProperty -> Value Text
virtualRouterName :: (Value Prelude.Text)}
  deriving stock (VirtualRouterServiceProviderProperty
-> VirtualRouterServiceProviderProperty -> Bool
(VirtualRouterServiceProviderProperty
 -> VirtualRouterServiceProviderProperty -> Bool)
-> (VirtualRouterServiceProviderProperty
    -> VirtualRouterServiceProviderProperty -> Bool)
-> Eq VirtualRouterServiceProviderProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: VirtualRouterServiceProviderProperty
-> VirtualRouterServiceProviderProperty -> Bool
== :: VirtualRouterServiceProviderProperty
-> VirtualRouterServiceProviderProperty -> Bool
$c/= :: VirtualRouterServiceProviderProperty
-> VirtualRouterServiceProviderProperty -> Bool
/= :: VirtualRouterServiceProviderProperty
-> VirtualRouterServiceProviderProperty -> Bool
Prelude.Eq, Int -> VirtualRouterServiceProviderProperty -> ShowS
[VirtualRouterServiceProviderProperty] -> ShowS
VirtualRouterServiceProviderProperty -> String
(Int -> VirtualRouterServiceProviderProperty -> ShowS)
-> (VirtualRouterServiceProviderProperty -> String)
-> ([VirtualRouterServiceProviderProperty] -> ShowS)
-> Show VirtualRouterServiceProviderProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> VirtualRouterServiceProviderProperty -> ShowS
showsPrec :: Int -> VirtualRouterServiceProviderProperty -> ShowS
$cshow :: VirtualRouterServiceProviderProperty -> String
show :: VirtualRouterServiceProviderProperty -> String
$cshowList :: [VirtualRouterServiceProviderProperty] -> ShowS
showList :: [VirtualRouterServiceProviderProperty] -> ShowS
Prelude.Show)
mkVirtualRouterServiceProviderProperty ::
  Value Prelude.Text -> VirtualRouterServiceProviderProperty
mkVirtualRouterServiceProviderProperty :: Value Text -> VirtualRouterServiceProviderProperty
mkVirtualRouterServiceProviderProperty Value Text
virtualRouterName
  = VirtualRouterServiceProviderProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), virtualRouterName :: Value Text
virtualRouterName = Value Text
virtualRouterName}
instance ToResourceProperties VirtualRouterServiceProviderProperty where
  toResourceProperties :: VirtualRouterServiceProviderProperty -> ResourceProperties
toResourceProperties VirtualRouterServiceProviderProperty {()
Value Text
haddock_workaround_ :: VirtualRouterServiceProviderProperty -> ()
virtualRouterName :: VirtualRouterServiceProviderProperty -> Value Text
haddock_workaround_ :: ()
virtualRouterName :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::AppMesh::VirtualService.VirtualRouterServiceProvider",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"VirtualRouterName" 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
virtualRouterName]}
instance JSON.ToJSON VirtualRouterServiceProviderProperty where
  toJSON :: VirtualRouterServiceProviderProperty -> Value
toJSON VirtualRouterServiceProviderProperty {()
Value Text
haddock_workaround_ :: VirtualRouterServiceProviderProperty -> ()
virtualRouterName :: VirtualRouterServiceProviderProperty -> Value Text
haddock_workaround_ :: ()
virtualRouterName :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"VirtualRouterName" 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
virtualRouterName]
instance Property "VirtualRouterName" VirtualRouterServiceProviderProperty where
  type PropertyType "VirtualRouterName" VirtualRouterServiceProviderProperty = Value Prelude.Text
  set :: PropertyType
  "VirtualRouterName" VirtualRouterServiceProviderProperty
-> VirtualRouterServiceProviderProperty
-> VirtualRouterServiceProviderProperty
set PropertyType
  "VirtualRouterName" VirtualRouterServiceProviderProperty
newValue VirtualRouterServiceProviderProperty {()
Value Text
haddock_workaround_ :: VirtualRouterServiceProviderProperty -> ()
virtualRouterName :: VirtualRouterServiceProviderProperty -> Value Text
haddock_workaround_ :: ()
virtualRouterName :: Value Text
..}
    = VirtualRouterServiceProviderProperty
        {virtualRouterName :: Value Text
virtualRouterName = PropertyType
  "VirtualRouterName" VirtualRouterServiceProviderProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}