{-# 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.XavcInterlaceMode
-- 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.XavcInterlaceMode
  ( XavcInterlaceMode
      ( ..,
        XavcInterlaceMode_BOTTOM_FIELD,
        XavcInterlaceMode_FOLLOW_BOTTOM_FIELD,
        XavcInterlaceMode_FOLLOW_TOP_FIELD,
        XavcInterlaceMode_PROGRESSIVE,
        XavcInterlaceMode_TOP_FIELD
      ),
  )
where

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

-- | Choose the scan line type for the output. Keep the default value,
-- Progressive (PROGRESSIVE) to create a progressive output, regardless of
-- the scan type of your input. Use Top field first (TOP_FIELD) or Bottom
-- field first (BOTTOM_FIELD) to create an output that\'s interlaced with
-- the same field polarity throughout. Use Follow, default top
-- (FOLLOW_TOP_FIELD) or Follow, default bottom (FOLLOW_BOTTOM_FIELD) to
-- produce outputs with the same field polarity as the source. For jobs
-- that have multiple inputs, the output field polarity might change over
-- the course of the output. Follow behavior depends on the input scan
-- type. If the source is interlaced, the output will be interlaced with
-- the same polarity as the source. If the source is progressive, the
-- output will be interlaced with top field bottom field first, depending
-- on which of the Follow options you choose.
newtype XavcInterlaceMode = XavcInterlaceMode'
  { XavcInterlaceMode -> Text
fromXavcInterlaceMode ::
      Core.Text
  }
  deriving stock
    ( Int -> XavcInterlaceMode -> ShowS
[XavcInterlaceMode] -> ShowS
XavcInterlaceMode -> String
(Int -> XavcInterlaceMode -> ShowS)
-> (XavcInterlaceMode -> String)
-> ([XavcInterlaceMode] -> ShowS)
-> Show XavcInterlaceMode
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [XavcInterlaceMode] -> ShowS
$cshowList :: [XavcInterlaceMode] -> ShowS
show :: XavcInterlaceMode -> String
$cshow :: XavcInterlaceMode -> String
showsPrec :: Int -> XavcInterlaceMode -> ShowS
$cshowsPrec :: Int -> XavcInterlaceMode -> ShowS
Prelude.Show,
      ReadPrec [XavcInterlaceMode]
ReadPrec XavcInterlaceMode
Int -> ReadS XavcInterlaceMode
ReadS [XavcInterlaceMode]
(Int -> ReadS XavcInterlaceMode)
-> ReadS [XavcInterlaceMode]
-> ReadPrec XavcInterlaceMode
-> ReadPrec [XavcInterlaceMode]
-> Read XavcInterlaceMode
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [XavcInterlaceMode]
$creadListPrec :: ReadPrec [XavcInterlaceMode]
readPrec :: ReadPrec XavcInterlaceMode
$creadPrec :: ReadPrec XavcInterlaceMode
readList :: ReadS [XavcInterlaceMode]
$creadList :: ReadS [XavcInterlaceMode]
readsPrec :: Int -> ReadS XavcInterlaceMode
$creadsPrec :: Int -> ReadS XavcInterlaceMode
Prelude.Read,
      XavcInterlaceMode -> XavcInterlaceMode -> Bool
(XavcInterlaceMode -> XavcInterlaceMode -> Bool)
-> (XavcInterlaceMode -> XavcInterlaceMode -> Bool)
-> Eq XavcInterlaceMode
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: XavcInterlaceMode -> XavcInterlaceMode -> Bool
$c/= :: XavcInterlaceMode -> XavcInterlaceMode -> Bool
== :: XavcInterlaceMode -> XavcInterlaceMode -> Bool
$c== :: XavcInterlaceMode -> XavcInterlaceMode -> Bool
Prelude.Eq,
      Eq XavcInterlaceMode
Eq XavcInterlaceMode
-> (XavcInterlaceMode -> XavcInterlaceMode -> Ordering)
-> (XavcInterlaceMode -> XavcInterlaceMode -> Bool)
-> (XavcInterlaceMode -> XavcInterlaceMode -> Bool)
-> (XavcInterlaceMode -> XavcInterlaceMode -> Bool)
-> (XavcInterlaceMode -> XavcInterlaceMode -> Bool)
-> (XavcInterlaceMode -> XavcInterlaceMode -> XavcInterlaceMode)
-> (XavcInterlaceMode -> XavcInterlaceMode -> XavcInterlaceMode)
-> Ord XavcInterlaceMode
XavcInterlaceMode -> XavcInterlaceMode -> Bool
XavcInterlaceMode -> XavcInterlaceMode -> Ordering
XavcInterlaceMode -> XavcInterlaceMode -> XavcInterlaceMode
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 :: XavcInterlaceMode -> XavcInterlaceMode -> XavcInterlaceMode
$cmin :: XavcInterlaceMode -> XavcInterlaceMode -> XavcInterlaceMode
max :: XavcInterlaceMode -> XavcInterlaceMode -> XavcInterlaceMode
$cmax :: XavcInterlaceMode -> XavcInterlaceMode -> XavcInterlaceMode
>= :: XavcInterlaceMode -> XavcInterlaceMode -> Bool
$c>= :: XavcInterlaceMode -> XavcInterlaceMode -> Bool
> :: XavcInterlaceMode -> XavcInterlaceMode -> Bool
$c> :: XavcInterlaceMode -> XavcInterlaceMode -> Bool
<= :: XavcInterlaceMode -> XavcInterlaceMode -> Bool
$c<= :: XavcInterlaceMode -> XavcInterlaceMode -> Bool
< :: XavcInterlaceMode -> XavcInterlaceMode -> Bool
$c< :: XavcInterlaceMode -> XavcInterlaceMode -> Bool
compare :: XavcInterlaceMode -> XavcInterlaceMode -> Ordering
$ccompare :: XavcInterlaceMode -> XavcInterlaceMode -> Ordering
$cp1Ord :: Eq XavcInterlaceMode
Prelude.Ord,
      (forall x. XavcInterlaceMode -> Rep XavcInterlaceMode x)
-> (forall x. Rep XavcInterlaceMode x -> XavcInterlaceMode)
-> Generic XavcInterlaceMode
forall x. Rep XavcInterlaceMode x -> XavcInterlaceMode
forall x. XavcInterlaceMode -> Rep XavcInterlaceMode x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep XavcInterlaceMode x -> XavcInterlaceMode
$cfrom :: forall x. XavcInterlaceMode -> Rep XavcInterlaceMode x
Prelude.Generic
    )
  deriving newtype
    ( Int -> XavcInterlaceMode -> Int
XavcInterlaceMode -> Int
(Int -> XavcInterlaceMode -> Int)
-> (XavcInterlaceMode -> Int) -> Hashable XavcInterlaceMode
forall a. (Int -> a -> Int) -> (a -> Int) -> Hashable a
hash :: XavcInterlaceMode -> Int
$chash :: XavcInterlaceMode -> Int
hashWithSalt :: Int -> XavcInterlaceMode -> Int
$chashWithSalt :: Int -> XavcInterlaceMode -> Int
Prelude.Hashable,
      XavcInterlaceMode -> ()
(XavcInterlaceMode -> ()) -> NFData XavcInterlaceMode
forall a. (a -> ()) -> NFData a
rnf :: XavcInterlaceMode -> ()
$crnf :: XavcInterlaceMode -> ()
Prelude.NFData,
      Text -> Either String XavcInterlaceMode
(Text -> Either String XavcInterlaceMode)
-> FromText XavcInterlaceMode
forall a. (Text -> Either String a) -> FromText a
fromText :: Text -> Either String XavcInterlaceMode
$cfromText :: Text -> Either String XavcInterlaceMode
Core.FromText,
      XavcInterlaceMode -> Text
(XavcInterlaceMode -> Text) -> ToText XavcInterlaceMode
forall a. (a -> Text) -> ToText a
toText :: XavcInterlaceMode -> Text
$ctoText :: XavcInterlaceMode -> Text
Core.ToText,
      XavcInterlaceMode -> ByteString
(XavcInterlaceMode -> ByteString) -> ToByteString XavcInterlaceMode
forall a. (a -> ByteString) -> ToByteString a
toBS :: XavcInterlaceMode -> ByteString
$ctoBS :: XavcInterlaceMode -> ByteString
Core.ToByteString,
      XavcInterlaceMode -> ByteStringBuilder
(XavcInterlaceMode -> ByteStringBuilder) -> ToLog XavcInterlaceMode
forall a. (a -> ByteStringBuilder) -> ToLog a
build :: XavcInterlaceMode -> ByteStringBuilder
$cbuild :: XavcInterlaceMode -> ByteStringBuilder
Core.ToLog,
      HeaderName -> XavcInterlaceMode -> [Header]
(HeaderName -> XavcInterlaceMode -> [Header])
-> ToHeader XavcInterlaceMode
forall a. (HeaderName -> a -> [Header]) -> ToHeader a
toHeader :: HeaderName -> XavcInterlaceMode -> [Header]
$ctoHeader :: HeaderName -> XavcInterlaceMode -> [Header]
Core.ToHeader,
      XavcInterlaceMode -> QueryString
(XavcInterlaceMode -> QueryString) -> ToQuery XavcInterlaceMode
forall a. (a -> QueryString) -> ToQuery a
toQuery :: XavcInterlaceMode -> QueryString
$ctoQuery :: XavcInterlaceMode -> QueryString
Core.ToQuery,
      Value -> Parser [XavcInterlaceMode]
Value -> Parser XavcInterlaceMode
(Value -> Parser XavcInterlaceMode)
-> (Value -> Parser [XavcInterlaceMode])
-> FromJSON XavcInterlaceMode
forall a.
(Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a
parseJSONList :: Value -> Parser [XavcInterlaceMode]
$cparseJSONList :: Value -> Parser [XavcInterlaceMode]
parseJSON :: Value -> Parser XavcInterlaceMode
$cparseJSON :: Value -> Parser XavcInterlaceMode
Core.FromJSON,
      FromJSONKeyFunction [XavcInterlaceMode]
FromJSONKeyFunction XavcInterlaceMode
FromJSONKeyFunction XavcInterlaceMode
-> FromJSONKeyFunction [XavcInterlaceMode]
-> FromJSONKey XavcInterlaceMode
forall a.
FromJSONKeyFunction a -> FromJSONKeyFunction [a] -> FromJSONKey a
fromJSONKeyList :: FromJSONKeyFunction [XavcInterlaceMode]
$cfromJSONKeyList :: FromJSONKeyFunction [XavcInterlaceMode]
fromJSONKey :: FromJSONKeyFunction XavcInterlaceMode
$cfromJSONKey :: FromJSONKeyFunction XavcInterlaceMode
Core.FromJSONKey,
      [XavcInterlaceMode] -> Encoding
[XavcInterlaceMode] -> Value
XavcInterlaceMode -> Encoding
XavcInterlaceMode -> Value
(XavcInterlaceMode -> Value)
-> (XavcInterlaceMode -> Encoding)
-> ([XavcInterlaceMode] -> Value)
-> ([XavcInterlaceMode] -> Encoding)
-> ToJSON XavcInterlaceMode
forall a.
(a -> Value)
-> (a -> Encoding)
-> ([a] -> Value)
-> ([a] -> Encoding)
-> ToJSON a
toEncodingList :: [XavcInterlaceMode] -> Encoding
$ctoEncodingList :: [XavcInterlaceMode] -> Encoding
toJSONList :: [XavcInterlaceMode] -> Value
$ctoJSONList :: [XavcInterlaceMode] -> Value
toEncoding :: XavcInterlaceMode -> Encoding
$ctoEncoding :: XavcInterlaceMode -> Encoding
toJSON :: XavcInterlaceMode -> Value
$ctoJSON :: XavcInterlaceMode -> Value
Core.ToJSON,
      ToJSONKeyFunction [XavcInterlaceMode]
ToJSONKeyFunction XavcInterlaceMode
ToJSONKeyFunction XavcInterlaceMode
-> ToJSONKeyFunction [XavcInterlaceMode]
-> ToJSONKey XavcInterlaceMode
forall a.
ToJSONKeyFunction a -> ToJSONKeyFunction [a] -> ToJSONKey a
toJSONKeyList :: ToJSONKeyFunction [XavcInterlaceMode]
$ctoJSONKeyList :: ToJSONKeyFunction [XavcInterlaceMode]
toJSONKey :: ToJSONKeyFunction XavcInterlaceMode
$ctoJSONKey :: ToJSONKeyFunction XavcInterlaceMode
Core.ToJSONKey,
      [Node] -> Either String XavcInterlaceMode
([Node] -> Either String XavcInterlaceMode)
-> FromXML XavcInterlaceMode
forall a. ([Node] -> Either String a) -> FromXML a
parseXML :: [Node] -> Either String XavcInterlaceMode
$cparseXML :: [Node] -> Either String XavcInterlaceMode
Core.FromXML,
      XavcInterlaceMode -> XML
(XavcInterlaceMode -> XML) -> ToXML XavcInterlaceMode
forall a. (a -> XML) -> ToXML a
toXML :: XavcInterlaceMode -> XML
$ctoXML :: XavcInterlaceMode -> XML
Core.ToXML
    )

pattern XavcInterlaceMode_BOTTOM_FIELD :: XavcInterlaceMode
pattern $bXavcInterlaceMode_BOTTOM_FIELD :: XavcInterlaceMode
$mXavcInterlaceMode_BOTTOM_FIELD :: forall r. XavcInterlaceMode -> (Void# -> r) -> (Void# -> r) -> r
XavcInterlaceMode_BOTTOM_FIELD = XavcInterlaceMode' "BOTTOM_FIELD"

pattern XavcInterlaceMode_FOLLOW_BOTTOM_FIELD :: XavcInterlaceMode
pattern $bXavcInterlaceMode_FOLLOW_BOTTOM_FIELD :: XavcInterlaceMode
$mXavcInterlaceMode_FOLLOW_BOTTOM_FIELD :: forall r. XavcInterlaceMode -> (Void# -> r) -> (Void# -> r) -> r
XavcInterlaceMode_FOLLOW_BOTTOM_FIELD = XavcInterlaceMode' "FOLLOW_BOTTOM_FIELD"

pattern XavcInterlaceMode_FOLLOW_TOP_FIELD :: XavcInterlaceMode
pattern $bXavcInterlaceMode_FOLLOW_TOP_FIELD :: XavcInterlaceMode
$mXavcInterlaceMode_FOLLOW_TOP_FIELD :: forall r. XavcInterlaceMode -> (Void# -> r) -> (Void# -> r) -> r
XavcInterlaceMode_FOLLOW_TOP_FIELD = XavcInterlaceMode' "FOLLOW_TOP_FIELD"

pattern XavcInterlaceMode_PROGRESSIVE :: XavcInterlaceMode
pattern $bXavcInterlaceMode_PROGRESSIVE :: XavcInterlaceMode
$mXavcInterlaceMode_PROGRESSIVE :: forall r. XavcInterlaceMode -> (Void# -> r) -> (Void# -> r) -> r
XavcInterlaceMode_PROGRESSIVE = XavcInterlaceMode' "PROGRESSIVE"

pattern XavcInterlaceMode_TOP_FIELD :: XavcInterlaceMode
pattern $bXavcInterlaceMode_TOP_FIELD :: XavcInterlaceMode
$mXavcInterlaceMode_TOP_FIELD :: forall r. XavcInterlaceMode -> (Void# -> r) -> (Void# -> r) -> r
XavcInterlaceMode_TOP_FIELD = XavcInterlaceMode' "TOP_FIELD"

{-# COMPLETE
  XavcInterlaceMode_BOTTOM_FIELD,
  XavcInterlaceMode_FOLLOW_BOTTOM_FIELD,
  XavcInterlaceMode_FOLLOW_TOP_FIELD,
  XavcInterlaceMode_PROGRESSIVE,
  XavcInterlaceMode_TOP_FIELD,
  XavcInterlaceMode'
  #-}