{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.SageMaker.CreateModelBiasJobDefinition
(
CreateModelBiasJobDefinition (..),
newCreateModelBiasJobDefinition,
createModelBiasJobDefinition_modelBiasBaselineConfig,
createModelBiasJobDefinition_stoppingCondition,
createModelBiasJobDefinition_networkConfig,
createModelBiasJobDefinition_tags,
createModelBiasJobDefinition_jobDefinitionName,
createModelBiasJobDefinition_modelBiasAppSpecification,
createModelBiasJobDefinition_modelBiasJobInput,
createModelBiasJobDefinition_modelBiasJobOutputConfig,
createModelBiasJobDefinition_jobResources,
createModelBiasJobDefinition_roleArn,
CreateModelBiasJobDefinitionResponse (..),
newCreateModelBiasJobDefinitionResponse,
createModelBiasJobDefinitionResponse_httpStatus,
createModelBiasJobDefinitionResponse_jobDefinitionArn,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.SageMaker.Types
data CreateModelBiasJobDefinition = CreateModelBiasJobDefinition'
{
CreateModelBiasJobDefinition -> Maybe ModelBiasBaselineConfig
modelBiasBaselineConfig :: Prelude.Maybe ModelBiasBaselineConfig,
CreateModelBiasJobDefinition -> Maybe MonitoringStoppingCondition
stoppingCondition :: Prelude.Maybe MonitoringStoppingCondition,
CreateModelBiasJobDefinition -> Maybe MonitoringNetworkConfig
networkConfig :: Prelude.Maybe MonitoringNetworkConfig,
CreateModelBiasJobDefinition -> Maybe [Tag]
tags :: Prelude.Maybe [Tag],
CreateModelBiasJobDefinition -> Text
jobDefinitionName :: Prelude.Text,
CreateModelBiasJobDefinition -> ModelBiasAppSpecification
modelBiasAppSpecification :: ModelBiasAppSpecification,
CreateModelBiasJobDefinition -> ModelBiasJobInput
modelBiasJobInput :: ModelBiasJobInput,
CreateModelBiasJobDefinition -> MonitoringOutputConfig
modelBiasJobOutputConfig :: MonitoringOutputConfig,
CreateModelBiasJobDefinition -> MonitoringResources
jobResources :: MonitoringResources,
CreateModelBiasJobDefinition -> Text
roleArn :: Prelude.Text
}
deriving (CreateModelBiasJobDefinition
-> CreateModelBiasJobDefinition -> Bool
(CreateModelBiasJobDefinition
-> CreateModelBiasJobDefinition -> Bool)
-> (CreateModelBiasJobDefinition
-> CreateModelBiasJobDefinition -> Bool)
-> Eq CreateModelBiasJobDefinition
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateModelBiasJobDefinition
-> CreateModelBiasJobDefinition -> Bool
$c/= :: CreateModelBiasJobDefinition
-> CreateModelBiasJobDefinition -> Bool
== :: CreateModelBiasJobDefinition
-> CreateModelBiasJobDefinition -> Bool
$c== :: CreateModelBiasJobDefinition
-> CreateModelBiasJobDefinition -> Bool
Prelude.Eq, ReadPrec [CreateModelBiasJobDefinition]
ReadPrec CreateModelBiasJobDefinition
Int -> ReadS CreateModelBiasJobDefinition
ReadS [CreateModelBiasJobDefinition]
(Int -> ReadS CreateModelBiasJobDefinition)
-> ReadS [CreateModelBiasJobDefinition]
-> ReadPrec CreateModelBiasJobDefinition
-> ReadPrec [CreateModelBiasJobDefinition]
-> Read CreateModelBiasJobDefinition
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateModelBiasJobDefinition]
$creadListPrec :: ReadPrec [CreateModelBiasJobDefinition]
readPrec :: ReadPrec CreateModelBiasJobDefinition
$creadPrec :: ReadPrec CreateModelBiasJobDefinition
readList :: ReadS [CreateModelBiasJobDefinition]
$creadList :: ReadS [CreateModelBiasJobDefinition]
readsPrec :: Int -> ReadS CreateModelBiasJobDefinition
$creadsPrec :: Int -> ReadS CreateModelBiasJobDefinition
Prelude.Read, Int -> CreateModelBiasJobDefinition -> ShowS
[CreateModelBiasJobDefinition] -> ShowS
CreateModelBiasJobDefinition -> String
(Int -> CreateModelBiasJobDefinition -> ShowS)
-> (CreateModelBiasJobDefinition -> String)
-> ([CreateModelBiasJobDefinition] -> ShowS)
-> Show CreateModelBiasJobDefinition
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateModelBiasJobDefinition] -> ShowS
$cshowList :: [CreateModelBiasJobDefinition] -> ShowS
show :: CreateModelBiasJobDefinition -> String
$cshow :: CreateModelBiasJobDefinition -> String
showsPrec :: Int -> CreateModelBiasJobDefinition -> ShowS
$cshowsPrec :: Int -> CreateModelBiasJobDefinition -> ShowS
Prelude.Show, (forall x.
CreateModelBiasJobDefinition -> Rep CreateModelBiasJobDefinition x)
-> (forall x.
Rep CreateModelBiasJobDefinition x -> CreateModelBiasJobDefinition)
-> Generic CreateModelBiasJobDefinition
forall x.
Rep CreateModelBiasJobDefinition x -> CreateModelBiasJobDefinition
forall x.
CreateModelBiasJobDefinition -> Rep CreateModelBiasJobDefinition x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CreateModelBiasJobDefinition x -> CreateModelBiasJobDefinition
$cfrom :: forall x.
CreateModelBiasJobDefinition -> Rep CreateModelBiasJobDefinition x
Prelude.Generic)
newCreateModelBiasJobDefinition ::
Prelude.Text ->
ModelBiasAppSpecification ->
ModelBiasJobInput ->
MonitoringOutputConfig ->
MonitoringResources ->
Prelude.Text ->
CreateModelBiasJobDefinition
newCreateModelBiasJobDefinition :: Text
-> ModelBiasAppSpecification
-> ModelBiasJobInput
-> MonitoringOutputConfig
-> MonitoringResources
-> Text
-> CreateModelBiasJobDefinition
newCreateModelBiasJobDefinition
Text
pJobDefinitionName_
ModelBiasAppSpecification
pModelBiasAppSpecification_
ModelBiasJobInput
pModelBiasJobInput_
MonitoringOutputConfig
pModelBiasJobOutputConfig_
MonitoringResources
pJobResources_
Text
pRoleArn_ =
CreateModelBiasJobDefinition' :: Maybe ModelBiasBaselineConfig
-> Maybe MonitoringStoppingCondition
-> Maybe MonitoringNetworkConfig
-> Maybe [Tag]
-> Text
-> ModelBiasAppSpecification
-> ModelBiasJobInput
-> MonitoringOutputConfig
-> MonitoringResources
-> Text
-> CreateModelBiasJobDefinition
CreateModelBiasJobDefinition'
{ $sel:modelBiasBaselineConfig:CreateModelBiasJobDefinition' :: Maybe ModelBiasBaselineConfig
modelBiasBaselineConfig =
Maybe ModelBiasBaselineConfig
forall a. Maybe a
Prelude.Nothing,
$sel:stoppingCondition:CreateModelBiasJobDefinition' :: Maybe MonitoringStoppingCondition
stoppingCondition = Maybe MonitoringStoppingCondition
forall a. Maybe a
Prelude.Nothing,
$sel:networkConfig:CreateModelBiasJobDefinition' :: Maybe MonitoringNetworkConfig
networkConfig = Maybe MonitoringNetworkConfig
forall a. Maybe a
Prelude.Nothing,
$sel:tags:CreateModelBiasJobDefinition' :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing,
$sel:jobDefinitionName:CreateModelBiasJobDefinition' :: Text
jobDefinitionName = Text
pJobDefinitionName_,
$sel:modelBiasAppSpecification:CreateModelBiasJobDefinition' :: ModelBiasAppSpecification
modelBiasAppSpecification =
ModelBiasAppSpecification
pModelBiasAppSpecification_,
$sel:modelBiasJobInput:CreateModelBiasJobDefinition' :: ModelBiasJobInput
modelBiasJobInput = ModelBiasJobInput
pModelBiasJobInput_,
$sel:modelBiasJobOutputConfig:CreateModelBiasJobDefinition' :: MonitoringOutputConfig
modelBiasJobOutputConfig =
MonitoringOutputConfig
pModelBiasJobOutputConfig_,
$sel:jobResources:CreateModelBiasJobDefinition' :: MonitoringResources
jobResources = MonitoringResources
pJobResources_,
$sel:roleArn:CreateModelBiasJobDefinition' :: Text
roleArn = Text
pRoleArn_
}
createModelBiasJobDefinition_modelBiasBaselineConfig :: Lens.Lens' CreateModelBiasJobDefinition (Prelude.Maybe ModelBiasBaselineConfig)
createModelBiasJobDefinition_modelBiasBaselineConfig :: (Maybe ModelBiasBaselineConfig
-> f (Maybe ModelBiasBaselineConfig))
-> CreateModelBiasJobDefinition -> f CreateModelBiasJobDefinition
createModelBiasJobDefinition_modelBiasBaselineConfig = (CreateModelBiasJobDefinition -> Maybe ModelBiasBaselineConfig)
-> (CreateModelBiasJobDefinition
-> Maybe ModelBiasBaselineConfig -> CreateModelBiasJobDefinition)
-> Lens
CreateModelBiasJobDefinition
CreateModelBiasJobDefinition
(Maybe ModelBiasBaselineConfig)
(Maybe ModelBiasBaselineConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateModelBiasJobDefinition' {Maybe ModelBiasBaselineConfig
modelBiasBaselineConfig :: Maybe ModelBiasBaselineConfig
$sel:modelBiasBaselineConfig:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> Maybe ModelBiasBaselineConfig
modelBiasBaselineConfig} -> Maybe ModelBiasBaselineConfig
modelBiasBaselineConfig) (\s :: CreateModelBiasJobDefinition
s@CreateModelBiasJobDefinition' {} Maybe ModelBiasBaselineConfig
a -> CreateModelBiasJobDefinition
s {$sel:modelBiasBaselineConfig:CreateModelBiasJobDefinition' :: Maybe ModelBiasBaselineConfig
modelBiasBaselineConfig = Maybe ModelBiasBaselineConfig
a} :: CreateModelBiasJobDefinition)
createModelBiasJobDefinition_stoppingCondition :: Lens.Lens' CreateModelBiasJobDefinition (Prelude.Maybe MonitoringStoppingCondition)
createModelBiasJobDefinition_stoppingCondition :: (Maybe MonitoringStoppingCondition
-> f (Maybe MonitoringStoppingCondition))
-> CreateModelBiasJobDefinition -> f CreateModelBiasJobDefinition
createModelBiasJobDefinition_stoppingCondition = (CreateModelBiasJobDefinition -> Maybe MonitoringStoppingCondition)
-> (CreateModelBiasJobDefinition
-> Maybe MonitoringStoppingCondition
-> CreateModelBiasJobDefinition)
-> Lens
CreateModelBiasJobDefinition
CreateModelBiasJobDefinition
(Maybe MonitoringStoppingCondition)
(Maybe MonitoringStoppingCondition)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateModelBiasJobDefinition' {Maybe MonitoringStoppingCondition
stoppingCondition :: Maybe MonitoringStoppingCondition
$sel:stoppingCondition:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> Maybe MonitoringStoppingCondition
stoppingCondition} -> Maybe MonitoringStoppingCondition
stoppingCondition) (\s :: CreateModelBiasJobDefinition
s@CreateModelBiasJobDefinition' {} Maybe MonitoringStoppingCondition
a -> CreateModelBiasJobDefinition
s {$sel:stoppingCondition:CreateModelBiasJobDefinition' :: Maybe MonitoringStoppingCondition
stoppingCondition = Maybe MonitoringStoppingCondition
a} :: CreateModelBiasJobDefinition)
createModelBiasJobDefinition_networkConfig :: Lens.Lens' CreateModelBiasJobDefinition (Prelude.Maybe MonitoringNetworkConfig)
createModelBiasJobDefinition_networkConfig :: (Maybe MonitoringNetworkConfig
-> f (Maybe MonitoringNetworkConfig))
-> CreateModelBiasJobDefinition -> f CreateModelBiasJobDefinition
createModelBiasJobDefinition_networkConfig = (CreateModelBiasJobDefinition -> Maybe MonitoringNetworkConfig)
-> (CreateModelBiasJobDefinition
-> Maybe MonitoringNetworkConfig -> CreateModelBiasJobDefinition)
-> Lens
CreateModelBiasJobDefinition
CreateModelBiasJobDefinition
(Maybe MonitoringNetworkConfig)
(Maybe MonitoringNetworkConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateModelBiasJobDefinition' {Maybe MonitoringNetworkConfig
networkConfig :: Maybe MonitoringNetworkConfig
$sel:networkConfig:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> Maybe MonitoringNetworkConfig
networkConfig} -> Maybe MonitoringNetworkConfig
networkConfig) (\s :: CreateModelBiasJobDefinition
s@CreateModelBiasJobDefinition' {} Maybe MonitoringNetworkConfig
a -> CreateModelBiasJobDefinition
s {$sel:networkConfig:CreateModelBiasJobDefinition' :: Maybe MonitoringNetworkConfig
networkConfig = Maybe MonitoringNetworkConfig
a} :: CreateModelBiasJobDefinition)
createModelBiasJobDefinition_tags :: Lens.Lens' CreateModelBiasJobDefinition (Prelude.Maybe [Tag])
createModelBiasJobDefinition_tags :: (Maybe [Tag] -> f (Maybe [Tag]))
-> CreateModelBiasJobDefinition -> f CreateModelBiasJobDefinition
createModelBiasJobDefinition_tags = (CreateModelBiasJobDefinition -> Maybe [Tag])
-> (CreateModelBiasJobDefinition
-> Maybe [Tag] -> CreateModelBiasJobDefinition)
-> Lens
CreateModelBiasJobDefinition
CreateModelBiasJobDefinition
(Maybe [Tag])
(Maybe [Tag])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateModelBiasJobDefinition' {Maybe [Tag]
tags :: Maybe [Tag]
$sel:tags:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> Maybe [Tag]
tags} -> Maybe [Tag]
tags) (\s :: CreateModelBiasJobDefinition
s@CreateModelBiasJobDefinition' {} Maybe [Tag]
a -> CreateModelBiasJobDefinition
s {$sel:tags:CreateModelBiasJobDefinition' :: Maybe [Tag]
tags = Maybe [Tag]
a} :: CreateModelBiasJobDefinition) ((Maybe [Tag] -> f (Maybe [Tag]))
-> CreateModelBiasJobDefinition -> f CreateModelBiasJobDefinition)
-> ((Maybe [Tag] -> f (Maybe [Tag]))
-> Maybe [Tag] -> f (Maybe [Tag]))
-> (Maybe [Tag] -> f (Maybe [Tag]))
-> CreateModelBiasJobDefinition
-> f CreateModelBiasJobDefinition
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso [Tag] [Tag] [Tag] [Tag]
-> Iso (Maybe [Tag]) (Maybe [Tag]) (Maybe [Tag]) (Maybe [Tag])
forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping AnIso [Tag] [Tag] [Tag] [Tag]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
createModelBiasJobDefinition_jobDefinitionName :: Lens.Lens' CreateModelBiasJobDefinition Prelude.Text
createModelBiasJobDefinition_jobDefinitionName :: (Text -> f Text)
-> CreateModelBiasJobDefinition -> f CreateModelBiasJobDefinition
createModelBiasJobDefinition_jobDefinitionName = (CreateModelBiasJobDefinition -> Text)
-> (CreateModelBiasJobDefinition
-> Text -> CreateModelBiasJobDefinition)
-> Lens
CreateModelBiasJobDefinition CreateModelBiasJobDefinition Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateModelBiasJobDefinition' {Text
jobDefinitionName :: Text
$sel:jobDefinitionName:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> Text
jobDefinitionName} -> Text
jobDefinitionName) (\s :: CreateModelBiasJobDefinition
s@CreateModelBiasJobDefinition' {} Text
a -> CreateModelBiasJobDefinition
s {$sel:jobDefinitionName:CreateModelBiasJobDefinition' :: Text
jobDefinitionName = Text
a} :: CreateModelBiasJobDefinition)
createModelBiasJobDefinition_modelBiasAppSpecification :: Lens.Lens' CreateModelBiasJobDefinition ModelBiasAppSpecification
createModelBiasJobDefinition_modelBiasAppSpecification :: (ModelBiasAppSpecification -> f ModelBiasAppSpecification)
-> CreateModelBiasJobDefinition -> f CreateModelBiasJobDefinition
createModelBiasJobDefinition_modelBiasAppSpecification = (CreateModelBiasJobDefinition -> ModelBiasAppSpecification)
-> (CreateModelBiasJobDefinition
-> ModelBiasAppSpecification -> CreateModelBiasJobDefinition)
-> Lens
CreateModelBiasJobDefinition
CreateModelBiasJobDefinition
ModelBiasAppSpecification
ModelBiasAppSpecification
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateModelBiasJobDefinition' {ModelBiasAppSpecification
modelBiasAppSpecification :: ModelBiasAppSpecification
$sel:modelBiasAppSpecification:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> ModelBiasAppSpecification
modelBiasAppSpecification} -> ModelBiasAppSpecification
modelBiasAppSpecification) (\s :: CreateModelBiasJobDefinition
s@CreateModelBiasJobDefinition' {} ModelBiasAppSpecification
a -> CreateModelBiasJobDefinition
s {$sel:modelBiasAppSpecification:CreateModelBiasJobDefinition' :: ModelBiasAppSpecification
modelBiasAppSpecification = ModelBiasAppSpecification
a} :: CreateModelBiasJobDefinition)
createModelBiasJobDefinition_modelBiasJobInput :: Lens.Lens' CreateModelBiasJobDefinition ModelBiasJobInput
createModelBiasJobDefinition_modelBiasJobInput :: (ModelBiasJobInput -> f ModelBiasJobInput)
-> CreateModelBiasJobDefinition -> f CreateModelBiasJobDefinition
createModelBiasJobDefinition_modelBiasJobInput = (CreateModelBiasJobDefinition -> ModelBiasJobInput)
-> (CreateModelBiasJobDefinition
-> ModelBiasJobInput -> CreateModelBiasJobDefinition)
-> Lens
CreateModelBiasJobDefinition
CreateModelBiasJobDefinition
ModelBiasJobInput
ModelBiasJobInput
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateModelBiasJobDefinition' {ModelBiasJobInput
modelBiasJobInput :: ModelBiasJobInput
$sel:modelBiasJobInput:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> ModelBiasJobInput
modelBiasJobInput} -> ModelBiasJobInput
modelBiasJobInput) (\s :: CreateModelBiasJobDefinition
s@CreateModelBiasJobDefinition' {} ModelBiasJobInput
a -> CreateModelBiasJobDefinition
s {$sel:modelBiasJobInput:CreateModelBiasJobDefinition' :: ModelBiasJobInput
modelBiasJobInput = ModelBiasJobInput
a} :: CreateModelBiasJobDefinition)
createModelBiasJobDefinition_modelBiasJobOutputConfig :: Lens.Lens' CreateModelBiasJobDefinition MonitoringOutputConfig
createModelBiasJobDefinition_modelBiasJobOutputConfig :: (MonitoringOutputConfig -> f MonitoringOutputConfig)
-> CreateModelBiasJobDefinition -> f CreateModelBiasJobDefinition
createModelBiasJobDefinition_modelBiasJobOutputConfig = (CreateModelBiasJobDefinition -> MonitoringOutputConfig)
-> (CreateModelBiasJobDefinition
-> MonitoringOutputConfig -> CreateModelBiasJobDefinition)
-> Lens
CreateModelBiasJobDefinition
CreateModelBiasJobDefinition
MonitoringOutputConfig
MonitoringOutputConfig
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateModelBiasJobDefinition' {MonitoringOutputConfig
modelBiasJobOutputConfig :: MonitoringOutputConfig
$sel:modelBiasJobOutputConfig:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> MonitoringOutputConfig
modelBiasJobOutputConfig} -> MonitoringOutputConfig
modelBiasJobOutputConfig) (\s :: CreateModelBiasJobDefinition
s@CreateModelBiasJobDefinition' {} MonitoringOutputConfig
a -> CreateModelBiasJobDefinition
s {$sel:modelBiasJobOutputConfig:CreateModelBiasJobDefinition' :: MonitoringOutputConfig
modelBiasJobOutputConfig = MonitoringOutputConfig
a} :: CreateModelBiasJobDefinition)
createModelBiasJobDefinition_jobResources :: Lens.Lens' CreateModelBiasJobDefinition MonitoringResources
createModelBiasJobDefinition_jobResources :: (MonitoringResources -> f MonitoringResources)
-> CreateModelBiasJobDefinition -> f CreateModelBiasJobDefinition
createModelBiasJobDefinition_jobResources = (CreateModelBiasJobDefinition -> MonitoringResources)
-> (CreateModelBiasJobDefinition
-> MonitoringResources -> CreateModelBiasJobDefinition)
-> Lens
CreateModelBiasJobDefinition
CreateModelBiasJobDefinition
MonitoringResources
MonitoringResources
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateModelBiasJobDefinition' {MonitoringResources
jobResources :: MonitoringResources
$sel:jobResources:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> MonitoringResources
jobResources} -> MonitoringResources
jobResources) (\s :: CreateModelBiasJobDefinition
s@CreateModelBiasJobDefinition' {} MonitoringResources
a -> CreateModelBiasJobDefinition
s {$sel:jobResources:CreateModelBiasJobDefinition' :: MonitoringResources
jobResources = MonitoringResources
a} :: CreateModelBiasJobDefinition)
createModelBiasJobDefinition_roleArn :: Lens.Lens' CreateModelBiasJobDefinition Prelude.Text
createModelBiasJobDefinition_roleArn :: (Text -> f Text)
-> CreateModelBiasJobDefinition -> f CreateModelBiasJobDefinition
createModelBiasJobDefinition_roleArn = (CreateModelBiasJobDefinition -> Text)
-> (CreateModelBiasJobDefinition
-> Text -> CreateModelBiasJobDefinition)
-> Lens
CreateModelBiasJobDefinition CreateModelBiasJobDefinition Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateModelBiasJobDefinition' {Text
roleArn :: Text
$sel:roleArn:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> Text
roleArn} -> Text
roleArn) (\s :: CreateModelBiasJobDefinition
s@CreateModelBiasJobDefinition' {} Text
a -> CreateModelBiasJobDefinition
s {$sel:roleArn:CreateModelBiasJobDefinition' :: Text
roleArn = Text
a} :: CreateModelBiasJobDefinition)
instance Core.AWSRequest CreateModelBiasJobDefinition where
type
AWSResponse CreateModelBiasJobDefinition =
CreateModelBiasJobDefinitionResponse
request :: CreateModelBiasJobDefinition
-> Request CreateModelBiasJobDefinition
request = Service
-> CreateModelBiasJobDefinition
-> Request CreateModelBiasJobDefinition
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON Service
defaultService
response :: Logger
-> Service
-> Proxy CreateModelBiasJobDefinition
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse CreateModelBiasJobDefinition)))
response =
(Int
-> ResponseHeaders
-> Object
-> Either String (AWSResponse CreateModelBiasJobDefinition))
-> Logger
-> Service
-> Proxy CreateModelBiasJobDefinition
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse CreateModelBiasJobDefinition)))
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> Logger
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Int -> Text -> CreateModelBiasJobDefinitionResponse
CreateModelBiasJobDefinitionResponse'
(Int -> Text -> CreateModelBiasJobDefinitionResponse)
-> Either String Int
-> Either String (Text -> CreateModelBiasJobDefinitionResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Int -> Either String Int
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (Int -> Int
forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
Either String (Text -> CreateModelBiasJobDefinitionResponse)
-> Either String Text
-> Either String CreateModelBiasJobDefinitionResponse
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String Text
forall a. FromJSON a => Object -> Text -> Either String a
Core..:> Text
"JobDefinitionArn")
)
instance
Prelude.Hashable
CreateModelBiasJobDefinition
instance Prelude.NFData CreateModelBiasJobDefinition
instance Core.ToHeaders CreateModelBiasJobDefinition where
toHeaders :: CreateModelBiasJobDefinition -> ResponseHeaders
toHeaders =
ResponseHeaders -> CreateModelBiasJobDefinition -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const
( [ResponseHeaders] -> ResponseHeaders
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"SageMaker.CreateModelBiasJobDefinition" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
HeaderName -> ByteString -> ResponseHeaders
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Core.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Core.ToJSON CreateModelBiasJobDefinition where
toJSON :: CreateModelBiasJobDefinition -> Value
toJSON CreateModelBiasJobDefinition' {Maybe [Tag]
Maybe ModelBiasBaselineConfig
Maybe MonitoringStoppingCondition
Maybe MonitoringNetworkConfig
Text
ModelBiasAppSpecification
MonitoringResources
ModelBiasJobInput
MonitoringOutputConfig
roleArn :: Text
jobResources :: MonitoringResources
modelBiasJobOutputConfig :: MonitoringOutputConfig
modelBiasJobInput :: ModelBiasJobInput
modelBiasAppSpecification :: ModelBiasAppSpecification
jobDefinitionName :: Text
tags :: Maybe [Tag]
networkConfig :: Maybe MonitoringNetworkConfig
stoppingCondition :: Maybe MonitoringStoppingCondition
modelBiasBaselineConfig :: Maybe ModelBiasBaselineConfig
$sel:roleArn:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> Text
$sel:jobResources:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> MonitoringResources
$sel:modelBiasJobOutputConfig:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> MonitoringOutputConfig
$sel:modelBiasJobInput:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> ModelBiasJobInput
$sel:modelBiasAppSpecification:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> ModelBiasAppSpecification
$sel:jobDefinitionName:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> Text
$sel:tags:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> Maybe [Tag]
$sel:networkConfig:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> Maybe MonitoringNetworkConfig
$sel:stoppingCondition:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> Maybe MonitoringStoppingCondition
$sel:modelBiasBaselineConfig:CreateModelBiasJobDefinition' :: CreateModelBiasJobDefinition -> Maybe ModelBiasBaselineConfig
..} =
[Pair] -> Value
Core.object
( [Maybe Pair] -> [Pair]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Text
"ModelBiasBaselineConfig" Text -> ModelBiasBaselineConfig -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(ModelBiasBaselineConfig -> Pair)
-> Maybe ModelBiasBaselineConfig -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ModelBiasBaselineConfig
modelBiasBaselineConfig,
(Text
"StoppingCondition" Text -> MonitoringStoppingCondition -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
(MonitoringStoppingCondition -> Pair)
-> Maybe MonitoringStoppingCondition -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe MonitoringStoppingCondition
stoppingCondition,
(Text
"NetworkConfig" Text -> MonitoringNetworkConfig -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (MonitoringNetworkConfig -> Pair)
-> Maybe MonitoringNetworkConfig -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe MonitoringNetworkConfig
networkConfig,
(Text
"Tags" Text -> [Tag] -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) ([Tag] -> Pair) -> Maybe [Tag] -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags,
Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just
(Text
"JobDefinitionName" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= Text
jobDefinitionName),
Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just
( Text
"ModelBiasAppSpecification"
Text -> ModelBiasAppSpecification -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= ModelBiasAppSpecification
modelBiasAppSpecification
),
Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just
(Text
"ModelBiasJobInput" Text -> ModelBiasJobInput -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= ModelBiasJobInput
modelBiasJobInput),
Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just
( Text
"ModelBiasJobOutputConfig"
Text -> MonitoringOutputConfig -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= MonitoringOutputConfig
modelBiasJobOutputConfig
),
Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just (Text
"JobResources" Text -> MonitoringResources -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= MonitoringResources
jobResources),
Pair -> Maybe Pair
forall a. a -> Maybe a
Prelude.Just (Text
"RoleArn" Text -> Text -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..= Text
roleArn)
]
)
instance Core.ToPath CreateModelBiasJobDefinition where
toPath :: CreateModelBiasJobDefinition -> ByteString
toPath = ByteString -> CreateModelBiasJobDefinition -> ByteString
forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Core.ToQuery CreateModelBiasJobDefinition where
toQuery :: CreateModelBiasJobDefinition -> QueryString
toQuery = QueryString -> CreateModelBiasJobDefinition -> QueryString
forall a b. a -> b -> a
Prelude.const QueryString
forall a. Monoid a => a
Prelude.mempty
data CreateModelBiasJobDefinitionResponse = CreateModelBiasJobDefinitionResponse'
{
CreateModelBiasJobDefinitionResponse -> Int
httpStatus :: Prelude.Int,
CreateModelBiasJobDefinitionResponse -> Text
jobDefinitionArn :: Prelude.Text
}
deriving (CreateModelBiasJobDefinitionResponse
-> CreateModelBiasJobDefinitionResponse -> Bool
(CreateModelBiasJobDefinitionResponse
-> CreateModelBiasJobDefinitionResponse -> Bool)
-> (CreateModelBiasJobDefinitionResponse
-> CreateModelBiasJobDefinitionResponse -> Bool)
-> Eq CreateModelBiasJobDefinitionResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateModelBiasJobDefinitionResponse
-> CreateModelBiasJobDefinitionResponse -> Bool
$c/= :: CreateModelBiasJobDefinitionResponse
-> CreateModelBiasJobDefinitionResponse -> Bool
== :: CreateModelBiasJobDefinitionResponse
-> CreateModelBiasJobDefinitionResponse -> Bool
$c== :: CreateModelBiasJobDefinitionResponse
-> CreateModelBiasJobDefinitionResponse -> Bool
Prelude.Eq, ReadPrec [CreateModelBiasJobDefinitionResponse]
ReadPrec CreateModelBiasJobDefinitionResponse
Int -> ReadS CreateModelBiasJobDefinitionResponse
ReadS [CreateModelBiasJobDefinitionResponse]
(Int -> ReadS CreateModelBiasJobDefinitionResponse)
-> ReadS [CreateModelBiasJobDefinitionResponse]
-> ReadPrec CreateModelBiasJobDefinitionResponse
-> ReadPrec [CreateModelBiasJobDefinitionResponse]
-> Read CreateModelBiasJobDefinitionResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateModelBiasJobDefinitionResponse]
$creadListPrec :: ReadPrec [CreateModelBiasJobDefinitionResponse]
readPrec :: ReadPrec CreateModelBiasJobDefinitionResponse
$creadPrec :: ReadPrec CreateModelBiasJobDefinitionResponse
readList :: ReadS [CreateModelBiasJobDefinitionResponse]
$creadList :: ReadS [CreateModelBiasJobDefinitionResponse]
readsPrec :: Int -> ReadS CreateModelBiasJobDefinitionResponse
$creadsPrec :: Int -> ReadS CreateModelBiasJobDefinitionResponse
Prelude.Read, Int -> CreateModelBiasJobDefinitionResponse -> ShowS
[CreateModelBiasJobDefinitionResponse] -> ShowS
CreateModelBiasJobDefinitionResponse -> String
(Int -> CreateModelBiasJobDefinitionResponse -> ShowS)
-> (CreateModelBiasJobDefinitionResponse -> String)
-> ([CreateModelBiasJobDefinitionResponse] -> ShowS)
-> Show CreateModelBiasJobDefinitionResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateModelBiasJobDefinitionResponse] -> ShowS
$cshowList :: [CreateModelBiasJobDefinitionResponse] -> ShowS
show :: CreateModelBiasJobDefinitionResponse -> String
$cshow :: CreateModelBiasJobDefinitionResponse -> String
showsPrec :: Int -> CreateModelBiasJobDefinitionResponse -> ShowS
$cshowsPrec :: Int -> CreateModelBiasJobDefinitionResponse -> ShowS
Prelude.Show, (forall x.
CreateModelBiasJobDefinitionResponse
-> Rep CreateModelBiasJobDefinitionResponse x)
-> (forall x.
Rep CreateModelBiasJobDefinitionResponse x
-> CreateModelBiasJobDefinitionResponse)
-> Generic CreateModelBiasJobDefinitionResponse
forall x.
Rep CreateModelBiasJobDefinitionResponse x
-> CreateModelBiasJobDefinitionResponse
forall x.
CreateModelBiasJobDefinitionResponse
-> Rep CreateModelBiasJobDefinitionResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CreateModelBiasJobDefinitionResponse x
-> CreateModelBiasJobDefinitionResponse
$cfrom :: forall x.
CreateModelBiasJobDefinitionResponse
-> Rep CreateModelBiasJobDefinitionResponse x
Prelude.Generic)
newCreateModelBiasJobDefinitionResponse ::
Prelude.Int ->
Prelude.Text ->
CreateModelBiasJobDefinitionResponse
newCreateModelBiasJobDefinitionResponse :: Int -> Text -> CreateModelBiasJobDefinitionResponse
newCreateModelBiasJobDefinitionResponse
Int
pHttpStatus_
Text
pJobDefinitionArn_ =
CreateModelBiasJobDefinitionResponse' :: Int -> Text -> CreateModelBiasJobDefinitionResponse
CreateModelBiasJobDefinitionResponse'
{ $sel:httpStatus:CreateModelBiasJobDefinitionResponse' :: Int
httpStatus =
Int
pHttpStatus_,
$sel:jobDefinitionArn:CreateModelBiasJobDefinitionResponse' :: Text
jobDefinitionArn = Text
pJobDefinitionArn_
}
createModelBiasJobDefinitionResponse_httpStatus :: Lens.Lens' CreateModelBiasJobDefinitionResponse Prelude.Int
createModelBiasJobDefinitionResponse_httpStatus :: (Int -> f Int)
-> CreateModelBiasJobDefinitionResponse
-> f CreateModelBiasJobDefinitionResponse
createModelBiasJobDefinitionResponse_httpStatus = (CreateModelBiasJobDefinitionResponse -> Int)
-> (CreateModelBiasJobDefinitionResponse
-> Int -> CreateModelBiasJobDefinitionResponse)
-> Lens
CreateModelBiasJobDefinitionResponse
CreateModelBiasJobDefinitionResponse
Int
Int
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateModelBiasJobDefinitionResponse' {Int
httpStatus :: Int
$sel:httpStatus:CreateModelBiasJobDefinitionResponse' :: CreateModelBiasJobDefinitionResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: CreateModelBiasJobDefinitionResponse
s@CreateModelBiasJobDefinitionResponse' {} Int
a -> CreateModelBiasJobDefinitionResponse
s {$sel:httpStatus:CreateModelBiasJobDefinitionResponse' :: Int
httpStatus = Int
a} :: CreateModelBiasJobDefinitionResponse)
createModelBiasJobDefinitionResponse_jobDefinitionArn :: Lens.Lens' CreateModelBiasJobDefinitionResponse Prelude.Text
createModelBiasJobDefinitionResponse_jobDefinitionArn :: (Text -> f Text)
-> CreateModelBiasJobDefinitionResponse
-> f CreateModelBiasJobDefinitionResponse
createModelBiasJobDefinitionResponse_jobDefinitionArn = (CreateModelBiasJobDefinitionResponse -> Text)
-> (CreateModelBiasJobDefinitionResponse
-> Text -> CreateModelBiasJobDefinitionResponse)
-> Lens
CreateModelBiasJobDefinitionResponse
CreateModelBiasJobDefinitionResponse
Text
Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateModelBiasJobDefinitionResponse' {Text
jobDefinitionArn :: Text
$sel:jobDefinitionArn:CreateModelBiasJobDefinitionResponse' :: CreateModelBiasJobDefinitionResponse -> Text
jobDefinitionArn} -> Text
jobDefinitionArn) (\s :: CreateModelBiasJobDefinitionResponse
s@CreateModelBiasJobDefinitionResponse' {} Text
a -> CreateModelBiasJobDefinitionResponse
s {$sel:jobDefinitionArn:CreateModelBiasJobDefinitionResponse' :: Text
jobDefinitionArn = Text
a} :: CreateModelBiasJobDefinitionResponse)
instance
Prelude.NFData
CreateModelBiasJobDefinitionResponse