module Stratosphere.APS.AnomalyDetector.AnomalyDetectorConfigurationProperty (
module Exports, AnomalyDetectorConfigurationProperty(..),
mkAnomalyDetectorConfigurationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.APS.AnomalyDetector.RandomCutForestConfigurationProperty as Exports
import Stratosphere.ResourceProperties
data AnomalyDetectorConfigurationProperty
=
AnomalyDetectorConfigurationProperty {AnomalyDetectorConfigurationProperty -> ()
haddock_workaround_ :: (),
AnomalyDetectorConfigurationProperty
-> RandomCutForestConfigurationProperty
randomCutForest :: RandomCutForestConfigurationProperty}
deriving stock (AnomalyDetectorConfigurationProperty
-> AnomalyDetectorConfigurationProperty -> Bool
(AnomalyDetectorConfigurationProperty
-> AnomalyDetectorConfigurationProperty -> Bool)
-> (AnomalyDetectorConfigurationProperty
-> AnomalyDetectorConfigurationProperty -> Bool)
-> Eq AnomalyDetectorConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AnomalyDetectorConfigurationProperty
-> AnomalyDetectorConfigurationProperty -> Bool
== :: AnomalyDetectorConfigurationProperty
-> AnomalyDetectorConfigurationProperty -> Bool
$c/= :: AnomalyDetectorConfigurationProperty
-> AnomalyDetectorConfigurationProperty -> Bool
/= :: AnomalyDetectorConfigurationProperty
-> AnomalyDetectorConfigurationProperty -> Bool
Prelude.Eq, Int -> AnomalyDetectorConfigurationProperty -> ShowS
[AnomalyDetectorConfigurationProperty] -> ShowS
AnomalyDetectorConfigurationProperty -> String
(Int -> AnomalyDetectorConfigurationProperty -> ShowS)
-> (AnomalyDetectorConfigurationProperty -> String)
-> ([AnomalyDetectorConfigurationProperty] -> ShowS)
-> Show AnomalyDetectorConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> AnomalyDetectorConfigurationProperty -> ShowS
showsPrec :: Int -> AnomalyDetectorConfigurationProperty -> ShowS
$cshow :: AnomalyDetectorConfigurationProperty -> String
show :: AnomalyDetectorConfigurationProperty -> String
$cshowList :: [AnomalyDetectorConfigurationProperty] -> ShowS
showList :: [AnomalyDetectorConfigurationProperty] -> ShowS
Prelude.Show)
mkAnomalyDetectorConfigurationProperty ::
RandomCutForestConfigurationProperty
-> AnomalyDetectorConfigurationProperty
mkAnomalyDetectorConfigurationProperty :: RandomCutForestConfigurationProperty
-> AnomalyDetectorConfigurationProperty
mkAnomalyDetectorConfigurationProperty RandomCutForestConfigurationProperty
randomCutForest
= AnomalyDetectorConfigurationProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), randomCutForest :: RandomCutForestConfigurationProperty
randomCutForest = RandomCutForestConfigurationProperty
randomCutForest}
instance ToResourceProperties AnomalyDetectorConfigurationProperty where
toResourceProperties :: AnomalyDetectorConfigurationProperty -> ResourceProperties
toResourceProperties AnomalyDetectorConfigurationProperty {()
RandomCutForestConfigurationProperty
haddock_workaround_ :: AnomalyDetectorConfigurationProperty -> ()
randomCutForest :: AnomalyDetectorConfigurationProperty
-> RandomCutForestConfigurationProperty
haddock_workaround_ :: ()
randomCutForest :: RandomCutForestConfigurationProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::APS::AnomalyDetector.AnomalyDetectorConfiguration",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"RandomCutForest" Key -> RandomCutForestConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= RandomCutForestConfigurationProperty
randomCutForest]}
instance JSON.ToJSON AnomalyDetectorConfigurationProperty where
toJSON :: AnomalyDetectorConfigurationProperty -> Value
toJSON AnomalyDetectorConfigurationProperty {()
RandomCutForestConfigurationProperty
haddock_workaround_ :: AnomalyDetectorConfigurationProperty -> ()
randomCutForest :: AnomalyDetectorConfigurationProperty
-> RandomCutForestConfigurationProperty
haddock_workaround_ :: ()
randomCutForest :: RandomCutForestConfigurationProperty
..}
= [(Key, Value)] -> Value
JSON.object [Key
"RandomCutForest" Key -> RandomCutForestConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= RandomCutForestConfigurationProperty
randomCutForest]
instance Property "RandomCutForest" AnomalyDetectorConfigurationProperty where
type PropertyType "RandomCutForest" AnomalyDetectorConfigurationProperty = RandomCutForestConfigurationProperty
set :: PropertyType "RandomCutForest" AnomalyDetectorConfigurationProperty
-> AnomalyDetectorConfigurationProperty
-> AnomalyDetectorConfigurationProperty
set PropertyType "RandomCutForest" AnomalyDetectorConfigurationProperty
newValue AnomalyDetectorConfigurationProperty {()
RandomCutForestConfigurationProperty
haddock_workaround_ :: AnomalyDetectorConfigurationProperty -> ()
randomCutForest :: AnomalyDetectorConfigurationProperty
-> RandomCutForestConfigurationProperty
haddock_workaround_ :: ()
randomCutForest :: RandomCutForestConfigurationProperty
..}
= AnomalyDetectorConfigurationProperty
{randomCutForest :: RandomCutForestConfigurationProperty
randomCutForest = PropertyType "RandomCutForest" AnomalyDetectorConfigurationProperty
RandomCutForestConfigurationProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}