module Stratosphere.EMR.InstanceGroupConfig.CloudWatchAlarmDefinitionProperty (
        module Exports, CloudWatchAlarmDefinitionProperty(..),
        mkCloudWatchAlarmDefinitionProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.EMR.InstanceGroupConfig.MetricDimensionProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data CloudWatchAlarmDefinitionProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition.html>
    CloudWatchAlarmDefinitionProperty {CloudWatchAlarmDefinitionProperty -> ()
haddock_workaround_ :: (),
                                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition.html#cfn-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition-comparisonoperator>
                                       CloudWatchAlarmDefinitionProperty -> Value Text
comparisonOperator :: (Value Prelude.Text),
                                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition.html#cfn-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition-dimensions>
                                       CloudWatchAlarmDefinitionProperty
-> Maybe [MetricDimensionProperty]
dimensions :: (Prelude.Maybe [MetricDimensionProperty]),
                                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition.html#cfn-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition-evaluationperiods>
                                       CloudWatchAlarmDefinitionProperty -> Maybe (Value Integer)
evaluationPeriods :: (Prelude.Maybe (Value Prelude.Integer)),
                                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition.html#cfn-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition-metricname>
                                       CloudWatchAlarmDefinitionProperty -> Value Text
metricName :: (Value Prelude.Text),
                                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition.html#cfn-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition-namespace>
                                       CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
namespace :: (Prelude.Maybe (Value Prelude.Text)),
                                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition.html#cfn-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition-period>
                                       CloudWatchAlarmDefinitionProperty -> Value Integer
period :: (Value Prelude.Integer),
                                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition.html#cfn-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition-statistic>
                                       CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
statistic :: (Prelude.Maybe (Value Prelude.Text)),
                                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition.html#cfn-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition-threshold>
                                       CloudWatchAlarmDefinitionProperty -> Value Double
threshold :: (Value Prelude.Double),
                                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition.html#cfn-elasticmapreduce-instancegroupconfig-cloudwatchalarmdefinition-unit>
                                       CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
unit :: (Prelude.Maybe (Value Prelude.Text))}
  deriving stock (CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty -> Bool
(CloudWatchAlarmDefinitionProperty
 -> CloudWatchAlarmDefinitionProperty -> Bool)
-> (CloudWatchAlarmDefinitionProperty
    -> CloudWatchAlarmDefinitionProperty -> Bool)
-> Eq CloudWatchAlarmDefinitionProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty -> Bool
== :: CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty -> Bool
$c/= :: CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty -> Bool
/= :: CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty -> Bool
Prelude.Eq, Int -> CloudWatchAlarmDefinitionProperty -> ShowS
[CloudWatchAlarmDefinitionProperty] -> ShowS
CloudWatchAlarmDefinitionProperty -> String
(Int -> CloudWatchAlarmDefinitionProperty -> ShowS)
-> (CloudWatchAlarmDefinitionProperty -> String)
-> ([CloudWatchAlarmDefinitionProperty] -> ShowS)
-> Show CloudWatchAlarmDefinitionProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CloudWatchAlarmDefinitionProperty -> ShowS
showsPrec :: Int -> CloudWatchAlarmDefinitionProperty -> ShowS
$cshow :: CloudWatchAlarmDefinitionProperty -> String
show :: CloudWatchAlarmDefinitionProperty -> String
$cshowList :: [CloudWatchAlarmDefinitionProperty] -> ShowS
showList :: [CloudWatchAlarmDefinitionProperty] -> ShowS
Prelude.Show)
mkCloudWatchAlarmDefinitionProperty ::
  Value Prelude.Text
  -> Value Prelude.Text
     -> Value Prelude.Integer
        -> Value Prelude.Double -> CloudWatchAlarmDefinitionProperty
mkCloudWatchAlarmDefinitionProperty :: Value Text
-> Value Text
-> Value Integer
-> Value Double
-> CloudWatchAlarmDefinitionProperty
mkCloudWatchAlarmDefinitionProperty
  Value Text
comparisonOperator
  Value Text
metricName
  Value Integer
period
  Value Double
threshold
  = CloudWatchAlarmDefinitionProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), comparisonOperator :: Value Text
comparisonOperator = Value Text
comparisonOperator,
       metricName :: Value Text
metricName = Value Text
metricName, period :: Value Integer
period = Value Integer
period, threshold :: Value Double
threshold = Value Double
threshold,
       dimensions :: Maybe [MetricDimensionProperty]
