module Stratosphere.MediaLive.Channel.AacSettingsProperty (
        AacSettingsProperty(..), mkAacSettingsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data AacSettingsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-aacsettings.html>
    AacSettingsProperty {AacSettingsProperty -> ()
haddock_workaround_ :: (),
                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-aacsettings.html#cfn-medialive-channel-aacsettings-bitrate>
                         AacSettingsProperty -> Maybe (Value Double)
bitrate :: (Prelude.Maybe (Value Prelude.Double)),
                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-aacsettings.html#cfn-medialive-channel-aacsettings-codingmode>
                         AacSettingsProperty -> Maybe (Value Text)
codingMode :: (Prelude.Maybe (Value Prelude.Text)),
                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-aacsettings.html#cfn-medialive-channel-aacsettings-inputtype>
                         AacSettingsProperty -> Maybe (Value Text)
inputType :: (Prelude.Maybe (Value Prelude.Text)),
                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-aacsettings.html#cfn-medialive-channel-aacsettings-profile>
                         AacSettingsProperty -> Maybe (Value Text)
profile :: (Prelude.Maybe (Value Prelude.Text)),
                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-aacsettings.html#cfn-medialive-channel-aacsettings-ratecontrolmode>
                         AacSettingsProperty -> Maybe (Value Text)
rateControlMode :: (Prelude.Maybe (Value Prelude.Text)),
                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-aacsettings.html#cfn-medialive-channel-aacsettings-rawformat>
                         AacSettingsProperty -> Maybe (Value Text)
rawFormat :: (Prelude.Maybe (Value Prelude.Text)),
                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-aacsettings.html#cfn-medialive-channel-aacsettings-samplerate>
                         AacSettingsProperty -> Maybe (Value Double)
sampleRate :: (Prelude.Maybe (Value Prelude.Double)),
                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-aacsettings.html#cfn-medialive-channel-aacsettings-spec>
                         AacSettingsProperty -> Maybe (Value Text)
spec :: (Prelude.Maybe (Value Prelude.Text)),
                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-aacsettings.html#cfn-medialive-channel-aacsettings-vbrquality>
                         AacSettingsProperty -> Maybe (Value Text)
vbrQuality :: (Prelude.Maybe (Value Prelude.Text))}
  deriving stock (AacSettingsProperty -> AacSettingsProperty -> Bool
(AacSettingsProperty -> AacSettingsProperty -> Bool)
-> (AacSettingsProperty -> AacSettingsProperty -> Bool)
-> Eq AacSettingsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AacSettingsProperty -> AacSettingsProperty -> Bool
== :: AacSettingsProperty -> AacSettingsProperty -> Bool
$c/= :: AacSettingsProperty -> AacSettingsProperty -> Bool
/= :: AacSettingsProperty -> AacSettingsProperty -> Bool
Prelude.Eq, Int -> AacSettingsProperty -> ShowS
[AacSettingsProperty] -> ShowS
AacSettingsProperty -> String
(Int -> AacSettingsProperty -> ShowS)
-> (AacSettingsProperty -> String)
-> ([AacSettingsProperty] -> ShowS)
-> Show AacSettingsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> AacSettingsProperty -> ShowS
showsPrec :: Int -> AacSettingsProperty -> ShowS
$cshow :: AacSettingsProperty -> String
show :: AacSettingsProperty -> String
$cshowList :: [AacSettingsProperty] -> ShowS
showList :: [AacSettingsProperty] -> ShowS
Prelude.Show)
mkAacSettingsProperty :: AacSettingsProperty
mkAacSettingsProperty :: AacSettingsProperty
mkAacSettingsProperty
  = AacSettingsProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), bitrate :: Maybe (Value Double)
bitrate = Maybe (Value Double)
forall a. Maybe a
Prelude.Nothing,
       codingMode :: Maybe (Value Text)
codingMode = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, inputType :: Maybe (Value Text)
inputType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       profile :: Maybe (Value Text)
profile = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, rateControlMode :: Maybe (Value Text)
rateControlMode = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       rawFormat :: Maybe (Value Text)
rawFormat = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, sampleRate :: Maybe (Value Double)
sampleRate = Maybe (Value Double)
forall a. Maybe a
Prelude.Nothing,
       spec :: Maybe (Value Text)
spec = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, vbrQuality :: Maybe (Value Text)
vbrQuality = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties AacSettingsProperty where
  toResourceProperties :: AacSettingsProperty -> ResourceProperties
