{-# 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.CmfcDescriptiveVideoServiceFlag
-- 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.CmfcDescriptiveVideoServiceFlag
  ( CmfcDescriptiveVideoServiceFlag
      ( ..,
        CmfcDescriptiveVideoServiceFlag_DONT_FLAG,
        CmfcDescriptiveVideoServiceFlag_FLAG
      ),
  )
where

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

-- | Specify whether to flag this audio track as descriptive video service
-- (DVS) in your HLS parent manifest. When you choose Flag (FLAG),
-- MediaConvert includes the parameter
-- CHARACTERISTICS=\"public.accessibility.describes-video\" in the
-- EXT-X-MEDIA entry for this track. When you keep the default choice,
-- Don\'t flag (DONT_FLAG), MediaConvert leaves this parameter out. The DVS
-- flag can help with accessibility on Apple devices. For more information,
-- see the Apple documentation.
newtype CmfcDescriptiveVideoServiceFlag = CmfcDescriptiveVideoServiceFlag'
  { CmfcDescriptiveVideoServiceFlag -> Text
fromCmfcDescriptiveVideoServiceFlag ::
      Data.Text
  }
  deriving stock
    ( Int -> CmfcDescriptiveVideoServiceFlag -> ShowS
[CmfcDescriptiveVideoServiceFlag] -> ShowS
CmfcDescriptiveVideoServiceFlag -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CmfcDescriptiveVideoServiceFlag] -> ShowS
$cshowList :: [CmfcDescriptiveVideoServiceFlag] -> ShowS
show :: CmfcDescriptiveVideoServiceFlag -> String
$cshow :: CmfcDescriptiveVideoServiceFlag -> String
showsPrec :: Int -> CmfcDescriptiveVideoServiceFlag -> ShowS
$cshowsPrec :: Int -> CmfcDescriptiveVideoServiceFlag -> ShowS
Prelude.Show,
      ReadPrec [CmfcDescriptiveVideoServiceFlag]
ReadPrec CmfcDescriptiveVideoServiceFlag
Int -> ReadS CmfcDescriptiveVideoServiceFlag
ReadS [CmfcDescriptiveVideoServiceFlag]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CmfcDescriptiveVideoServiceFlag]
$creadListPrec :: ReadPrec [CmfcDescriptiveVideoServiceFlag]
readPrec :: ReadPrec CmfcDescriptiveVideoServiceFlag
$creadPrec :: ReadPrec CmfcDescriptiveVideoServiceFlag
readList :: ReadS [CmfcDescriptiveVideoServiceFlag]
$creadList :: ReadS [CmfcDescriptiveVideoServiceFlag]
readsPrec :: Int -> ReadS CmfcDescriptiveVideoServiceFlag
$creadsPrec :: Int -> ReadS CmfcDescriptiveVideoServiceFlag
Prelude.Read,
      CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
$c/= :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
== :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
$c== :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
Prelude.Eq,
      Eq CmfcDescriptiveVideoServiceFlag
CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Ordering
CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag
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 :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag
$cmin :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag
max :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag
$cmax :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag
>= :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
$c>= :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
> :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
$c> :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
<= :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
$c<= :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
< :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
$c< :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Bool
compare :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Ordering
$ccompare :: CmfcDescriptiveVideoServiceFlag
-> CmfcDescriptiveVideoServiceFlag -> Ordering
Prelude.Ord,
      forall x.
