module Stratosphere.PCS.ComputeNodeGroup.ScalingConfigurationProperty ( ScalingConfigurationProperty(..), mkScalingConfigurationProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data ScalingConfigurationProperty = -- | See: ScalingConfigurationProperty {haddock_workaround_ :: (), -- | See: maxInstanceCount :: (Value Prelude.Integer), -- | See: minInstanceCount :: (Value Prelude.Integer)} deriving stock (Prelude.Eq, Prelude.Show) mkScalingConfigurationProperty :: Value Prelude.Integer -> Value Prelude.Integer -> ScalingConfigurationProperty mkScalingConfigurationProperty maxInstanceCount minInstanceCount = ScalingConfigurationProperty {haddock_workaround_ = (), maxInstanceCount = maxInstanceCount, minInstanceCount = minInstanceCount} instance ToResourceProperties ScalingConfigurationProperty where toResourceProperties ScalingConfigurationProperty {..} = ResourceProperties {awsType = "AWS::PCS::ComputeNodeGroup.ScalingConfiguration", supportsTags = Prelude.False, properties = ["MaxInstanceCount" JSON..= maxInstanceCount, "MinInstanceCount" JSON..= minInstanceCount]} instance JSON.ToJSON ScalingConfigurationProperty where toJSON ScalingConfigurationProperty {..} = JSON.object ["MaxInstanceCount" JSON..= maxInstanceCount, "MinInstanceCount" JSON..= minInstanceCount] instance Property "MaxInstanceCount" ScalingConfigurationProperty where type PropertyType "MaxInstanceCount" ScalingConfigurationProperty = Value Prelude.Integer set newValue ScalingConfigurationProperty {..} = ScalingConfigurationProperty {maxInstanceCount = newValue, ..} instance Property "MinInstanceCount" ScalingConfigurationProperty where type PropertyType "MinInstanceCount" ScalingConfigurationProperty = Value Prelude.Integer set newValue ScalingConfigurationProperty {..} = ScalingConfigurationProperty {minInstanceCount = newValue, ..}