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