{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.MediaConvert.Types.Eac3Settings
-- 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.Eac3Settings where

import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import Amazonka.MediaConvert.Types.Eac3AttenuationControl
import Amazonka.MediaConvert.Types.Eac3BitstreamMode
import Amazonka.MediaConvert.Types.Eac3CodingMode
import Amazonka.MediaConvert.Types.Eac3DcFilter
import Amazonka.MediaConvert.Types.Eac3DynamicRangeCompressionLine
import Amazonka.MediaConvert.Types.Eac3DynamicRangeCompressionRf
import Amazonka.MediaConvert.Types.Eac3LfeControl
import Amazonka.MediaConvert.Types.Eac3LfeFilter
import Amazonka.MediaConvert.Types.Eac3MetadataControl
import Amazonka.MediaConvert.Types.Eac3PassthroughControl
import Amazonka.MediaConvert.Types.Eac3PhaseControl
import Amazonka.MediaConvert.Types.Eac3StereoDownmix
import Amazonka.MediaConvert.Types.Eac3SurroundExMode
import Amazonka.MediaConvert.Types.Eac3SurroundMode
import qualified Amazonka.Prelude as Prelude

-- | Required when you set (Codec) under (AudioDescriptions)>(CodecSettings)
-- to the value EAC3.
--
-- /See:/ 'newEac3Settings' smart constructor.
data Eac3Settings = Eac3Settings'
  { -- | Choose how the service does stereo downmixing. This setting only applies
    -- if you keep the default value of 3\/2 - L, R, C, Ls, Rs
    -- (CODING_MODE_3_2) for the setting Coding mode (Eac3CodingMode). If you
    -- choose a different value for Coding mode, the service ignores Stereo
    -- downmix (Eac3StereoDownmix).
    Eac3Settings -> Maybe Eac3StereoDownmix
stereoDownmix :: Prelude.Maybe Eac3StereoDownmix,
    -- | Specify a value for the following Dolby Digital Plus setting: Left
    -- only\/Right only center mix (Lo\/Ro center). MediaConvert uses this
    -- value for downmixing. How the service uses this value depends on the
    -- value that you choose for Stereo downmix (Eac3StereoDownmix). Valid
    -- values: 3.0, 1.5, 0.0, -1.5, -3.0, -4.5, -6.0, and -60. The value -60
    -- mutes the channel. This setting applies only if you keep the default
    -- value of 3\/2 - L, R, C, Ls, Rs (CODING_MODE_3_2) for the setting Coding
    -- mode (Eac3CodingMode). If you choose a different value for Coding mode,
    -- the service ignores Left only\/Right only center (loRoCenterMixLevel).
    Eac3Settings -> Maybe Double
loRoCenterMixLevel :: Prelude.Maybe Prelude.Double,
    -- | Specify a value for the following Dolby Digital Plus setting: Left
    -- total\/Right total center mix (Lt\/Rt center). MediaConvert uses this
    -- value for downmixing. How the service uses this value depends on the
    -- value that you choose for Stereo downmix (Eac3StereoDownmix). Valid
    -- values: 3.0, 1.5, 0.0, -1.5, -3.0, -4.5, -6.0, and -60. The value -60
    -- mutes the channel. This setting applies only if you keep the default
    -- value of 3\/2 - L, R, C, Ls, Rs (CODING_MODE_3_2) for the setting Coding
    -- mode (Eac3CodingMode). If you choose a different value for Coding mode,
    -- the service ignores Left total\/Right total center (ltRtCenterMixLevel).
    Eac3Settings -> Maybe Double
ltRtCenterMixLevel :: Prelude.Maybe Prelude.Double,
    -- | Applies a 120Hz lowpass filter to the LFE channel prior to encoding.
    -- Only valid with 3_2_LFE coding mode.
    Eac3Settings -> Maybe Eac3LfeFilter
lfeFilter :: Prelude.Maybe Eac3LfeFilter,
    -- | Choose the Dolby Digital dynamic range control (DRC) profile that
    -- MediaConvert uses when encoding the metadata in the Dolby Digital stream
    -- for the line operating mode. Related setting: When you use this setting,
    -- MediaConvert ignores any value you provide for Dynamic range compression
    -- profile (DynamicRangeCompressionProfile). For information about the
    -- Dolby Digital DRC operating modes and profiles, see the Dynamic Range
    -- Control chapter of the Dolby Metadata Guide at
    -- https:\/\/developer.dolby.com\/globalassets\/professional\/documents\/dolby-metadata-guide.pdf.
    Eac3Settings -> Maybe Eac3DynamicRangeCompressionLine
dynamicRangeCompressionLine :: Prelude.Maybe Eac3DynamicRangeCompressionLine,
    -- | Specify a value for the following Dolby Digital Plus setting: Left
    -- total\/Right total surround mix (Lt\/Rt surround). MediaConvert uses
    -- this value for downmixing. How the service uses this value depends on
    -- the value that you choose for Stereo downmix (Eac3StereoDownmix). Valid
    -- values: -1.5, -3.0, -4.5, -6.0, and -60. The value -60 mutes the
    -- channel. This setting applies only if you keep the default value of 3\/2
    -- - L, R, C, Ls, Rs (CODING_MODE_3_2) for the setting Coding mode
    -- (Eac3CodingMode). If you choose a different value for Coding mode, the
    -- service ignores Left total\/Right total surround (ltRtSurroundMixLevel).
    Eac3Settings -> Maybe Double
ltRtSurroundMixLevel :: Prelude.Maybe Prelude.Double,
    -- | When set to FOLLOW_INPUT, encoder metadata will be sourced from the DD,
    -- DD+, or DolbyE decoder that supplied this audio data. If audio was not
    -- supplied from one of these streams, then the static metadata settings
    -- will be used.
    Eac3Settings -> Maybe Eac3MetadataControl
metadataControl :: Prelude.Maybe Eac3MetadataControl,
    -- | Specify a value for the following Dolby Digital Plus setting: Left
    -- only\/Right only (Lo\/Ro surround). MediaConvert uses this value for
    -- downmixing. How the service uses this value depends on the value that
    -- you choose for Stereo downmix (Eac3StereoDownmix). Valid values: -1.5,
    -- -3.0, -4.5, -6.0, and -60. The value -60 mutes the channel. This setting
    -- applies only if you keep the default value of 3\/2 - L, R, C, Ls, Rs
    -- (CODING_MODE_3_2) for the setting Coding mode (Eac3CodingMode). If you
    -- choose a different value for Coding mode, the service ignores Left
    -- only\/Right only surround (loRoSurroundMixLevel).
    Eac3Settings -> Maybe Double
loRoSurroundMixLevel :: Prelude.Maybe Prelude.Double,
    -- | When encoding 2\/0 audio, sets whether Dolby Surround is matrix encoded
    -- into the two channels.
    Eac3Settings -> Maybe Eac3SurroundMode
surroundMode :: Prelude.Maybe Eac3SurroundMode,
    -- | If set to ATTENUATE_3_DB, applies a 3 dB attenuation to the surround
    -- channels. Only used for 3\/2 coding mode.
    Eac3Settings -> Maybe Eac3AttenuationControl
attenuationControl :: Prelude.Maybe Eac3AttenuationControl,
    -- | When set to WHEN_POSSIBLE, input DD+ audio will be passed through if it
    -- is present on the input. this detection is dynamic over the life of the
    -- transcode. Inputs that alternate between DD+ and non-DD+ content will
    -- have a consistent DD+ output as the system alternates between
    -- passthrough and encoding.
    Eac3Settings -> Maybe Eac3PassthroughControl
passthroughControl :: Prelude.Maybe Eac3PassthroughControl,
    -- | Specify the bitstream mode for the E-AC-3 stream that the encoder emits.
    -- For more information about the EAC3 bitstream mode, see ATSC A\/52-2012
    -- (Annex E).
    Eac3Settings -> Maybe Eac3BitstreamMode
bitstreamMode :: Prelude.Maybe Eac3BitstreamMode,
    -- | When encoding 3\/2 audio, controls whether the LFE channel is enabled
    Eac3Settings -> Maybe Eac3LfeControl
lfeControl :: Prelude.Maybe Eac3LfeControl,
    -- | Choose the Dolby Digital dynamic range control (DRC) profile that
    -- MediaConvert uses when encoding the metadata in the Dolby Digital stream
    -- for the RF operating mode. Related setting: When you use this setting,
    -- MediaConvert ignores any value you provide for Dynamic range compression
    -- profile (DynamicRangeCompressionProfile). For information about the
    -- Dolby Digital DRC operating modes and profiles, see the Dynamic Range
    -- Control chapter of the Dolby Metadata Guide at
    -- https:\/\/developer.dolby.com\/globalassets\/professional\/documents\/dolby-metadata-guide.pdf.
    Eac3Settings -> Maybe Eac3DynamicRangeCompressionRf
dynamicRangeCompressionRf :: Prelude.Maybe Eac3DynamicRangeCompressionRf,
    -- | Dolby Digital Plus coding mode. Determines number of channels.
    Eac3Settings -> Maybe Eac3CodingMode
codingMode :: Prelude.Maybe Eac3CodingMode,
    -- | This value is always 48000. It represents the sample rate in Hz.
    Eac3Settings -> Maybe Natural
sampleRate :: Prelude.Maybe Prelude.Natural,
    -- | Activates a DC highpass filter for all input channels.
    Eac3Settings -> Maybe Eac3DcFilter
dcFilter :: Prelude.Maybe Eac3DcFilter,
    -- | Specify the average bitrate in bits per second. Valid bitrates depend on
    -- the coding mode.
    Eac3Settings -> Maybe Natural
bitrate :: Prelude.Maybe Prelude.Natural,
    -- | Controls the amount of phase-shift applied to the surround channels.
    -- Only used for 3\/2 coding mode.
    Eac3Settings -> Maybe Eac3PhaseControl
phaseControl :: Prelude.Maybe Eac3PhaseControl,
    -- | When encoding 3\/2 audio, sets whether an extra center back surround
    -- channel is matrix encoded into the left and right surround channels.
    Eac3Settings -> Maybe Eac3SurroundExMode
surroundExMode :: Prelude.Maybe Eac3SurroundExMode,
    -- | Sets the dialnorm for the output. If blank and input audio is Dolby
    -- Digital Plus, dialnorm will be passed through.
    Eac3Settings -> Maybe Natural
dialnorm :: Prelude.Maybe Prelude.Natural
  }
  deriving (Eac3Settings -> Eac3Settings -> Bool
(Eac3Settings -> Eac3Settings -> Bool)
-> (Eac3Settings -> Eac3Settings -> Bool) -> Eq Eac3Settings
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Eac3Settings -> Eac3Settings -> Bool
$c/= :: Eac3Settings -> Eac3Settings -> Bool
== :: Eac3Settings -> Eac3Settings -> Bool
$c== :: Eac3Settings -> Eac3Settings -> Bool
Prelude.Eq, ReadPrec [Eac3Settings]
ReadPrec Eac3Settings
Int -> ReadS Eac3Settings
ReadS [Eac3Settings]
(Int -> ReadS Eac3Settings)
-> ReadS [Eac3Settings]
-> ReadPrec Eac3Settings
-> ReadPrec [Eac3Settings]
-> Read Eac3Settings
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [Eac3Settings]
$creadListPrec :: ReadPrec [Eac3Settings]
readPrec :: ReadPrec Eac3Settings
$creadPrec :: ReadPrec Eac3Settings
readList :: ReadS [Eac3Settings]
$creadList :: ReadS [Eac3Settings]
readsPrec :: Int -> ReadS Eac3Settings
$creadsPrec :: Int -> ReadS Eac3Settings
Prelude.Read, Int -> Eac3Settings -> ShowS
[Eac3Settings] -> ShowS
Eac3Settings -> String
(Int -> Eac3Settings -> ShowS)
-> (Eac3Settings -> String)
-> ([Eac3Settings] -> ShowS)
-> Show Eac3Settings
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Eac3Settings] -> ShowS
$cshowList :: [Eac3Settings] -> ShowS
show :: Eac3Settings -> String
$cshow :: Eac3Settings -> String
showsPrec :: Int -> Eac3Settings -> ShowS
$cshowsPrec :: Int -> Eac3Settings -> ShowS
Prelude.Show, (forall x. Eac3Settings -> Rep Eac3Settings x)
-> (forall x. Rep Eac3Settings x -> Eac3Settings)
-> Generic Eac3Settings
forall x. Rep Eac3Settings x -> Eac3Settings
forall x. Eac3Settings -> Rep Eac3Settings x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Eac3Settings x -> Eac3Settings
$cfrom :: forall x. Eac3Settings -> Rep Eac3Settings x
Prelude.Generic)

