{-# 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 #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.RDS.DeleteDBInstanceAutomatedBackup
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Deletes automated backups using the @DbiResourceId@ value of the source
-- DB instance or the Amazon Resource Name (ARN) of the automated backups.
module Amazonka.RDS.DeleteDBInstanceAutomatedBackup
  ( -- * Creating a Request
    DeleteDBInstanceAutomatedBackup (..),
    newDeleteDBInstanceAutomatedBackup,

    -- * Request Lenses
    deleteDBInstanceAutomatedBackup_dbInstanceAutomatedBackupsArn,
    deleteDBInstanceAutomatedBackup_dbiResourceId,

    -- * Destructuring the Response
    DeleteDBInstanceAutomatedBackupResponse (..),
    newDeleteDBInstanceAutomatedBackupResponse,

    -- * Response Lenses
    deleteDBInstanceAutomatedBackupResponse_dbInstanceAutomatedBackup,
    deleteDBInstanceAutomatedBackupResponse_httpStatus,
  )
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 Amazonka.RDS.Types
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response

-- | Parameter input for the @DeleteDBInstanceAutomatedBackup@ operation.
--
-- /See:/ 'newDeleteDBInstanceAutomatedBackup' smart constructor.
data DeleteDBInstanceAutomatedBackup = DeleteDBInstanceAutomatedBackup'
  { -- | The Amazon Resource Name (ARN) of the automated backups to delete, for
    -- example,
    -- @arn:aws:rds:us-east-1:123456789012:auto-backup:ab-L2IJCEXJP7XQ7HOJ4SIEXAMPLE@.
    --
    -- This setting doesn\'t apply to RDS Custom.
    DeleteDBInstanceAutomatedBackup -> Maybe Text
dbInstanceAutomatedBackupsArn :: Prelude.Maybe Prelude.Text,
    -- | The identifier for the source DB instance, which can\'t be changed and
    -- which is unique to an Amazon Web Services Region.
    DeleteDBInstanceAutomatedBackup -> Maybe Text
dbiResourceId :: Prelude.Maybe Prelude.Text
  }
  deriving (DeleteDBInstanceAutomatedBackup
-> DeleteDBInstanceAutomatedBackup -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteDBInstanceAutomatedBackup
-> DeleteDBInstanceAutomatedBackup -> Bool
$c/= :: DeleteDBInstanceAutomatedBackup
-> DeleteDBInstanceAutomatedBackup -> Bool
== :: DeleteDBInstanceAutomatedBackup
-> DeleteDBInstanceAutomatedBackup -> Bool
$c== :: DeleteDBInstanceAutomatedBackup
-> DeleteDBInstanceAutomatedBackup -> Bool
Prelude.Eq, ReadPrec [DeleteDBInstanceAutomatedBackup]
ReadPrec DeleteDBInstanceAutomatedBackup
Int -> ReadS DeleteDBInstanceAutomatedBackup
ReadS [DeleteDBInstanceAutomatedBackup]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteDBInstanceAutomatedBackup]
$creadListPrec :: ReadPrec [DeleteDBInstanceAutomatedBackup]
readPrec :: ReadPrec DeleteDBInstanceAutomatedBackup
$creadPrec :: ReadPrec DeleteDBInstanceAutomatedBackup
readList :: ReadS [DeleteDBInstanceAutomatedBackup]
$creadList :: ReadS [DeleteDBInstanceAutomatedBackup]
readsPrec :: Int -> ReadS DeleteDBInstanceAutomatedBackup
$creadsPrec :: Int -> ReadS DeleteDBInstanceAutomatedBackup
Prelude.Read, Int -> DeleteDBInstanceAutomatedBackup -> ShowS
[DeleteDBInstanceAutomatedBackup] -> ShowS
DeleteDBInstanceAutomatedBackup -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteDBInstanceAutomatedBackup] -> ShowS
$cshowList :: [DeleteDBInstanceAutomatedBackup] -> ShowS
show :: DeleteDBInstanceAutomatedBackup -> String
$cshow :: DeleteDBInstanceAutomatedBackup -> String
showsPrec :: Int -> DeleteDBInstanceAutomatedBackup -> ShowS
$cshowsPrec :: Int -> DeleteDBInstanceAutomatedBackup -> ShowS
Prelude.Show, forall x.
Rep DeleteDBInstanceAutomatedBackup x
-> DeleteDBInstanceAutomatedBackup
forall x.
DeleteDBInstanceAutomatedBackup
-> Rep DeleteDBInstanceAutomatedBackup x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteDBInstanceAutomatedBackup x
-> DeleteDBInstanceAutomatedBackup
$cfrom :: forall x.
DeleteDBInstanceAutomatedBackup
-> Rep DeleteDBInstanceAutomatedBackup x
Prelude.Generic)

