module Stratosphere.ApplicationSignals.ServiceLevelObjective.SliMetricProperty (
        module Exports, SliMetricProperty(..), mkSliMetricProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.ApplicationSignals.ServiceLevelObjective.DependencyConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.ApplicationSignals.ServiceLevelObjective.MetricDataQueryProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data SliMetricProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationsignals-servicelevelobjective-slimetric.html>
    SliMetricProperty {SliMetricProperty -> ()
haddock_workaround_ :: (),
                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationsignals-servicelevelobjective-slimetric.html#cfn-applicationsignals-servicelevelobjective-slimetric-dependencyconfig>
                       SliMetricProperty -> Maybe DependencyConfigProperty
dependencyConfig :: (Prelude.Maybe DependencyConfigProperty),
                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationsignals-servicelevelobjective-slimetric.html#cfn-applicationsignals-servicelevelobjective-slimetric-keyattributes>
                       SliMetricProperty -> Maybe (Map Text (Value Text))
keyAttributes :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text))),
                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationsignals-servicelevelobjective-slimetric.html#cfn-applicationsignals-servicelevelobjective-slimetric-metricdataqueries>
                       SliMetricProperty -> Maybe [MetricDataQueryProperty]
metricDataQueries :: (Prelude.Maybe [MetricDataQueryProperty]),
                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationsignals-servicelevelobjective-slimetric.html#cfn-applicationsignals-servicelevelobjective-slimetric-metrictype>
                       SliMetricProperty -> Maybe (Value Text)
metricType :: (Prelude.Maybe (Value Prelude.Text)),
                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationsignals-servicelevelobjective-slimetric.html#cfn-applicationsignals-servicelevelobjective-slimetric-operationname>
                       SliMetricProperty -> Maybe (Value Text)
operationName :: (Prelude.Maybe (Value Prelude.Text)),
                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationsignals-servicelevelobjective-slimetric.html#cfn-applicationsignals-servicelevelobjective-slimetric-periodseconds>
                       SliMetricProperty -> Maybe (Value Integer)
periodSeconds :: (Prelude.Maybe (Value Prelude.Integer)),
                       -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationsignals-servicelevelobjective-slimetric.html#cfn-applicationsignals-servicelevelobjective-slimetric-statistic>
                       SliMetricProperty -> Maybe (Value Text)
statistic :: (Prelude.Maybe (Value Prelude.Text))}
  deriving stock (SliMetricProperty -> SliMetricProperty -> Bool
(SliMetricProperty -> SliMetricProperty -> Bool)
-> (SliMetricProperty -> SliMetricProperty -> Bool)
-> Eq SliMetricProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SliMetricProperty -> SliMetricProperty -> Bool
== :: SliMetricProperty -> SliMetricProperty -> Bool
$c/= :: SliMetricProperty -> SliMetricProperty -> Bool
/= :: SliMetricProperty -> SliMetricProperty -> Bool
Prelude.Eq, Int -> SliMetricProperty -> ShowS
[SliMetricProperty] -> ShowS
SliMetricProperty -> String
(Int -> SliMetricProperty -> ShowS)
-> (SliMetricProperty -> String)
-> ([SliMetricProperty] -> ShowS)
-> Show SliMetricProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SliMetricProperty -> ShowS
showsPrec :: Int -> SliMetricProperty -> ShowS
$cshow :: SliMetricProperty -> String
show :: SliMetricProperty -> String
$cshowList :: [SliMetricProperty] -> ShowS
showList :: [SliMetricProperty] -> ShowS
Prelude.Show)
mkSliMetricProperty :: SliMetricProperty
mkSliMetricProperty :: SliMetricProperty
mkSliMetricProperty
  = SliMetricProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), dependencyConfig :: Maybe DependencyConfigProperty
dependencyConfig = Maybe DependencyConfigProperty
forall a. Maybe a
Prelude.Nothing,
       keyAttributes :: Maybe (Map Text (Value Text))
