{-# 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.MediaConvert.Types.Mp4CslgAtom
-- 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.MediaConvert.Types.Mp4CslgAtom
  ( Mp4CslgAtom
      ( ..,
        Mp4CslgAtom_EXCLUDE,
        Mp4CslgAtom_INCLUDE
      ),
  )
where

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

-- | When enabled, file composition times will start at zero, composition
-- times in the \'ctts\' (composition time to sample) box for B-frames will
-- be negative, and a \'cslg\' (composition shift least greatest) box will
-- be included per 14496-1 amendment 1. This improves compatibility with
-- Apple players and tools.
newtype Mp4CslgAtom = Mp4CslgAtom'
  { Mp4CslgAtom -> Text
fromMp4CslgAtom ::
      Data.Text
  }
  deriving stock
    ( Int -> Mp4CslgAtom -> ShowS
[Mp4CslgAtom] -> ShowS
Mp4CslgAtom -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Mp4CslgAtom] -> ShowS
$cshowList :: [Mp4CslgAtom] -> ShowS
show :: Mp4CslgAtom -> String
$cshow :: Mp4CslgAtom -> String
showsPrec :: Int -> Mp4CslgAtom -> ShowS
$cshowsPrec :: Int -> Mp4CslgAtom -> ShowS
Prelude.Show,
      ReadPrec [Mp4CslgAtom]
ReadPrec Mp4CslgAtom
Int -> ReadS Mp4CslgAtom
ReadS [Mp4CslgAtom]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [Mp4CslgAtom]
$creadListPrec :: ReadPrec [Mp4CslgAtom]
readPrec :: ReadPrec Mp4CslgAtom
$creadPrec :: ReadPrec Mp4CslgAtom
readList :: ReadS [Mp4CslgAtom]
$creadList :: ReadS [Mp4CslgAtom]
readsPrec :: Int -> ReadS Mp4CslgAtom
$creadsPrec :: Int -> ReadS Mp4CslgAtom
Prelude.Read,
      Mp4CslgAtom -> Mp4CslgAtom -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Mp4CslgAtom -> Mp4CslgAtom -> Bool
$c/= :: Mp4CslgAtom -> Mp4CslgAtom -> Bool
== :: Mp4CslgAtom -> Mp4CslgAtom -> Bool
$c== :: Mp4CslgAtom -> Mp4CslgAtom -> Bool
Prelude.Eq,
      Eq Mp4CslgAtom
Mp4CslgAtom -> Mp4CslgAtom -> Bool
Mp4CslgAtom -> Mp4CslgAtom -> Ordering
Mp4CslgAtom -> Mp4CslgAtom -> Mp4CslgAtom
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 :: Mp4CslgAtom -> Mp4CslgAtom -> Mp4CslgAtom
$cmin :: Mp4CslgAtom -> Mp4CslgAtom -> Mp4CslgAtom
max :: Mp4CslgAtom -> Mp4CslgAtom -> Mp4CslgAtom
$cmax :: Mp4CslgAtom -> Mp4CslgAtom -> Mp4CslgAtom
>= :: Mp4CslgAtom -> Mp4CslgAtom -> Bool
$c>= :: Mp4CslgAtom -> Mp4CslgAtom -> Bool
> :: Mp4CslgAtom -> Mp4CslgAtom -> Bool
$c> :: Mp4CslgAtom -> Mp4CslgAtom -> Bool
<= :: Mp4CslgAtom -> Mp4CslgAtom -> Bool
$c<= :: Mp4CslgAtom -> Mp4CslgAtom -> Bool
< :: Mp4CslgAtom -> Mp4CslgAtom -> Bool
$c< :: Mp4CslgAtom -> Mp4CslgAtom -> Bool
compare :: Mp4CslgAtom -> Mp4CslgAtom -> Ordering
$ccompare :: Mp4CslgAtom -> Mp4CslgAtom -> Ordering
Prelude.Ord,
      forall x. Rep Mp4CslgAtom x -> Mp4CslgAtom
forall x. Mp4CslgAtom -> Rep Mp4CslgAtom x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Mp4CslgAtom x -> Mp4CslgAtom
$cfrom :: forall x. Mp4CslgAtom -> Rep Mp4CslgAtom x
Prelude.Generic
    )
  deriving newtype
    ( Eq Mp4CslgAtom
Int -> Mp4CslgAtom -> Int
Mp4CslgAtom -> Int
forall a. Eq a -> (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: Mp4CslgAtom -> Int
$chash :: Mp4CslgAtom -> Int
hashWithSalt :: Int -> Mp4CslgAtom -> Int
$chashWithSalt :: Int -> Mp4CslgAtom -> Int
Prelude.Hashable,
      Mp4CslgAtom -> ()
forall a. (a -> ()) -> NFData a
rnf :: Mp4CslgAtom -> ()
$crnf :: Mp4CslgAtom -> ()
Prelude.NFData,
      Text -> Either String Mp4CslgAtom
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String Mp4CslgAtom
$cfromText :: Text -> Either String Mp4CslgAtom
Data.FromText,
      Mp4CslgAtom -> Text
forall a. (a -> Text) -> ToText a
toText :: Mp4CslgAtom -> Text
$ctoText :: Mp4CslgAtom -> Text
Data.ToText,
      Mp4CslgAtom -> ByteString
forall a. (a -> ByteString) -> ToByteString a
toBS :: Mp4CslgAtom -> ByteString
$ctoBS :: Mp4CslgAtom -> ByteString
Data.ToByteString,
      Mp4CslgAtom -> ByteStringBuilder
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: Mp4CslgAtom -> ByteStringBuilder
$cbuild :: Mp4CslgAtom -> ByteStringBuilder
Data.ToLog,
      HeaderName -> Mp4CslgAtom -> [Header]
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> Mp4CslgAtom -> [Header]
$ctoHeader :: HeaderName -> Mp4CslgAtom -> [Header]
Data.ToHeader,
      Mp4CslgAtom -> QueryString
forall a. (a -> QueryString) -> ToQuery a
toQuery :: Mp4CslgAtom -> QueryString
$ctoQuery :: Mp4CslgAtom -> QueryString
Data.ToQuery,
      Value -> Parser [Mp4CslgAtom]
Value -> Parser Mp4CslgAtom
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [Mp4CslgAtom]
$cparseJSONList :: Value -> Parser [Mp4CslgAtom]
parseJSON :: Value -> Parser Mp4CslgAtom
$cparseJSON :: Value -> Parser Mp4CslgAtom
Data.FromJSON,
      FromJSONKeyFunction [Mp4CslgAtom]
FromJSONKeyFunction Mp4CslgAtom
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [Mp4CslgAtom]
$cfromJSONKeyList :: FromJSONKeyFunction [Mp4CslgAtom]
fromJSONKey :: FromJSONKeyFunction Mp4CslgAtom
$cfromJSONKey :: FromJSONKeyFunction Mp4CslgAtom
Data.FromJSONKey,
      [Mp4CslgAtom] -> Encoding
[Mp4CslgAtom] -> Value
Mp4CslgAtom -> Encoding
Mp4CslgAtom -> Value
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [Mp4CslgAtom] -> Encoding
$ctoEncodingList :: [Mp4CslgAtom] -> Encoding
toJSONList :: [Mp4CslgAtom] -> Value
$ctoJSONList :: [Mp4CslgAtom] -> Value
toEncoding :: Mp4CslgAtom -> Encoding
$ctoEncoding :: Mp4CslgAtom -> Encoding
toJSON :: Mp4CslgAtom -> Value
$ctoJSON :: Mp4CslgAtom -> Value
Data.ToJSON,
      ToJSONKeyFunction [Mp4CslgAtom]
ToJSONKeyFunction Mp4CslgAtom
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [Mp4CslgAtom]
$ctoJSONKeyList :: ToJSONKeyFunction [Mp4CslgAtom]
toJSONKey :: ToJSONKeyFunction Mp4CslgAtom
$ctoJSONKey :: ToJSONKeyFunction Mp4CslgAtom
Data.ToJSONKey,
      [Node] -> Either String Mp4CslgAtom
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String Mp4CslgAtom
$cparseXML :: [Node] -> Either String Mp4CslgAtom
Data.FromXML,
      Mp4CslgAtom -> XML
forall a. (a -> XML) -> ToXML a
toXML :: Mp4CslgAtom -> XML
$ctoXML :: Mp4CslgAtom -> XML
Data.ToXML
    )

pattern Mp4CslgAtom_EXCLUDE :: Mp4CslgAtom
pattern $bMp4CslgAtom_EXCLUDE :: Mp4CslgAtom
$mMp4CslgAtom_EXCLUDE :: forall {r}. Mp4CslgAtom -> ((# #) -> r) -> ((# #) -> r) -> r
Mp4CslgAtom_EXCLUDE = Mp4CslgAtom' "EXCLUDE"

pattern Mp4CslgAtom_INCLUDE :: Mp4CslgAtom
pattern $bMp4CslgAtom_INCLUDE :: Mp4CslgAtom
$mMp4CslgAtom_INCLUDE :: forall {r}. Mp4CslgAtom -> ((# #) -> r) -> ((# #) -> r) -> r
Mp4CslgAtom_INCLUDE = Mp4CslgAtom' "INCLUDE"

{-# COMPLETE
  Mp4CslgAtom_EXCLUDE,
  Mp4CslgAtom_INCLUDE,
  Mp4CslgAtom'
  #-}