stratosphere-applicationautoscaling-1.0.0: gen/Stratosphere/ApplicationAutoScaling/ScalingPolicy/PredictiveScalingMetricDimensionProperty.hs
module Stratosphere.ApplicationAutoScaling.ScalingPolicy.PredictiveScalingMetricDimensionProperty (
PredictiveScalingMetricDimensionProperty(..),
mkPredictiveScalingMetricDimensionProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data PredictiveScalingMetricDimensionProperty
= -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-predictivescalingmetricdimension.html>
PredictiveScalingMetricDimensionProperty {haddock_workaround_ :: (),
-- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-predictivescalingmetricdimension.html#cfn-applicationautoscaling-scalingpolicy-predictivescalingmetricdimension-name>
name :: (Prelude.Maybe (Value Prelude.Text)),
-- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationautoscaling-scalingpolicy-predictivescalingmetricdimension.html#cfn-applicationautoscaling-scalingpolicy-predictivescalingmetricdimension-value>
value :: (Prelude.Maybe (Value Prelude.Text))}
deriving stock (Prelude.Eq, Prelude.Show)
mkPredictiveScalingMetricDimensionProperty ::
PredictiveScalingMetricDimensionProperty
mkPredictiveScalingMetricDimensionProperty
= PredictiveScalingMetricDimensionProperty
{haddock_workaround_ = (), name = Prelude.Nothing,
value = Prelude.Nothing}
instance ToResourceProperties PredictiveScalingMetricDimensionProperty where
toResourceProperties PredictiveScalingMetricDimensionProperty {..}
= ResourceProperties
{awsType = "AWS::ApplicationAutoScaling::ScalingPolicy.PredictiveScalingMetricDimension",
supportsTags = Prelude.False,
properties = Prelude.fromList
(Prelude.catMaybes
[(JSON..=) "Name" Prelude.<$> name,
(JSON..=) "Value" Prelude.<$> value])}
instance JSON.ToJSON PredictiveScalingMetricDimensionProperty where
toJSON PredictiveScalingMetricDimensionProperty {..}
= JSON.object
(Prelude.fromList
(Prelude.catMaybes
[(JSON..=) "Name" Prelude.<$> name,
(JSON..=) "Value" Prelude.<$> value]))
instance Property "Name" PredictiveScalingMetricDimensionProperty where
type PropertyType "Name" PredictiveScalingMetricDimensionProperty = Value Prelude.Text
set newValue PredictiveScalingMetricDimensionProperty {..}
= PredictiveScalingMetricDimensionProperty
{name = Prelude.pure newValue, ..}
instance Property "Value" PredictiveScalingMetricDimensionProperty where
type PropertyType "Value" PredictiveScalingMetricDimensionProperty = Value Prelude.Text
set newValue PredictiveScalingMetricDimensionProperty {..}
= PredictiveScalingMetricDimensionProperty
{value = Prelude.pure newValue, ..}