{-# 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.MediaConnect.RemoveFlowMediaStream
-- Copyright   : (c) 2013-2021 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Removes a media stream from a flow. This action is only available if the
-- media stream is not associated with a source or output.
module Amazonka.MediaConnect.RemoveFlowMediaStream
  ( -- * Creating a Request
    RemoveFlowMediaStream (..),
    newRemoveFlowMediaStream,

    -- * Request Lenses
    removeFlowMediaStream_flowArn,
    removeFlowMediaStream_mediaStreamName,

    -- * Destructuring the Response
    RemoveFlowMediaStreamResponse (..),
    newRemoveFlowMediaStreamResponse,

    -- * Response Lenses
    removeFlowMediaStreamResponse_mediaStreamName,
    removeFlowMediaStreamResponse_flowArn,
    removeFlowMediaStreamResponse_httpStatus,
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import Amazonka.MediaConnect.Types
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response

-- | /See:/ 'newRemoveFlowMediaStream' smart constructor.
data RemoveFlowMediaStream = RemoveFlowMediaStream'
  { -- | The Amazon Resource Name (ARN) of the flow.
    RemoveFlowMediaStream -> Text
flowArn :: Prelude.Text,
    -- | The name of the media stream that you want to remove.
    RemoveFlowMediaStream -> Text
mediaStreamName :: Prelude.Text
  }
  deriving (RemoveFlowMediaStream -> RemoveFlowMediaStream -> Bool
(RemoveFlowMediaStream -> RemoveFlowMediaStream -> Bool)
-> (RemoveFlowMediaStream -> RemoveFlowMediaStream -> Bool)
-> Eq RemoveFlowMediaStream
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RemoveFlowMediaStream -> RemoveFlowMediaStream -> Bool
$c/= :: RemoveFlowMediaStream -> RemoveFlowMediaStream -> Bool
== :: RemoveFlowMediaStream -> RemoveFlowMediaStream -> Bool
$c== :: RemoveFlowMediaStream -> RemoveFlowMediaStream -> Bool
Prelude.Eq, ReadPrec [RemoveFlowMediaStream]
ReadPrec RemoveFlowMediaStream
Int -> ReadS RemoveFlowMediaStream
ReadS [RemoveFlowMediaStream]
(Int -> ReadS RemoveFlowMediaStream)
-> ReadS [RemoveFlowMediaStream]
-> ReadPrec RemoveFlowMediaStream
-> ReadPrec [RemoveFlowMediaStream]
-> Read RemoveFlowMediaStream
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [RemoveFlowMediaStream]
$creadListPrec :: ReadPrec [RemoveFlowMediaStream]
readPrec :: ReadPrec RemoveFlowMediaStream
$creadPrec :: ReadPrec RemoveFlowMediaStream
readList :: ReadS [RemoveFlowMediaStream]
$creadList :: ReadS [RemoveFlowMediaStream]
readsPrec :: Int -> ReadS RemoveFlowMediaStream
$creadsPrec :: Int -> ReadS RemoveFlowMediaStream
Prelude.Read, Int -> RemoveFlowMediaStream -> ShowS
[RemoveFlowMediaStream] -> ShowS
RemoveFlowMediaStream -> String
(Int -> RemoveFlowMediaStream -> ShowS)
-> (RemoveFlowMediaStream -> String)
-> ([RemoveFlowMediaStream] -> ShowS)
-> Show RemoveFlowMediaStream
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RemoveFlowMediaStream] -> ShowS
$cshowList :: [RemoveFlowMediaStream] -> ShowS
show :: RemoveFlowMediaStream -> String
$cshow :: RemoveFlowMediaStream -> String
showsPrec :: Int -> RemoveFlowMediaStream -> ShowS
$cshowsPrec :: Int -> RemoveFlowMediaStream -> ShowS
Prelude.Show, (forall x. RemoveFlowMediaStream -> Rep RemoveFlowMediaStream x)
-> (forall x. Rep RemoveFlowMediaStream x -> RemoveFlowMediaStream)
-> Generic RemoveFlowMediaStream
forall x. Rep RemoveFlowMediaStream x -> RemoveFlowMediaStream
forall x. RemoveFlowMediaStream -> Rep RemoveFlowMediaStream x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep RemoveFlowMediaStream x -> RemoveFlowMediaStream
$cfrom :: forall x. RemoveFlowMediaStream -> Rep RemoveFlowMediaStream x
Prelude.Generic)

-- |
-- Create a value of 'RemoveFlowMediaStream' 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:
--
-- 'flowArn', 'removeFlowMediaStream_flowArn' - The Amazon Resource Name (ARN) of the flow.
--
-- 'mediaStreamName', 'removeFlowMediaStream_mediaStreamName' - The name of the media stream that you want to remove.
newRemoveFlowMediaStream ::
  -- | 'flowArn'
  Prelude.Text ->
  -- | 'mediaStreamName'
  Prelude.Text ->
  RemoveFlowMediaStream
newRemoveFlowMediaStream :: Text -> Text -> RemoveFlowMediaStream
newRemoveFlowMediaStream Text
pFlowArn_ Text
pMediaStreamName_ =
  RemoveFlowMediaStream' :: Text -> Text -> RemoveFlowMediaStream
RemoveFlowMediaStream'
    { $sel:flowArn:RemoveFlowMediaStream' :: Text
flowArn = Text
pFlowArn_,
      $sel:mediaStreamName:RemoveFlowMediaStream' :: Text
mediaStreamName = Text
pMediaStreamName_
    }

-- | The Amazon Resource Name (ARN) of the flow.
removeFlowMediaStream_flowArn :: Lens.Lens' RemoveFlowMediaStream Prelude.Text
removeFlowMediaStream_flowArn :: (Text -> f Text)
-> RemoveFlowMediaStream -> f RemoveFlowMediaStream
removeFlowMediaStream_flowArn = (RemoveFlowMediaStream -> Text)
-> (RemoveFlowMediaStream -> Text -> RemoveFlowMediaStream)
-> Lens RemoveFlowMediaStream RemoveFlowMediaStream Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveFlowMediaStream' {Text
flowArn :: Text
$sel:flowArn:RemoveFlowMediaStream' :: RemoveFlowMediaStream -> Text
flowArn} -> Text
flowArn) (\s :: RemoveFlowMediaStream
s@RemoveFlowMediaStream' {} Text
a -> RemoveFlowMediaStream
s {$sel:flowArn:RemoveFlowMediaStream' :: Text
flowArn = Text
a} :: RemoveFlowMediaStream)

-- | The name of the media stream that you want to remove.
removeFlowMediaStream_mediaStreamName :: Lens.Lens' RemoveFlowMediaStream Prelude.Text
removeFlowMediaStream_mediaStreamName :: (Text -> f Text)
-> RemoveFlowMediaStream -> f RemoveFlowMediaStream
removeFlowMediaStream_mediaStreamName = (RemoveFlowMediaStream -> Text)
-> (RemoveFlowMediaStream -> Text -> RemoveFlowMediaStream)
-> Lens RemoveFlowMediaStream RemoveFlowMediaStream Text Text
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveFlowMediaStream' {Text
mediaStreamName :: Text
$sel:mediaStreamName:RemoveFlowMediaStream' :: RemoveFlowMediaStream -> Text
mediaStreamName} -> Text
mediaStreamName) (\s :: RemoveFlowMediaStream
s@RemoveFlowMediaStream' {} Text
a -> RemoveFlowMediaStream
s {$sel:mediaStreamName:RemoveFlowMediaStream' :: Text
mediaStreamName = Text
a} :: RemoveFlowMediaStream)

instance Core.AWSRequest RemoveFlowMediaStream where
  type
    AWSResponse RemoveFlowMediaStream =
      RemoveFlowMediaStreamResponse
  request :: RemoveFlowMediaStream -> Request RemoveFlowMediaStream
request = Service -> RemoveFlowMediaStream -> Request RemoveFlowMediaStream
forall a. ToRequest a => Service -> a -> Request a
Request.delete Service
defaultService
  response :: Logger
-> Service
-> Proxy RemoveFlowMediaStream
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse RemoveFlowMediaStream)))
response =
    (Int
 -> ResponseHeaders
 -> Object
 -> Either String (AWSResponse RemoveFlowMediaStream))
-> Logger
-> Service
-> Proxy RemoveFlowMediaStream
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse RemoveFlowMediaStream)))
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 ->
          Maybe Text -> Maybe Text -> Int -> RemoveFlowMediaStreamResponse
RemoveFlowMediaStreamResponse'
            (Maybe Text -> Maybe Text -> Int -> RemoveFlowMediaStreamResponse)
-> Either String (Maybe Text)
-> Either
     String (Maybe Text -> Int -> RemoveFlowMediaStreamResponse)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"mediaStreamName")
            Either String (Maybe Text -> Int -> RemoveFlowMediaStreamResponse)
-> Either String (Maybe Text)
-> Either String (Int -> RemoveFlowMediaStreamResponse)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Either String (Maybe Text)
forall a. FromJSON a => Object -> Text -> Either String (Maybe a)
Core..?> Text
"flowArn")
            Either String (Int -> RemoveFlowMediaStreamResponse)
-> Either String Int -> Either String RemoveFlowMediaStreamResponse
forall (f :: * -> *) a b. Applicative f => 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))
      )

instance Prelude.Hashable RemoveFlowMediaStream

instance Prelude.NFData RemoveFlowMediaStream

instance Core.ToHeaders RemoveFlowMediaStream where
  toHeaders :: RemoveFlowMediaStream -> ResponseHeaders
toHeaders =
    ResponseHeaders -> RemoveFlowMediaStream -> ResponseHeaders
forall a b. a -> b -> a
Prelude.const
      ( [ResponseHeaders] -> ResponseHeaders
forall a. Monoid a => [a] -> a
Prelude.mconcat
          [ 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.ToPath RemoveFlowMediaStream where
  toPath :: RemoveFlowMediaStream -> ByteString
toPath RemoveFlowMediaStream' {Text
mediaStreamName :: Text
flowArn :: Text
$sel:mediaStreamName:RemoveFlowMediaStream' :: RemoveFlowMediaStream -> Text
$sel:flowArn:RemoveFlowMediaStream' :: RemoveFlowMediaStream -> Text
..} =
    [ByteString] -> ByteString
forall a. Monoid a => [a] -> a
Prelude.mconcat
      [ ByteString
"/v1/flows/",
        Text -> ByteString
forall a. ToByteString a => a -> ByteString
Core.toBS Text
flowArn,
        ByteString
"/mediaStreams/",
        Text -> ByteString
forall a. ToByteString a => a -> ByteString
Core.toBS Text
mediaStreamName
      ]

instance Core.ToQuery RemoveFlowMediaStream where
  toQuery :: RemoveFlowMediaStream -> QueryString
toQuery = QueryString -> RemoveFlowMediaStream -> QueryString
forall a b. a -> b -> a
Prelude.const QueryString
forall a. Monoid a => a
Prelude.mempty

-- | /See:/ 'newRemoveFlowMediaStreamResponse' smart constructor.
data RemoveFlowMediaStreamResponse = RemoveFlowMediaStreamResponse'
  { -- | The name of the media stream that was removed.
    RemoveFlowMediaStreamResponse -> Maybe Text
mediaStreamName :: Prelude.Maybe Prelude.Text,
    -- | The Amazon Resource Name (ARN) of the flow.
    RemoveFlowMediaStreamResponse -> Maybe Text
flowArn :: Prelude.Maybe Prelude.Text,
    -- | The response's http status code.
    RemoveFlowMediaStreamResponse -> Int
httpStatus :: Prelude.Int
  }
  deriving (RemoveFlowMediaStreamResponse
-> RemoveFlowMediaStreamResponse -> Bool
(RemoveFlowMediaStreamResponse
 -> RemoveFlowMediaStreamResponse -> Bool)
-> (RemoveFlowMediaStreamResponse
    -> RemoveFlowMediaStreamResponse -> Bool)
-> Eq RemoveFlowMediaStreamResponse
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: RemoveFlowMediaStreamResponse
-> RemoveFlowMediaStreamResponse -> Bool
$c/= :: RemoveFlowMediaStreamResponse
-> RemoveFlowMediaStreamResponse -> Bool
== :: RemoveFlowMediaStreamResponse
-> RemoveFlowMediaStreamResponse -> Bool
$c== :: RemoveFlowMediaStreamResponse
-> RemoveFlowMediaStreamResponse -> Bool
Prelude.Eq, ReadPrec [RemoveFlowMediaStreamResponse]
ReadPrec RemoveFlowMediaStreamResponse
Int -> ReadS RemoveFlowMediaStreamResponse
ReadS [RemoveFlowMediaStreamResponse]
(Int -> ReadS RemoveFlowMediaStreamResponse)
-> ReadS [RemoveFlowMediaStreamResponse]
-> ReadPrec RemoveFlowMediaStreamResponse
-> ReadPrec [RemoveFlowMediaStreamResponse]
-> Read RemoveFlowMediaStreamResponse
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [RemoveFlowMediaStreamResponse]
$creadListPrec :: ReadPrec [RemoveFlowMediaStreamResponse]
readPrec :: ReadPrec RemoveFlowMediaStreamResponse
$creadPrec :: ReadPrec RemoveFlowMediaStreamResponse
readList :: ReadS [RemoveFlowMediaStreamResponse]
$creadList :: ReadS [RemoveFlowMediaStreamResponse]
readsPrec :: Int -> ReadS RemoveFlowMediaStreamResponse
$creadsPrec :: Int -> ReadS RemoveFlowMediaStreamResponse
Prelude.Read, Int -> RemoveFlowMediaStreamResponse -> ShowS
[RemoveFlowMediaStreamResponse] -> ShowS
RemoveFlowMediaStreamResponse -> String
(Int -> RemoveFlowMediaStreamResponse -> ShowS)
-> (RemoveFlowMediaStreamResponse -> String)
-> ([RemoveFlowMediaStreamResponse] -> ShowS)
-> Show RemoveFlowMediaStreamResponse
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [RemoveFlowMediaStreamResponse] -> ShowS
$cshowList :: [RemoveFlowMediaStreamResponse] -> ShowS
show :: RemoveFlowMediaStreamResponse -> String
$cshow :: RemoveFlowMediaStreamResponse -> String
showsPrec :: Int -> RemoveFlowMediaStreamResponse -> ShowS
$cshowsPrec :: Int -> RemoveFlowMediaStreamResponse -> ShowS
Prelude.Show, (forall x.
 RemoveFlowMediaStreamResponse
 -> Rep RemoveFlowMediaStreamResponse x)
-> (forall x.
    Rep RemoveFlowMediaStreamResponse x
    -> RemoveFlowMediaStreamResponse)
-> Generic RemoveFlowMediaStreamResponse
forall x.
Rep RemoveFlowMediaStreamResponse x
-> RemoveFlowMediaStreamResponse
forall x.
RemoveFlowMediaStreamResponse
-> Rep RemoveFlowMediaStreamResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep RemoveFlowMediaStreamResponse x
-> RemoveFlowMediaStreamResponse
$cfrom :: forall x.
RemoveFlowMediaStreamResponse
-> Rep RemoveFlowMediaStreamResponse x
Prelude.Generic)

-- |
-- Create a value of 'RemoveFlowMediaStreamResponse' 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:
--
-- 'mediaStreamName', 'removeFlowMediaStreamResponse_mediaStreamName' - The name of the media stream that was removed.
--
-- 'flowArn', 'removeFlowMediaStreamResponse_flowArn' - The Amazon Resource Name (ARN) of the flow.
--
-- 'httpStatus', 'removeFlowMediaStreamResponse_httpStatus' - The response's http status code.
newRemoveFlowMediaStreamResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  RemoveFlowMediaStreamResponse
newRemoveFlowMediaStreamResponse :: Int -> RemoveFlowMediaStreamResponse
newRemoveFlowMediaStreamResponse Int
pHttpStatus_ =
  RemoveFlowMediaStreamResponse' :: Maybe Text -> Maybe Text -> Int -> RemoveFlowMediaStreamResponse
RemoveFlowMediaStreamResponse'
    { $sel:mediaStreamName:RemoveFlowMediaStreamResponse' :: Maybe Text
mediaStreamName =
        Maybe Text
forall a. Maybe a
Prelude.Nothing,
      $sel:flowArn:RemoveFlowMediaStreamResponse' :: Maybe Text
flowArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
      $sel:httpStatus:RemoveFlowMediaStreamResponse' :: Int
httpStatus = Int
pHttpStatus_
    }

-- | The name of the media stream that was removed.
removeFlowMediaStreamResponse_mediaStreamName :: Lens.Lens' RemoveFlowMediaStreamResponse (Prelude.Maybe Prelude.Text)
removeFlowMediaStreamResponse_mediaStreamName :: (Maybe Text -> f (Maybe Text))
-> RemoveFlowMediaStreamResponse -> f RemoveFlowMediaStreamResponse
removeFlowMediaStreamResponse_mediaStreamName = (RemoveFlowMediaStreamResponse -> Maybe Text)
-> (RemoveFlowMediaStreamResponse
    -> Maybe Text -> RemoveFlowMediaStreamResponse)
-> Lens
     RemoveFlowMediaStreamResponse
     RemoveFlowMediaStreamResponse
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveFlowMediaStreamResponse' {Maybe Text
mediaStreamName :: Maybe Text
$sel:mediaStreamName:RemoveFlowMediaStreamResponse' :: RemoveFlowMediaStreamResponse -> Maybe Text
mediaStreamName} -> Maybe Text
mediaStreamName) (\s :: RemoveFlowMediaStreamResponse
s@RemoveFlowMediaStreamResponse' {} Maybe Text
a -> RemoveFlowMediaStreamResponse
s {$sel:mediaStreamName:RemoveFlowMediaStreamResponse' :: Maybe Text
mediaStreamName = Maybe Text
a} :: RemoveFlowMediaStreamResponse)

-- | The Amazon Resource Name (ARN) of the flow.
removeFlowMediaStreamResponse_flowArn :: Lens.Lens' RemoveFlowMediaStreamResponse (Prelude.Maybe Prelude.Text)
removeFlowMediaStreamResponse_flowArn :: (Maybe Text -> f (Maybe Text))
-> RemoveFlowMediaStreamResponse -> f RemoveFlowMediaStreamResponse
removeFlowMediaStreamResponse_flowArn = (RemoveFlowMediaStreamResponse -> Maybe Text)
-> (RemoveFlowMediaStreamResponse
    -> Maybe Text -> RemoveFlowMediaStreamResponse)
-> Lens
     RemoveFlowMediaStreamResponse
     RemoveFlowMediaStreamResponse
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\RemoveFlowMediaStreamResponse' {Maybe Text
flowArn :: Maybe Text
$sel:flowArn:RemoveFlowMediaStreamResponse' :: RemoveFlowMediaStreamResponse -> Maybe Text
flowArn} -> Maybe Text
flowArn) (\s :: RemoveFlowMediaStreamResponse
s@RemoveFlowMediaStreamResponse' {} Maybe Text
a -> RemoveFlowMediaStreamResponse
s {$sel:flowArn:RemoveFlowMediaStreamResponse' :: Maybe Text
flowArn = Maybe Text
a} :: RemoveFlowMediaStreamResponse)

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

instance Prelude.NFData RemoveFlowMediaStreamResponse