dimensions = Maybe [MetricDimensionProperty]
forall a. Maybe a
Prelude.Nothing, evaluationPeriods :: Maybe (Value Integer)
evaluationPeriods = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       namespace :: Maybe (Value Text)
namespace = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, statistic :: Maybe (Value Text)
statistic = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       unit :: Maybe (Value Text)
unit = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties CloudWatchAlarmDefinitionProperty where
  toResourceProperties :: CloudWatchAlarmDefinitionProperty -> ResourceProperties
toResourceProperties CloudWatchAlarmDefinitionProperty {Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: CloudWatchAlarmDefinitionProperty -> ()
comparisonOperator :: CloudWatchAlarmDefinitionProperty -> Value Text
dimensions :: CloudWatchAlarmDefinitionProperty
-> Maybe [MetricDimensionProperty]
evaluationPeriods :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Integer)
metricName :: CloudWatchAlarmDefinitionProperty -> Value Text
namespace :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
period :: CloudWatchAlarmDefinitionProperty -> Value Integer
statistic :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
threshold :: CloudWatchAlarmDefinitionProperty -> Value Double
unit :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::EMR::InstanceGroupConfig.CloudWatchAlarmDefinition",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"ComparisonOperator" 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
comparisonOperator,
                            Key
"MetricName" 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
metricName, Key
"Period" 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
period,
                            Key
"Threshold" Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Double
threshold]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> [MetricDimensionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Dimensions" ([MetricDimensionProperty] -> (Key, Value))
-> Maybe [MetricDimensionProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [MetricDimensionProperty]
dimensions,
                               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..=) Key
"EvaluationPeriods" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
evaluationPeriods,
                               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..=) Key
"Namespace" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
namespace,
                               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..=) Key
"Statistic" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
statistic,
                               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..=) Key
"Unit" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
unit]))}
instance JSON.ToJSON CloudWatchAlarmDefinitionProperty where
  toJSON :: CloudWatchAlarmDefinitionProperty -> Value
toJSON CloudWatchAlarmDefinitionProperty {Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: CloudWatchAlarmDefinitionProperty -> ()
comparisonOperator :: CloudWatchAlarmDefinitionProperty -> Value Text
dimensions :: CloudWatchAlarmDefinitionProperty
-> Maybe [MetricDimensionProperty]
evaluationPeriods :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Integer)
metricName :: CloudWatchAlarmDefinitionProperty -> Value Text
namespace :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
period :: CloudWatchAlarmDefinitionProperty -> Value Integer
statistic :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
threshold :: CloudWatchAlarmDefinitionProperty -> Value Double
unit :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"ComparisonOperator" 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
comparisonOperator,
               Key
"MetricName" 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
metricName, Key
"Period" 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
period,
               Key
"Threshold" Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Double
threshold]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> [MetricDimensionProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Dimensions" ([MetricDimensionProperty] -> (Key, Value))
-> Maybe [MetricDimensionProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [MetricDimensionProperty]
dimensions,
                  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..=) Key
"EvaluationPeriods" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
evaluationPeriods,
                  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..=) Key
"Namespace" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
namespace,
                  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..=) Key
"Statistic" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
statistic,
                  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..=) Key
"Unit" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
unit])))
instance Property "ComparisonOperator" CloudWatchAlarmDefinitionProperty where
  type PropertyType "ComparisonOperator" CloudWatchAlarmDefinitionProperty = Value Prelude.Text
  set :: PropertyType "ComparisonOperator" CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