-- |
-- Create a value of 'Eac3Settings' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'stereoDownmix', 'eac3Settings_stereoDownmix' - Choose how the service does stereo downmixing. This setting only applies
-- if you keep the default value of 3\/2 - L, R, C, Ls, Rs
-- (CODING_MODE_3_2) for the setting Coding mode (Eac3CodingMode). If you
-- choose a different value for Coding mode, the service ignores Stereo
-- downmix (Eac3StereoDownmix).
--
-- 'loRoCenterMixLevel', 'eac3Settings_loRoCenterMixLevel' - Specify a value for the following Dolby Digital Plus setting: Left
-- only\/Right only center mix (Lo\/Ro center). MediaConvert uses this
-- value for downmixing. How the service uses this value depends on the
-- value that you choose for Stereo downmix (Eac3StereoDownmix). Valid
-- values: 3.0, 1.5, 0.0, -1.5, -3.0, -4.5, -6.0, and -60. The value -60
-- mutes the channel. This setting applies only if you keep the default
-- value of 3\/2 - L, R, C, Ls, Rs (CODING_MODE_3_2) for the setting Coding
-- mode (Eac3CodingMode). If you choose a different value for Coding mode,
-- the service ignores Left only\/Right only center (loRoCenterMixLevel).
--
-- 'ltRtCenterMixLevel', 'eac3Settings_ltRtCenterMixLevel' - Specify a value for the following Dolby Digital Plus setting: Left
-- total\/Right total center mix (Lt\/Rt center). MediaConvert uses this
-- value for downmixing. How the service uses this value depends on the
-- value that you choose for Stereo downmix (Eac3StereoDownmix). Valid
-- values: 3.0, 1.5, 0.0, -1.5, -3.0, -4.5, -6.0, and -60. The value -60
-- mutes the channel. This setting applies only if you keep the default
-- value of 3\/2 - L, R, C, Ls, Rs (CODING_MODE_3_2) for the setting Coding
-- mode (Eac3CodingMode). If you choose a different value for Coding mode,
-- the service ignores Left total\/Right total center (ltRtCenterMixLevel).
--
-- 'lfeFilter', 'eac3Settings_lfeFilter' - Applies a 120Hz lowpass filter to the LFE channel prior to encoding.
-- Only valid with 3_2_LFE coding mode.
--
-- 'dynamicRangeCompressionLine', 'eac3Settings_dynamicRangeCompressionLine' - Choose the Dolby Digital dynamic range control (DRC) profile that
-- MediaConvert uses when encoding the metadata in the Dolby Digital stream
-- for the line operating mode. Related setting: When you use this setting,
-- MediaConvert ignores any value you provide for Dynamic range compression
-- profile (DynamicRangeCompressionProfile). For information about the
-- Dolby Digital DRC operating modes and profiles, see the Dynamic Range
-- Control chapter of the Dolby Metadata Guide at
-- https:\/\/developer.dolby.com\/globalassets\/professional\/documents\/dolby-metadata-guide.pdf.
--
-- 'ltRtSurroundMixLevel', 'eac3Settings_ltRtSurroundMixLevel' - Specify a value for the following Dolby Digital Plus setting: Left
-- total\/Right total surround mix (Lt\/Rt surround). MediaConvert uses
-- this value for downmixing. How the service uses this value depends on
-- the value that you choose for Stereo downmix (Eac3StereoDownmix). Valid
-- values: -1.5, -3.0, -4.5, -6.0, and -60. The value -60 mutes the
-- channel. This setting applies only if you keep the default value of 3\/2
-- - L, R, C, Ls, Rs (CODING_MODE_3_2) for the setting Coding mode
-- (Eac3CodingMode). If you choose a different value for Coding mode, the
-- service ignores Left total\/Right total surround (ltRtSurroundMixLevel).
--
-- 'metadataControl', 'eac3Settings_metadataControl' - When set to FOLLOW_INPUT, encoder metadata will be sourced from the DD,
-- DD+, or DolbyE decoder that supplied this audio data. If audio was not
-- supplied from one of these streams, then the static metadata settings
-- will be used.
--
-- 'loRoSurroundMixLevel', 'eac3Settings_loRoSurroundMixLevel' - Specify a value for the following Dolby Digital Plus setting: Left
-- only\/Right only (Lo\/Ro surround). MediaConvert uses this value for
-- downmixing. How the service uses this value depends on the value that
-- you choose for Stereo downmix (Eac3StereoDownmix). Valid values: -1.5,
-- -3.0, -4.5, -6.0, and -60. The value -60 mutes the channel. This setting
-- applies only if you keep the default value of 3\/2 - L, R, C, Ls, Rs
-- (CODING_MODE_3_2) for the setting Coding mode (Eac3CodingMode). If you
-- choose a different value for Coding mode, the service ignores Left
-- only\/Right only surround (loRoSurroundMixLevel).
--
-- 'surroundMode', 'eac3Settings_surroundMode' - When encoding 2\/0 audio, sets whether Dolby Surround is matrix encoded
-- into the two channels.
--
-- 'attenuationControl', 'eac3Settings_attenuationControl' - If set to ATTENUATE_3_DB, applies a 3 dB attenuation to the surround
-- channels. Only used for 3\/2 coding mode.
--
-- 'passthroughControl', 'eac3Settings_passthroughControl' - When set to WHEN_POSSIBLE, input DD+ audio will be passed through if it
-- is present on the input. this detection is dynamic over the life of the
-- transcode. Inputs that alternate between DD+ and non-DD+ content will
-- have a consistent DD+ output as the system alternates between
-- passthrough and encoding.
--
-- 'bitstreamMode', 'eac3Settings_bitstreamMode' - Specify the bitstream mode for the E-AC-3 stream that the encoder emits.
-- For more information about the EAC3 bitstream mode, see ATSC A\/52-2012
-- (Annex E).
--
-- 'lfeControl', 'eac3Settings_lfeControl' - When encoding 3\/2 audio, controls whether the LFE channel is enabled
--
-- 'dynamicRangeCompressionRf', 'eac3Settings_dynamicRangeCompressionRf' - Choose the Dolby Digital dynamic range control (DRC) profile that
-- MediaConvert uses when encoding the metadata in the Dolby Digital stream
-- for the RF operating mode. Related setting: When you use this setting,
-- MediaConvert ignores any value you provide for Dynamic range compression
-- profile (DynamicRangeCompressionProfile). For information about the
-- Dolby Digital DRC operating modes and profiles, see the Dynamic Range
-- Control chapter of the Dolby Metadata Guide at
-- https:\/\/developer.dolby.com\/globalassets\/professional\/documents\/dolby-metadata-guide.pdf.
--
-- 'codingMode', 'eac3Settings_codingMode' - Dolby Digital Plus coding mode. Determines number of channels.
--
-- 'sampleRate', 'eac3Settings_sampleRate' - This value is always 48000. It represents the sample rate in Hz.
--
-- 'dcFilter', 'eac3Settings_dcFilter' - Activates a DC highpass filter for all input channels.
--
-- 'bitrate', 'eac3Settings_bitrate' - Specify the average bitrate in bits per second. Valid bitrates depend on
-- the coding mode.
--
-- 'phaseControl', 'eac3Settings_phaseControl' - Controls the amount of phase-shift applied to the surround channels.
-- Only used for 3\/2 coding mode.
--
-- 'surroundExMode', 'eac3Settings_surroundExMode' - When encoding 3\/2 audio, sets whether an extra center back surround
-- channel is matrix encoded into the left and right surround channels.
--
-- 'dialnorm', 'eac3Settings_dialnorm' - Sets the dialnorm for the output. If blank and input audio is Dolby
-- Digital Plus, dialnorm will be passed through.
newEac3Settings ::
  Eac3Settings
