module Stratosphere.Batch.JobQueue.ServiceEnvironmentOrderProperty (
        ServiceEnvironmentOrderProperty(..),
        mkServiceEnvironmentOrderProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data ServiceEnvironmentOrderProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobqueue-serviceenvironmentorder.html>
    ServiceEnvironmentOrderProperty {ServiceEnvironmentOrderProperty -> ()
haddock_workaround_ :: (),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobqueue-serviceenvironmentorder.html#cfn-batch-jobqueue-serviceenvironmentorder-order>
                                     ServiceEnvironmentOrderProperty -> Value Integer
order :: (Value Prelude.Integer),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-batch-jobqueue-serviceenvironmentorder.html#cfn-batch-jobqueue-serviceenvironmentorder-serviceenvironment>
                                     ServiceEnvironmentOrderProperty -> Value Text
serviceEnvironment :: (Value Prelude.Text)}
  deriving stock (ServiceEnvironmentOrderProperty
-> ServiceEnvironmentOrderProperty -> Bool
(ServiceEnvironmentOrderProperty
 -> ServiceEnvironmentOrderProperty -> Bool)
-> (ServiceEnvironmentOrderProperty
    -> ServiceEnvironmentOrderProperty -> Bool)
-> Eq ServiceEnvironmentOrderProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ServiceEnvironmentOrderProperty
-> ServiceEnvironmentOrderProperty -> Bool
== :: ServiceEnvironmentOrderProperty
-> ServiceEnvironmentOrderProperty -> Bool
$c/= :: ServiceEnvironmentOrderProperty
-> ServiceEnvironmentOrderProperty -> Bool
/= :: ServiceEnvironmentOrderProperty
-> ServiceEnvironmentOrderProperty -> Bool
Prelude.Eq, Int -> ServiceEnvironmentOrderProperty -> ShowS
[ServiceEnvironmentOrderProperty] -> ShowS
ServiceEnvironmentOrderProperty -> String
(Int -> ServiceEnvironmentOrderProperty -> ShowS)
-> (ServiceEnvironmentOrderProperty -> String)
-> ([ServiceEnvironmentOrderProperty] -> ShowS)
-> Show ServiceEnvironmentOrderProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ServiceEnvironmentOrderProperty -> ShowS
showsPrec :: Int -> ServiceEnvironmentOrderProperty -> ShowS
$cshow :: ServiceEnvironmentOrderProperty -> String
show :: ServiceEnvironmentOrderProperty -> String
$cshowList :: [ServiceEnvironmentOrderProperty] -> ShowS
showList :: [ServiceEnvironmentOrderProperty] -> ShowS
Prelude.Show)
mkServiceEnvironmentOrderProperty ::
  Value Prelude.Integer
  -> Value Prelude.Text -> ServiceEnvironmentOrderProperty
mkServiceEnvironmentOrderProperty :: Value Integer -> Value Text -> ServiceEnvironmentOrderProperty
mkServiceEnvironmentOrderProperty Value Integer
order Value Text
serviceEnvironment
  = ServiceEnvironmentOrderProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), order :: Value Integer
order = Value Integer
order,
       serviceEnvironment :: Value Text
serviceEnvironment = Value Text
serviceEnvironment}
instance ToResourceProperties ServiceEnvironmentOrderProperty where
  toResourceProperties :: ServiceEnvironmentOrderProperty -> ResourceProperties
toResourceProperties ServiceEnvironmentOrderProperty {()
Value Integer
Value Text
haddock_workaround_ :: ServiceEnvironmentOrderProperty -> ()
order :: ServiceEnvironmentOrderProperty -> Value Integer
serviceEnvironment :: ServiceEnvironmentOrderProperty -> Value Text
haddock_workaround_ :: ()
order :: Value Integer
serviceEnvironment :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Batch::JobQueue.ServiceEnvironmentOrder",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"Order" Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Integer
order,
                       Key
"ServiceEnvironment" 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
serviceEnvironment]}
instance JSON.ToJSON ServiceEnvironmentOrderProperty where
  toJSON :: ServiceEnvironmentOrderProperty -> Value
toJSON ServiceEnvironmentOrderProperty {()
Value Integer
Value Text
haddock_workaround_ :: ServiceEnvironmentOrderProperty -> ()
order :: ServiceEnvironmentOrderProperty -> Value Integer
serviceEnvironment :: ServiceEnvironmentOrderProperty -> Value Text
haddock_workaround_ :: ()
order :: Value Integer
serviceEnvironment :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"Order" Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Integer
order,
         Key
"ServiceEnvironment" 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
serviceEnvironment]
instance Property "Order" ServiceEnvironmentOrderProperty where
  type PropertyType "Order" ServiceEnvironmentOrderProperty = Value Prelude.Integer
  set :: PropertyType "Order" ServiceEnvironmentOrderProperty
-> ServiceEnvironmentOrderProperty
-> ServiceEnvironmentOrderProperty
set PropertyType "Order" ServiceEnvironmentOrderProperty
newValue ServiceEnvironmentOrderProperty {()
Value Integer
Value Text
haddock_workaround_ :: ServiceEnvironmentOrderProperty -> ()
order :: ServiceEnvironmentOrderProperty -> Value Integer
serviceEnvironment :: ServiceEnvironmentOrderProperty -> Value Text
haddock_workaround_ :: ()
order :: Value Integer
serviceEnvironment :: Value Text
..}
    = ServiceEnvironmentOrderProperty {order :: Value Integer
order = PropertyType "Order" ServiceEnvironmentOrderProperty
Value Integer
newValue, ()
Value Text
haddock_workaround_ :: ()
serviceEnvironment :: Value Text
haddock_workaround_ :: ()
serviceEnvironment :: Value Text
..}
instance Property "ServiceEnvironment" ServiceEnvironmentOrderProperty where
  type PropertyType "ServiceEnvironment" ServiceEnvironmentOrderProperty = Value Prelude.Text
  set :: PropertyType "ServiceEnvironment" ServiceEnvironmentOrderProperty
-> ServiceEnvironmentOrderProperty
-> ServiceEnvironmentOrderProperty
set PropertyType "ServiceEnvironment" ServiceEnvironmentOrderProperty
newValue ServiceEnvironmentOrderProperty {()
Value Integer
Value Text
haddock_workaround_ :: ServiceEnvironmentOrderProperty -> ()
order :: ServiceEnvironmentOrderProperty -> Value Integer
serviceEnvironment :: ServiceEnvironmentOrderProperty -> Value Text
haddock_workaround_ :: ()
order :: Value Integer
serviceEnvironment :: Value Text
..}
    = ServiceEnvironmentOrderProperty
        {serviceEnvironment :: Value Text
serviceEnvironment = PropertyType "ServiceEnvironment" ServiceEnvironmentOrderProperty
Value Text
newValue, ()
Value Integer
haddock_workaround_ :: ()
order :: Value Integer
haddock_workaround_ :: ()
order :: Value Integer
..}