{-# 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.DeleteModelBiasJobDefinition
(
DeleteModelBiasJobDefinition (..),
newDeleteModelBiasJobDefinition,
deleteModelBiasJobDefinition_jobDefinitionName,
DeleteModelBiasJobDefinitionResponse (..),
newDeleteModelBiasJobDefinitionResponse,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.SageMaker.Types
data DeleteModelBiasJobDefinition = DeleteModelBiasJobDefinition'
{
DeleteModelBiasJobDefinition -> Text
jobDefinitionName :: Prelude.Text
}
deriving (DeleteModelBiasJobDefinition
-> DeleteModelBiasJobDefinition -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteModelBiasJobDefinition
-> DeleteModelBiasJobDefinition -> Bool
$c/= :: DeleteModelBiasJobDefinition
-> DeleteModelBiasJobDefinition -> Bool
== :: DeleteModelBiasJobDefinition
-> DeleteModelBiasJobDefinition -> Bool
$c== :: DeleteModelBiasJobDefinition
-> DeleteModelBiasJobDefinition -> Bool
Prelude.Eq, ReadPrec [DeleteModelBiasJobDefinition]
ReadPrec DeleteModelBiasJobDefinition
Int -> ReadS DeleteModelBiasJobDefinition
ReadS [DeleteModelBiasJobDefinition]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteModelBiasJobDefinition]
$creadListPrec :: ReadPrec [DeleteModelBiasJobDefinition]
readPrec :: ReadPrec DeleteModelBiasJobDefinition
$creadPrec :: ReadPrec DeleteModelBiasJobDefinition
readList :: ReadS [DeleteModelBiasJobDefinition]
$creadList :: ReadS [DeleteModelBiasJobDefinition]
readsPrec :: Int -> ReadS DeleteModelBiasJobDefinition
$creadsPrec :: Int -> ReadS DeleteModelBiasJobDefinition
Prelude.Read, Int -> DeleteModelBiasJobDefinition -> ShowS
[DeleteModelBiasJobDefinition] -> ShowS
DeleteModelBiasJobDefinition -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteModelBiasJobDefinition] -> ShowS
$cshowList :: [DeleteModelBiasJobDefinition] -> ShowS
show :: DeleteModelBiasJobDefinition -> String
$cshow :: DeleteModelBiasJobDefinition -> String
showsPrec :: Int -> DeleteModelBiasJobDefinition -> ShowS
$cshowsPrec :: Int -> DeleteModelBiasJobDefinition -> ShowS
Prelude.Show, forall x.
Rep DeleteModelBiasJobDefinition x -> DeleteModelBiasJobDefinition
forall x.
DeleteModelBiasJobDefinition -> Rep DeleteModelBiasJobDefinition x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteModelBiasJobDefinition x -> DeleteModelBiasJobDefinition
$cfrom :: forall x.
DeleteModelBiasJobDefinition -> Rep DeleteModelBiasJobDefinition x
Prelude.Generic)
newDeleteModelBiasJobDefinition ::
Prelude.Text ->
DeleteModelBiasJobDefinition
newDeleteModelBiasJobDefinition :: Text -> DeleteModelBiasJobDefinition
newDeleteModelBiasJobDefinition Text
pJobDefinitionName_ =
DeleteModelBiasJobDefinition'
{ $sel:jobDefinitionName:DeleteModelBiasJobDefinition' :: Text
jobDefinitionName =
Text
pJobDefinitionName_
}
deleteModelBiasJobDefinition_jobDefinitionName :: Lens.Lens' DeleteModelBiasJobDefinition Prelude.Text
deleteModelBiasJobDefinition_jobDefinitionName :: Lens' DeleteModelBiasJobDefinition Text
deleteModelBiasJobDefinition_jobDefinitionName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteModelBiasJobDefinition' {Text
jobDefinitionName :: Text
$sel:jobDefinitionName:DeleteModelBiasJobDefinition' :: DeleteModelBiasJobDefinition -> Text
jobDefinitionName} -> Text
jobDefinitionName) (\s :: DeleteModelBiasJobDefinition
s@DeleteModelBiasJobDefinition' {} Text
a -> DeleteModelBiasJobDefinition
s {$sel:jobDefinitionName:DeleteModelBiasJobDefinition' :: Text
jobDefinitionName = Text
a} :: DeleteModelBiasJobDefinition)
instance Core.AWSRequest DeleteModelBiasJobDefinition where
type
AWSResponse DeleteModelBiasJobDefinition =
DeleteModelBiasJobDefinitionResponse
request :: (Service -> Service)
-> DeleteModelBiasJobDefinition
-> Request DeleteModelBiasJobDefinition
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy DeleteModelBiasJobDefinition
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DeleteModelBiasJobDefinition)))
response =
forall (m :: * -> *) a.
MonadResource m =>
AWSResponse a
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveNull
DeleteModelBiasJobDefinitionResponse
DeleteModelBiasJobDefinitionResponse'
instance
Prelude.Hashable
DeleteModelBiasJobDefinition
where
hashWithSalt :: Int -> DeleteModelBiasJobDefinition -> Int
hashWithSalt Int
_salt DeleteModelBiasJobDefinition' {Text
jobDefinitionName :: Text
$sel:jobDefinitionName:DeleteModelBiasJobDefinition' :: DeleteModelBiasJobDefinition -> Text
..} =
Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
jobDefinitionName
instance Prelude.NFData DeleteModelBiasJobDefinition where
rnf :: DeleteModelBiasJobDefinition -> ()
rnf DeleteModelBiasJobDefinition' {Text
jobDefinitionName :: Text
$sel:jobDefinitionName:DeleteModelBiasJobDefinition' :: DeleteModelBiasJobDefinition -> Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Text
jobDefinitionName
instance Data.ToHeaders DeleteModelBiasJobDefinition where
toHeaders :: DeleteModelBiasJobDefinition -> [Header]
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> [Header]
Data.=# ( ByteString
"SageMaker.DeleteModelBiasJobDefinition" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> [Header]
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON DeleteModelBiasJobDefinition where
toJSON :: DeleteModelBiasJobDefinition -> Value
toJSON DeleteModelBiasJobDefinition' {Text
jobDefinitionName :: Text
$sel:jobDefinitionName:DeleteModelBiasJobDefinition' :: DeleteModelBiasJobDefinition -> Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ forall a. a -> Maybe a
Prelude.Just
(Key
"JobDefinitionName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
jobDefinitionName)
]
)
instance Data.ToPath DeleteModelBiasJobDefinition where
toPath :: DeleteModelBiasJobDefinition -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery DeleteModelBiasJobDefinition where
toQuery :: DeleteModelBiasJobDefinition -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DeleteModelBiasJobDefinitionResponse = DeleteModelBiasJobDefinitionResponse'
{
}
deriving (DeleteModelBiasJobDefinitionResponse
-> DeleteModelBiasJobDefinitionResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteModelBiasJobDefinitionResponse
-> DeleteModelBiasJobDefinitionResponse -> Bool
$c/= :: DeleteModelBiasJobDefinitionResponse
-> DeleteModelBiasJobDefinitionResponse -> Bool
== :: DeleteModelBiasJobDefinitionResponse
-> DeleteModelBiasJobDefinitionResponse -> Bool
$c== :: DeleteModelBiasJobDefinitionResponse
-> DeleteModelBiasJobDefinitionResponse -> Bool
Prelude.Eq, ReadPrec [DeleteModelBiasJobDefinitionResponse]
ReadPrec DeleteModelBiasJobDefinitionResponse
Int -> ReadS DeleteModelBiasJobDefinitionResponse
ReadS [DeleteModelBiasJobDefinitionResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteModelBiasJobDefinitionResponse]
$creadListPrec :: ReadPrec [DeleteModelBiasJobDefinitionResponse]
readPrec :: ReadPrec DeleteModelBiasJobDefinitionResponse
$creadPrec :: ReadPrec DeleteModelBiasJobDefinitionResponse
readList :: ReadS [DeleteModelBiasJobDefinitionResponse]
$creadList :: ReadS [DeleteModelBiasJobDefinitionResponse]
readsPrec :: Int -> ReadS DeleteModelBiasJobDefinitionResponse
$creadsPrec :: Int -> ReadS DeleteModelBiasJobDefinitionResponse
Prelude.Read, Int -> DeleteModelBiasJobDefinitionResponse -> ShowS
[DeleteModelBiasJobDefinitionResponse] -> ShowS
DeleteModelBiasJobDefinitionResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteModelBiasJobDefinitionResponse] -> ShowS
$cshowList :: [DeleteModelBiasJobDefinitionResponse] -> ShowS
show :: DeleteModelBiasJobDefinitionResponse -> String
$cshow :: DeleteModelBiasJobDefinitionResponse -> String
showsPrec :: Int -> DeleteModelBiasJobDefinitionResponse -> ShowS
$cshowsPrec :: Int -> DeleteModelBiasJobDefinitionResponse -> ShowS
Prelude.Show, forall x.
Rep DeleteModelBiasJobDefinitionResponse x
-> DeleteModelBiasJobDefinitionResponse
forall x.
DeleteModelBiasJobDefinitionResponse
-> Rep DeleteModelBiasJobDefinitionResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteModelBiasJobDefinitionResponse x
-> DeleteModelBiasJobDefinitionResponse
$cfrom :: forall x.
DeleteModelBiasJobDefinitionResponse
-> Rep DeleteModelBiasJobDefinitionResponse x
Prelude.Generic)
newDeleteModelBiasJobDefinitionResponse ::
DeleteModelBiasJobDefinitionResponse
newDeleteModelBiasJobDefinitionResponse :: DeleteModelBiasJobDefinitionResponse
newDeleteModelBiasJobDefinitionResponse =
DeleteModelBiasJobDefinitionResponse
DeleteModelBiasJobDefinitionResponse'
instance
Prelude.NFData
DeleteModelBiasJobDefinitionResponse
where
rnf :: DeleteModelBiasJobDefinitionResponse -> ()
rnf DeleteModelBiasJobDefinitionResponse
_ = ()