-- |
-- Create a value of 'DeleteDBInstanceAutomatedBackup' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'dbInstanceAutomatedBackupsArn', 'deleteDBInstanceAutomatedBackup_dbInstanceAutomatedBackupsArn' - The Amazon Resource Name (ARN) of the automated backups to delete, for
-- example,
-- @arn:aws:rds:us-east-1:123456789012:auto-backup:ab-L2IJCEXJP7XQ7HOJ4SIEXAMPLE@.
--
-- This setting doesn\'t apply to RDS Custom.
--
-- 'dbiResourceId', 'deleteDBInstanceAutomatedBackup_dbiResourceId' - The identifier for the source DB instance, which can\'t be changed and
-- which is unique to an Amazon Web Services Region.
newDeleteDBInstanceAutomatedBackup ::
  DeleteDBInstanceAutomatedBackup
newDeleteDBInstanceAutomatedBackup :: DeleteDBInstanceAutomatedBackup
newDeleteDBInstanceAutomatedBackup =
  DeleteDBInstanceAutomatedBackup'
    { $sel:dbInstanceAutomatedBackupsArn:DeleteDBInstanceAutomatedBackup' :: Maybe Text
dbInstanceAutomatedBackupsArn =
        forall a. Maybe a
Prelude.Nothing,
      $sel:dbiResourceId:DeleteDBInstanceAutomatedBackup' :: Maybe Text
dbiResourceId = forall a. Maybe a
Prelude.Nothing
    }

-- | The Amazon Resource Name (ARN) of the automated backups to delete, for
-- example,
-- @arn:aws:rds:us-east-1:123456789012:auto-backup:ab-L2IJCEXJP7XQ7HOJ4SIEXAMPLE@.
--
-- This setting doesn\'t apply to RDS Custom.
deleteDBInstanceAutomatedBackup_dbInstanceAutomatedBackupsArn :: Lens.Lens' DeleteDBInstanceAutomatedBackup (Prelude.Maybe Prelude.Text)
deleteDBInstanceAutomatedBackup_dbInstanceAutomatedBackupsArn :: Lens' DeleteDBInstanceAutomatedBackup (Maybe Text)
deleteDBInstanceAutomatedBackup_dbInstanceAutomatedBackupsArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteDBInstanceAutomatedBackup' {Maybe Text
dbInstanceAutomatedBackupsArn :: Maybe Text
$sel:dbInstanceAutomatedBackupsArn:DeleteDBInstanceAutomatedBackup' :: DeleteDBInstanceAutomatedBackup -> Maybe Text
dbInstanceAutomatedBackupsArn} -> Maybe Text
dbInstanceAutomatedBackupsArn) (\s :: DeleteDBInstanceAutomatedBackup
s@DeleteDBInstanceAutomatedBackup' {} Maybe Text
a -> DeleteDBInstanceAutomatedBackup
s {$sel:dbInstanceAutomatedBackupsArn:DeleteDBInstanceAutomatedBackup' :: Maybe Text
dbInstanceAutomatedBackupsArn = Maybe Text
a} :: DeleteDBInstanceAutomatedBackup)

-- | The identifier for the source DB instance, which can\'t be changed and
-- which is unique to an Amazon Web Services Region.
deleteDBInstanceAutomatedBackup_dbiResourceId :: Lens.Lens' DeleteDBInstanceAutomatedBackup (Prelude.Maybe Prelude.Text)
deleteDBInstanceAutomatedBackup_dbiResourceId :: Lens' DeleteDBInstanceAutomatedBackup (Maybe Text)
deleteDBInstanceAutomatedBackup_dbiResourceId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteDBInstanceAutomatedBackup' {Maybe Text
dbiResourceId :: Maybe Text
$sel:dbiResourceId:DeleteDBInstanceAutomatedBackup' :: DeleteDBInstanceAutomatedBackup -> Maybe Text
dbiResourceId} -> Maybe Text
dbiResourceId) (\s :: DeleteDBInstanceAutomatedBackup
s@DeleteDBInstanceAutomatedBackup' {} Maybe Text
a -> DeleteDBInstanceAutomatedBackup
s {$sel:dbiResourceId:DeleteDBInstanceAutomatedBackup' :: Maybe Text
dbiResourceId = Maybe Text
a} :: DeleteDBInstanceAutomatedBackup)

