{-# 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.DeleteModelExplainabilityJobDefinition
(
DeleteModelExplainabilityJobDefinition (..),
newDeleteModelExplainabilityJobDefinition,
deleteModelExplainabilityJobDefinition_jobDefinitionName,
DeleteModelExplainabilityJobDefinitionResponse (..),
newDeleteModelExplainabilityJobDefinitionResponse,
)
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 DeleteModelExplainabilityJobDefinition = DeleteModelExplainabilityJobDefinition'
{
DeleteModelExplainabilityJobDefinition -> Text
jobDefinitionName :: Prelude.Text
}
deriving (DeleteModelExplainabilityJobDefinition
-> DeleteModelExplainabilityJobDefinition -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteModelExplainabilityJobDefinition
-> DeleteModelExplainabilityJobDefinition -> Bool
$c/= :: DeleteModelExplainabilityJobDefinition
-> DeleteModelExplainabilityJobDefinition -> Bool
== :: DeleteModelExplainabilityJobDefinition
-> DeleteModelExplainabilityJobDefinition -> Bool
$c== :: DeleteModelExplainabilityJobDefinition
-> DeleteModelExplainabilityJobDefinition -> Bool
Prelude.Eq, ReadPrec [DeleteModelExplainabilityJobDefinition]
ReadPrec DeleteModelExplainabilityJobDefinition
Int -> ReadS DeleteModelExplainabilityJobDefinition
ReadS [DeleteModelExplainabilityJobDefinition]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteModelExplainabilityJobDefinition]
$creadListPrec :: ReadPrec [DeleteModelExplainabilityJobDefinition]
readPrec :: ReadPrec DeleteModelExplainabilityJobDefinition
$creadPrec :: ReadPrec DeleteModelExplainabilityJobDefinition
readList :: ReadS [DeleteModelExplainabilityJobDefinition]
$creadList :: ReadS [DeleteModelExplainabilityJobDefinition]
readsPrec :: Int -> ReadS DeleteModelExplainabilityJobDefinition
$creadsPrec :: Int -> ReadS DeleteModelExplainabilityJobDefinition
Prelude.Read, Int -> DeleteModelExplainabilityJobDefinition -> ShowS
[DeleteModelExplainabilityJobDefinition] -> ShowS
DeleteModelExplainabilityJobDefinition -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteModelExplainabilityJobDefinition] -> ShowS
$cshowList :: [DeleteModelExplainabilityJobDefinition] -> ShowS
show :: DeleteModelExplainabilityJobDefinition -> String
$cshow :: DeleteModelExplainabilityJobDefinition -> String
showsPrec :: Int -> DeleteModelExplainabilityJobDefinition -> ShowS
$cshowsPrec :: Int -> DeleteModelExplainabilityJobDefinition -> ShowS
Prelude.Show, forall x.
Rep DeleteModelExplainabilityJobDefinition x
-> DeleteModelExplainabilityJobDefinition
forall x.
DeleteModelExplainabilityJobDefinition
-> Rep DeleteModelExplainabilityJobDefinition x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteModelExplainabilityJobDefinition x
-> DeleteModelExplainabilityJobDefinition
$cfrom :: forall x.
DeleteModelExplainabilityJobDefinition
-> Rep DeleteModelExplainabilityJobDefinition x
Prelude.Generic)
newDeleteModelExplainabilityJobDefinition ::
Prelude.Text ->
DeleteModelExplainabilityJobDefinition
newDeleteModelExplainabilityJobDefinition :: Text -> DeleteModelExplainabilityJobDefinition
newDeleteModelExplainabilityJobDefinition
Text
pJobDefinitionName_ =
DeleteModelExplainabilityJobDefinition'
{ $sel:jobDefinitionName:DeleteModelExplainabilityJobDefinition' :: Text
jobDefinitionName =
Text
pJobDefinitionName_
}
deleteModelExplainabilityJobDefinition_jobDefinitionName :: Lens.Lens' DeleteModelExplainabilityJobDefinition Prelude.Text
deleteModelExplainabilityJobDefinition_jobDefinitionName :: Lens' DeleteModelExplainabilityJobDefinition Text
deleteModelExplainabilityJobDefinition_jobDefinitionName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteModelExplainabilityJobDefinition' {Text
jobDefinitionName :: Text
$sel:jobDefinitionName:DeleteModelExplainabilityJobDefinition' :: DeleteModelExplainabilityJobDefinition -> Text
jobDefinitionName} -> Text
jobDefinitionName) (\s :: DeleteModelExplainabilityJobDefinition
s@DeleteModelExplainabilityJobDefinition' {} Text
a -> DeleteModelExplainabilityJobDefinition
s {$sel:jobDefinitionName:DeleteModelExplainabilityJobDefinition' :: Text
jobDefinitionName = Text
a} :: DeleteModelExplainabilityJobDefinition)
instance
Core.AWSRequest
DeleteModelExplainabilityJobDefinition
where
type
AWSResponse
DeleteModelExplainabilityJobDefinition =
DeleteModelExplainabilityJobDefinitionResponse
request :: (Service -> Service)
-> DeleteModelExplainabilityJobDefinition
-> Request DeleteModelExplainabilityJobDefinition
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 DeleteModelExplainabilityJobDefinition
-> ClientResponse ClientBody
-> m (Either
Error
(ClientResponse
(AWSResponse DeleteModelExplainabilityJobDefinition)))
response =
forall (m :: * -> *) a.
MonadResource m =>
AWSResponse a
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveNull
DeleteModelExplainabilityJobDefinitionResponse
DeleteModelExplainabilityJobDefinitionResponse'
instance
Prelude.Hashable
DeleteModelExplainabilityJobDefinition
where
hashWithSalt :: Int -> DeleteModelExplainabilityJobDefinition -> Int
hashWithSalt
Int
_salt
DeleteModelExplainabilityJobDefinition' {Text
jobDefinitionName :: Text
$sel:jobDefinitionName:DeleteModelExplainabilityJobDefinition' :: DeleteModelExplainabilityJobDefinition -> Text
..} =
Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
jobDefinitionName
instance
Prelude.NFData
DeleteModelExplainabilityJobDefinition
where
rnf :: DeleteModelExplainabilityJobDefinition -> ()
rnf DeleteModelExplainabilityJobDefinition' {Text
jobDefinitionName :: Text
$sel:jobDefinitionName:DeleteModelExplainabilityJobDefinition' :: DeleteModelExplainabilityJobDefinition -> Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Text
jobDefinitionName
instance
Data.ToHeaders
DeleteModelExplainabilityJobDefinition
where
toHeaders :: DeleteModelExplainabilityJobDefinition -> [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.DeleteModelExplainabilityJobDefinition" ::
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
DeleteModelExplainabilityJobDefinition
where
toJSON :: DeleteModelExplainabilityJobDefinition -> Value
toJSON DeleteModelExplainabilityJobDefinition' {Text
jobDefinitionName :: Text
$sel:jobDefinitionName:DeleteModelExplainabilityJobDefinition' :: DeleteModelExplainabilityJobDefinition -> 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
DeleteModelExplainabilityJobDefinition
where
toPath :: DeleteModelExplainabilityJobDefinition -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance
Data.ToQuery
DeleteModelExplainabilityJobDefinition
where
toQuery :: DeleteModelExplainabilityJobDefinition -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DeleteModelExplainabilityJobDefinitionResponse = DeleteModelExplainabilityJobDefinitionResponse'
{
}
deriving (DeleteModelExplainabilityJobDefinitionResponse
-> DeleteModelExplainabilityJobDefinitionResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteModelExplainabilityJobDefinitionResponse
-> DeleteModelExplainabilityJobDefinitionResponse -> Bool
$c/= :: DeleteModelExplainabilityJobDefinitionResponse
-> DeleteModelExplainabilityJobDefinitionResponse -> Bool
== :: DeleteModelExplainabilityJobDefinitionResponse
-> DeleteModelExplainabilityJobDefinitionResponse -> Bool
$c== :: DeleteModelExplainabilityJobDefinitionResponse
-> DeleteModelExplainabilityJobDefinitionResponse -> Bool
Prelude.Eq, ReadPrec [DeleteModelExplainabilityJobDefinitionResponse]
ReadPrec DeleteModelExplainabilityJobDefinitionResponse
Int -> ReadS DeleteModelExplainabilityJobDefinitionResponse
ReadS [DeleteModelExplainabilityJobDefinitionResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteModelExplainabilityJobDefinitionResponse]
$creadListPrec :: ReadPrec [DeleteModelExplainabilityJobDefinitionResponse]
readPrec :: ReadPrec DeleteModelExplainabilityJobDefinitionResponse
$creadPrec :: ReadPrec DeleteModelExplainabilityJobDefinitionResponse
readList :: ReadS [DeleteModelExplainabilityJobDefinitionResponse]
$creadList :: ReadS [DeleteModelExplainabilityJobDefinitionResponse]
readsPrec :: Int -> ReadS DeleteModelExplainabilityJobDefinitionResponse
$creadsPrec :: Int -> ReadS DeleteModelExplainabilityJobDefinitionResponse
Prelude.Read, Int -> DeleteModelExplainabilityJobDefinitionResponse -> ShowS
[DeleteModelExplainabilityJobDefinitionResponse] -> ShowS
DeleteModelExplainabilityJobDefinitionResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteModelExplainabilityJobDefinitionResponse] -> ShowS
$cshowList :: [DeleteModelExplainabilityJobDefinitionResponse] -> ShowS
show :: DeleteModelExplainabilityJobDefinitionResponse -> String
$cshow :: DeleteModelExplainabilityJobDefinitionResponse -> String
showsPrec :: Int -> DeleteModelExplainabilityJobDefinitionResponse -> ShowS
$cshowsPrec :: Int -> DeleteModelExplainabilityJobDefinitionResponse -> ShowS
Prelude.Show, forall x.
Rep DeleteModelExplainabilityJobDefinitionResponse x
-> DeleteModelExplainabilityJobDefinitionResponse
forall x.
DeleteModelExplainabilityJobDefinitionResponse
-> Rep DeleteModelExplainabilityJobDefinitionResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteModelExplainabilityJobDefinitionResponse x
-> DeleteModelExplainabilityJobDefinitionResponse
$cfrom :: forall x.
DeleteModelExplainabilityJobDefinitionResponse
-> Rep DeleteModelExplainabilityJobDefinitionResponse x
Prelude.Generic)
newDeleteModelExplainabilityJobDefinitionResponse ::
DeleteModelExplainabilityJobDefinitionResponse
newDeleteModelExplainabilityJobDefinitionResponse :: DeleteModelExplainabilityJobDefinitionResponse
newDeleteModelExplainabilityJobDefinitionResponse =
DeleteModelExplainabilityJobDefinitionResponse
DeleteModelExplainabilityJobDefinitionResponse'
instance
Prelude.NFData
DeleteModelExplainabilityJobDefinitionResponse
where
rnf :: DeleteModelExplainabilityJobDefinitionResponse -> ()
rnf DeleteModelExplainabilityJobDefinitionResponse
_ = ()