toResourceProperties AacSettingsProperty {Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AacSettingsProperty -> ()
bitrate :: AacSettingsProperty -> Maybe (Value Double)
codingMode :: AacSettingsProperty -> Maybe (Value Text)
inputType :: AacSettingsProperty -> Maybe (Value Text)
profile :: AacSettingsProperty -> Maybe (Value Text)
rateControlMode :: AacSettingsProperty -> Maybe (Value Text)
rawFormat :: AacSettingsProperty -> Maybe (Value Text)
sampleRate :: AacSettingsProperty -> Maybe (Value Double)
spec :: AacSettingsProperty -> Maybe (Value Text)
vbrQuality :: AacSettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::MediaLive::Channel.AacSettings",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Bitrate" (Value Double -> (Key, Value))
-> Maybe (Value Double) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Double)
bitrate,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CodingMode" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
codingMode,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"InputType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
inputType,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Profile" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
profile,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RateControlMode" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
rateControlMode,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RawFormat" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
rawFormat,
                            Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SampleRate" (Value Double -> (Key, Value))
-> Maybe (Value Double) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Double)
sampleRate,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Spec" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
spec,
                            Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VbrQuality" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
vbrQuality])}
instance JSON.ToJSON AacSettingsProperty where
  toJSON :: AacSettingsProperty -> Value
toJSON AacSettingsProperty {Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AacSettingsProperty -> ()
bitrate :: AacSettingsProperty -> Maybe (Value Double)
codingMode :: AacSettingsProperty -> Maybe (Value Text)
inputType :: AacSettingsProperty -> Maybe (Value Text)
profile :: AacSettingsProperty -> Maybe (Value Text)
rateControlMode :: AacSettingsProperty -> Maybe (Value Text)
rawFormat :: AacSettingsProperty -> Maybe (Value Text)
sampleRate :: AacSettingsProperty -> Maybe (Value Double)
spec :: AacSettingsProperty -> Maybe (Value Text)
vbrQuality :: AacSettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Bitrate" (Value Double -> (Key, Value))
-> Maybe (Value Double) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Double)
bitrate,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CodingMode" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
codingMode,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"InputType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
inputType,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Profile" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
profile,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RateControlMode" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
rateControlMode,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RawFormat" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
rawFormat,
               Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SampleRate" (Value Double -> (Key, Value))
-> Maybe (Value Double) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Double)
sampleRate,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Spec" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
spec,
               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VbrQuality" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
vbrQuality]))
instance Property "Bitrate" AacSettingsProperty where
  type PropertyType "Bitrate" AacSettingsProperty = Value Prelude.Double
  set :: PropertyType "Bitrate" AacSettingsProperty