newEac3Settings :: Eac3Settings
newEac3Settings =
  Eac3Settings' :: Maybe Eac3StereoDownmix
-> Maybe Double
-> Maybe Double
-> Maybe Eac3LfeFilter
-> Maybe Eac3DynamicRangeCompressionLine
-> Maybe Double
-> Maybe Eac3MetadataControl
-> Maybe Double
-> Maybe Eac3SurroundMode
-> Maybe Eac3AttenuationControl
-> Maybe Eac3PassthroughControl
-> Maybe Eac3BitstreamMode
-> Maybe Eac3LfeControl
-> Maybe Eac3DynamicRangeCompressionRf
-> Maybe Eac3CodingMode
-> Maybe Natural
-> Maybe Eac3DcFilter
-> Maybe Natural
-> Maybe Eac3PhaseControl
-> Maybe Eac3SurroundExMode
-> Maybe Natural
-> Eac3Settings
Eac3Settings'
    { $sel:stereoDownmix:Eac3Settings' :: Maybe Eac3StereoDownmix
stereoDownmix = Maybe Eac3StereoDownmix
forall a. Maybe a
Prelude.Nothing,
      $sel:loRoCenterMixLevel:Eac3Settings' :: Maybe Double
loRoCenterMixLevel = Maybe Double
forall a. Maybe a
Prelude.Nothing,
      $sel:ltRtCenterMixLevel:Eac3Settings' :: Maybe Double
ltRtCenterMixLevel = Maybe Double
forall a. Maybe a
Prelude.Nothing,
      $sel:lfeFilter:Eac3Settings' :: Maybe Eac3LfeFilter
lfeFilter = Maybe Eac3LfeFilter
forall a. Maybe a
Prelude.Nothing,
      $sel:dynamicRangeCompressionLine:Eac3Settings' :: Maybe Eac3DynamicRangeCompressionLine
dynamicRangeCompressionLine = Maybe Eac3DynamicRangeCompressionLine
forall a. Maybe a
Prelude.Nothing,
      $sel:ltRtSurroundMixLevel:Eac3Settings' :: Maybe Double
ltRtSurroundMixLevel = Maybe Double
forall a. Maybe a
Prelude.Nothing,
      $sel:metadataControl:Eac3Settings' :: Maybe Eac3MetadataControl
metadataControl = Maybe Eac3MetadataControl
forall a. Maybe a
Prelude.Nothing,
      $sel:loRoSurroundMixLevel:Eac3Settings' :: Maybe Double
loRoSurroundMixLevel = Maybe Double
forall a. Maybe a
Prelude.Nothing,
      $sel:surroundMode:Eac3Settings' :: Maybe Eac3SurroundMode
surroundMode = Maybe Eac3SurroundMode
forall a. Maybe a
Prelude.Nothing,
      $sel:attenuationControl:Eac3Settings' :: Maybe Eac3AttenuationControl
attenuationControl = Maybe Eac3AttenuationControl
forall a. Maybe a
Prelude.Nothing,
      $sel:passthroughControl:Eac3Settings' :: Maybe Eac3PassthroughControl
passthroughControl = Maybe Eac3PassthroughControl
forall a. Maybe a
Prelude.Nothing,
      $sel:bitstreamMode:Eac3Settings' :: Maybe Eac3BitstreamMode
bitstreamMode = Maybe Eac3BitstreamMode
forall a. Maybe a
Prelude.Nothing,
      $sel:lfeControl:Eac3Settings' :: Maybe Eac3LfeControl
lfeControl = Maybe Eac3LfeControl
forall a. Maybe a
Prelude.Nothing,
      $sel:dynamicRangeCompressionRf:Eac3Settings' :: Maybe Eac3DynamicRangeCompressionRf
dynamicRangeCompressionRf = Maybe Eac3DynamicRangeCompressionRf
forall a. Maybe a
Prelude.Nothing,
      $sel:codingMode:Eac3Settings' :: Maybe Eac3CodingMode
codingMode = Maybe Eac3CodingMode
forall a. Maybe a
Prelude.Nothing,
      $sel:sampleRate:Eac3Settings' :: Maybe Natural
sampleRate = Maybe Natural
forall a. Maybe a
Prelude.Nothing,
      $sel:dcFilter:Eac3Settings' :: Maybe Eac3DcFilter
dcFilter = Maybe Eac3DcFilter
forall a. Maybe a
Prelude.Nothing,
      $sel:bitrate:Eac3Settings' :: Maybe Natural
bitrate = Maybe Natural
forall a. Maybe a
Prelude.Nothing,
      $sel:phaseControl:Eac3Settings' :: Maybe Eac3PhaseControl
phaseControl = Maybe Eac3PhaseControl
forall a. Maybe a
Prelude.Nothing,
      $sel:surroundExMode:Eac3Settings' :: Maybe Eac3SurroundExMode
surroundExMode = Maybe Eac3SurroundExMode
forall a. Maybe a
Prelude.Nothing,
      $sel:dialnorm:Eac3Settings' :: Maybe Natural
dialnorm = Maybe Natural
forall a. Maybe a
Prelude.Nothing
    }

-- | Choose how the service does stereo downmixing. This setting only applies
-- if you keep the default value of 3\/2 - L, R, C, Ls, Rs
-- (CODING_MODE_3_2) for the setting Coding mode (Eac3CodingMode). If you
-- choose a different value for Coding mode, the service ignores Stereo
-- downmix (Eac3StereoDownmix).
eac3Settings_stereoDownmix :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3StereoDownmix)
eac3Settings_stereoDownmix :: (Maybe Eac3StereoDownmix -> f (Maybe Eac3StereoDownmix))
-> Eac3Settings -> f Eac3Settings
eac3Settings_stereoDownmix = (Eac3Settings -> Maybe Eac3StereoDownmix)
-> (Eac3Settings -> Maybe Eac3StereoDownmix -> Eac3Settings)
-> Lens
     Eac3Settings
     Eac3Settings
     (Maybe Eac3StereoDownmix)
     (Maybe Eac3StereoDownmix)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3StereoDownmix
stereoDownmix :: Maybe Eac3StereoDownmix
$sel:stereoDownmix:Eac3Settings' :: Eac3Settings -> Maybe Eac3StereoDownmix
stereoDownmix} -> Maybe Eac3StereoDownmix
stereoDownmix) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3StereoDownmix
a -> Eac3Settings
s {$sel:stereoDownmix:Eac3Settings' :: Maybe Eac3StereoDownmix
stereoDownmix = Maybe Eac3StereoDownmix
a} :: Eac3Settings)

-- | Specify a value for the following Dolby Digital Plus setting: Left
-- only\/Right only center mix (Lo\/Ro center). MediaConvert uses this
-- value for downmixing. How the service uses this value depends on the
-- value that you choose for Stereo downmix (Eac3StereoDownmix). Valid
-- values: 3.0, 1.5, 0.0, -1.5, -3.0, -4.5, -6.0, and -60. The value -60
-- mutes the channel. This setting applies only if you keep the default
-- value of 3\/2 - L, R, C, Ls, Rs (CODING_MODE_3_2) for the setting Coding
-- mode (Eac3CodingMode). If you choose a different value for Coding mode,
-- the service ignores Left only\/Right only center (loRoCenterMixLevel).
eac3Settings_loRoCenterMixLevel :: Lens.Lens' Eac3Settings (Prelude.Maybe Prelude.Double)
eac3Settings_loRoCenterMixLevel :: (Maybe Double -> f (Maybe Double))
-> Eac3Settings -> f Eac3Settings
eac3Settings_loRoCenterMixLevel = (Eac3Settings -> Maybe Double)
-> (Eac3Settings -> Maybe Double -> Eac3Settings)
-> Lens Eac3Settings Eac3Settings (Maybe Double) (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Double
loRoCenterMixLevel :: Maybe Double
$sel:loRoCenterMixLevel:Eac3Settings' :: Eac3Settings -> Maybe Double
loRoCenterMixLevel} -> Maybe Double
loRoCenterMixLevel) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Double
a -> Eac3Settings
s {$sel:loRoCenterMixLevel:Eac3Settings' :: Maybe Double
loRoCenterMixLevel = Maybe Double
a} :: Eac3Settings)

-- | Specify a value for the following Dolby Digital Plus setting: Left
-- total\/Right total center mix (Lt\/Rt center). MediaConvert uses this
-- value for downmixing. How the service uses this value depends on the
-- value that you choose for Stereo downmix (Eac3StereoDownmix). Valid
-- values: 3.0, 1.5, 0.0, -1.5, -3.0, -4.5, -6.0, and -60. The value -60
-- mutes the channel. This setting applies only if you keep the default
-- value of 3\/2 - L, R, C, Ls, Rs (CODING_MODE_3_2) for the setting Coding
-- mode (Eac3CodingMode). If you choose a different value for Coding mode,
-- the service ignores Left total\/Right total center (ltRtCenterMixLevel).
eac3Settings_ltRtCenterMixLevel :: Lens.Lens' Eac3Settings (Prelude.Maybe Prelude.Double)
eac3Settings_ltRtCenterMixLevel :: (Maybe Double -> f (Maybe Double))
-> Eac3Settings -> f Eac3Settings
eac3Settings_ltRtCenterMixLevel = (Eac3Settings -> Maybe Double)
-> (Eac3Settings -> Maybe Double -> Eac3Settings)
-> Lens Eac3Settings Eac3Settings (Maybe Double) (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Double
ltRtCenterMixLevel :: Maybe Double
$sel:ltRtCenterMixLevel:Eac3Settings' :: Eac3Settings -> Maybe Double
ltRtCenterMixLevel} -> Maybe Double
ltRtCenterMixLevel) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Double
a -> Eac3Settings
s {$sel:ltRtCenterMixLevel:Eac3Settings' :: Maybe Double
ltRtCenterMixLevel = Maybe Double
a} :: Eac3Settings)

-- | Applies a 120Hz lowpass filter to the LFE channel prior to encoding.
-- Only valid with 3_2_LFE coding mode.
eac3Settings_lfeFilter :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3LfeFilter)
eac3Settings_lfeFilter :: (Maybe Eac3LfeFilter -> f (Maybe Eac3LfeFilter))
-> Eac3Settings -> f Eac3Settings
eac3Settings_lfeFilter = (Eac3Settings -> Maybe Eac3LfeFilter)
-> (Eac3Settings -> Maybe Eac3LfeFilter -> Eac3Settings)
-> Lens
     Eac3Settings
     Eac3Settings
     (Maybe Eac3LfeFilter)
     (Maybe Eac3LfeFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3LfeFilter
lfeFilter :: Maybe Eac3LfeFilter
$sel:lfeFilter:Eac3Settings' :: Eac3Settings -> Maybe Eac3LfeFilter
lfeFilter} -> Maybe Eac3LfeFilter
lfeFilter) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3LfeFilter
a -> Eac3Settings
s {$sel:lfeFilter:Eac3Settings' :: Maybe Eac3LfeFilter
lfeFilter = Maybe Eac3LfeFilter
a} :: Eac3Settings)

-- | Choose the Dolby Digital dynamic range control (DRC) profile that
-- MediaConvert uses when encoding the metadata in the Dolby Digital stream
-- for the line operating mode. Related setting: When you use this setting,
-- MediaConvert ignores any value you provide for Dynamic range compression
-- profile (DynamicRangeCompressionProfile). For information about the
-- Dolby Digital DRC operating modes and profiles, see the Dynamic Range
-- Control chapter of the Dolby Metadata Guide at
-- https:\/\/developer.dolby.com\/globalassets\/professional\/documents\/dolby-metadata-guide.pdf.
eac3Settings_dynamicRangeCompressionLine :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3DynamicRangeCompressionLine)
eac3Settings_dynamicRangeCompressionLine :: (Maybe Eac3DynamicRangeCompressionLine
 -> f (Maybe Eac3DynamicRangeCompressionLine))
-> Eac3Settings -> f Eac3Settings
eac3Settings_dynamicRangeCompressionLine = (Eac3Settings -> Maybe Eac3DynamicRangeCompressionLine)
-> (Eac3Settings
    -> Maybe Eac3DynamicRangeCompressionLine -> Eac3Settings)
-> Lens
     Eac3Settings
     Eac3Settings
     (Maybe Eac3DynamicRangeCompressionLine)
     (Maybe Eac3DynamicRangeCompressionLine)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3DynamicRangeCompressionLine
dynamicRangeCompressionLine :: Maybe Eac3DynamicRangeCompressionLine
$sel:dynamicRangeCompressionLine:Eac3Settings' :: Eac3Settings -> Maybe Eac3DynamicRangeCompressionLine
dynamicRangeCompressionLine} -> Maybe Eac3DynamicRangeCompressionLine
dynamicRangeCompressionLine) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3DynamicRangeCompressionLine
a -> Eac3Settings
s {$sel:dynamicRangeCompressionLine:Eac3Settings' :: Maybe Eac3DynamicRangeCompressionLine
dynamicRangeCompressionLine = Maybe Eac3DynamicRangeCompressionLine
a} :: Eac3Settings)

-- | Specify a value for the following Dolby Digital Plus setting: Left
-- total\/Right total surround mix (Lt\/Rt surround). MediaConvert uses
-- this value for downmixing. How the service uses this value depends on
-- the value that you choose for Stereo downmix (Eac3StereoDownmix). Valid
-- values: -1.5, -3.0, -4.5, -6.0, and -60. The value -60 mutes the
-- channel. This setting applies only if you keep the default value of 3\/2
-- - L, R, C, Ls, Rs (CODING_MODE_3_2) for the setting Coding mode
-- (Eac3CodingMode). If you choose a different value for Coding mode, the
-- service ignores Left total\/Right total surround (ltRtSurroundMixLevel).
eac3Settings_ltRtSurroundMixLevel :: Lens.Lens' Eac3Settings (Prelude.Maybe Prelude.Double)
eac3Settings_ltRtSurroundMixLevel :: (Maybe Double -> f (Maybe Double))
-> Eac3Settings -> f Eac3Settings
eac3Settings_ltRtSurroundMixLevel = (Eac3Settings -> Maybe Double)
-> (Eac3Settings -> Maybe Double -> Eac3Settings)
-> Lens Eac3Settings Eac3Settings (Maybe Double) (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Double
ltRtSurroundMixLevel :: Maybe Double
$sel:ltRtSurroundMixLevel:Eac3Settings' :: Eac3Settings -> Maybe Double
ltRtSurroundMixLevel} -> Maybe Double
ltRtSurroundMixLevel) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Double
a -> Eac3Settings
s {$sel:ltRtSurroundMixLevel:Eac3Settings' :: Maybe Double
ltRtSurroundMixLevel = Maybe Double
a} :: Eac3Settings)

-- | When set to FOLLOW_INPUT, encoder metadata will be sourced from the DD,
-- DD+, or DolbyE decoder that supplied this audio data. If audio was not
-- supplied from one of these streams, then the static metadata settings
-- will be used.
eac3Settings_metadataControl :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3MetadataControl)
eac3Settings_metadataControl :: (Maybe Eac3MetadataControl -> f (Maybe Eac3MetadataControl))
-> Eac3Settings -> f Eac3Settings
eac3Settings_metadataControl = (Eac3Settings -> Maybe Eac3MetadataControl)
-> (Eac3Settings -> Maybe Eac3MetadataControl -> Eac3Settings)
-> Lens
     Eac3Settings
     Eac3Settings
     (Maybe Eac3MetadataControl)
     (Maybe Eac3MetadataControl)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3MetadataControl
metadataControl :: Maybe Eac3MetadataControl
$sel:metadataControl:Eac3Settings' :: Eac3Settings -> Maybe Eac3MetadataControl
metadataControl} -> Maybe Eac3MetadataControl
metadataControl) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3MetadataControl
a -> Eac3Settings
s {$sel:metadataControl:Eac3Settings' :: Maybe Eac3MetadataControl
metadataControl = Maybe Eac3MetadataControl
a} :: Eac3Settings)

-- | Specify a value for the following Dolby Digital Plus setting: Left
-- only\/Right only (Lo\/Ro surround). MediaConvert uses this value for
-- downmixing. How the service uses this value depends on the value that
-- you choose for Stereo downmix (Eac3StereoDownmix). Valid values: -1.5,
-- -3.0, -4.5, -6.0, and -60. The value -60 mutes the channel. This setting
-- applies only if you keep the default value of 3\/2 - L, R, C, Ls, Rs
-- (CODING_MODE_3_2) for the setting Coding mode (Eac3CodingMode). If you
-- choose a different value for Coding mode, the service ignores Left
-- only\/Right only surround (loRoSurroundMixLevel).
eac3Settings_loRoSurroundMixLevel :: Lens.Lens' Eac3Settings (Prelude.Maybe Prelude.Double)
eac3Settings_loRoSurroundMixLevel :: (Maybe Double -> f (Maybe Double))
-> Eac3Settings -> f Eac3Settings
eac3Settings_loRoSurroundMixLevel = (Eac3Settings -> Maybe Double)
-> (Eac3Settings -> Maybe Double -> Eac3Settings)
-> Lens Eac3Settings Eac3Settings (Maybe Double) (Maybe Double)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Double
loRoSurroundMixLevel :: Maybe Double
$sel:loRoSurroundMixLevel:Eac3Settings' :: Eac3Settings -> Maybe Double
loRoSurroundMixLevel} -> Maybe Double
loRoSurroundMixLevel) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Double
a -> Eac3Settings
s {$sel:loRoSurroundMixLevel:Eac3Settings' :: Maybe Double
loRoSurroundMixLevel = Maybe Double
a} :: Eac3Settings)

-- | When encoding 2\/0 audio, sets whether Dolby Surround is matrix encoded
-- into the two channels.
eac3Settings_surroundMode :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3SurroundMode)
eac3Settings_surroundMode :: (Maybe Eac3SurroundMode -> f (Maybe Eac3SurroundMode))
-> Eac3Settings -> f Eac3Settings
eac3Settings_surroundMode = (Eac3Settings -> Maybe Eac3SurroundMode)
-> (Eac3Settings -> Maybe Eac3SurroundMode -> Eac3Settings)
-> Lens
     Eac3Settings
     Eac3Settings
     (Maybe Eac3SurroundMode)
     (Maybe Eac3SurroundMode)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3SurroundMode
surroundMode :: Maybe Eac3SurroundMode
$sel:surroundMode:Eac3Settings' :: Eac3Settings -> Maybe Eac3SurroundMode
surroundMode} -> Maybe Eac3SurroundMode
surroundMode) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3SurroundMode
a -> Eac3Settings
s {$sel:surroundMode:Eac3Settings' :: Maybe Eac3SurroundMode
surroundMode = Maybe Eac3SurroundMode
a} :: Eac3Settings)

-- | If set to ATTENUATE_3_DB, applies a 3 dB attenuation to the surround
-- channels. Only used for 3\/2 coding mode.
eac3Settings_attenuationControl :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3AttenuationControl)
eac3Settings_attenuationControl :: (Maybe Eac3AttenuationControl -> f (Maybe Eac3AttenuationControl))
-> Eac3Settings -> f Eac3Settings
eac3Settings_attenuationControl = (Eac3Settings -> Maybe Eac3AttenuationControl)
-> (Eac3Settings -> Maybe Eac3AttenuationControl -> Eac3Settings)
-> Lens
     Eac3Settings
     Eac3Settings
     (Maybe Eac3AttenuationControl)
     (Maybe Eac3AttenuationControl)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3AttenuationControl
attenuationControl :: Maybe Eac3AttenuationControl
$sel:attenuationControl:Eac3Settings' :: Eac3Settings -> Maybe Eac3AttenuationControl
attenuationControl} -> Maybe Eac3AttenuationControl
attenuationControl) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3AttenuationControl
a -> Eac3Settings
s {$sel:attenuationControl:Eac3Settings' :: Maybe Eac3AttenuationControl
attenuationControl = Maybe Eac3AttenuationControl
a} :: Eac3Settings)

-- | When set to WHEN_POSSIBLE, input DD+ audio will be passed through if it
-- is present on the input. this detection is dynamic over the life of the
-- transcode. Inputs that alternate between DD+ and non-DD+ content will
-- have a consistent DD+ output as the system alternates between
-- passthrough and encoding.
eac3Settings_passthroughControl :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3PassthroughControl)
eac3Settings_passthroughControl :: (Maybe Eac3PassthroughControl -> f (Maybe Eac3PassthroughControl))
-> Eac3Settings -> f Eac3Settings
eac3Settings_passthroughControl = (Eac3Settings -> Maybe Eac3PassthroughControl)
-> (Eac3Settings -> Maybe Eac3PassthroughControl -> Eac3Settings)
-> Lens
     Eac3Settings
     Eac3Settings
     (Maybe Eac3PassthroughControl)
     (Maybe Eac3PassthroughControl)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3PassthroughControl
passthroughControl :: Maybe Eac3PassthroughControl
$sel:passthroughControl:Eac3Settings' :: Eac3Settings -> Maybe Eac3PassthroughControl
passthroughControl} -> Maybe Eac3PassthroughControl
passthroughControl) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3PassthroughControl
a -> Eac3Settings
s {$sel:passthroughControl:Eac3Settings' :: Maybe Eac3PassthroughControl
passthroughControl = Maybe Eac3PassthroughControl
a} :: Eac3Settings)

-- | Specify the bitstream mode for the E-AC-3 stream that the encoder emits.
-- For more information about the EAC3 bitstream mode, see ATSC A\/52-2012
-- (Annex E).
eac3Settings_bitstreamMode :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3BitstreamMode)
eac3Settings_bitstreamMode :: (Maybe Eac3BitstreamMode -> f (Maybe Eac3BitstreamMode))
-> Eac3Settings -> f Eac3Settings
eac3Settings_bitstreamMode = (Eac3Settings -> Maybe Eac3BitstreamMode)
-> (Eac3Settings -> Maybe Eac3BitstreamMode -> Eac3Settings)
-> Lens
     Eac3Settings
     Eac3Settings
     (Maybe Eac3BitstreamMode)
     (Maybe Eac3BitstreamMode)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3BitstreamMode
bitstreamMode :: Maybe Eac3BitstreamMode
$sel:bitstreamMode:Eac3Settings' :: Eac3Settings -> Maybe Eac3BitstreamMode
bitstreamMode} -> Maybe Eac3BitstreamMode
bitstreamMode) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3BitstreamMode
a -> Eac3Settings
s {$sel:bitstreamMode:Eac3Settings' :: Maybe Eac3BitstreamMode
bitstreamMode = Maybe Eac3BitstreamMode
a} :: Eac3Settings)

-- | When encoding 3\/2 audio, controls whether the LFE channel is enabled
eac3Settings_lfeControl :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3LfeControl)
eac3Settings_lfeControl :: (Maybe Eac3LfeControl -> f (Maybe Eac3LfeControl))
-> Eac3Settings -> f Eac3Settings
eac3Settings_lfeControl = (Eac3Settings -> Maybe Eac3LfeControl)
-> (Eac3Settings -> Maybe Eac3LfeControl -> Eac3Settings)
-> Lens
     Eac3Settings
     Eac3Settings
     (Maybe Eac3LfeControl)
     (Maybe Eac3LfeControl)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3LfeControl
lfeControl :: Maybe Eac3LfeControl
$sel:lfeControl:Eac3Settings' :: Eac3Settings -> Maybe Eac3LfeControl
lfeControl} -> Maybe Eac3LfeControl
lfeControl) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3LfeControl
a -> Eac3Settings
s {$sel:lfeControl:Eac3Settings' :: Maybe Eac3LfeControl
lfeControl = Maybe Eac3LfeControl
a} :: Eac3Settings)

-- | Choose the Dolby Digital dynamic range control (DRC) profile that
-- MediaConvert uses when encoding the metadata in the Dolby Digital stream
-- for the RF operating mode. Related setting: When you use this setting,
-- MediaConvert ignores any value you provide for Dynamic range compression
-- profile (DynamicRangeCompressionProfile). For information about the
-- Dolby Digital DRC operating modes and profiles, see the Dynamic Range
-- Control chapter of the Dolby Metadata Guide at
-- https:\/\/developer.dolby.com\/globalassets\/professional\/documents\/dolby-metadata-guide.pdf.
eac3Settings_dynamicRangeCompressionRf :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3DynamicRangeCompressionRf)
eac3Settings_dynamicRangeCompressionRf :: (Maybe Eac3DynamicRangeCompressionRf
 -> f (Maybe Eac3DynamicRangeCompressionRf))
-> Eac3Settings -> f Eac3Settings
eac3Settings_dynamicRangeCompressionRf = (Eac3Settings -> Maybe Eac3DynamicRangeCompressionRf)
-> (Eac3Settings
    -> Maybe Eac3DynamicRangeCompressionRf -> Eac3Settings)
-> Lens
     Eac3Settings
     Eac3Settings
     (Maybe Eac3DynamicRangeCompressionRf)
     (Maybe Eac3DynamicRangeCompressionRf)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3DynamicRangeCompressionRf
dynamicRangeCompressionRf :: Maybe Eac3DynamicRangeCompressionRf
$sel:dynamicRangeCompressionRf:Eac3Settings' :: Eac3Settings -> Maybe Eac3DynamicRangeCompressionRf
dynamicRangeCompressionRf} -> Maybe Eac3DynamicRangeCompressionRf
dynamicRangeCompressionRf) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3DynamicRangeCompressionRf
a -> Eac3Settings
s {$sel:dynamicRangeCompressionRf:Eac3Settings' :: Maybe Eac3DynamicRangeCompressionRf
dynamicRangeCompressionRf = Maybe Eac3DynamicRangeCompressionRf
a} :: Eac3Settings)

-- | Dolby Digital Plus coding mode. Determines number of channels.
eac3Settings_codingMode :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3CodingMode)
eac3Settings_codingMode :: (Maybe Eac3CodingMode -> f (Maybe Eac3CodingMode))
-> Eac3Settings -> f Eac3Settings
eac3Settings_codingMode = (Eac3Settings -> Maybe Eac3CodingMode)
-> (Eac3Settings -> Maybe Eac3CodingMode -> Eac3Settings)
-> Lens
     Eac3Settings
     Eac3Settings
     (Maybe Eac3CodingMode)
     (Maybe Eac3CodingMode)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3CodingMode
codingMode :: Maybe Eac3CodingMode
$sel:codingMode:Eac3Settings' :: Eac3Settings -> Maybe Eac3CodingMode
codingMode} -> Maybe Eac3CodingMode
codingMode) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3CodingMode
a -> Eac3Settings
s {$sel:codingMode:Eac3Settings' :: Maybe Eac3CodingMode
codingMode = Maybe Eac3CodingMode
a} :: Eac3Settings)

-- | This value is always 48000. It represents the sample rate in Hz.
eac3Settings_sampleRate :: Lens.Lens' Eac3Settings (Prelude.Maybe Prelude.Natural)
eac3Settings_sampleRate :: (Maybe Natural -> f (Maybe Natural))
-> Eac3Settings -> f Eac3Settings
eac3Settings_sampleRate = (Eac3Settings -> Maybe Natural)
-> (Eac3Settings -> Maybe Natural -> Eac3Settings)
-> Lens Eac3Settings Eac3Settings (Maybe Natural) (Maybe Natural)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Natural
sampleRate :: Maybe Natural
$sel:sampleRate:Eac3Settings' :: Eac3Settings -> Maybe Natural
sampleRate} -> Maybe Natural
sampleRate) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Natural
a -> Eac3Settings
s {$sel:sampleRate:Eac3Settings' :: Maybe Natural
sampleRate = Maybe Natural
a} :: Eac3Settings)

-- | Activates a DC highpass filter for all input channels.
eac3Settings_dcFilter :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3DcFilter)
eac3Settings_dcFilter :: (Maybe Eac3DcFilter -> f (Maybe Eac3DcFilter))
-> Eac3Settings -> f Eac3Settings
eac3Settings_dcFilter = (Eac3Settings -> Maybe Eac3DcFilter)
-> (Eac3Settings -> Maybe Eac3DcFilter -> Eac3Settings)
-> Lens
     Eac3Settings Eac3Settings (Maybe Eac3DcFilter) (Maybe Eac3DcFilter)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3DcFilter
dcFilter :: Maybe Eac3DcFilter
$sel:dcFilter:Eac3Settings' :: Eac3Settings -> Maybe Eac3DcFilter
dcFilter} -> Maybe Eac3DcFilter
dcFilter) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3DcFilter
a -> Eac3Settings
s {$sel:dcFilter:Eac3Settings' :: Maybe Eac3DcFilter
dcFilter = Maybe Eac3DcFilter
a} :: Eac3Settings)

-- | Specify the average bitrate in bits per second. Valid bitrates depend on
-- the coding mode.
eac3Settings_bitrate :: Lens.Lens' Eac3Settings (Prelude.Maybe Prelude.Natural)
eac3Settings_bitrate :: (Maybe Natural -> f (Maybe Natural))
-> Eac3Settings -> f Eac3Settings
eac3Settings_bitrate = (Eac3Settings -> Maybe Natural)
-> (Eac3Settings -> Maybe Natural -> Eac3Settings)
-> Lens Eac3Settings Eac3Settings (Maybe Natural) (Maybe Natural)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Natural
bitrate :: Maybe Natural
$sel:bitrate:Eac3Settings' :: Eac3Settings -> Maybe Natural
bitrate} -> Maybe Natural
bitrate) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Natural
a -> Eac3Settings
s {$sel:bitrate:Eac3Settings' :: Maybe Natural
bitrate = Maybe Natural
a} :: Eac3Settings)

-- | Controls the amount of phase-shift applied to the surround channels.
-- Only used for 3\/2 coding mode.
eac3Settings_phaseControl :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3PhaseControl)
eac3Settings_phaseControl :: (Maybe Eac3PhaseControl -> f (Maybe Eac3PhaseControl))
-> Eac3Settings -> f Eac3Settings
eac3Settings_phaseControl = (Eac3Settings -> Maybe Eac3PhaseControl)
-> (Eac3Settings -> Maybe Eac3PhaseControl -> Eac3Settings)
-> Lens
     Eac3Settings
     Eac3Settings
     (Maybe Eac3PhaseControl)
     (Maybe Eac3PhaseControl)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3PhaseControl
phaseControl :: Maybe Eac3PhaseControl
$sel:phaseControl:Eac3Settings' :: Eac3Settings -> Maybe Eac3PhaseControl
phaseControl} -> Maybe Eac3PhaseControl
phaseControl) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3PhaseControl
a -> Eac3Settings
s {$sel:phaseControl:Eac3Settings' :: Maybe Eac3PhaseControl
phaseControl = Maybe Eac3PhaseControl
a} :: Eac3Settings)

-- | When encoding 3\/2 audio, sets whether an extra center back surround
-- channel is matrix encoded into the left and right surround channels.
eac3Settings_surroundExMode :: Lens.Lens' Eac3Settings (Prelude.Maybe Eac3SurroundExMode)
eac3Settings_surroundExMode :: (Maybe Eac3SurroundExMode -> f (Maybe Eac3SurroundExMode))
-> Eac3Settings -> f Eac3Settings
eac3Settings_surroundExMode = (Eac3Settings -> Maybe Eac3SurroundExMode)
-> (Eac3Settings -> Maybe Eac3SurroundExMode -> Eac3Settings)
-> Lens
     Eac3Settings
     Eac3Settings
     (Maybe Eac3SurroundExMode)
     (Maybe Eac3SurroundExMode)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Eac3SurroundExMode
surroundExMode :: Maybe Eac3SurroundExMode
$sel:surroundExMode:Eac3Settings' :: Eac3Settings -> Maybe Eac3SurroundExMode
surroundExMode} -> Maybe Eac3SurroundExMode
surroundExMode) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Eac3SurroundExMode
a -> Eac3Settings
s {$sel:surroundExMode:Eac3Settings' :: Maybe Eac3SurroundExMode
surroundExMode = Maybe Eac3SurroundExMode
a} :: Eac3Settings)

-- | Sets the dialnorm for the output. If blank and input audio is Dolby
-- Digital Plus, dialnorm will be passed through.
eac3Settings_dialnorm :: Lens.Lens' Eac3Settings (Prelude.Maybe Prelude.Natural)
eac3Settings_dialnorm :: (Maybe Natural -> f (Maybe Natural))
-> Eac3Settings -> f Eac3Settings
eac3Settings_dialnorm = (Eac3Settings -> Maybe Natural)
-> (Eac3Settings -> Maybe Natural -> Eac3Settings)
-> Lens Eac3Settings Eac3Settings (Maybe Natural) (Maybe Natural)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Eac3Settings' {Maybe Natural
dialnorm :: Maybe Natural
$sel:dialnorm:Eac3Settings' :: Eac3Settings -> Maybe Natural
dialnorm} -> Maybe Natural
dialnorm) (\s :: Eac3Settings
s@Eac3Settings' {} Maybe Natural
a -> Eac3Settings
s {$sel:dialnorm:Eac3Settings' :: Maybe Natural
dialnorm = Maybe Natural
a} :: Eac3Settings)

instance Core.FromJSON Eac3Settings where
  parseJSON :: Value -> Parser Eac3Settings
parseJSON =
    String
-> (Object -> Parser Eac3Settings) -> Value -> Parser Eac3Settings
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
      String
"Eac3Settings"
      ( \Object
x ->
          Maybe Eac3StereoDownmix
-> Maybe Double
-> Maybe Double
-> Maybe Eac3LfeFilter
-> Maybe Eac3DynamicRangeCompressionLine
-> Maybe Double
-> Maybe Eac3MetadataControl
-> Maybe Double
-> Maybe Eac3SurroundMode
-> Maybe Eac3AttenuationControl
-> Maybe Eac3PassthroughControl
-> Maybe Eac3BitstreamMode
-> Maybe Eac3LfeControl
-> Maybe Eac3DynamicRangeCompressionRf
-> Maybe Eac3CodingMode
-> Maybe Natural
-> Maybe Eac3DcFilter
-> Maybe Natural
-> Maybe Eac3PhaseControl
-> Maybe Eac3SurroundExMode
-> Maybe Natural
-> Eac3Settings
Eac3Settings'
            (Maybe Eac3StereoDownmix
 -> Maybe Double
 -> Maybe Double
 -> Maybe Eac3LfeFilter
 -> Maybe Eac3DynamicRangeCompressionLine
 -> Maybe Double
 -> Maybe Eac3MetadataControl
 -> Maybe Double
 -> Maybe Eac3SurroundMode
 -> Maybe Eac3AttenuationControl
 -> Maybe Eac3PassthroughControl
 -> Maybe Eac3BitstreamMode
 -> Maybe Eac3LfeControl
 -> Maybe Eac3DynamicRangeCompressionRf
 -> Maybe Eac3CodingMode
 -> Maybe Natural
 -> Maybe Eac3DcFilter
 -> Maybe Natural
 -> Maybe Eac3PhaseControl
 -> Maybe Eac3SurroundExMode
 -> Maybe Natural
 -> Eac3Settings)
-> Parser (Maybe Eac3StereoDownmix)
-> Parser
     (Maybe Double
      -> Maybe Double
      -> Maybe Eac3LfeFilter
      -> Maybe Eac3DynamicRangeCompressionLine
      -> Maybe Double
      -> Maybe Eac3MetadataControl
      -> Maybe Double
      -> Maybe Eac3SurroundMode
      -> Maybe Eac3AttenuationControl
      -> Maybe Eac3PassthroughControl
      -> Maybe Eac3BitstreamMode
      -> Maybe Eac3LfeControl
      -> Maybe Eac3DynamicRangeCompressionRf
      -> Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe Eac3StereoDownmix)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"stereoDownmix")
            Parser
  (Maybe Double
   -> Maybe Double
   -> Maybe Eac3LfeFilter
   -> Maybe Eac3DynamicRangeCompressionLine
   -> Maybe Double
   -> Maybe Eac3MetadataControl
   -> Maybe Double
   -> Maybe Eac3SurroundMode
   -> Maybe Eac3AttenuationControl
   -> Maybe Eac3PassthroughControl
   -> Maybe Eac3BitstreamMode
   -> Maybe Eac3LfeControl
   -> Maybe Eac3DynamicRangeCompressionRf
   -> Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Double)
-> Parser
     (Maybe Double
      -> Maybe Eac3LfeFilter
      -> Maybe Eac3DynamicRangeCompressionLine
      -> Maybe Double
      -> Maybe Eac3MetadataControl
      -> Maybe Double
      -> Maybe Eac3SurroundMode
      -> Maybe Eac3AttenuationControl
      -> Maybe Eac3PassthroughControl
      -> Maybe Eac3BitstreamMode
      -> Maybe Eac3LfeControl
      -> Maybe Eac3DynamicRangeCompressionRf
      -> Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Double)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"loRoCenterMixLevel")
            Parser
  (Maybe Double
   -> Maybe Eac3LfeFilter
   -> Maybe Eac3DynamicRangeCompressionLine
   -> Maybe Double
   -> Maybe Eac3MetadataControl
   -> Maybe Double
   -> Maybe Eac3SurroundMode
   -> Maybe Eac3AttenuationControl
   -> Maybe Eac3PassthroughControl
   -> Maybe Eac3BitstreamMode
   -> Maybe Eac3LfeControl
   -> Maybe Eac3DynamicRangeCompressionRf
   -> Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Double)
-> Parser
     (Maybe Eac3LfeFilter
      -> Maybe Eac3DynamicRangeCompressionLine
      -> Maybe Double
      -> Maybe Eac3MetadataControl
      -> Maybe Double
      -> Maybe Eac3SurroundMode
      -> Maybe Eac3AttenuationControl
      -> Maybe Eac3PassthroughControl
      -> Maybe Eac3BitstreamMode
      -> Maybe Eac3LfeControl
      -> Maybe Eac3DynamicRangeCompressionRf
      -> Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Double)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"ltRtCenterMixLevel")
            Parser
  (Maybe Eac3LfeFilter
   -> Maybe Eac3DynamicRangeCompressionLine
   -> Maybe Double
   -> Maybe Eac3MetadataControl
   -> Maybe Double
   -> Maybe Eac3SurroundMode
   -> Maybe Eac3AttenuationControl
   -> Maybe Eac3PassthroughControl
   -> Maybe Eac3BitstreamMode
   -> Maybe Eac3LfeControl
   -> Maybe Eac3DynamicRangeCompressionRf
   -> Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Eac3LfeFilter)
-> Parser
     (Maybe Eac3DynamicRangeCompressionLine
      -> Maybe Double
      -> Maybe Eac3MetadataControl
      -> Maybe Double
      -> Maybe Eac3SurroundMode
      -> Maybe Eac3AttenuationControl
      -> Maybe Eac3PassthroughControl
      -> Maybe Eac3BitstreamMode
      -> Maybe Eac3LfeControl
      -> Maybe Eac3DynamicRangeCompressionRf
      -> Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Eac3LfeFilter)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"lfeFilter")
            Parser
  (Maybe Eac3DynamicRangeCompressionLine
   -> Maybe Double
   -> Maybe Eac3MetadataControl
   -> Maybe Double
   -> Maybe Eac3SurroundMode
   -> Maybe Eac3AttenuationControl
   -> Maybe Eac3PassthroughControl
   -> Maybe Eac3BitstreamMode
   -> Maybe Eac3LfeControl
   -> Maybe Eac3DynamicRangeCompressionRf
   -> Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Eac3DynamicRangeCompressionLine)
-> Parser
     (Maybe Double
      -> Maybe Eac3MetadataControl
      -> Maybe Double
      -> Maybe Eac3SurroundMode
      -> Maybe Eac3AttenuationControl
      -> Maybe Eac3PassthroughControl
      -> Maybe Eac3BitstreamMode
      -> Maybe Eac3LfeControl
      -> Maybe Eac3DynamicRangeCompressionRf
      -> Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Eac3DynamicRangeCompressionLine)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"dynamicRangeCompressionLine")
            Parser
  (Maybe Double
   -> Maybe Eac3MetadataControl
   -> Maybe Double
   -> Maybe Eac3SurroundMode
   -> Maybe Eac3AttenuationControl
   -> Maybe Eac3PassthroughControl
   -> Maybe Eac3BitstreamMode
   -> Maybe Eac3LfeControl
   -> Maybe Eac3DynamicRangeCompressionRf
   -> Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Double)
-> Parser
     (Maybe Eac3MetadataControl
      -> Maybe Double
      -> Maybe Eac3SurroundMode
      -> Maybe Eac3AttenuationControl
      -> Maybe Eac3PassthroughControl
      -> Maybe Eac3BitstreamMode
      -> Maybe Eac3LfeControl
      -> Maybe Eac3DynamicRangeCompressionRf
      -> Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Double)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"ltRtSurroundMixLevel")
            Parser
  (Maybe Eac3MetadataControl
   -> Maybe Double
   -> Maybe Eac3SurroundMode
   -> Maybe Eac3AttenuationControl
   -> Maybe Eac3PassthroughControl
   -> Maybe Eac3BitstreamMode
   -> Maybe Eac3LfeControl
   -> Maybe Eac3DynamicRangeCompressionRf
   -> Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Eac3MetadataControl)
-> Parser
     (Maybe Double
      -> Maybe Eac3SurroundMode
      -> Maybe Eac3AttenuationControl
      -> Maybe Eac3PassthroughControl
      -> Maybe Eac3BitstreamMode
      -> Maybe Eac3LfeControl
      -> Maybe Eac3DynamicRangeCompressionRf
      -> Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Eac3MetadataControl)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"metadataControl")
            Parser
  (Maybe Double
   -> Maybe Eac3SurroundMode
   -> Maybe Eac3AttenuationControl
   -> Maybe Eac3PassthroughControl
   -> Maybe Eac3BitstreamMode
   -> Maybe Eac3LfeControl
   -> Maybe Eac3DynamicRangeCompressionRf
   -> Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Double)
-> Parser
     (Maybe Eac3SurroundMode
      -> Maybe Eac3AttenuationControl
      -> Maybe Eac3PassthroughControl
      -> Maybe Eac3BitstreamMode
      -> Maybe Eac3LfeControl
      -> Maybe Eac3DynamicRangeCompressionRf
      -> Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Double)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"loRoSurroundMixLevel")
            Parser
  (Maybe Eac3SurroundMode
   -> Maybe Eac3AttenuationControl
   -> Maybe Eac3PassthroughControl
   -> Maybe Eac3BitstreamMode
   -> Maybe Eac3LfeControl
   -> Maybe Eac3DynamicRangeCompressionRf
   -> Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Eac3SurroundMode)
-> Parser
     (Maybe Eac3AttenuationControl
      -> Maybe Eac3PassthroughControl
      -> Maybe Eac3BitstreamMode
      -> Maybe Eac3LfeControl
      -> Maybe Eac3DynamicRangeCompressionRf
      -> Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Eac3SurroundMode)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"surroundMode")
            Parser
  (Maybe Eac3AttenuationControl
   -> Maybe Eac3PassthroughControl
   -> Maybe Eac3BitstreamMode
   -> Maybe Eac3LfeControl
   -> Maybe Eac3DynamicRangeCompressionRf
   -> Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Eac3AttenuationControl)
-> Parser
     (Maybe Eac3PassthroughControl
      -> Maybe Eac3BitstreamMode
      -> Maybe Eac3LfeControl
      -> Maybe Eac3DynamicRangeCompressionRf
      -> Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Eac3AttenuationControl)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"attenuationControl")
            Parser
  (Maybe Eac3PassthroughControl
   -> Maybe Eac3BitstreamMode
   -> Maybe Eac3LfeControl
   -> Maybe Eac3DynamicRangeCompressionRf
   -> Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Eac3PassthroughControl)
-> Parser
     (Maybe Eac3BitstreamMode
      -> Maybe Eac3LfeControl
      -> Maybe Eac3DynamicRangeCompressionRf
      -> Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Eac3PassthroughControl)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"passthroughControl")
            Parser
  (Maybe Eac3BitstreamMode
   -> Maybe Eac3LfeControl
   -> Maybe Eac3DynamicRangeCompressionRf
   -> Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Eac3BitstreamMode)
-> Parser
     (Maybe Eac3LfeControl
      -> Maybe Eac3DynamicRangeCompressionRf
      -> Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Eac3BitstreamMode)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"bitstreamMode")
            Parser
  (Maybe Eac3LfeControl
   -> Maybe Eac3DynamicRangeCompressionRf
   -> Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Eac3LfeControl)
-> Parser
     (Maybe Eac3DynamicRangeCompressionRf
      -> Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Eac3LfeControl)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"lfeControl")
            Parser
  (Maybe Eac3DynamicRangeCompressionRf
   -> Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Eac3DynamicRangeCompressionRf)
-> Parser
     (Maybe Eac3CodingMode
      -> Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Eac3DynamicRangeCompressionRf)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"dynamicRangeCompressionRf")
            Parser
  (Maybe Eac3CodingMode
   -> Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Eac3CodingMode)
-> Parser
     (Maybe Natural
      -> Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Eac3CodingMode)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"codingMode")
            Parser
  (Maybe Natural
   -> Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Natural)
-> Parser
     (Maybe Eac3DcFilter
      -> Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Natural)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"sampleRate")
            Parser
  (Maybe Eac3DcFilter
   -> Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Eac3DcFilter)
-> Parser
     (Maybe Natural
      -> Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode
      -> Maybe Natural
      -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Eac3DcFilter)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"dcFilter")
            Parser
  (Maybe Natural
   -> Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode
   -> Maybe Natural
   -> Eac3Settings)
