{-# 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.MovCslgAtom
-- 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)
module Amazonka.MediaConvert.Types.MovCslgAtom
  ( MovCslgAtom
      ( ..,
        MovCslgAtom_EXCLUDE,
        MovCslgAtom_INCLUDE
      ),
  )
where

import qualified Amazonka.Core as Core
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 MovCslgAtom = MovCslgAtom'
  { MovCslgAtom -> Text
fromMovCslgAtom ::
      Core.Text
  }
  deriving stock
    ( Int -> MovCslgAtom -> ShowS
[MovCslgAtom] -> ShowS
MovCslgAtom -> String
(Int -> MovCslgAtom -> ShowS)
-> (MovCslgAtom -> String)
-> ([MovCslgAtom] -> ShowS)
-> Show MovCslgAtom
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [MovCslgAtom] -> ShowS
$cshowList :: [MovCslgAtom] -> ShowS
show :: MovCslgAtom -> String
$cshow :: MovCslgAtom -> String
showsPrec :: Int -> MovCslgAtom -> ShowS
$cshowsPrec :: Int -> MovCslgAtom -> ShowS
Prelude.Show,
      ReadPrec [MovCslgAtom]
ReadPrec MovCslgAtom
Int -> ReadS MovCslgAtom
ReadS [MovCslgAtom]
(Int -> ReadS MovCslgAtom)
-> ReadS [MovCslgAtom]
-> ReadPrec MovCslgAtom
-> ReadPrec [MovCslgAtom]
-> Read MovCslgAtom
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [MovCslgAtom]
$creadListPrec :: ReadPrec [MovCslgAtom]
readPrec :: ReadPrec MovCslgAtom
$creadPrec :: ReadPrec MovCslgAtom
readList :: ReadS [MovCslgAtom]
$creadList :: ReadS [MovCslgAtom]
readsPrec :: Int -> ReadS MovCslgAtom
$creadsPrec :: Int -> ReadS MovCslgAtom
Prelude.Read,
      MovCslgAtom -> MovCslgAtom -> Bool
(MovCslgAtom -> MovCslgAtom -> Bool)
-> (MovCslgAtom -> MovCslgAtom -> Bool) -> Eq MovCslgAtom
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: MovCslgAtom -> MovCslgAtom -> Bool
$c/= :: MovCslgAtom -> MovCslgAtom -> Bool
== :: MovCslgAtom -> MovCslgAtom -> Bool
$c== :: MovCslgAtom -> MovCslgAtom -> Bool
Prelude.Eq,
      Eq MovCslgAtom
Eq MovCslgAtom
-> (MovCslgAtom -> MovCslgAtom -> Ordering)
-> (MovCslgAtom -> MovCslgAtom -> Bool)
-> (MovCslgAtom -> MovCslgAtom -> Bool)
-> (MovCslgAtom -> MovCslgAtom -> Bool)
-> (MovCslgAtom -> MovCslgAtom -> Bool)
-> (MovCslgAtom -> MovCslgAtom -> MovCslgAtom)
-> (MovCslgAtom -> MovCslgAtom -> MovCslgAtom)
-> Ord MovCslgAtom
MovCslgAtom -> MovCslgAtom -> Bool
MovCslgAtom -> MovCslgAtom -> Ordering
MovCslgAtom -> MovCslgAtom -> MovCslgAtom
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 :: MovCslgAtom -> MovCslgAtom -> MovCslgAtom
$cmin :: MovCslgAtom -> MovCslgAtom -> MovCslgAtom
max :: MovCslgAtom -> MovCslgAtom -> MovCslgAtom
$cmax :: MovCslgAtom -> MovCslgAtom -> MovCslgAtom
>= :: MovCslgAtom -> MovCslgAtom -> Bool
$c>= :: MovCslgAtom -> MovCslgAtom -> Bool
> :: MovCslgAtom -> MovCslgAtom -> Bool
$c> :: MovCslgAtom -> MovCslgAtom -> Bool
<= :: MovCslgAtom -> MovCslgAtom -> Bool
$c<= :: MovCslgAtom -> MovCslgAtom -> Bool
< :: MovCslgAtom -> MovCslgAtom -> Bool
$c< :: MovCslgAtom -> MovCslgAtom -> Bool
compare :: MovCslgAtom -> MovCslgAtom -> Ordering
$ccompare :: MovCslgAtom -> MovCslgAtom -> Ordering
$cp1Ord :: Eq MovCslgAtom
Prelude.Ord,
      (forall x. MovCslgAtom -> Rep MovCslgAtom x)
-> (forall x. Rep MovCslgAtom x -> MovCslgAtom)
-> Generic MovCslgAtom
forall x. Rep MovCslgAtom x -> MovCslgAtom
forall x. MovCslgAtom -> Rep MovCslgAtom x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep MovCslgAtom x -> MovCslgAtom
$cfrom :: forall x. MovCslgAtom -> Rep MovCslgAtom x
Prelude.Generic
    )
  deriving newtype
    ( Int -> MovCslgAtom -> Int
MovCslgAtom -> Int
(Int -> MovCslgAtom -> Int)
-> (MovCslgAtom -> Int) -> Hashable MovCslgAtom
forall a. (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: MovCslgAtom -> Int
$chash :: MovCslgAtom -> Int
hashWithSalt :: Int -> MovCslgAtom -> Int
$chashWithSalt :: Int -> MovCslgAtom -> Int
Prelude.Hashable,
      MovCslgAtom -> ()
(MovCslgAtom -> ()) -> NFData MovCslgAtom
forall a. (a -> ()) -> NFData a
rnf :: MovCslgAtom -> ()
$crnf :: MovCslgAtom -> ()
Prelude.NFData,
      Text -> Either String MovCslgAtom
(Text -> Either String MovCslgAtom) -> FromText MovCslgAtom
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String MovCslgAtom
$cfromText :: Text -> Either String MovCslgAtom
Core.FromText,
      MovCslgAtom -> Text
(MovCslgAtom -> Text) -> ToText MovCslgAtom
forall a. (a -> Text) -> ToText a
toText :: MovCslgAtom -> Text
$ctoText :: MovCslgAtom -> Text
Core.ToText,
      MovCslgAtom -> ByteString
(MovCslgAtom -> ByteString) -> ToByteString MovCslgAtom
forall a. (a -> ByteString) -> ToByteString a
toBS :: MovCslgAtom -> ByteString
$ctoBS :: MovCslgAtom -> ByteString
Core.ToByteString,
      MovCslgAtom -> ByteStringBuilder
(MovCslgAtom -> ByteStringBuilder) -> ToLog MovCslgAtom
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: MovCslgAtom -> ByteStringBuilder
$cbuild :: MovCslgAtom -> ByteStringBuilder
Core.ToLog,
      HeaderName -> MovCslgAtom -> [Header]
(HeaderName -> MovCslgAtom -> [Header]) -> ToHeader MovCslgAtom
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> MovCslgAtom -> [Header]
$ctoHeader :: HeaderName -> MovCslgAtom -> [Header]
Core.ToHeader,
      MovCslgAtom -> QueryString
(MovCslgAtom -> QueryString) -> ToQuery MovCslgAtom
forall a. (a -> QueryString) -> ToQuery a
toQuery :: MovCslgAtom -> QueryString
$ctoQuery :: MovCslgAtom -> QueryString
Core.ToQuery,
      Value -> Parser [MovCslgAtom]
Value -> Parser MovCslgAtom
(Value -> Parser MovCslgAtom)
-> (Value -> Parser [MovCslgAtom]) -> FromJSON MovCslgAtom
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [MovCslgAtom]
$cparseJSONList :: Value -> Parser [MovCslgAtom]
parseJSON :: Value -> Parser MovCslgAtom
$cparseJSON :: Value -> Parser MovCslgAtom
Core.FromJSON,
      FromJSONKeyFunction [MovCslgAtom]
FromJSONKeyFunction MovCslgAtom
FromJSONKeyFunction MovCslgAtom
-> FromJSONKeyFunction [MovCslgAtom] -> FromJSONKey MovCslgAtom
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [MovCslgAtom]
$cfromJSONKeyList :: FromJSONKeyFunction [MovCslgAtom]
fromJSONKey :: FromJSONKeyFunction MovCslgAtom
$cfromJSONKey :: FromJSONKeyFunction MovCslgAtom
Core.FromJSONKey,
      [MovCslgAtom] -> Encoding
[MovCslgAtom] -> Value
MovCslgAtom -> Encoding
MovCslgAtom -> Value
(MovCslgAtom -> Value)
-> (MovCslgAtom -> Encoding)
-> ([MovCslgAtom] -> Value)
-> ([MovCslgAtom] -> Encoding)
-> ToJSON MovCslgAtom
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [MovCslgAtom] -> Encoding
$ctoEncodingList :: [MovCslgAtom] -> Encoding
toJSONList :: [MovCslgAtom] -> Value
$ctoJSONList :: [MovCslgAtom] -> Value
toEncoding :: MovCslgAtom -> Encoding
$ctoEncoding :: MovCslgAtom -> Encoding
toJSON :: MovCslgAtom -> Value
$ctoJSON :: MovCslgAtom -> Value
Core.ToJSON,
      ToJSONKeyFunction [MovCslgAtom]
ToJSONKeyFunction MovCslgAtom
ToJSONKeyFunction MovCslgAtom
-> ToJSONKeyFunction [MovCslgAtom] -> ToJSONKey MovCslgAtom
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [MovCslgAtom]
$ctoJSONKeyList :: ToJSONKeyFunction [MovCslgAtom]
toJSONKey :: ToJSONKeyFunction MovCslgAtom
$ctoJSONKey :: ToJSONKeyFunction MovCslgAtom
Core.ToJSONKey,
      [Node] -> Either String MovCslgAtom
([Node] -> Either String MovCslgAtom) -> FromXML MovCslgAtom
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String MovCslgAtom
$cparseXML :: [Node] -> Either String MovCslgAtom
Core.FromXML,
      MovCslgAtom -> XML
(MovCslgAtom -> XML) -> ToXML MovCslgAtom
forall a. (a -> XML) -> ToXML a
toXML :: MovCslgAtom -> XML
$ctoXML :: MovCslgAtom -> XML
Core.ToXML
    )

pattern MovCslgAtom_EXCLUDE :: MovCslgAtom
pattern $bMovCslgAtom_EXCLUDE :: MovCslgAtom
$mMovCslgAtom_EXCLUDE :: forall r. MovCslgAtom -> (Void# -> r) -> (Void# -> r) -> r
MovCslgAtom_EXCLUDE = MovCslgAtom' "EXCLUDE"

pattern MovCslgAtom_INCLUDE :: MovCslgAtom
pattern $bMovCslgAtom_INCLUDE :: MovCslgAtom
$mMovCslgAtom_INCLUDE :: forall r. MovCslgAtom -> (Void# -> r) -> (Void# -> r) -> r
MovCslgAtom_INCLUDE = MovCslgAtom' "INCLUDE"

{-# COMPLETE
  MovCslgAtom_EXCLUDE,
  MovCslgAtom_INCLUDE,
  MovCslgAtom'
  #-}