set PropertyType "ComparisonOperator" CloudWatchAlarmDefinitionProperty
newValue CloudWatchAlarmDefinitionProperty {Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: CloudWatchAlarmDefinitionProperty -> ()
comparisonOperator :: CloudWatchAlarmDefinitionProperty -> Value Text
dimensions :: CloudWatchAlarmDefinitionProperty
-> Maybe [MetricDimensionProperty]
evaluationPeriods :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Integer)
metricName :: CloudWatchAlarmDefinitionProperty -> Value Text
namespace :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
period :: CloudWatchAlarmDefinitionProperty -> Value Integer
statistic :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
threshold :: CloudWatchAlarmDefinitionProperty -> Value Double
unit :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
    = CloudWatchAlarmDefinitionProperty
        {comparisonOperator :: Value Text
comparisonOperator = PropertyType "ComparisonOperator" CloudWatchAlarmDefinitionProperty
Value Text
newValue, Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: ()
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
haddock_workaround_ :: ()
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
instance Property "Dimensions" CloudWatchAlarmDefinitionProperty where
  type PropertyType "Dimensions" CloudWatchAlarmDefinitionProperty = [MetricDimensionProperty]
  set :: PropertyType "Dimensions" CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
set PropertyType "Dimensions" CloudWatchAlarmDefinitionProperty
newValue CloudWatchAlarmDefinitionProperty {Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: CloudWatchAlarmDefinitionProperty -> ()
comparisonOperator :: CloudWatchAlarmDefinitionProperty -> Value Text
dimensions :: CloudWatchAlarmDefinitionProperty
-> Maybe [MetricDimensionProperty]
evaluationPeriods :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Integer)
metricName :: CloudWatchAlarmDefinitionProperty -> Value Text
namespace :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
period :: CloudWatchAlarmDefinitionProperty -> Value Integer
statistic :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
threshold :: CloudWatchAlarmDefinitionProperty -> Value Double
unit :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
    = CloudWatchAlarmDefinitionProperty
        {dimensions :: Maybe [MetricDimensionProperty]
dimensions = [MetricDimensionProperty] -> Maybe [MetricDimensionProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [MetricDimensionProperty]
PropertyType "Dimensions" CloudWatchAlarmDefinitionProperty
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: ()
comparisonOperator :: Value Text
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
instance Property "EvaluationPeriods" CloudWatchAlarmDefinitionProperty where
  type PropertyType "EvaluationPeriods" CloudWatchAlarmDefinitionProperty = Value Prelude.Integer
  set :: PropertyType "EvaluationPeriods" CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
set PropertyType "EvaluationPeriods" CloudWatchAlarmDefinitionProperty
newValue CloudWatchAlarmDefinitionProperty {Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: CloudWatchAlarmDefinitionProperty -> ()
comparisonOperator :: CloudWatchAlarmDefinitionProperty -> Value Text
dimensions :: CloudWatchAlarmDefinitionProperty
-> Maybe [MetricDimensionProperty]
evaluationPeriods :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Integer)
metricName :: CloudWatchAlarmDefinitionProperty -> Value Text
namespace :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
period :: CloudWatchAlarmDefinitionProperty -> Value Integer
statistic :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
threshold :: CloudWatchAlarmDefinitionProperty -> Value Double
unit :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
    = CloudWatchAlarmDefinitionProperty
        {evaluationPeriods :: Maybe (Value Integer)
evaluationPeriods = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EvaluationPeriods" CloudWatchAlarmDefinitionProperty
Value Integer
newValue, Maybe [MetricDimensionProperty]
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
instance Property "MetricName" CloudWatchAlarmDefinitionProperty where
  type PropertyType "MetricName" CloudWatchAlarmDefinitionProperty = Value Prelude.Text
  set :: PropertyType "MetricName" CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
set PropertyType "MetricName" CloudWatchAlarmDefinitionProperty
newValue CloudWatchAlarmDefinitionProperty {Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: CloudWatchAlarmDefinitionProperty -> ()
comparisonOperator :: CloudWatchAlarmDefinitionProperty -> Value Text
dimensions :: CloudWatchAlarmDefinitionProperty
-> Maybe [MetricDimensionProperty]
evaluationPeriods :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Integer)
metricName :: CloudWatchAlarmDefinitionProperty -> Value Text
namespace :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
period :: CloudWatchAlarmDefinitionProperty -> Value Integer
statistic :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
threshold :: CloudWatchAlarmDefinitionProperty -> Value Double
unit :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
    = CloudWatchAlarmDefinitionProperty {metricName :: Value Text
metricName = PropertyType "MetricName" CloudWatchAlarmDefinitionProperty
Value Text
newValue, Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
instance Property "Namespace" CloudWatchAlarmDefinitionProperty where
  type PropertyType "Namespace" CloudWatchAlarmDefinitionProperty = Value Prelude.Text
  set :: PropertyType "Namespace" CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
set PropertyType "Namespace" CloudWatchAlarmDefinitionProperty
newValue CloudWatchAlarmDefinitionProperty {Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: CloudWatchAlarmDefinitionProperty -> ()
comparisonOperator :: CloudWatchAlarmDefinitionProperty -> Value Text
dimensions :: CloudWatchAlarmDefinitionProperty
-> Maybe [MetricDimensionProperty]
evaluationPeriods :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Integer)
metricName :: CloudWatchAlarmDefinitionProperty -> Value Text
namespace :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
period :: CloudWatchAlarmDefinitionProperty -> Value Integer
statistic :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
threshold :: CloudWatchAlarmDefinitionProperty -> Value Double
unit :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
    = CloudWatchAlarmDefinitionProperty
        {namespace :: Maybe (Value Text)
namespace = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Namespace" CloudWatchAlarmDefinitionProperty
Value Text
newValue, Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
instance Property "Period" CloudWatchAlarmDefinitionProperty where
  type PropertyType "Period" CloudWatchAlarmDefinitionProperty = Value Prelude.Integer
  set :: PropertyType "Period" CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
set PropertyType "Period" CloudWatchAlarmDefinitionProperty
newValue CloudWatchAlarmDefinitionProperty {Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: CloudWatchAlarmDefinitionProperty -> ()
comparisonOperator :: CloudWatchAlarmDefinitionProperty -> Value Text
dimensions :: CloudWatchAlarmDefinitionProperty
-> Maybe [MetricDimensionProperty]
evaluationPeriods :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Integer)
metricName :: CloudWatchAlarmDefinitionProperty -> Value Text
namespace :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
period :: CloudWatchAlarmDefinitionProperty -> Value Integer
statistic :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
threshold :: CloudWatchAlarmDefinitionProperty -> Value Double
unit :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
    = CloudWatchAlarmDefinitionProperty {period :: Value Integer
period = PropertyType "Period" CloudWatchAlarmDefinitionProperty
Value Integer
newValue, Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Text
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
instance Property "Statistic" CloudWatchAlarmDefinitionProperty where
  type PropertyType "Statistic" CloudWatchAlarmDefinitionProperty = Value Prelude.Text
  set :: PropertyType "Statistic" CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
set PropertyType "Statistic" CloudWatchAlarmDefinitionProperty
newValue CloudWatchAlarmDefinitionProperty {Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: CloudWatchAlarmDefinitionProperty -> ()
comparisonOperator :: CloudWatchAlarmDefinitionProperty -> Value Text
dimensions :: CloudWatchAlarmDefinitionProperty
-> Maybe [MetricDimensionProperty]
evaluationPeriods :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Integer)
metricName :: CloudWatchAlarmDefinitionProperty -> Value Text
namespace :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
period :: CloudWatchAlarmDefinitionProperty -> Value Integer
statistic :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
threshold :: CloudWatchAlarmDefinitionProperty -> Value Double
unit :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
    = CloudWatchAlarmDefinitionProperty
        {statistic :: Maybe (Value Text)
statistic = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Statistic" CloudWatchAlarmDefinitionProperty
Value Text
newValue, Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
threshold :: Value Double
unit :: Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
threshold :: Value Double
unit :: Maybe (Value Text)
..}
instance Property "Threshold" CloudWatchAlarmDefinitionProperty where
  type PropertyType "Threshold" CloudWatchAlarmDefinitionProperty = Value Prelude.Double
  set :: PropertyType "Threshold" CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
set PropertyType "Threshold" CloudWatchAlarmDefinitionProperty
newValue CloudWatchAlarmDefinitionProperty {Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: CloudWatchAlarmDefinitionProperty -> ()
comparisonOperator :: CloudWatchAlarmDefinitionProperty -> Value Text
dimensions :: CloudWatchAlarmDefinitionProperty
-> Maybe [MetricDimensionProperty]
evaluationPeriods :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Integer)
metricName :: CloudWatchAlarmDefinitionProperty -> Value Text
namespace :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
period :: CloudWatchAlarmDefinitionProperty -> Value Integer
statistic :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
threshold :: CloudWatchAlarmDefinitionProperty -> Value Double
unit :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
    = CloudWatchAlarmDefinitionProperty {threshold :: Value Double
threshold = PropertyType "Threshold" CloudWatchAlarmDefinitionProperty
Value Double
newValue, Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Integer
Value Text
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
unit :: Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
unit :: Maybe (Value Text)
..}
instance Property "Unit" CloudWatchAlarmDefinitionProperty where
  type PropertyType "Unit" CloudWatchAlarmDefinitionProperty = Value Prelude.Text
  set :: PropertyType "Unit" CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
-> CloudWatchAlarmDefinitionProperty
set PropertyType "Unit" CloudWatchAlarmDefinitionProperty
newValue CloudWatchAlarmDefinitionProperty {Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: CloudWatchAlarmDefinitionProperty -> ()
comparisonOperator :: CloudWatchAlarmDefinitionProperty -> Value Text
dimensions :: CloudWatchAlarmDefinitionProperty
-> Maybe [MetricDimensionProperty]
evaluationPeriods :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Integer)
metricName :: CloudWatchAlarmDefinitionProperty -> Value Text
namespace :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
period :: CloudWatchAlarmDefinitionProperty -> Value Integer
statistic :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
threshold :: CloudWatchAlarmDefinitionProperty -> Value Double
unit :: CloudWatchAlarmDefinitionProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
unit :: Maybe (Value Text)
..}
    = CloudWatchAlarmDefinitionProperty
        {unit :: Maybe (Value Text)
unit = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Unit" CloudWatchAlarmDefinitionProperty
Value Text
newValue, Maybe [MetricDimensionProperty]
Maybe (Value Integer)
Maybe (Value Text)
()
Value Double
Value Integer
Value Text
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
haddock_workaround_ :: ()
comparisonOperator :: Value Text
dimensions :: Maybe [MetricDimensionProperty]
evaluationPeriods :: Maybe (Value Integer)
metricName :: Value Text
namespace :: Maybe (Value Text)
period :: Value Integer
statistic :: Maybe (Value Text)
threshold :: Value Double
..}