instance
  Core.AWSRequest
    DeleteDBInstanceAutomatedBackup
  where
  type
    AWSResponse DeleteDBInstanceAutomatedBackup =
      DeleteDBInstanceAutomatedBackupResponse
  request :: (Service -> Service)
-> DeleteDBInstanceAutomatedBackup
-> Request DeleteDBInstanceAutomatedBackup
request Service -> Service
overrides =
    forall a. ToRequest a => Service -> a -> Request a
Request.postQuery (Service -> Service
overrides Service
defaultService)
  response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy DeleteDBInstanceAutomatedBackup
-> ClientResponse ClientBody
-> m (Either
        Error
        (ClientResponse (AWSResponse DeleteDBInstanceAutomatedBackup)))
response =
    forall (m :: * -> *) a.
MonadResource m =>
Text
-> (Int
    -> ResponseHeaders -> [Node] -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveXMLWrapper
      Text
"DeleteDBInstanceAutomatedBackupResult"
      ( \Int
s ResponseHeaders
h [Node]
x ->
          Maybe DBInstanceAutomatedBackup
-> Int -> DeleteDBInstanceAutomatedBackupResponse
DeleteDBInstanceAutomatedBackupResponse'
            forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> ([Node]
x forall a. FromXML a => [Node] -> Text -> Either String (Maybe a)
Data..@? Text
"DBInstanceAutomatedBackup")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
      )

instance
  Prelude.Hashable
    DeleteDBInstanceAutomatedBackup
  where
  hashWithSalt :: Int -> DeleteDBInstanceAutomatedBackup -> Int
hashWithSalt
    Int
_salt
    DeleteDBInstanceAutomatedBackup' {Maybe Text
dbiResourceId :: Maybe Text
dbInstanceAutomatedBackupsArn :: Maybe Text
$sel:dbiResourceId:DeleteDBInstanceAutomatedBackup' :: DeleteDBInstanceAutomatedBackup -> Maybe Text
$sel:dbInstanceAutomatedBackupsArn:DeleteDBInstanceAutomatedBackup' :: DeleteDBInstanceAutomatedBackup -> Maybe Text
..} =
      Int
_salt
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dbInstanceAutomatedBackupsArn
        forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
dbiResourceId

instance
  Prelude.NFData
    DeleteDBInstanceAutomatedBackup
  where
  rnf :: DeleteDBInstanceAutomatedBackup -> ()
rnf DeleteDBInstanceAutomatedBackup' {Maybe Text
dbiResourceId :: Maybe Text
dbInstanceAutomatedBackupsArn :: Maybe Text
$sel:dbiResourceId:DeleteDBInstanceAutomatedBackup' :: DeleteDBInstanceAutomatedBackup -> Maybe Text
$sel:dbInstanceAutomatedBackupsArn:DeleteDBInstanceAutomatedBackup' :: DeleteDBInstanceAutomatedBackup -> Maybe Text
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dbInstanceAutomatedBackupsArn
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
dbiResourceId

instance
  Data.ToHeaders
    DeleteDBInstanceAutomatedBackup
  where
  toHeaders :: DeleteDBInstanceAutomatedBackup -> ResponseHeaders
toHeaders = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty

instance Data.ToPath DeleteDBInstanceAutomatedBackup where
  toPath :: DeleteDBInstanceAutomatedBackup -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"

instance Data.ToQuery DeleteDBInstanceAutomatedBackup where
  toQuery :: DeleteDBInstanceAutomatedBackup -> QueryString
toQuery DeleteDBInstanceAutomatedBackup' {Maybe Text
dbiResourceId :: Maybe Text
dbInstanceAutomatedBackupsArn :: Maybe Text
$sel:dbiResourceId:DeleteDBInstanceAutomatedBackup' :: DeleteDBInstanceAutomatedBackup -> Maybe Text
$sel:dbInstanceAutomatedBackupsArn:DeleteDBInstanceAutomatedBackup' :: DeleteDBInstanceAutomatedBackup -> Maybe Text
..} =
    forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ ByteString
