{-# 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.DvbSubtitleTeletextSpacing
-- 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.DvbSubtitleTeletextSpacing
  ( DvbSubtitleTeletextSpacing
      ( ..,
        DvbSubtitleTeletextSpacing_AUTO,
        DvbSubtitleTeletextSpacing_FIXED_GRID,
        DvbSubtitleTeletextSpacing_PROPORTIONAL
      ),
  )
where

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

-- | Specify whether the Text spacing (TextSpacing) in your captions is set
-- by the captions grid, or varies depending on letter width. Choose fixed
-- grid (FIXED_GRID) to conform to the spacing specified in the captions
-- file more accurately. Choose proportional (PROPORTIONAL) to make the
-- text easier to read for closed captions. Within your job settings, all
-- of your DVB-Sub settings must be identical.
newtype DvbSubtitleTeletextSpacing = DvbSubtitleTeletextSpacing'
  { DvbSubtitleTeletextSpacing -> Text
fromDvbSubtitleTeletextSpacing ::
      Core.Text
  }
  deriving stock
    ( Int -> DvbSubtitleTeletextSpacing -> ShowS
[DvbSubtitleTeletextSpacing] -> ShowS
DvbSubtitleTeletextSpacing -> String
(Int -> DvbSubtitleTeletextSpacing -> ShowS)
-> (DvbSubtitleTeletextSpacing -> String)
-> ([DvbSubtitleTeletextSpacing] -> ShowS)
-> Show DvbSubtitleTeletextSpacing
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DvbSubtitleTeletextSpacing] -> ShowS
$cshowList :: [DvbSubtitleTeletextSpacing] -> ShowS
show :: DvbSubtitleTeletextSpacing -> String
$cshow :: DvbSubtitleTeletextSpacing -> String
showsPrec :: Int -> DvbSubtitleTeletextSpacing -> ShowS
$cshowsPrec :: Int -> DvbSubtitleTeletextSpacing -> ShowS
Prelude.Show,
      ReadPrec [DvbSubtitleTeletextSpacing]
ReadPrec DvbSubtitleTeletextSpacing
Int -> ReadS DvbSubtitleTeletextSpacing
ReadS [DvbSubtitleTeletextSpacing]
(Int -> ReadS DvbSubtitleTeletextSpacing)
-> ReadS [DvbSubtitleTeletextSpacing]
-> ReadPrec DvbSubtitleTeletextSpacing
-> ReadPrec [DvbSubtitleTeletextSpacing]
-> Read DvbSubtitleTeletextSpacing
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DvbSubtitleTeletextSpacing]
$creadListPrec :: ReadPrec [DvbSubtitleTeletextSpacing]
readPrec :: ReadPrec DvbSubtitleTeletextSpacing
$creadPrec :: ReadPrec DvbSubtitleTeletextSpacing
readList :: ReadS [DvbSubtitleTeletextSpacing]
$creadList :: ReadS [DvbSubtitleTeletextSpacing]
readsPrec :: Int -> ReadS DvbSubtitleTeletextSpacing
$creadsPrec :: Int -> ReadS DvbSubtitleTeletextSpacing
Prelude.Read,
      DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
(DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool)
-> (DvbSubtitleTeletextSpacing
    -> DvbSubtitleTeletextSpacing -> Bool)
-> Eq DvbSubtitleTeletextSpacing
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
$c/= :: DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
== :: DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
$c== :: DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
Prelude.Eq,
      Eq DvbSubtitleTeletextSpacing
Eq DvbSubtitleTeletextSpacing
-> (DvbSubtitleTeletextSpacing
    -> DvbSubtitleTeletextSpacing -> Ordering)
-> (DvbSubtitleTeletextSpacing
    -> DvbSubtitleTeletextSpacing -> Bool)
-> (DvbSubtitleTeletextSpacing
    -> DvbSubtitleTeletextSpacing -> Bool)
