module Stratosphere.RoboMaker.SimulationApplication.RenderingEngineProperty (
        RenderingEngineProperty(..), mkRenderingEngineProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data RenderingEngineProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-robomaker-simulationapplication-renderingengine.html>
    RenderingEngineProperty {RenderingEngineProperty -> ()
haddock_workaround_ :: (),
                             -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-robomaker-simulationapplication-renderingengine.html#cfn-robomaker-simulationapplication-renderingengine-name>
                             RenderingEngineProperty -> Value Text
name :: (Value Prelude.Text),
                             -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-robomaker-simulationapplication-renderingengine.html#cfn-robomaker-simulationapplication-renderingengine-version>
                             RenderingEngineProperty -> Value Text
version :: (Value Prelude.Text)}
  deriving stock (RenderingEngineProperty -> RenderingEngineProperty -> Bool
(RenderingEngineProperty -> RenderingEngineProperty -> Bool)
-> (RenderingEngineProperty -> RenderingEngineProperty -> Bool)
-> Eq RenderingEngineProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: RenderingEngineProperty -> RenderingEngineProperty -> Bool
== :: RenderingEngineProperty -> RenderingEngineProperty -> Bool
$c/= :: RenderingEngineProperty -> RenderingEngineProperty -> Bool
/= :: RenderingEngineProperty -> RenderingEngineProperty -> Bool
Prelude.Eq, Int -> RenderingEngineProperty -> ShowS
[RenderingEngineProperty] -> ShowS
RenderingEngineProperty -> String
(Int -> RenderingEngineProperty -> ShowS)
-> (RenderingEngineProperty -> String)
-> ([RenderingEngineProperty] -> ShowS)
-> Show RenderingEngineProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> RenderingEngineProperty -> ShowS
showsPrec :: Int -> RenderingEngineProperty -> ShowS
$cshow :: RenderingEngineProperty -> String
show :: RenderingEngineProperty -> String
$cshowList :: [RenderingEngineProperty] -> ShowS
showList :: [RenderingEngineProperty] -> ShowS
Prelude.Show)
mkRenderingEngineProperty ::
  Value Prelude.Text -> Value Prelude.Text -> RenderingEngineProperty
mkRenderingEngineProperty :: Value Text -> Value Text -> RenderingEngineProperty
mkRenderingEngineProperty Value Text
name Value Text
version
  = RenderingEngineProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), name :: Value Text
name = Value Text
name, version :: Value Text
version = Value Text
version}
instance ToResourceProperties RenderingEngineProperty where
  toResourceProperties :: RenderingEngineProperty -> ResourceProperties
toResourceProperties RenderingEngineProperty {()
Value Text
haddock_workaround_ :: RenderingEngineProperty -> ()
name :: RenderingEngineProperty -> Value Text
version :: RenderingEngineProperty -> Value Text
haddock_workaround_ :: ()
name :: Value Text
version :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::RoboMaker::SimulationApplication.RenderingEngine",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"Name" 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
name, Key
"Version" 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
version]}
instance JSON.ToJSON RenderingEngineProperty where
  toJSON :: RenderingEngineProperty -> Value
toJSON RenderingEngineProperty {()
Value Text
haddock_workaround_ :: RenderingEngineProperty -> ()
name :: RenderingEngineProperty -> Value Text
version :: RenderingEngineProperty -> Value Text
haddock_workaround_ :: ()
name :: Value Text
version :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"Name" 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
name, Key
"Version" 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
version]
instance Property "Name" RenderingEngineProperty where
  type PropertyType "Name" RenderingEngineProperty = Value Prelude.Text
  set :: PropertyType "Name" RenderingEngineProperty
-> RenderingEngineProperty -> RenderingEngineProperty
set PropertyType "Name" RenderingEngineProperty
newValue RenderingEngineProperty {()
Value Text
haddock_workaround_ :: RenderingEngineProperty -> ()
name :: RenderingEngineProperty -> Value Text
version :: RenderingEngineProperty -> Value Text
haddock_workaround_ :: ()
name :: Value Text
version :: Value Text
..}
    = RenderingEngineProperty {name :: Value Text
name = PropertyType "Name" RenderingEngineProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
version :: Value Text
haddock_workaround_ :: ()
version :: Value Text
..}
instance Property "Version" RenderingEngineProperty where
  type PropertyType "Version" RenderingEngineProperty = Value Prelude.Text
  set :: PropertyType "Version" RenderingEngineProperty
-> RenderingEngineProperty -> RenderingEngineProperty
set PropertyType "Version" RenderingEngineProperty
newValue RenderingEngineProperty {()
Value Text
haddock_workaround_ :: RenderingEngineProperty -> ()
name :: RenderingEngineProperty -> Value Text
version :: RenderingEngineProperty -> Value Text
haddock_workaround_ :: ()
name :: Value Text
version :: Value Text
..}
    = RenderingEngineProperty {version :: Value Text
version = PropertyType "Version" RenderingEngineProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
name :: Value Text
haddock_workaround_ :: ()
name :: Value Text
..}