-> AacSettingsProperty -> AacSettingsProperty
set PropertyType "Bitrate" AacSettingsProperty
newValue AacSettingsProperty {Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AacSettingsProperty -> ()
bitrate :: AacSettingsProperty -> Maybe (Value Double)
codingMode :: AacSettingsProperty -> Maybe (Value Text)
inputType :: AacSettingsProperty -> Maybe (Value Text)
profile :: AacSettingsProperty -> Maybe (Value Text)
rateControlMode :: AacSettingsProperty -> Maybe (Value Text)
rawFormat :: AacSettingsProperty -> Maybe (Value Text)
sampleRate :: AacSettingsProperty -> Maybe (Value Double)
spec :: AacSettingsProperty -> Maybe (Value Text)
vbrQuality :: AacSettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
    = AacSettingsProperty {bitrate :: Maybe (Value Double)
bitrate = Value Double -> Maybe (Value Double)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Bitrate" AacSettingsProperty
Value Double
newValue, Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
haddock_workaround_ :: ()
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
instance Property "CodingMode" AacSettingsProperty where
  type PropertyType "CodingMode" AacSettingsProperty = Value Prelude.Text
  set :: PropertyType "CodingMode" AacSettingsProperty
-> AacSettingsProperty -> AacSettingsProperty
set PropertyType "CodingMode" AacSettingsProperty
newValue AacSettingsProperty {Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AacSettingsProperty -> ()
bitrate :: AacSettingsProperty -> Maybe (Value Double)
codingMode :: AacSettingsProperty -> Maybe (Value Text)
inputType :: AacSettingsProperty -> Maybe (Value Text)
profile :: AacSettingsProperty -> Maybe (Value Text)
rateControlMode :: AacSettingsProperty -> Maybe (Value Text)
rawFormat :: AacSettingsProperty -> Maybe (Value Text)
sampleRate :: AacSettingsProperty -> Maybe (Value Double)
spec :: AacSettingsProperty -> Maybe (Value Text)
vbrQuality :: AacSettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
    = AacSettingsProperty {codingMode :: Maybe (Value Text)
codingMode = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CodingMode" AacSettingsProperty
Value Text
newValue, Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
instance Property "InputType" AacSettingsProperty where
  type PropertyType "InputType" AacSettingsProperty = Value Prelude.Text
  set :: PropertyType "InputType" AacSettingsProperty
-> AacSettingsProperty -> AacSettingsProperty
set PropertyType "InputType" AacSettingsProperty
newValue AacSettingsProperty {Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AacSettingsProperty -> ()
bitrate :: AacSettingsProperty -> Maybe (Value Double)
codingMode :: AacSettingsProperty -> Maybe (Value Text)
inputType :: AacSettingsProperty -> Maybe (Value Text)
profile :: AacSettingsProperty -> Maybe (Value Text)
rateControlMode :: AacSettingsProperty -> Maybe (Value Text)
rawFormat :: AacSettingsProperty -> Maybe (Value Text)
sampleRate :: AacSettingsProperty -> Maybe (Value Double)
spec :: AacSettingsProperty -> Maybe (Value Text)
vbrQuality :: AacSettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
    = AacSettingsProperty {inputType :: Maybe (Value Text)
inputType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "InputType" AacSettingsProperty
Value Text
newValue, Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
instance Property "Profile" AacSettingsProperty where
  type PropertyType "Profile" AacSettingsProperty = Value Prelude.Text
  set :: PropertyType "Profile" AacSettingsProperty
-> AacSettingsProperty -> AacSettingsProperty
set PropertyType "Profile" AacSettingsProperty
newValue AacSettingsProperty {Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AacSettingsProperty -> ()
bitrate :: AacSettingsProperty -> Maybe (Value Double)
codingMode :: AacSettingsProperty -> Maybe (Value Text)
inputType :: AacSettingsProperty -> Maybe (Value Text)
profile :: AacSettingsProperty -> Maybe (Value Text)
rateControlMode :: AacSettingsProperty -> Maybe (Value Text)
rawFormat :: AacSettingsProperty -> Maybe (Value Text)
sampleRate :: AacSettingsProperty -> Maybe (Value Double)
spec :: AacSettingsProperty -> Maybe (Value Text)
vbrQuality :: AacSettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
    = AacSettingsProperty {profile :: Maybe (Value Text)
profile = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Profile" AacSettingsProperty
Value Text
newValue, Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
instance Property "RateControlMode" AacSettingsProperty where
  type PropertyType "RateControlMode" AacSettingsProperty = Value Prelude.Text
  set :: PropertyType "RateControlMode" AacSettingsProperty
-> AacSettingsProperty -> AacSettingsProperty
set PropertyType "RateControlMode" AacSettingsProperty
newValue AacSettingsProperty {Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AacSettingsProperty -> ()
bitrate :: AacSettingsProperty -> Maybe (Value Double)
codingMode :: AacSettingsProperty -> Maybe (Value Text)
inputType :: AacSettingsProperty -> Maybe (Value Text)
profile :: AacSettingsProperty -> Maybe (Value Text)
rateControlMode :: AacSettingsProperty -> Maybe (Value Text)
rawFormat :: AacSettingsProperty -> Maybe (Value Text)
sampleRate :: AacSettingsProperty -> Maybe (Value Double)
spec :: AacSettingsProperty -> Maybe (Value Text)
vbrQuality :: AacSettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
    = AacSettingsProperty {rateControlMode :: Maybe (Value Text)
rateControlMode = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "RateControlMode" AacSettingsProperty
Value Text
newValue, Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
instance Property "RawFormat" AacSettingsProperty where
  type PropertyType "RawFormat" AacSettingsProperty = Value Prelude.Text
  set :: PropertyType "RawFormat" AacSettingsProperty
-> AacSettingsProperty -> AacSettingsProperty
set PropertyType "RawFormat" AacSettingsProperty
newValue AacSettingsProperty {Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AacSettingsProperty -> ()
bitrate :: AacSettingsProperty -> Maybe (Value Double)
codingMode :: AacSettingsProperty -> Maybe (Value Text)
inputType :: AacSettingsProperty -> Maybe (Value Text)
profile :: AacSettingsProperty -> Maybe (Value Text)
rateControlMode :: AacSettingsProperty -> Maybe (Value Text)
rawFormat :: AacSettingsProperty -> Maybe (Value Text)
sampleRate :: AacSettingsProperty -> Maybe (Value Double)
spec :: AacSettingsProperty -> Maybe (Value Text)
vbrQuality :: AacSettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
    = AacSettingsProperty {rawFormat :: Maybe (Value Text)
rawFormat = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "RawFormat" AacSettingsProperty
Value Text
newValue, Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
instance Property "SampleRate" AacSettingsProperty where
  type PropertyType "SampleRate" AacSettingsProperty = Value Prelude.Double
  set :: PropertyType "SampleRate" AacSettingsProperty
-> AacSettingsProperty -> AacSettingsProperty
set PropertyType "SampleRate" AacSettingsProperty
newValue AacSettingsProperty {Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AacSettingsProperty -> ()
bitrate :: AacSettingsProperty -> Maybe (Value Double)
codingMode :: AacSettingsProperty -> Maybe (Value Text)
inputType :: AacSettingsProperty -> Maybe (Value Text)
profile :: AacSettingsProperty -> Maybe (Value Text)
rateControlMode :: AacSettingsProperty -> Maybe (Value Text)
rawFormat :: AacSettingsProperty -> Maybe (Value Text)
sampleRate :: AacSettingsProperty -> Maybe (Value Double)
spec :: AacSettingsProperty -> Maybe (Value Text)
vbrQuality :: AacSettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
    = AacSettingsProperty {sampleRate :: Maybe (Value Double)
sampleRate = Value Double -> Maybe (Value Double)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SampleRate" AacSettingsProperty
Value Double
newValue, Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
instance Property "Spec" AacSettingsProperty where
  type PropertyType "Spec" AacSettingsProperty = Value Prelude.Text
  set :: PropertyType "Spec" AacSettingsProperty
-> AacSettingsProperty -> AacSettingsProperty
set PropertyType "Spec" AacSettingsProperty
newValue AacSettingsProperty {Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AacSettingsProperty -> ()
bitrate :: AacSettingsProperty -> Maybe (Value Double)
codingMode :: AacSettingsProperty -> Maybe (Value Text)
inputType :: AacSettingsProperty -> Maybe (Value Text)
profile :: AacSettingsProperty -> Maybe (Value Text)
rateControlMode :: AacSettingsProperty -> Maybe (Value Text)
rawFormat :: AacSettingsProperty -> Maybe (Value Text)
sampleRate :: AacSettingsProperty -> Maybe (Value Double)
spec :: AacSettingsProperty -> Maybe (Value Text)
vbrQuality :: AacSettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
    = AacSettingsProperty {spec :: Maybe (Value Text)
spec = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Spec" AacSettingsProperty
Value Text
newValue, Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
vbrQuality :: Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
vbrQuality :: Maybe (Value Text)
..}
instance Property "VbrQuality" AacSettingsProperty where
  type PropertyType "VbrQuality" AacSettingsProperty = Value Prelude.Text
  set :: PropertyType "VbrQuality" AacSettingsProperty
-> AacSettingsProperty -> AacSettingsProperty
set PropertyType "VbrQuality" AacSettingsProperty
newValue AacSettingsProperty {Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AacSettingsProperty -> ()
bitrate :: AacSettingsProperty -> Maybe (Value Double)
codingMode :: AacSettingsProperty -> Maybe (Value Text)
inputType :: AacSettingsProperty -> Maybe (Value Text)
profile :: AacSettingsProperty -> Maybe (Value Text)
rateControlMode :: AacSettingsProperty -> Maybe (Value Text)
rawFormat :: AacSettingsProperty -> Maybe (Value Text)
sampleRate :: AacSettingsProperty -> Maybe (Value Double)
spec :: AacSettingsProperty -> Maybe (Value Text)
vbrQuality :: AacSettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
vbrQuality :: Maybe (Value Text)
..}
    = AacSettingsProperty {vbrQuality :: Maybe (Value Text)
vbrQuality = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "VbrQuality" AacSettingsProperty
Value Text
newValue, Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
haddock_workaround_ :: ()
bitrate :: Maybe (Value Double)
codingMode :: Maybe (Value Text)
inputType :: Maybe (Value Text)
profile :: Maybe (Value Text)
rateControlMode :: Maybe (Value Text)
rawFormat :: Maybe (Value Text)
sampleRate :: Maybe (Value Double)
spec :: Maybe (Value Text)
..}