-> (DvbSubtitleTeletextSpacing
    -> DvbSubtitleTeletextSpacing -> Bool)
-> (DvbSubtitleTeletextSpacing
    -> DvbSubtitleTeletextSpacing -> Bool)
-> (DvbSubtitleTeletextSpacing
    -> DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing)
-> (DvbSubtitleTeletextSpacing
    -> DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing)
-> Ord DvbSubtitleTeletextSpacing
DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
DvbSubtitleTeletextSpacing
-> DvbSubtitleTeletextSpacing -> Ordering
DvbSubtitleTeletextSpacing
-> DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing
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 :: DvbSubtitleTeletextSpacing
-> DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing
$cmin :: DvbSubtitleTeletextSpacing
-> DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing
max :: DvbSubtitleTeletextSpacing
-> DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing
$cmax :: DvbSubtitleTeletextSpacing
-> DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing
>= :: DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
$c>= :: DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
> :: DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
$c> :: DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
<= :: DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
$c<= :: DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
< :: DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
$c< :: DvbSubtitleTeletextSpacing -> DvbSubtitleTeletextSpacing -> Bool
compare :: DvbSubtitleTeletextSpacing
-> DvbSubtitleTeletextSpacing -> Ordering
$ccompare :: DvbSubtitleTeletextSpacing
-> DvbSubtitleTeletextSpacing -> Ordering
$cp1Ord :: Eq DvbSubtitleTeletextSpacing
Prelude.Ord,
      (forall x.
 DvbSubtitleTeletextSpacing -> Rep DvbSubtitleTeletextSpacing x)
-> (forall x.
    Rep DvbSubtitleTeletextSpacing x -> DvbSubtitleTeletextSpacing)