"Action"
          forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: ( ByteString
"DeleteDBInstanceAutomatedBackup" ::
                      Prelude.ByteString
                  ),
        ByteString
"Version"
          forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: (ByteString
"2014-10-31" :: Prelude.ByteString),
        ByteString
"DBInstanceAutomatedBackupsArn"
          forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
dbInstanceAutomatedBackupsArn,
        ByteString
"DbiResourceId" forall a. ToQuery a => ByteString -> a -> QueryString
Data.=: Maybe Text
dbiResourceId
      ]

-- | /See:/ 'newDeleteDBInstanceAutomatedBackupResponse' smart constructor.
data DeleteDBInstanceAutomatedBackupResponse = DeleteDBInstanceAutomatedBackupResponse'
  { DeleteDBInstanceAutomatedBackupResponse
-> Maybe DBInstanceAutomatedBackup
dbInstanceAutomatedBackup :: Prelude.Maybe DBInstanceAutomatedBackup,
    -- | The response's http status code.
    DeleteDBInstanceAutomatedBackupResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (DeleteDBInstanceAutomatedBackupResponse
-> DeleteDBInstanceAutomatedBackupResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DeleteDBInstanceAutomatedBackupResponse
-> DeleteDBInstanceAutomatedBackupResponse -> Bool
$c/= :: DeleteDBInstanceAutomatedBackupResponse
-> DeleteDBInstanceAutomatedBackupResponse -> Bool
== :: DeleteDBInstanceAutomatedBackupResponse
-> DeleteDBInstanceAutomatedBackupResponse -> Bool
$c== :: DeleteDBInstanceAutomatedBackupResponse
-> DeleteDBInstanceAutomatedBackupResponse -> Bool
Prelude.Eq, ReadPrec [DeleteDBInstanceAutomatedBackupResponse]
ReadPrec DeleteDBInstanceAutomatedBackupResponse
Int -> ReadS DeleteDBInstanceAutomatedBackupResponse
ReadS [DeleteDBInstanceAutomatedBackupResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DeleteDBInstanceAutomatedBackupResponse]
$creadListPrec :: ReadPrec [DeleteDBInstanceAutomatedBackupResponse]
readPrec :: ReadPrec DeleteDBInstanceAutomatedBackupResponse
$creadPrec :: ReadPrec DeleteDBInstanceAutomatedBackupResponse
readList :: ReadS [DeleteDBInstanceAutomatedBackupResponse]
$creadList :: ReadS [DeleteDBInstanceAutomatedBackupResponse]
readsPrec :: Int -> ReadS DeleteDBInstanceAutomatedBackupResponse
$creadsPrec :: Int -> ReadS DeleteDBInstanceAutomatedBackupResponse
Prelude.Read, Int -> DeleteDBInstanceAutomatedBackupResponse -> ShowS
[DeleteDBInstanceAutomatedBackupResponse] -> ShowS
DeleteDBInstanceAutomatedBackupResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DeleteDBInstanceAutomatedBackupResponse] -> ShowS
$cshowList :: [DeleteDBInstanceAutomatedBackupResponse] -> ShowS
show :: DeleteDBInstanceAutomatedBackupResponse -> String
$cshow :: DeleteDBInstanceAutomatedBackupResponse -> String
showsPrec :: Int -> DeleteDBInstanceAutomatedBackupResponse -> ShowS
$cshowsPrec :: Int -> DeleteDBInstanceAutomatedBackupResponse -> ShowS
Prelude.Show, forall x.
Rep DeleteDBInstanceAutomatedBackupResponse x
-> DeleteDBInstanceAutomatedBackupResponse
forall x.
DeleteDBInstanceAutomatedBackupResponse
-> Rep DeleteDBInstanceAutomatedBackupResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DeleteDBInstanceAutomatedBackupResponse x
-> DeleteDBInstanceAutomatedBackupResponse
$cfrom :: forall x.
DeleteDBInstanceAutomatedBackupResponse
-> Rep DeleteDBInstanceAutomatedBackupResponse x
Prelude.Generic)

