{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE LambdaCase #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE PatternSynonyms #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}

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

-- |
-- Module      : Amazonka.MediaLive.Types.LastFrameClippingBehavior
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
module Amazonka.MediaLive.Types.LastFrameClippingBehavior
  ( LastFrameClippingBehavior
      ( ..,
        LastFrameClippingBehavior_EXCLUDE_LAST_FRAME,
        LastFrameClippingBehavior_INCLUDE_LAST_FRAME
      ),
  )
where

import qualified Amazonka.Core as Core
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude

-- | If you specify a StopTimecode in an input (in order to clip the file),
-- you can specify if you want the clip to exclude (the default) or include
-- the frame specified by the timecode.
newtype LastFrameClippingBehavior = LastFrameClippingBehavior'
  { LastFrameClippingBehavior -> Text
fromLastFrameClippingBehavior ::
      Data.Text
  }
  deriving stock
    ( Int -> LastFrameClippingBehavior -> ShowS
[LastFrameClippingBehavior] -> ShowS
LastFrameClippingBehavior -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [LastFrameClippingBehavior] -> ShowS
$cshowList :: [LastFrameClippingBehavior] -> ShowS
show :: LastFrameClippingBehavior -> String
$cshow :: LastFrameClippingBehavior -> String
showsPrec :: Int -> LastFrameClippingBehavior -> ShowS
$cshowsPrec :: Int -> LastFrameClippingBehavior -> ShowS
Prelude.Show,
      ReadPrec [LastFrameClippingBehavior]
ReadPrec LastFrameClippingBehavior
Int -> ReadS LastFrameClippingBehavior
ReadS [LastFrameClippingBehavior]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [LastFrameClippingBehavior]
$creadListPrec :: ReadPrec [LastFrameClippingBehavior]
readPrec :: ReadPrec LastFrameClippingBehavior
$creadPrec :: ReadPrec LastFrameClippingBehavior
readList :: ReadS [LastFrameClippingBehavior]
$creadList :: ReadS [LastFrameClippingBehavior]
readsPrec :: Int -> ReadS LastFrameClippingBehavior
$creadsPrec :: Int -> ReadS LastFrameClippingBehavior
Prelude.Read,
      LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
$c/= :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
== :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
$c== :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
Prelude.Eq,
      Eq LastFrameClippingBehavior
LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
LastFrameClippingBehavior -> LastFrameClippingBehavior -> Ordering
LastFrameClippingBehavior
-> LastFrameClippingBehavior -> LastFrameClippingBehavior
forall a.
Eq a
-> (a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
min :: LastFrameClippingBehavior
-> LastFrameClippingBehavior -> LastFrameClippingBehavior
$cmin :: LastFrameClippingBehavior
-> LastFrameClippingBehavior -> LastFrameClippingBehavior
max :: LastFrameClippingBehavior
-> LastFrameClippingBehavior -> LastFrameClippingBehavior
$cmax :: LastFrameClippingBehavior
-> LastFrameClippingBehavior -> LastFrameClippingBehavior
>= :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
$c>= :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
> :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
$c> :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
<= :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
$c<= :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
< :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
$c< :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Bool
compare :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Ordering
$ccompare :: LastFrameClippingBehavior -> LastFrameClippingBehavior -> Ordering
Prelude.Ord,
      forall x.
Rep LastFrameClippingBehavior x -> LastFrameClippingBehavior
forall x.
LastFrameClippingBehavior -> Rep LastFrameClippingBehavior x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep LastFrameClippingBehavior x -> LastFrameClippingBehavior
$cfrom :: forall x.
LastFrameClippingBehavior -> Rep LastFrameClippingBehavior x
Prelude.Generic
    )
  deriving newtype
    ( Eq LastFrameClippingBehavior
Int -> LastFrameClippingBehavior -> Int
LastFrameClippingBehavior -> Int
forall a. Eq a -> (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: LastFrameClippingBehavior -> Int
$chash :: LastFrameClippingBehavior -> Int
hashWithSalt :: Int -> LastFrameClippingBehavior -> Int
$chashWithSalt :: Int -> LastFrameClippingBehavior -> Int
Prelude.Hashable,
      LastFrameClippingBehavior -> ()
forall a. (a -> ()) -> NFData a
rnf :: LastFrameClippingBehavior -> ()
$crnf :: LastFrameClippingBehavior -> ()
Prelude.NFData,
      Text -> Either String LastFrameClippingBehavior
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String LastFrameClippingBehavior
$cfromText :: Text -> Either String LastFrameClippingBehavior
Data.FromText,
      LastFrameClippingBehavior -> Text
forall a. (a -> Text) -> ToText a
toText :: LastFrameClippingBehavior -> Text
$ctoText :: LastFrameClippingBehavior -> Text
Data.ToText,
      LastFrameClippingBehavior -> ByteString
forall a. (a -> ByteString) -> ToByteString a
toBS :: LastFrameClippingBehavior -> ByteString
$ctoBS :: LastFrameClippingBehavior -> ByteString
Data.ToByteString,
      LastFrameClippingBehavior -> ByteStringBuilder
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: LastFrameClippingBehavior -> ByteStringBuilder
$cbuild :: LastFrameClippingBehavior -> ByteStringBuilder
Data.ToLog,
      HeaderName -> LastFrameClippingBehavior -> [Header]
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> LastFrameClippingBehavior -> [Header]
$ctoHeader :: HeaderName -> LastFrameClippingBehavior -> [Header]
Data.ToHeader,
      LastFrameClippingBehavior -> QueryString
forall a. (a -> QueryString) -> ToQuery a
toQuery :: LastFrameClippingBehavior -> QueryString
$ctoQuery :: LastFrameClippingBehavior -> QueryString
Data.ToQuery,
      Value -> Parser [LastFrameClippingBehavior]
Value -> Parser LastFrameClippingBehavior
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [LastFrameClippingBehavior]
$cparseJSONList :: Value -> Parser [LastFrameClippingBehavior]
parseJSON :: Value -> Parser LastFrameClippingBehavior
$cparseJSON :: Value -> Parser LastFrameClippingBehavior
Data.FromJSON,
      FromJSONKeyFunction [LastFrameClippingBehavior]
FromJSONKeyFunction LastFrameClippingBehavior
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [LastFrameClippingBehavior]
$cfromJSONKeyList :: FromJSONKeyFunction [LastFrameClippingBehavior]
fromJSONKey :: FromJSONKeyFunction LastFrameClippingBehavior
$cfromJSONKey :: FromJSONKeyFunction LastFrameClippingBehavior
Data.FromJSONKey,
      [LastFrameClippingBehavior] -> Encoding
[LastFrameClippingBehavior] -> Value
LastFrameClippingBehavior -> Encoding
LastFrameClippingBehavior -> Value
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [LastFrameClippingBehavior] -> Encoding
$ctoEncodingList :: [LastFrameClippingBehavior] -> Encoding
toJSONList :: [LastFrameClippingBehavior] -> Value
$ctoJSONList :: [LastFrameClippingBehavior] -> Value
toEncoding :: LastFrameClippingBehavior -> Encoding
$ctoEncoding :: LastFrameClippingBehavior -> Encoding
toJSON :: LastFrameClippingBehavior -> Value
$ctoJSON :: LastFrameClippingBehavior -> Value
Data.ToJSON,
      ToJSONKeyFunction [LastFrameClippingBehavior]
ToJSONKeyFunction LastFrameClippingBehavior
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [LastFrameClippingBehavior]
$ctoJSONKeyList :: ToJSONKeyFunction [LastFrameClippingBehavior]
toJSONKey :: ToJSONKeyFunction LastFrameClippingBehavior
$ctoJSONKey :: ToJSONKeyFunction LastFrameClippingBehavior
Data.ToJSONKey,
      [Node] -> Either String LastFrameClippingBehavior
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String LastFrameClippingBehavior
$cparseXML :: [Node] -> Either String LastFrameClippingBehavior
Data.FromXML,
      LastFrameClippingBehavior -> XML
forall a. (a -> XML) -> ToXML a
toXML :: LastFrameClippingBehavior -> XML
$ctoXML :: LastFrameClippingBehavior -> XML
Data.ToXML
    )

pattern LastFrameClippingBehavior_EXCLUDE_LAST_FRAME :: LastFrameClippingBehavior
pattern $bLastFrameClippingBehavior_EXCLUDE_LAST_FRAME :: LastFrameClippingBehavior
$mLastFrameClippingBehavior_EXCLUDE_LAST_FRAME :: forall {r}.
LastFrameClippingBehavior -> ((# #) -> r) -> ((# #) -> r) -> r
LastFrameClippingBehavior_EXCLUDE_LAST_FRAME = LastFrameClippingBehavior' "EXCLUDE_LAST_FRAME"

pattern LastFrameClippingBehavior_INCLUDE_LAST_FRAME :: LastFrameClippingBehavior
pattern $bLastFrameClippingBehavior_INCLUDE_LAST_FRAME :: LastFrameClippingBehavior
$mLastFrameClippingBehavior_INCLUDE_LAST_FRAME :: forall {r}.
LastFrameClippingBehavior -> ((# #) -> r) -> ((# #) -> r) -> r
LastFrameClippingBehavior_INCLUDE_LAST_FRAME = LastFrameClippingBehavior' "INCLUDE_LAST_FRAME"

{-# COMPLETE
  LastFrameClippingBehavior_EXCLUDE_LAST_FRAME,
  LastFrameClippingBehavior_INCLUDE_LAST_FRAME,
  LastFrameClippingBehavior'
  #-}