-> Generic DvbSubtitleTeletextSpacing
forall x.
Rep DvbSubtitleTeletextSpacing x -> DvbSubtitleTeletextSpacing
forall x.
DvbSubtitleTeletextSpacing -> Rep DvbSubtitleTeletextSpacing x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DvbSubtitleTeletextSpacing x -> DvbSubtitleTeletextSpacing
$cfrom :: forall x.
DvbSubtitleTeletextSpacing -> Rep DvbSubtitleTeletextSpacing x
Prelude.Generic
    )
  deriving newtype
    ( Int -> DvbSubtitleTeletextSpacing -> Int
DvbSubtitleTeletextSpacing -> Int
(Int -> DvbSubtitleTeletextSpacing -> Int)
-> (DvbSubtitleTeletextSpacing -> Int)
-> Hashable DvbSubtitleTeletextSpacing
forall a. (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: DvbSubtitleTeletextSpacing -> Int
$chash :: DvbSubtitleTeletextSpacing -> Int
hashWithSalt :: Int -> DvbSubtitleTeletextSpacing -> Int
$chashWithSalt :: Int -> DvbSubtitleTeletextSpacing -> Int
Prelude.Hashable,
      DvbSubtitleTeletextSpacing -> ()
(DvbSubtitleTeletextSpacing -> ())
-> NFData DvbSubtitleTeletextSpacing
forall a. (a -> ()) -> NFData a
rnf :: DvbSubtitleTeletextSpacing -> ()
$crnf :: DvbSubtitleTeletextSpacing -> ()
Prelude.NFData,
      Text -> Either String DvbSubtitleTeletextSpacing
(Text -> Either String DvbSubtitleTeletextSpacing)
-> FromText DvbSubtitleTeletextSpacing
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String DvbSubtitleTeletextSpacing
$cfromText :: Text -> Either String DvbSubtitleTeletextSpacing
Core.FromText,
      DvbSubtitleTeletextSpacing -> Text
(DvbSubtitleTeletextSpacing -> Text)
-> ToText DvbSubtitleTeletextSpacing
forall a. (a -> Text) -> ToText a
toText :: DvbSubtitleTeletextSpacing -> Text
$ctoText :: DvbSubtitleTeletextSpacing -> Text
Core.ToText,
      DvbSubtitleTeletextSpacing -> ByteString
(DvbSubtitleTeletextSpacing -> ByteString)
-> ToByteString DvbSubtitleTeletextSpacing
forall a. (a -> ByteString) -> ToByteString a
toBS :: DvbSubtitleTeletextSpacing -> ByteString
$ctoBS :: DvbSubtitleTeletextSpacing -> ByteString
Core.ToByteString,
      DvbSubtitleTeletextSpacing -> ByteStringBuilder
(DvbSubtitleTeletextSpacing -> ByteStringBuilder)
-> ToLog DvbSubtitleTeletextSpacing
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: DvbSubtitleTeletextSpacing -> ByteStringBuilder
$cbuild :: DvbSubtitleTeletextSpacing -> ByteStringBuilder
Core.ToLog,
      HeaderName -> DvbSubtitleTeletextSpacing -> [Header]
(HeaderName -> DvbSubtitleTeletextSpacing -> [Header])
-> ToHeader DvbSubtitleTeletextSpacing
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> DvbSubtitleTeletextSpacing -> [Header]
$ctoHeader :: HeaderName -> DvbSubtitleTeletextSpacing -> [Header]
Core.ToHeader,
      DvbSubtitleTeletextSpacing -> QueryString
(DvbSubtitleTeletextSpacing -> QueryString)
-> ToQuery DvbSubtitleTeletextSpacing
forall a. (a -> QueryString) -> ToQuery a
toQuery :: DvbSubtitleTeletextSpacing -> QueryString
$ctoQuery :: DvbSubtitleTeletextSpacing -> QueryString
Core.ToQuery,
      Value -> Parser [DvbSubtitleTeletextSpacing]
Value -> Parser DvbSubtitleTeletextSpacing
(Value -> Parser DvbSubtitleTeletextSpacing)
-> (Value -> Parser [DvbSubtitleTeletextSpacing])
-> FromJSON DvbSubtitleTeletextSpacing
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [DvbSubtitleTeletextSpacing]
$cparseJSONList :: Value -> Parser [DvbSubtitleTeletextSpacing]
parseJSON :: Value -> Parser DvbSubtitleTeletextSpacing
$cparseJSON :: Value -> Parser DvbSubtitleTeletextSpacing
Core.FromJSON,
      FromJSONKeyFunction [DvbSubtitleTeletextSpacing]
FromJSONKeyFunction DvbSubtitleTeletextSpacing
FromJSONKeyFunction DvbSubtitleTeletextSpacing
-> FromJSONKeyFunction [DvbSubtitleTeletextSpacing]
-> FromJSONKey DvbSubtitleTeletextSpacing
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [DvbSubtitleTeletextSpacing]
$cfromJSONKeyList :: FromJSONKeyFunction [DvbSubtitleTeletextSpacing]
fromJSONKey :: FromJSONKeyFunction DvbSubtitleTeletextSpacing
$cfromJSONKey :: FromJSONKeyFunction DvbSubtitleTeletextSpacing
Core.FromJSONKey,
      [DvbSubtitleTeletextSpacing] -> Encoding
[DvbSubtitleTeletextSpacing] -> Value
DvbSubtitleTeletextSpacing -> Encoding
DvbSubtitleTeletextSpacing -> Value
(DvbSubtitleTeletextSpacing -> Value)
-> (DvbSubtitleTeletextSpacing -> Encoding)
-> ([DvbSubtitleTeletextSpacing] -> Value)
-> ([DvbSubtitleTeletextSpacing] -> Encoding)
-> ToJSON DvbSubtitleTeletextSpacing
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [DvbSubtitleTeletextSpacing] -> Encoding
$ctoEncodingList :: [DvbSubtitleTeletextSpacing] -> Encoding
toJSONList :: [DvbSubtitleTeletextSpacing] -> Value
$ctoJSONList :: [DvbSubtitleTeletextSpacing] -> Value
toEncoding :: DvbSubtitleTeletextSpacing -> Encoding
$ctoEncoding :: DvbSubtitleTeletextSpacing -> Encoding
toJSON :: DvbSubtitleTeletextSpacing -> Value
$ctoJSON :: DvbSubtitleTeletextSpacing -> Value
Core.ToJSON,
      ToJSONKeyFunction [DvbSubtitleTeletextSpacing]
ToJSONKeyFunction DvbSubtitleTeletextSpacing
ToJSONKeyFunction DvbSubtitleTeletextSpacing
-> ToJSONKeyFunction [DvbSubtitleTeletextSpacing]
-> ToJSONKey DvbSubtitleTeletextSpacing
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [DvbSubtitleTeletextSpacing]
$ctoJSONKeyList :: ToJSONKeyFunction [DvbSubtitleTeletextSpacing]
toJSONKey :: ToJSONKeyFunction DvbSubtitleTeletextSpacing
$ctoJSONKey :: ToJSONKeyFunction DvbSubtitleTeletextSpacing
Core.ToJSONKey,
      [Node] -> Either String DvbSubtitleTeletextSpacing
([Node] -> Either String DvbSubtitleTeletextSpacing)
-> FromXML DvbSubtitleTeletextSpacing
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String DvbSubtitleTeletextSpacing
$cparseXML :: [Node] -> Either String DvbSubtitleTeletextSpacing
Core.FromXML,
      DvbSubtitleTeletextSpacing -> XML
(DvbSubtitleTeletextSpacing -> XML)
-> ToXML DvbSubtitleTeletextSpacing
forall a. (a -> XML) -> ToXML a
toXML :: DvbSubtitleTeletextSpacing -> XML
$ctoXML :: DvbSubtitleTeletextSpacing -> XML
Core.ToXML
    )

pattern DvbSubtitleTeletextSpacing_AUTO :: DvbSubtitleTeletextSpacing
pattern $bDvbSubtitleTeletextSpacing_AUTO :: DvbSubtitleTeletextSpacing
$mDvbSubtitleTeletextSpacing_AUTO :: forall r.
DvbSubtitleTeletextSpacing -> (Void# -> r) -> (Void# -> r) -> r
DvbSubtitleTeletextSpacing_AUTO = DvbSubtitleTeletextSpacing' "AUTO"

pattern DvbSubtitleTeletextSpacing_FIXED_GRID :: DvbSubtitleTeletextSpacing
pattern $bDvbSubtitleTeletextSpacing_FIXED_GRID :: DvbSubtitleTeletextSpacing
$mDvbSubtitleTeletextSpacing_FIXED_GRID :: forall r.
DvbSubtitleTeletextSpacing -> (Void# -> r) -> (Void# -> r) -> r
DvbSubtitleTeletextSpacing_FIXED_GRID = DvbSubtitleTeletextSpacing' "FIXED_GRID"

pattern DvbSubtitleTeletextSpacing_PROPORTIONAL :: DvbSubtitleTeletextSpacing
pattern $bDvbSubtitleTeletextSpacing_PROPORTIONAL :: DvbSubtitleTeletextSpacing
$mDvbSubtitleTeletextSpacing_PROPORTIONAL :: forall r.
DvbSubtitleTeletextSpacing -> (Void# -> r) -> (Void# -> r) -> r
DvbSubtitleTeletextSpacing_PROPORTIONAL = DvbSubtitleTeletextSpacing' "PROPORTIONAL"

{-# COMPLETE
  DvbSubtitleTeletextSpacing_AUTO,
  DvbSubtitleTeletextSpacing_FIXED_GRID,
  DvbSubtitleTeletextSpacing_PROPORTIONAL,
  DvbSubtitleTeletextSpacing'
  #-}