-- |
-- Create a value of 'DeleteDBInstanceAutomatedBackupResponse' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'dbInstanceAutomatedBackup', 'deleteDBInstanceAutomatedBackupResponse_dbInstanceAutomatedBackup' - Undocumented member.
--
-- 'httpStatus', 'deleteDBInstanceAutomatedBackupResponse_httpStatus' - The response's http status code.
newDeleteDBInstanceAutomatedBackupResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  DeleteDBInstanceAutomatedBackupResponse
newDeleteDBInstanceAutomatedBackupResponse :: Int -> DeleteDBInstanceAutomatedBackupResponse
newDeleteDBInstanceAutomatedBackupResponse
  Int
pHttpStatus_ =
    DeleteDBInstanceAutomatedBackupResponse'
      { $sel:dbInstanceAutomatedBackup:DeleteDBInstanceAutomatedBackupResponse' :: Maybe DBInstanceAutomatedBackup
dbInstanceAutomatedBackup =
          forall a. Maybe a
Prelude.Nothing,
        $sel:httpStatus:DeleteDBInstanceAutomatedBackupResponse' :: Int
httpStatus = Int
pHttpStatus_
      }

-- | Undocumented member.
deleteDBInstanceAutomatedBackupResponse_dbInstanceAutomatedBackup :: Lens.Lens' DeleteDBInstanceAutomatedBackupResponse (Prelude.Maybe DBInstanceAutomatedBackup)
deleteDBInstanceAutomatedBackupResponse_dbInstanceAutomatedBackup :: Lens'
  DeleteDBInstanceAutomatedBackupResponse
  (Maybe DBInstanceAutomatedBackup)
deleteDBInstanceAutomatedBackupResponse_dbInstanceAutomatedBackup = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteDBInstanceAutomatedBackupResponse' {Maybe DBInstanceAutomatedBackup
dbInstanceAutomatedBackup :: Maybe DBInstanceAutomatedBackup
$sel:dbInstanceAutomatedBackup:DeleteDBInstanceAutomatedBackupResponse' :: DeleteDBInstanceAutomatedBackupResponse
-> Maybe DBInstanceAutomatedBackup
dbInstanceAutomatedBackup} -> Maybe DBInstanceAutomatedBackup
dbInstanceAutomatedBackup) (\s :: DeleteDBInstanceAutomatedBackupResponse
s@DeleteDBInstanceAutomatedBackupResponse' {} Maybe DBInstanceAutomatedBackup
a -> DeleteDBInstanceAutomatedBackupResponse
s {$sel:dbInstanceAutomatedBackup:DeleteDBInstanceAutomatedBackupResponse' :: Maybe DBInstanceAutomatedBackup
dbInstanceAutomatedBackup = Maybe DBInstanceAutomatedBackup
a} :: DeleteDBInstanceAutomatedBackupResponse)

-- | The response's http status code.
deleteDBInstanceAutomatedBackupResponse_httpStatus :: Lens.Lens' DeleteDBInstanceAutomatedBackupResponse Prelude.Int
deleteDBInstanceAutomatedBackupResponse_httpStatus :: Lens' DeleteDBInstanceAutomatedBackupResponse Int
deleteDBInstanceAutomatedBackupResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DeleteDBInstanceAutomatedBackupResponse' {Int
httpStatus :: Int
$sel:httpStatus:DeleteDBInstanceAutomatedBackupResponse' :: DeleteDBInstanceAutomatedBackupResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DeleteDBInstanceAutomatedBackupResponse
s@DeleteDBInstanceAutomatedBackupResponse' {} Int
a -> DeleteDBInstanceAutomatedBackupResponse
s {$sel:httpStatus:DeleteDBInstanceAutomatedBackupResponse' :: Int
httpStatus = Int
a} :: DeleteDBInstanceAutomatedBackupResponse)

instance
  Prelude.NFData
    DeleteDBInstanceAutomatedBackupResponse
  where
  rnf :: DeleteDBInstanceAutomatedBackupResponse -> ()
rnf DeleteDBInstanceAutomatedBackupResponse' {Int
Maybe DBInstanceAutomatedBackup
httpStatus :: Int
dbInstanceAutomatedBackup :: Maybe DBInstanceAutomatedBackup
$sel:httpStatus:DeleteDBInstanceAutomatedBackupResponse' :: DeleteDBInstanceAutomatedBackupResponse -> Int
$sel:dbInstanceAutomatedBackup:DeleteDBInstanceAutomatedBackupResponse' :: DeleteDBInstanceAutomatedBackupResponse
-> Maybe DBInstanceAutomatedBackup
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe DBInstanceAutomatedBackup
dbInstanceAutomatedBackup
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus