{-# 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.TeletextPageType
-- 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.TeletextPageType
  ( TeletextPageType
      ( ..,
        TeletextPageType_PAGE_TYPE_ADDL_INFO,
        TeletextPageType_PAGE_TYPE_HEARING_IMPAIRED_SUBTITLE,
        TeletextPageType_PAGE_TYPE_INITIAL,
        TeletextPageType_PAGE_TYPE_PROGRAM_SCHEDULE,
        TeletextPageType_PAGE_TYPE_SUBTITLE
      ),
  )
where

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

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

pattern TeletextPageType_PAGE_TYPE_ADDL_INFO :: TeletextPageType
pattern $bTeletextPageType_PAGE_TYPE_ADDL_INFO :: TeletextPageType
$mTeletextPageType_PAGE_TYPE_ADDL_INFO :: forall r. TeletextPageType -> (Void# -> r) -> (Void# -> r) -> r
TeletextPageType_PAGE_TYPE_ADDL_INFO = TeletextPageType' "PAGE_TYPE_ADDL_INFO"

pattern TeletextPageType_PAGE_TYPE_HEARING_IMPAIRED_SUBTITLE :: TeletextPageType
pattern $bTeletextPageType_PAGE_TYPE_HEARING_IMPAIRED_SUBTITLE :: TeletextPageType
$mTeletextPageType_PAGE_TYPE_HEARING_IMPAIRED_SUBTITLE :: forall r. TeletextPageType -> (Void# -> r) -> (Void# -> r) -> r
TeletextPageType_PAGE_TYPE_HEARING_IMPAIRED_SUBTITLE = TeletextPageType' "PAGE_TYPE_HEARING_IMPAIRED_SUBTITLE"

pattern TeletextPageType_PAGE_TYPE_INITIAL :: TeletextPageType
pattern $bTeletextPageType_PAGE_TYPE_INITIAL :: TeletextPageType
$mTeletextPageType_PAGE_TYPE_INITIAL :: forall r. TeletextPageType -> (Void# -> r) -> (Void# -> r) -> r
TeletextPageType_PAGE_TYPE_INITIAL = TeletextPageType' "PAGE_TYPE_INITIAL"

pattern TeletextPageType_PAGE_TYPE_PROGRAM_SCHEDULE :: TeletextPageType
pattern $bTeletextPageType_PAGE_TYPE_PROGRAM_SCHEDULE :: TeletextPageType
$mTeletextPageType_PAGE_TYPE_PROGRAM_SCHEDULE :: forall r. TeletextPageType -> (Void# -> r) -> (Void# -> r) -> r
TeletextPageType_PAGE_TYPE_PROGRAM_SCHEDULE = TeletextPageType' "PAGE_TYPE_PROGRAM_SCHEDULE"

pattern TeletextPageType_PAGE_TYPE_SUBTITLE :: TeletextPageType
pattern $bTeletextPageType_PAGE_TYPE_SUBTITLE :: TeletextPageType
$mTeletextPageType_PAGE_TYPE_SUBTITLE :: forall r. TeletextPageType -> (Void# -> r) -> (Void# -> r) -> r
TeletextPageType_PAGE_TYPE_SUBTITLE = TeletextPageType' "PAGE_TYPE_SUBTITLE"

{-# COMPLETE
  TeletextPageType_PAGE_TYPE_ADDL_INFO,
  TeletextPageType_PAGE_TYPE_HEARING_IMPAIRED_SUBTITLE,
  TeletextPageType_PAGE_TYPE_INITIAL,
  TeletextPageType_PAGE_TYPE_PROGRAM_SCHEDULE,
  TeletextPageType_PAGE_TYPE_SUBTITLE,
  TeletextPageType'
  #-}