module Stratosphere.Personalize.Solution.SolutionConfigProperty (
module Exports, SolutionConfigProperty(..),
mkSolutionConfigProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Personalize.Solution.AutoMLConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.Personalize.Solution.HpoConfigProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data SolutionConfigProperty
=
SolutionConfigProperty {SolutionConfigProperty -> ()
haddock_workaround_ :: (),
SolutionConfigProperty -> Maybe (Map Text (Value Text))
algorithmHyperParameters :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text))),
SolutionConfigProperty -> Maybe AutoMLConfigProperty
autoMLConfig :: (Prelude.Maybe AutoMLConfigProperty),
SolutionConfigProperty -> Maybe (Value Text)
eventValueThreshold :: (Prelude.Maybe (Value Prelude.Text)),
SolutionConfigProperty -> Maybe (Map Text (Value Text))
featureTransformationParameters :: (Prelude.Maybe (Prelude.Map Prelude.Text (Value Prelude.Text))),
SolutionConfigProperty -> Maybe HpoConfigProperty
hpoConfig :: (Prelude.Maybe HpoConfigProperty)}
deriving stock (SolutionConfigProperty -> SolutionConfigProperty -> Bool
(SolutionConfigProperty -> SolutionConfigProperty -> Bool)
-> (SolutionConfigProperty -> SolutionConfigProperty -> Bool)
-> Eq SolutionConfigProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SolutionConfigProperty -> SolutionConfigProperty -> Bool
== :: SolutionConfigProperty -> SolutionConfigProperty -> Bool
$c/= :: SolutionConfigProperty -> SolutionConfigProperty -> Bool
/= :: SolutionConfigProperty -> SolutionConfigProperty -> Bool
Prelude.Eq, Int -> SolutionConfigProperty -> ShowS
[SolutionConfigProperty] -> ShowS
SolutionConfigProperty -> String
(Int -> SolutionConfigProperty -> ShowS)
-> (SolutionConfigProperty -> String)
-> ([SolutionConfigProperty] -> ShowS)
-> Show SolutionConfigProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SolutionConfigProperty -> ShowS
showsPrec :: Int -> SolutionConfigProperty -> ShowS
$cshow :: SolutionConfigProperty -> String
show :: SolutionConfigProperty -> String
$cshowList :: [SolutionConfigProperty] -> ShowS
showList :: [SolutionConfigProperty] -> ShowS
Prelude.Show)
mkSolutionConfigProperty :: SolutionConfigProperty
mkSolutionConfigProperty :: SolutionConfigProperty
mkSolutionConfigProperty
= SolutionConfigProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
algorithmHyperParameters :: Maybe (Map Text (Value Text))
algorithmHyperParameters = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing,
autoMLConfig :: Maybe AutoMLConfigProperty
autoMLConfig = Maybe AutoMLConfigProperty
forall a. Maybe a
Prelude.Nothing,
eventValueThreshold :: Maybe (Value Text)
eventValueThreshold = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
featureTransformationParameters :: Maybe (Map Text (Value Text))
featureTransformationParameters = Maybe (Map Text (Value Text))
forall a. Maybe a
Prelude.Nothing,
hpoConfig :: Maybe HpoConfigProperty
hpoConfig = Maybe HpoConfigProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties SolutionConfigProperty where
toResourceProperties :: SolutionConfigProperty -> ResourceProperties
toResourceProperties SolutionConfigProperty {Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe AutoMLConfigProperty
Maybe HpoConfigProperty
()
haddock_workaround_ :: SolutionConfigProperty -> ()
algorithmHyperParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
autoMLConfig :: SolutionConfigProperty -> Maybe AutoMLConfigProperty
eventValueThreshold :: SolutionConfigProperty -> Maybe (Value Text)
featureTransformationParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
hpoConfig :: SolutionConfigProperty -> Maybe HpoConfigProperty
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
autoMLConfig :: Maybe AutoMLConfigProperty
eventValueThreshold :: Maybe (Value Text)
featureTransformationParameters :: Maybe (Map Text (Value Text))
hpoConfig :: Maybe HpoConfigProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Personalize::Solution.SolutionConfig",
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 -> 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
"AlgorithmHyperParameters"
(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))
algorithmHyperParameters,
Key -> AutoMLConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AutoMLConfig" (AutoMLConfigProperty -> (Key, Value))
-> Maybe AutoMLConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AutoMLConfigProperty
autoMLConfig,
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
"EventValueThreshold" (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)
eventValueThreshold,
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
"FeatureTransformationParameters"
(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))
featureTransformationParameters,
Key -> HpoConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"HpoConfig" (HpoConfigProperty -> (Key, Value))
-> Maybe HpoConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe HpoConfigProperty
hpoConfig])}
instance JSON.ToJSON SolutionConfigProperty where
toJSON :: SolutionConfigProperty -> Value
toJSON SolutionConfigProperty {Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe AutoMLConfigProperty
Maybe HpoConfigProperty
()
haddock_workaround_ :: SolutionConfigProperty -> ()
algorithmHyperParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
autoMLConfig :: SolutionConfigProperty -> Maybe AutoMLConfigProperty
eventValueThreshold :: SolutionConfigProperty -> Maybe (Value Text)
featureTransformationParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
hpoConfig :: SolutionConfigProperty -> Maybe HpoConfigProperty
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
autoMLConfig :: Maybe AutoMLConfigProperty
eventValueThreshold :: Maybe (Value Text)
featureTransformationParameters :: Maybe (Map Text (Value Text))
hpoConfig :: Maybe HpoConfigProperty
..}
= [(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 -> 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
"AlgorithmHyperParameters"
(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))
algorithmHyperParameters,
Key -> AutoMLConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AutoMLConfig" (AutoMLConfigProperty -> (Key, Value))
-> Maybe AutoMLConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe AutoMLConfigProperty
autoMLConfig,
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
"EventValueThreshold" (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)
eventValueThreshold,
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
"FeatureTransformationParameters"
(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))
featureTransformationParameters,
Key -> HpoConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"HpoConfig" (HpoConfigProperty -> (Key, Value))
-> Maybe HpoConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe HpoConfigProperty
hpoConfig]))
instance Property "AlgorithmHyperParameters" SolutionConfigProperty where
type PropertyType "AlgorithmHyperParameters" SolutionConfigProperty = Prelude.Map Prelude.Text (Value Prelude.Text)
set :: PropertyType "AlgorithmHyperParameters" SolutionConfigProperty
-> SolutionConfigProperty -> SolutionConfigProperty
set PropertyType "AlgorithmHyperParameters" SolutionConfigProperty
newValue SolutionConfigProperty {Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe AutoMLConfigProperty
Maybe HpoConfigProperty
()
haddock_workaround_ :: SolutionConfigProperty -> ()
algorithmHyperParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
autoMLConfig :: SolutionConfigProperty -> Maybe AutoMLConfigProperty
eventValueThreshold :: SolutionConfigProperty -> Maybe (Value Text)
featureTransformationParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
hpoConfig :: SolutionConfigProperty -> Maybe HpoConfigProperty
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
autoMLConfig :: Maybe AutoMLConfigProperty
eventValueThreshold :: Maybe (Value Text)
featureTransformationParameters :: Maybe (Map Text (Value Text))
hpoConfig :: Maybe HpoConfigProperty
..}
= SolutionConfigProperty
{algorithmHyperParameters :: Maybe (Map Text (Value Text))
algorithmHyperParameters = 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 "AlgorithmHyperParameters" SolutionConfigProperty
newValue, Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe AutoMLConfigProperty
Maybe HpoConfigProperty
()
haddock_workaround_ :: ()
autoMLConfig :: Maybe AutoMLConfigProperty
eventValueThreshold :: Maybe (Value Text)
featureTransformationParameters :: Maybe (Map Text (Value Text))
hpoConfig :: Maybe HpoConfigProperty
haddock_workaround_ :: ()
autoMLConfig :: Maybe AutoMLConfigProperty
eventValueThreshold :: Maybe (Value Text)
featureTransformationParameters :: Maybe (Map Text (Value Text))
hpoConfig :: Maybe HpoConfigProperty
..}
instance Property "AutoMLConfig" SolutionConfigProperty where
type PropertyType "AutoMLConfig" SolutionConfigProperty = AutoMLConfigProperty
set :: PropertyType "AutoMLConfig" SolutionConfigProperty
-> SolutionConfigProperty -> SolutionConfigProperty
set PropertyType "AutoMLConfig" SolutionConfigProperty
newValue SolutionConfigProperty {Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe AutoMLConfigProperty
Maybe HpoConfigProperty
()
haddock_workaround_ :: SolutionConfigProperty -> ()
algorithmHyperParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
autoMLConfig :: SolutionConfigProperty -> Maybe AutoMLConfigProperty
eventValueThreshold :: SolutionConfigProperty -> Maybe (Value Text)
featureTransformationParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
hpoConfig :: SolutionConfigProperty -> Maybe HpoConfigProperty
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
autoMLConfig :: Maybe AutoMLConfigProperty
eventValueThreshold :: Maybe (Value Text)
featureTransformationParameters :: Maybe (Map Text (Value Text))
hpoConfig :: Maybe HpoConfigProperty
..}
= SolutionConfigProperty {autoMLConfig :: Maybe AutoMLConfigProperty
autoMLConfig = AutoMLConfigProperty -> Maybe AutoMLConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AutoMLConfig" SolutionConfigProperty
AutoMLConfigProperty
newValue, Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe HpoConfigProperty
()
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
eventValueThreshold :: Maybe (Value Text)
featureTransformationParameters :: Maybe (Map Text (Value Text))
hpoConfig :: Maybe HpoConfigProperty
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
eventValueThreshold :: Maybe (Value Text)
featureTransformationParameters :: Maybe (Map Text (Value Text))
hpoConfig :: Maybe HpoConfigProperty
..}
instance Property "EventValueThreshold" SolutionConfigProperty where
type PropertyType "EventValueThreshold" SolutionConfigProperty = Value Prelude.Text
set :: PropertyType "EventValueThreshold" SolutionConfigProperty
-> SolutionConfigProperty -> SolutionConfigProperty
set PropertyType "EventValueThreshold" SolutionConfigProperty
newValue SolutionConfigProperty {Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe AutoMLConfigProperty
Maybe HpoConfigProperty
()
haddock_workaround_ :: SolutionConfigProperty -> ()
algorithmHyperParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
autoMLConfig :: SolutionConfigProperty -> Maybe AutoMLConfigProperty
eventValueThreshold :: SolutionConfigProperty -> Maybe (Value Text)
featureTransformationParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
hpoConfig :: SolutionConfigProperty -> Maybe HpoConfigProperty
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
autoMLConfig :: Maybe AutoMLConfigProperty
eventValueThreshold :: Maybe (Value Text)
featureTransformationParameters :: Maybe (Map Text (Value Text))
hpoConfig :: Maybe HpoConfigProperty
..}
= SolutionConfigProperty
{eventValueThreshold :: Maybe (Value Text)
eventValueThreshold = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EventValueThreshold" SolutionConfigProperty
Value Text
newValue, Maybe (Map Text (Value Text))
Maybe AutoMLConfigProperty
Maybe HpoConfigProperty
()
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
autoMLConfig :: Maybe AutoMLConfigProperty
featureTransformationParameters :: Maybe (Map Text (Value Text))
hpoConfig :: Maybe HpoConfigProperty
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
autoMLConfig :: Maybe AutoMLConfigProperty
featureTransformationParameters :: Maybe (Map Text (Value Text))
hpoConfig :: Maybe HpoConfigProperty
..}
instance Property "FeatureTransformationParameters" SolutionConfigProperty where
type PropertyType "FeatureTransformationParameters" SolutionConfigProperty = Prelude.Map Prelude.Text (Value Prelude.Text)
set :: PropertyType
"FeatureTransformationParameters" SolutionConfigProperty
-> SolutionConfigProperty -> SolutionConfigProperty
set PropertyType
"FeatureTransformationParameters" SolutionConfigProperty
newValue SolutionConfigProperty {Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe AutoMLConfigProperty
Maybe HpoConfigProperty
()
haddock_workaround_ :: SolutionConfigProperty -> ()
algorithmHyperParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
autoMLConfig :: SolutionConfigProperty -> Maybe AutoMLConfigProperty
eventValueThreshold :: SolutionConfigProperty -> Maybe (Value Text)
featureTransformationParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
hpoConfig :: SolutionConfigProperty -> Maybe HpoConfigProperty
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
autoMLConfig :: Maybe AutoMLConfigProperty
eventValueThreshold :: Maybe (Value Text)
featureTransformationParameters :: Maybe (Map Text (Value Text))
hpoConfig :: Maybe HpoConfigProperty
..}
= SolutionConfigProperty
{featureTransformationParameters :: Maybe (Map Text (Value Text))
featureTransformationParameters = 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
"FeatureTransformationParameters" SolutionConfigProperty
newValue, Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe AutoMLConfigProperty
Maybe HpoConfigProperty
()
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
autoMLConfig :: Maybe AutoMLConfigProperty
eventValueThreshold :: Maybe (Value Text)
hpoConfig :: Maybe HpoConfigProperty
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
autoMLConfig :: Maybe AutoMLConfigProperty
eventValueThreshold :: Maybe (Value Text)
hpoConfig :: Maybe HpoConfigProperty
..}
instance Property "HpoConfig" SolutionConfigProperty where
type PropertyType "HpoConfig" SolutionConfigProperty = HpoConfigProperty
set :: PropertyType "HpoConfig" SolutionConfigProperty
-> SolutionConfigProperty -> SolutionConfigProperty
set PropertyType "HpoConfig" SolutionConfigProperty
newValue SolutionConfigProperty {Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe AutoMLConfigProperty
Maybe HpoConfigProperty
()
haddock_workaround_ :: SolutionConfigProperty -> ()
algorithmHyperParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
autoMLConfig :: SolutionConfigProperty -> Maybe AutoMLConfigProperty
eventValueThreshold :: SolutionConfigProperty -> Maybe (Value Text)
featureTransformationParameters :: SolutionConfigProperty -> Maybe (Map Text (Value Text))
hpoConfig :: SolutionConfigProperty -> Maybe HpoConfigProperty
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
autoMLConfig :: Maybe AutoMLConfigProperty
eventValueThreshold :: Maybe (Value Text)
featureTransformationParameters :: Maybe (Map Text (Value Text))
hpoConfig :: Maybe HpoConfigProperty
..}
= SolutionConfigProperty {hpoConfig :: Maybe HpoConfigProperty
hpoConfig = HpoConfigProperty -> Maybe HpoConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "HpoConfig" SolutionConfigProperty
HpoConfigProperty
newValue, Maybe (Map Text (Value Text))
Maybe (Value Text)
Maybe AutoMLConfigProperty
()
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
autoMLConfig :: Maybe AutoMLConfigProperty
eventValueThreshold :: Maybe (Value Text)
featureTransformationParameters :: Maybe (Map Text (Value Text))
haddock_workaround_ :: ()
algorithmHyperParameters :: Maybe (Map Text (Value Text))
autoMLConfig :: Maybe AutoMLConfigProperty
eventValueThreshold :: Maybe (Value Text)
featureTransformationParameters :: Maybe (Map Text (Value Text))
..}