{-# 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.MediaLive.Types.Eac3PhaseControl
-- 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.MediaLive.Types.Eac3PhaseControl
  ( Eac3PhaseControl
      ( ..,
        Eac3PhaseControl_NO_SHIFT,
        Eac3PhaseControl_SHIFT_90_DEGREES
      ),
  )
where

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

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

pattern Eac3PhaseControl_NO_SHIFT :: Eac3PhaseControl
pattern $bEac3PhaseControl_NO_SHIFT :: Eac3PhaseControl
$mEac3PhaseControl_NO_SHIFT :: forall r. Eac3PhaseControl -> (Void# -> r) -> (Void# -> r) -> r
Eac3PhaseControl_NO_SHIFT = Eac3PhaseControl' "NO_SHIFT"

pattern Eac3PhaseControl_SHIFT_90_DEGREES :: Eac3PhaseControl
pattern $bEac3PhaseControl_SHIFT_90_DEGREES :: Eac3PhaseControl
$mEac3PhaseControl_SHIFT_90_DEGREES :: forall r. Eac3PhaseControl -> (Void# -> r) -> (Void# -> r) -> r
Eac3PhaseControl_SHIFT_90_DEGREES = Eac3PhaseControl' "SHIFT_90_DEGREES"

{-# COMPLETE
  Eac3PhaseControl_NO_SHIFT,
  Eac3PhaseControl_SHIFT_90_DEGREES,
  Eac3PhaseControl'
  #-}