-> Parser (Maybe Natural)
-> Parser
     (Maybe Eac3PhaseControl
      -> Maybe Eac3SurroundExMode -> Maybe Natural -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Natural)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"bitrate")
            Parser
  (Maybe Eac3PhaseControl
   -> Maybe Eac3SurroundExMode -> Maybe Natural -> Eac3Settings)
-> Parser (Maybe Eac3PhaseControl)
-> Parser
     (Maybe Eac3SurroundExMode -> Maybe Natural -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Eac3PhaseControl)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"phaseControl")
            Parser (Maybe Eac3SurroundExMode -> Maybe Natural -> Eac3Settings)
-> Parser (Maybe Eac3SurroundExMode)
-> Parser (Maybe Natural -> Eac3Settings)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Eac3SurroundExMode)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"surroundExMode")
            Parser (Maybe Natural -> Eac3Settings)
-> Parser (Maybe Natural) -> Parser Eac3Settings
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Natural)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"dialnorm")
      )

instance Prelude.Hashable Eac3Settings

instance Prelude.NFData Eac3Settings

instance Core.ToJSON Eac3Settings where
  toJSON :: Eac3Settings -> Value
toJSON Eac3Settings' {Maybe Double
Maybe Natural
Maybe Eac3AttenuationControl
Maybe Eac3BitstreamMode
Maybe Eac3CodingMode
Maybe Eac3DcFilter
Maybe Eac3DynamicRangeCompressionLine
Maybe Eac3DynamicRangeCompressionRf
Maybe Eac3LfeControl
Maybe Eac3LfeFilter
Maybe Eac3MetadataControl
Maybe Eac3PassthroughControl
Maybe Eac3PhaseControl
Maybe Eac3StereoDownmix
Maybe Eac3SurroundExMode
Maybe Eac3SurroundMode
dialnorm :: Maybe Natural
surroundExMode :: Maybe Eac3SurroundExMode
phaseControl :: Maybe Eac3PhaseControl
bitrate :: Maybe Natural
dcFilter :: Maybe Eac3DcFilter
sampleRate :: Maybe Natural
codingMode :: Maybe Eac3CodingMode
dynamicRangeCompressionRf :: Maybe Eac3DynamicRangeCompressionRf
lfeControl :: Maybe Eac3LfeControl
bitstreamMode :: Maybe Eac3BitstreamMode
passthroughControl :: Maybe Eac3PassthroughControl
attenuationControl :: Maybe Eac3AttenuationControl
surroundMode :: Maybe Eac3SurroundMode
loRoSurroundMixLevel :: Maybe Double
metadataControl :: Maybe Eac3MetadataControl
ltRtSurroundMixLevel :: Maybe Double
dynamicRangeCompressionLine :: Maybe Eac3DynamicRangeCompressionLine
lfeFilter :: Maybe Eac3LfeFilter
ltRtCenterMixLevel :: Maybe Double
loRoCenterMixLevel :: Maybe Double
stereoDownmix :: Maybe Eac3StereoDownmix
$sel:dialnorm:Eac3Settings' :: Eac3Settings -> Maybe Natural
$sel:surroundExMode:Eac3Settings' :: Eac3Settings -> Maybe Eac3SurroundExMode
$sel:phaseControl:Eac3Settings' :: Eac3Settings -> Maybe Eac3PhaseControl
$sel:bitrate:Eac3Settings' :: Eac3Settings -> Maybe Natural
$sel:dcFilter:Eac3Settings' :: Eac3Settings -> Maybe Eac3DcFilter
$sel:sampleRate:Eac3Settings' :: Eac3Settings -> Maybe Natural
$sel:codingMode:Eac3Settings' :: Eac3Settings -> Maybe Eac3CodingMode
$sel:dynamicRangeCompressionRf:Eac3Settings' :: Eac3Settings -> Maybe Eac3DynamicRangeCompressionRf
$sel:lfeControl:Eac3Settings' :: Eac3Settings -> Maybe Eac3LfeControl
$sel:bitstreamMode:Eac3Settings' :: Eac3Settings -> Maybe Eac3BitstreamMode
$sel:passthroughControl:Eac3Settings' :: Eac3Settings -> Maybe Eac3PassthroughControl
$sel:attenuationControl:Eac3Settings' :: Eac3Settings -> Maybe Eac3AttenuationControl
$sel:surroundMode:Eac3Settings' :: Eac3Settings -> Maybe Eac3SurroundMode
$sel:loRoSurroundMixLevel:Eac3Settings' :: Eac3Settings -> Maybe Double
$sel:metadataControl:Eac3Settings' :: Eac3Settings -> Maybe Eac3MetadataControl
$sel:ltRtSurroundMixLevel:Eac3Settings' :: Eac3Settings -> Maybe Double
$sel:dynamicRangeCompressionLine:Eac3Settings' :: Eac3Settings -> Maybe Eac3DynamicRangeCompressionLine
$sel:lfeFilter:Eac3Settings' :: Eac3Settings -> Maybe Eac3LfeFilter
$sel:ltRtCenterMixLevel:Eac3Settings' :: Eac3Settings -> Maybe Double
$sel:loRoCenterMixLevel:Eac3Settings' :: Eac3Settings -> Maybe Double
$sel:stereoDownmix:Eac3Settings' :: Eac3Settings -> Maybe Eac3StereoDownmix
..} =
    [Pair] -> Value
Core.object
      ( [Maybe Pair] -> [Pair]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
          [ (Text
"stereoDownmix" Text -> Eac3StereoDownmix -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Eac3StereoDownmix -> Pair)
-> Maybe Eac3StereoDownmix -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3StereoDownmix
stereoDownmix,
            (Text
"loRoCenterMixLevel" Text -> Double -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (Double -> Pair) -> Maybe Double -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Double
loRoCenterMixLevel,
            (Text
"ltRtCenterMixLevel" Text -> Double -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (Double -> Pair) -> Maybe Double -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Double
ltRtCenterMixLevel,
            (Text
"lfeFilter" Text -> Eac3LfeFilter -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Eac3LfeFilter -> Pair) -> Maybe Eac3LfeFilter -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3LfeFilter
lfeFilter,
            (Text
"dynamicRangeCompressionLine" Text -> Eac3DynamicRangeCompressionLine -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (Eac3DynamicRangeCompressionLine -> Pair)
-> Maybe Eac3DynamicRangeCompressionLine -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3DynamicRangeCompressionLine
dynamicRangeCompressionLine,
            (Text
"ltRtSurroundMixLevel" Text -> Double -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (Double -> Pair) -> Maybe Double -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Double
ltRtSurroundMixLevel,
            (Text
"metadataControl" Text -> Eac3MetadataControl -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (Eac3MetadataControl -> Pair)
-> Maybe Eac3MetadataControl -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3MetadataControl
metadataControl,
            (Text
"loRoSurroundMixLevel" Text -> Double -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (Double -> Pair) -> Maybe Double -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Double
loRoSurroundMixLevel,
            (Text
"surroundMode" Text -> Eac3SurroundMode -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Eac3SurroundMode -> Pair) -> Maybe Eac3SurroundMode -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3SurroundMode
surroundMode,
            (Text
"attenuationControl" Text -> Eac3AttenuationControl -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (Eac3AttenuationControl -> Pair)
-> Maybe Eac3AttenuationControl -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3AttenuationControl
attenuationControl,
            (Text
"passthroughControl" Text -> Eac3PassthroughControl -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (Eac3PassthroughControl -> Pair)
-> Maybe Eac3PassthroughControl -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3PassthroughControl
passthroughControl,
            (Text
"bitstreamMode" Text -> Eac3BitstreamMode -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Eac3BitstreamMode -> Pair)
-> Maybe Eac3BitstreamMode -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3BitstreamMode
bitstreamMode,
            (Text
"lfeControl" Text -> Eac3LfeControl -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Eac3LfeControl -> Pair) -> Maybe Eac3LfeControl -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3LfeControl
lfeControl,
            (Text
"dynamicRangeCompressionRf" Text -> Eac3DynamicRangeCompressionRf -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (Eac3DynamicRangeCompressionRf -> Pair)
-> Maybe Eac3DynamicRangeCompressionRf -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3DynamicRangeCompressionRf
dynamicRangeCompressionRf,
            (Text
"codingMode" Text -> Eac3CodingMode -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Eac3CodingMode -> Pair) -> Maybe Eac3CodingMode -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3CodingMode
codingMode,
            (Text
"sampleRate" Text -> Natural -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Natural -> Pair) -> Maybe Natural -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
sampleRate,
            (Text
"dcFilter" Text -> Eac3DcFilter -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Eac3DcFilter -> Pair) -> Maybe Eac3DcFilter -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3DcFilter
dcFilter,
            (Text
"bitrate" Text -> Natural -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Natural -> Pair) -> Maybe Natural -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
bitrate,
            (Text
"phaseControl" Text -> Eac3PhaseControl -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Eac3PhaseControl -> Pair) -> Maybe Eac3PhaseControl -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3PhaseControl
phaseControl,
            (Text
"surroundExMode" Text -> Eac3SurroundExMode -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=)
              (Eac3SurroundExMode -> Pair)
-> Maybe Eac3SurroundExMode -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Eac3SurroundExMode
surroundExMode,
            (Text
"dialnorm" Text -> Natural -> Pair
forall kv v. (KeyValue kv, ToJSON v) => Text -> v -> kv
Core..=) (Natural -> Pair) -> Maybe Natural -> Maybe Pair
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
dialnorm
          ]
      )