keyAttributes = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing,
       metricDataQueries :: Maybe [MetricDataQueryProperty]
metricDataQueries = Maybe [MetricDataQueryProperty]
forall a. Maybe a
Prelude.Nothing, metricType :: Maybe (Value Text)
metricType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       operationName :: Maybe (Value Text)
operationName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, periodSeconds :: Maybe (Value Integer)
periodSeconds = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       statistic :: Maybe (Value Text)
statistic = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties SliMetricProperty where
  toResourceProperties :: SliMetricProperty -> ResourceProperties
toResourceProperties SliMetricProperty {Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: SliMetricProperty -> ()
dependencyConfig :: SliMetricProperty -> Maybe DependencyConfigProperty
keyAttributes :: SliMetricProperty -> Maybe (Map Text (Value Text))
metricDataQueries :: SliMetricProperty -> Maybe [MetricDataQueryProperty]
metricType :: SliMetricProperty -> Maybe (Value Text)
operationName :: SliMetricProperty -> Maybe (Value Text)
periodSeconds :: SliMetricProperty -> Maybe (Value Integer)
statistic :: SliMetricProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::ApplicationSignals::ServiceLevelObjective.SliMetric",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [Key -> DependencyConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DependencyConfig" (DependencyConfigProperty -> (Key, Value))
-> Maybe DependencyConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DependencyConfigProperty
dependencyConfig,
                            Key -> Map Text (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
"KeyAttributes" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
keyAttributes,
                            Key -> [MetricDataQueryProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MetricDataQueries" ([MetricDataQueryProperty] -> (Key, Value))
-> Maybe [MetricDataQueryProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [MetricDataQueryProperty]
metricDataQueries,
                            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
"MetricType" (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)
metricType,
                            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
"OperationName" (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)
operationName,
                            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
"PeriodSeconds" (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)
periodSeconds,
                            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])}
instance JSON.ToJSON SliMetricProperty where
  toJSON :: SliMetricProperty -> Value
toJSON SliMetricProperty {Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: SliMetricProperty -> ()
dependencyConfig :: SliMetricProperty -> Maybe DependencyConfigProperty
keyAttributes :: SliMetricProperty -> Maybe (Map Text (Value Text))
metricDataQueries :: SliMetricProperty -> Maybe [MetricDataQueryProperty]
metricType :: SliMetricProperty -> Maybe (Value Text)
operationName :: SliMetricProperty -> Maybe (Value Text)
periodSeconds :: SliMetricProperty -> Maybe (Value Integer)
statistic :: SliMetricProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [Key -> DependencyConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DependencyConfig" (DependencyConfigProperty -> (Key, Value))
-> Maybe DependencyConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DependencyConfigProperty
dependencyConfig,
               Key -> Map Text (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
"KeyAttributes" (Map Text (Value Text) -> (Key, Value))
-> Maybe (Map Text (Value Text)) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Map Text (Value Text))
keyAttributes,
               Key -> [MetricDataQueryProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MetricDataQueries" ([MetricDataQueryProperty] -> (Key, Value))
-> Maybe [MetricDataQueryProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [MetricDataQueryProperty]
metricDataQueries,
               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
"MetricType" (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)
metricType,
               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
"OperationName" (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)
operationName,
               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
"PeriodSeconds" (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)
periodSeconds,
               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]))
instance Property "DependencyConfig" SliMetricProperty where
  type PropertyType "DependencyConfig" SliMetricProperty = DependencyConfigProperty
  set :: PropertyType "DependencyConfig" SliMetricProperty
-> SliMetricProperty -> SliMetricProperty
set PropertyType "DependencyConfig" SliMetricProperty
newValue SliMetricProperty {Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: SliMetricProperty -> ()
dependencyConfig :: SliMetricProperty -> Maybe DependencyConfigProperty
keyAttributes :: SliMetricProperty -> Maybe (Map Text (Value Text))
metricDataQueries :: SliMetricProperty -> Maybe [MetricDataQueryProperty]
metricType :: SliMetricProperty -> Maybe (Value Text)
operationName :: SliMetricProperty -> Maybe (Value Text)
periodSeconds :: SliMetricProperty -> Maybe (Value Integer)
statistic :: SliMetricProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
    = SliMetricProperty {dependencyConfig :: Maybe DependencyConfigProperty
dependencyConfig = DependencyConfigProperty -> Maybe DependencyConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DependencyConfig" SliMetricProperty
DependencyConfigProperty
newValue, Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
haddock_workaround_ :: ()
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
instance Property "KeyAttributes" SliMetricProperty where
  type PropertyType "KeyAttributes" SliMetricProperty = Prelude.Map Prelude.Text (Value Prelude.Text)
  set :: PropertyType "KeyAttributes" SliMetricProperty
-> SliMetricProperty -> SliMetricProperty
set PropertyType "KeyAttributes" SliMetricProperty
newValue SliMetricProperty {Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: SliMetricProperty -> ()
dependencyConfig :: SliMetricProperty -> Maybe DependencyConfigProperty
keyAttributes :: SliMetricProperty -> Maybe (Map Text (Value Text))
metricDataQueries :: SliMetricProperty -> Maybe [MetricDataQueryProperty]
metricType :: SliMetricProperty -> Maybe (Value Text)
operationName :: SliMetricProperty -> Maybe (Value Text)
periodSeconds :: SliMetricProperty -> Maybe (Value Integer)
statistic :: SliMetricProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
    = SliMetricProperty {keyAttributes :: Maybe (Map Text (Value Text))
keyAttributes = Map Text (Value Text) -> Maybe (Map Text (Value Text))
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Map Text (Value Text)
PropertyType "KeyAttributes" SliMetricProperty
newValue, Maybe [MetricDataQueryProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
instance Property "MetricDataQueries" SliMetricProperty where
  type PropertyType "MetricDataQueries" SliMetricProperty = [MetricDataQueryProperty]
  set :: PropertyType "MetricDataQueries" SliMetricProperty
-> SliMetricProperty -> SliMetricProperty
set PropertyType "MetricDataQueries" SliMetricProperty
newValue SliMetricProperty {Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: SliMetricProperty -> ()
dependencyConfig :: SliMetricProperty -> Maybe DependencyConfigProperty
keyAttributes :: SliMetricProperty -> Maybe (Map Text (Value Text))
metricDataQueries :: SliMetricProperty -> Maybe [MetricDataQueryProperty]
metricType :: SliMetricProperty -> Maybe (Value Text)
operationName :: SliMetricProperty -> Maybe (Value Text)
periodSeconds :: SliMetricProperty -> Maybe (Value Integer)
statistic :: SliMetricProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
    = SliMetricProperty {metricDataQueries :: Maybe [MetricDataQueryProperty]
metricDataQueries = [MetricDataQueryProperty] -> Maybe [MetricDataQueryProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [MetricDataQueryProperty]
PropertyType "MetricDataQueries" SliMetricProperty
newValue, Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
instance Property "MetricType" SliMetricProperty where
  type PropertyType "MetricType" SliMetricProperty = Value Prelude.Text
  set :: PropertyType "MetricType" SliMetricProperty
-> SliMetricProperty -> SliMetricProperty
set PropertyType "MetricType" SliMetricProperty
newValue SliMetricProperty {Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: SliMetricProperty -> ()
dependencyConfig :: SliMetricProperty -> Maybe DependencyConfigProperty
keyAttributes :: SliMetricProperty -> Maybe (Map Text (Value Text))
metricDataQueries :: SliMetricProperty -> Maybe [MetricDataQueryProperty]
metricType :: SliMetricProperty -> Maybe (Value Text)
operationName :: SliMetricProperty -> Maybe (Value Text)
periodSeconds :: SliMetricProperty -> Maybe (Value Integer)
statistic :: SliMetricProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
    = SliMetricProperty {metricType :: Maybe (Value Text)
metricType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "MetricType" SliMetricProperty
Value Text
newValue, Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
instance Property "OperationName" SliMetricProperty where
  type PropertyType "OperationName" SliMetricProperty = Value Prelude.Text
  set :: PropertyType "OperationName" SliMetricProperty
-> SliMetricProperty -> SliMetricProperty
set PropertyType "OperationName" SliMetricProperty
newValue SliMetricProperty {Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: SliMetricProperty -> ()
dependencyConfig :: SliMetricProperty -> Maybe DependencyConfigProperty
keyAttributes :: SliMetricProperty -> Maybe (Map Text (Value Text))
metricDataQueries :: SliMetricProperty -> Maybe [MetricDataQueryProperty]
metricType :: SliMetricProperty -> Maybe (Value Text)
operationName :: SliMetricProperty -> Maybe (Value Text)
periodSeconds :: SliMetricProperty -> Maybe (Value Integer)
statistic :: SliMetricProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
    = SliMetricProperty {operationName :: Maybe (Value Text)
operationName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "OperationName" SliMetricProperty
Value Text
newValue, Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
instance Property "PeriodSeconds" SliMetricProperty where
  type PropertyType "PeriodSeconds" SliMetricProperty = Value Prelude.Integer
  set :: PropertyType "PeriodSeconds" SliMetricProperty
-> SliMetricProperty -> SliMetricProperty
set PropertyType "PeriodSeconds" SliMetricProperty
newValue SliMetricProperty {Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: SliMetricProperty -> ()
dependencyConfig :: SliMetricProperty -> Maybe DependencyConfigProperty
keyAttributes :: SliMetricProperty -> Maybe (Map Text (Value Text))
metricDataQueries :: SliMetricProperty -> Maybe [MetricDataQueryProperty]
metricType :: SliMetricProperty -> Maybe (Value Text)
operationName :: SliMetricProperty -> Maybe (Value Text)
periodSeconds :: SliMetricProperty -> Maybe (Value Integer)
statistic :: SliMetricProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
    = SliMetricProperty {periodSeconds :: Maybe (Value Integer)
periodSeconds = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PeriodSeconds" SliMetricProperty
Value Integer
newValue, Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
statistic :: Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
statistic :: Maybe (Value Text)
..}
instance Property "Statistic" SliMetricProperty where
  type PropertyType "Statistic" SliMetricProperty = Value Prelude.Text
  set :: PropertyType "Statistic" SliMetricProperty
-> SliMetricProperty -> SliMetricProperty
set PropertyType "Statistic" SliMetricProperty
newValue SliMetricProperty {Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: SliMetricProperty -> ()
dependencyConfig :: SliMetricProperty -> Maybe DependencyConfigProperty
keyAttributes :: SliMetricProperty -> Maybe (Map Text (Value Text))
metricDataQueries :: SliMetricProperty -> Maybe [MetricDataQueryProperty]
metricType :: SliMetricProperty -> Maybe (Value Text)
operationName :: SliMetricProperty -> Maybe (Value Text)
periodSeconds :: SliMetricProperty -> Maybe (Value Integer)
statistic :: SliMetricProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
statistic :: Maybe (Value Text)
..}
    = SliMetricProperty {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" SliMetricProperty
Value Text
newValue, Maybe [MetricDataQueryProperty]
Maybe (Map Text (Value Text))
Maybe (Value Integer)
Maybe (Value Text)
Maybe DependencyConfigProperty
()
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
haddock_workaround_ :: ()
dependencyConfig :: Maybe DependencyConfigProperty
keyAttributes :: Maybe (Map Text (Value Text))
metricDataQueries :: Maybe [MetricDataQueryProperty]
metricType :: Maybe (Value Text)
operationName :: Maybe (Value Text)
periodSeconds :: Maybe (Value Integer)
..}