Rep CmfcDescriptiveVideoServiceFlag x
-> CmfcDescriptiveVideoServiceFlag
forall x.
CmfcDescriptiveVideoServiceFlag
-> Rep CmfcDescriptiveVideoServiceFlag x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CmfcDescriptiveVideoServiceFlag x
-> CmfcDescriptiveVideoServiceFlag
$cfrom :: forall x.
CmfcDescriptiveVideoServiceFlag
-> Rep CmfcDescriptiveVideoServiceFlag x
Prelude.Generic
    )
  deriving newtype
    ( Eq CmfcDescriptiveVideoServiceFlag
Int -> CmfcDescriptiveVideoServiceFlag -> Int
CmfcDescriptiveVideoServiceFlag -> Int
forall a. Eq a -> (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: CmfcDescriptiveVideoServiceFlag -> Int
$chash :: CmfcDescriptiveVideoServiceFlag -> Int
hashWithSalt :: Int -> CmfcDescriptiveVideoServiceFlag -> Int
$chashWithSalt :: Int -> CmfcDescriptiveVideoServiceFlag -> Int
Prelude.Hashable,
      CmfcDescriptiveVideoServiceFlag -> ()
forall a. (a -> ()) -> NFData a
rnf :: CmfcDescriptiveVideoServiceFlag -> ()
$crnf :: CmfcDescriptiveVideoServiceFlag -> ()
Prelude.NFData,
      Text -> Either String CmfcDescriptiveVideoServiceFlag
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String CmfcDescriptiveVideoServiceFlag
$cfromText :: Text -> Either String CmfcDescriptiveVideoServiceFlag
Data.FromText,
      CmfcDescriptiveVideoServiceFlag -> Text
forall a. (a -> Text) -> ToText a
toText :: CmfcDescriptiveVideoServiceFlag -> Text
$ctoText :: CmfcDescriptiveVideoServiceFlag -> Text
Data.ToText,
      CmfcDescriptiveVideoServiceFlag -> ByteString
forall a. (a -> ByteString) -> ToByteString a
toBS :: CmfcDescriptiveVideoServiceFlag -> ByteString
$ctoBS :: CmfcDescriptiveVideoServiceFlag -> ByteString
Data.ToByteString,
      CmfcDescriptiveVideoServiceFlag -> ByteStringBuilder
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: CmfcDescriptiveVideoServiceFlag -> ByteStringBuilder
$cbuild :: CmfcDescriptiveVideoServiceFlag -> ByteStringBuilder
Data.ToLog,
      HeaderName -> CmfcDescriptiveVideoServiceFlag -> [Header]
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> CmfcDescriptiveVideoServiceFlag -> [Header]
$ctoHeader :: HeaderName -> CmfcDescriptiveVideoServiceFlag -> [Header]
Data.ToHeader,
      CmfcDescriptiveVideoServiceFlag -> QueryString
forall a. (a -> QueryString) -> ToQuery a
toQuery :: CmfcDescriptiveVideoServiceFlag -> QueryString
$ctoQuery :: CmfcDescriptiveVideoServiceFlag -> QueryString
Data.ToQuery,
      Value -> Parser [CmfcDescriptiveVideoServiceFlag]
Value -> Parser CmfcDescriptiveVideoServiceFlag
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [CmfcDescriptiveVideoServiceFlag]
$cparseJSONList :: Value -> Parser [CmfcDescriptiveVideoServiceFlag]
parseJSON :: Value -> Parser CmfcDescriptiveVideoServiceFlag
$cparseJSON :: Value -> Parser CmfcDescriptiveVideoServiceFlag
Data.FromJSON,
      FromJSONKeyFunction [CmfcDescriptiveVideoServiceFlag]
FromJSONKeyFunction CmfcDescriptiveVideoServiceFlag
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [CmfcDescriptiveVideoServiceFlag]
$cfromJSONKeyList :: FromJSONKeyFunction [CmfcDescriptiveVideoServiceFlag]
fromJSONKey :: FromJSONKeyFunction CmfcDescriptiveVideoServiceFlag
$cfromJSONKey :: FromJSONKeyFunction CmfcDescriptiveVideoServiceFlag
Data.FromJSONKey,
      [CmfcDescriptiveVideoServiceFlag] -> Encoding
[CmfcDescriptiveVideoServiceFlag] -> Value
CmfcDescriptiveVideoServiceFlag -> Encoding
CmfcDescriptiveVideoServiceFlag -> Value
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [CmfcDescriptiveVideoServiceFlag] -> Encoding
$ctoEncodingList :: [CmfcDescriptiveVideoServiceFlag] -> Encoding
toJSONList :: [CmfcDescriptiveVideoServiceFlag] -> Value
$ctoJSONList :: [CmfcDescriptiveVideoServiceFlag] -> Value
toEncoding :: CmfcDescriptiveVideoServiceFlag -> Encoding
$ctoEncoding :: CmfcDescriptiveVideoServiceFlag -> Encoding
toJSON :: CmfcDescriptiveVideoServiceFlag -> Value
$ctoJSON :: CmfcDescriptiveVideoServiceFlag -> Value
Data.ToJSON,
      ToJSONKeyFunction [CmfcDescriptiveVideoServiceFlag]
ToJSONKeyFunction CmfcDescriptiveVideoServiceFlag
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [CmfcDescriptiveVideoServiceFlag]
$ctoJSONKeyList :: ToJSONKeyFunction [CmfcDescriptiveVideoServiceFlag]
toJSONKey :: ToJSONKeyFunction CmfcDescriptiveVideoServiceFlag
$ctoJSONKey :: ToJSONKeyFunction CmfcDescriptiveVideoServiceFlag
Data.ToJSONKey,
      [Node] -> Either String CmfcDescriptiveVideoServiceFlag
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String CmfcDescriptiveVideoServiceFlag
$cparseXML :: [Node] -> Either String CmfcDescriptiveVideoServiceFlag
Data.FromXML,
      CmfcDescriptiveVideoServiceFlag -> XML
forall a. (a -> XML) -> ToXML a
toXML :: CmfcDescriptiveVideoServiceFlag -> XML
$ctoXML :: CmfcDescriptiveVideoServiceFlag -> XML
Data.ToXML
    )

pattern CmfcDescriptiveVideoServiceFlag_DONT_FLAG :: CmfcDescriptiveVideoServiceFlag
pattern $bCmfcDescriptiveVideoServiceFlag_DONT_FLAG :: CmfcDescriptiveVideoServiceFlag
$mCmfcDescriptiveVideoServiceFlag_DONT_FLAG :: forall {r}.
CmfcDescriptiveVideoServiceFlag
-> ((# #) -> r) -> ((# #) -> r) -> r
CmfcDescriptiveVideoServiceFlag_DONT_FLAG = CmfcDescriptiveVideoServiceFlag' "DONT_FLAG"

pattern CmfcDescriptiveVideoServiceFlag_FLAG :: CmfcDescriptiveVideoServiceFlag
pattern $bCmfcDescriptiveVideoServiceFlag_FLAG :: CmfcDescriptiveVideoServiceFlag
$mCmfcDescriptiveVideoServiceFlag_FLAG :: forall {r}.
CmfcDescriptiveVideoServiceFlag
-> ((# #) -> r) -> ((# #) -> r) -> r
CmfcDescriptiveVideoServiceFlag_FLAG = CmfcDescriptiveVideoServiceFlag' "FLAG"

{-# COMPLETE
  CmfcDescriptiveVideoServiceFlag_DONT_FLAG,
  CmfcDescriptiveVideoServiceFlag_FLAG,
  CmfcDescriptiveVideoServiceFlag'
  #-}