module Stratosphere.APS.AnomalyDetector.LabelProperty ( LabelProperty(..), mkLabelProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data LabelProperty = -- | See: LabelProperty {haddock_workaround_ :: (), -- | See: key :: (Value Prelude.Text), -- | See: value :: (Value Prelude.Text)} deriving stock (Prelude.Eq, Prelude.Show) mkLabelProperty :: Value Prelude.Text -> Value Prelude.Text -> LabelProperty mkLabelProperty key value = LabelProperty {haddock_workaround_ = (), key = key, value = value} instance ToResourceProperties LabelProperty where toResourceProperties LabelProperty {..} = ResourceProperties {awsType = "AWS::APS::AnomalyDetector.Label", supportsTags = Prelude.False, properties = ["Key" JSON..= key, "Value" JSON..= value]} instance JSON.ToJSON LabelProperty where toJSON LabelProperty {..} = JSON.object ["Key" JSON..= key, "Value" JSON..= value] instance Property "Key" LabelProperty where type PropertyType "Key" LabelProperty = Value Prelude.Text set newValue LabelProperty {..} = LabelProperty {key = newValue, ..} instance Property "Value" LabelProperty where type PropertyType "Value" LabelProperty = Value Prelude.Text set newValue LabelProperty {..} = LabelProperty {value = newValue, ..}