module Stratosphere.MediaLive.Channel.M3u8SettingsProperty (
        M3u8SettingsProperty(..), mkM3u8SettingsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data M3u8SettingsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html>
    M3u8SettingsProperty {M3u8SettingsProperty -> ()
haddock_workaround_ :: (),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-audioframesperpes>
                          M3u8SettingsProperty -> Maybe (Value Integer)
audioFramesPerPes :: (Prelude.Maybe (Value Prelude.Integer)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-audiopids>
                          M3u8SettingsProperty -> Maybe (Value Text)
audioPids :: (Prelude.Maybe (Value Prelude.Text)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-ecmpid>
                          M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: (Prelude.Maybe (Value Prelude.Text)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-klvbehavior>
                          M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: (Prelude.Maybe (Value Prelude.Text)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-klvdatapids>
                          M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: (Prelude.Maybe (Value Prelude.Text)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-nielsenid3behavior>
                          M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: (Prelude.Maybe (Value Prelude.Text)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-patinterval>
                          M3u8SettingsProperty -> Maybe (Value Integer)
patInterval :: (Prelude.Maybe (Value Prelude.Integer)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-pcrcontrol>
                          M3u8SettingsProperty -> Maybe (Value Text)
pcrControl :: (Prelude.Maybe (Value Prelude.Text)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-pcrperiod>
                          M3u8SettingsProperty -> Maybe (Value Integer)
pcrPeriod :: (Prelude.Maybe (Value Prelude.Integer)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-pcrpid>
                          M3u8SettingsProperty -> Maybe (Value Text)
pcrPid :: (Prelude.Maybe (Value Prelude.Text)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-pmtinterval>
                          M3u8SettingsProperty -> Maybe (Value Integer)
pmtInterval :: (Prelude.Maybe (Value Prelude.Integer)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-pmtpid>
                          M3u8SettingsProperty -> Maybe (Value Text)
pmtPid :: (Prelude.Maybe (Value Prelude.Text)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-programnum>
                          M3u8SettingsProperty -> Maybe (Value Integer)
programNum :: (Prelude.Maybe (Value Prelude.Integer)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-scte35behavior>
                          M3u8SettingsProperty -> Maybe (Value Text)
scte35Behavior :: (Prelude.Maybe (Value Prelude.Text)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-scte35pid>
                          M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: (Prelude.Maybe (Value Prelude.Text)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-timedmetadatabehavior>
                          M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: (Prelude.Maybe (Value Prelude.Text)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-timedmetadatapid>
                          M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: (Prelude.Maybe (Value Prelude.Text)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-transportstreamid>
                          M3u8SettingsProperty -> Maybe (Value Integer)
transportStreamId :: (Prelude.Maybe (Value Prelude.Integer)),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-m3u8settings.html#cfn-medialive-channel-m3u8settings-videopid>
                          M3u8SettingsProperty -> Maybe (Value Text)
videoPid :: (Prelude.Maybe (Value Prelude.Text))}
  deriving stock (M3u8SettingsProperty -> M3u8SettingsProperty -> Bool
(M3u8SettingsProperty -> M3u8SettingsProperty -> Bool)
-> (M3u8SettingsProperty -> M3u8SettingsProperty -> Bool)
-> Eq M3u8SettingsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: M3u8SettingsProperty -> M3u8SettingsProperty -> Bool
== :: M3u8SettingsProperty -> M3u8SettingsProperty -> Bool
$c/= :: M3u8SettingsProperty -> M3u8SettingsProperty -> Bool
/= :: M3u8SettingsProperty -> M3u8SettingsProperty -> Bool
Prelude.Eq, Int -> M3u8SettingsProperty -> ShowS
[M3u8SettingsProperty] -> ShowS
M3u8SettingsProperty -> String
(Int -> M3u8SettingsProperty -> ShowS)
-> (M3u8SettingsProperty -> String)
-> ([M3u8SettingsProperty] -> ShowS)
-> Show M3u8SettingsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> M3u8SettingsProperty -> ShowS
showsPrec :: Int -> M3u8SettingsProperty -> ShowS
$cshow :: M3u8SettingsProperty -> String
show :: M3u8SettingsProperty -> String
$cshowList :: [M3u8SettingsProperty] -> ShowS
showList :: [M3u8SettingsProperty] -> ShowS
Prelude.Show)
mkM3u8SettingsProperty :: M3u8SettingsProperty
mkM3u8SettingsProperty :: M3u8SettingsProperty
mkM3u8SettingsProperty
  = M3u8SettingsProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), audioFramesPerPes :: Maybe (Value Integer)
audioFramesPerPes = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       audioPids :: Maybe (Value Text)
audioPids = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, ecmPid :: Maybe (Value Text)
ecmPid = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       klvBehavior :: Maybe (Value Text)
klvBehavior = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, klvDataPids :: Maybe (Value Text)
klvDataPids = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       nielsenId3Behavior :: Maybe (Value Text)
nielsenId3Behavior = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       patInterval :: Maybe (Value Integer)
patInterval = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, pcrControl :: Maybe (Value Text)
pcrControl = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       pcrPeriod :: Maybe (Value Integer)
pcrPeriod = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, pcrPid :: Maybe (Value Text)
pcrPid = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       pmtInterval :: Maybe (Value Integer)
pmtInterval = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, pmtPid :: Maybe (Value Text)
pmtPid = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       programNum :: Maybe (Value Integer)
programNum = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, scte35Behavior :: Maybe (Value Text)
scte35Behavior = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       scte35Pid :: Maybe (Value Text)
scte35Pid = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       timedMetadataBehavior :: Maybe (Value Text)
timedMetadataBehavior = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       timedMetadataPid :: Maybe (Value Text)
timedMetadataPid = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       transportStreamId :: Maybe (Value Integer)
transportStreamId = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, videoPid :: Maybe (Value Text)
videoPid = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties M3u8SettingsProperty where
  toResourceProperties :: M3u8SettingsProperty -> ResourceProperties
toResourceProperties M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::MediaLive::Channel.M3u8Settings",
         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 Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AudioFramesPerPes" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
audioFramesPerPes,
                            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
"AudioPids" (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)
audioPids,
                            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
"EcmPid" (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)
ecmPid,
                            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
"KlvBehavior" (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)
klvBehavior,
                            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
"KlvDataPids" (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)
klvDataPids,
                            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
"NielsenId3Behavior" (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)
nielsenId3Behavior,
                            Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PatInterval" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
patInterval,
                            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
"PcrControl" (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)
pcrControl,
                            Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PcrPeriod" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
pcrPeriod,
                            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
"PcrPid" (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)
pcrPid,
                            Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PmtInterval" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
pmtInterval,
                            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
"PmtPid" (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)
pmtPid,
                            Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ProgramNum" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
programNum,
                            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
"Scte35Behavior" (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)
scte35Behavior,
                            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
"Scte35Pid" (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)
scte35Pid,
                            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
"TimedMetadataBehavior"
                              (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)
timedMetadataBehavior,
                            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
"TimedMetadataPid" (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)
timedMetadataPid,
                            Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TransportStreamId" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
transportStreamId,
                            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
"VideoPid" (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)
videoPid])}
instance JSON.ToJSON M3u8SettingsProperty where
  toJSON :: M3u8SettingsProperty -> Value
toJSON M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: 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 Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AudioFramesPerPes" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
audioFramesPerPes,
               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
"AudioPids" (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)
audioPids,
               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
"EcmPid" (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)
ecmPid,
               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
"KlvBehavior" (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)
klvBehavior,
               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
"KlvDataPids" (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)
klvDataPids,
               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
"NielsenId3Behavior" (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)
nielsenId3Behavior,
               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PatInterval" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
patInterval,
               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
"PcrControl" (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)
pcrControl,
               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PcrPeriod" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
pcrPeriod,
               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
"PcrPid" (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)
pcrPid,
               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PmtInterval" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
pmtInterval,
               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
"PmtPid" (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)
pmtPid,
               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ProgramNum" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
programNum,
               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
"Scte35Behavior" (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)
scte35Behavior,
               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
"Scte35Pid" (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)
scte35Pid,
               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
"TimedMetadataBehavior"
                 (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)
timedMetadataBehavior,
               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
"TimedMetadataPid" (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)
timedMetadataPid,
               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TransportStreamId" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
transportStreamId,
               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
"VideoPid" (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)
videoPid]))
instance Property "AudioFramesPerPes" M3u8SettingsProperty where
  type PropertyType "AudioFramesPerPes" M3u8SettingsProperty = Value Prelude.Integer
  set :: PropertyType "AudioFramesPerPes" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "AudioFramesPerPes" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty
        {audioFramesPerPes :: Maybe (Value Integer)
audioFramesPerPes = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AudioFramesPerPes" M3u8SettingsProperty
Value Integer
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "AudioPids" M3u8SettingsProperty where
  type PropertyType "AudioPids" M3u8SettingsProperty = Value Prelude.Text
  set :: PropertyType "AudioPids" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "AudioPids" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {audioPids :: Maybe (Value Text)
audioPids = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AudioPids" M3u8SettingsProperty
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "EcmPid" M3u8SettingsProperty where
  type PropertyType "EcmPid" M3u8SettingsProperty = Value Prelude.Text
  set :: PropertyType "EcmPid" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "EcmPid" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {ecmPid :: Maybe (Value Text)
ecmPid = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EcmPid" M3u8SettingsProperty
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "KlvBehavior" M3u8SettingsProperty where
  type PropertyType "KlvBehavior" M3u8SettingsProperty = Value Prelude.Text
  set :: PropertyType "KlvBehavior" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "KlvBehavior" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {klvBehavior :: Maybe (Value Text)
klvBehavior = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "KlvBehavior" M3u8SettingsProperty
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "KlvDataPids" M3u8SettingsProperty where
  type PropertyType "KlvDataPids" M3u8SettingsProperty = Value Prelude.Text
  set :: PropertyType "KlvDataPids" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "KlvDataPids" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {klvDataPids :: Maybe (Value Text)
klvDataPids = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "KlvDataPids" M3u8SettingsProperty
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "NielsenId3Behavior" M3u8SettingsProperty where
  type PropertyType "NielsenId3Behavior" M3u8SettingsProperty = Value Prelude.Text
  set :: PropertyType "NielsenId3Behavior" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "NielsenId3Behavior" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty
        {nielsenId3Behavior :: Maybe (Value Text)
nielsenId3Behavior = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "NielsenId3Behavior" M3u8SettingsProperty
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "PatInterval" M3u8SettingsProperty where
  type PropertyType "PatInterval" M3u8SettingsProperty = Value Prelude.Integer
  set :: PropertyType "PatInterval" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "PatInterval" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {patInterval :: Maybe (Value Integer)
patInterval = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PatInterval" M3u8SettingsProperty
Value Integer
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "PcrControl" M3u8SettingsProperty where
  type PropertyType "PcrControl" M3u8SettingsProperty = Value Prelude.Text
  set :: PropertyType "PcrControl" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "PcrControl" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {pcrControl :: Maybe (Value Text)
pcrControl = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PcrControl" M3u8SettingsProperty
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "PcrPeriod" M3u8SettingsProperty where
  type PropertyType "PcrPeriod" M3u8SettingsProperty = Value Prelude.Integer
  set :: PropertyType "PcrPeriod" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "PcrPeriod" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {pcrPeriod :: Maybe (Value Integer)
pcrPeriod = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PcrPeriod" M3u8SettingsProperty
Value Integer
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "PcrPid" M3u8SettingsProperty where
  type PropertyType "PcrPid" M3u8SettingsProperty = Value Prelude.Text
  set :: PropertyType "PcrPid" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "PcrPid" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {pcrPid :: Maybe (Value Text)
pcrPid = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PcrPid" M3u8SettingsProperty
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "PmtInterval" M3u8SettingsProperty where
  type PropertyType "PmtInterval" M3u8SettingsProperty = Value Prelude.Integer
  set :: PropertyType "PmtInterval" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "PmtInterval" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {pmtInterval :: Maybe (Value Integer)
pmtInterval = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PmtInterval" M3u8SettingsProperty
Value Integer
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "PmtPid" M3u8SettingsProperty where
  type PropertyType "PmtPid" M3u8SettingsProperty = Value Prelude.Text
  set :: PropertyType "PmtPid" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "PmtPid" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {pmtPid :: Maybe (Value Text)
pmtPid = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PmtPid" M3u8SettingsProperty
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "ProgramNum" M3u8SettingsProperty where
  type PropertyType "ProgramNum" M3u8SettingsProperty = Value Prelude.Integer
  set :: PropertyType "ProgramNum" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "ProgramNum" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {programNum :: Maybe (Value Integer)
programNum = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ProgramNum" M3u8SettingsProperty
Value Integer
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "Scte35Behavior" M3u8SettingsProperty where
  type PropertyType "Scte35Behavior" M3u8SettingsProperty = Value Prelude.Text
  set :: PropertyType "Scte35Behavior" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "Scte35Behavior" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {scte35Behavior :: Maybe (Value Text)
scte35Behavior = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Scte35Behavior" M3u8SettingsProperty
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "Scte35Pid" M3u8SettingsProperty where
  type PropertyType "Scte35Pid" M3u8SettingsProperty = Value Prelude.Text
  set :: PropertyType "Scte35Pid" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "Scte35Pid" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {scte35Pid :: Maybe (Value Text)
scte35Pid = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Scte35Pid" M3u8SettingsProperty
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "TimedMetadataBehavior" M3u8SettingsProperty where
  type PropertyType "TimedMetadataBehavior" M3u8SettingsProperty = Value Prelude.Text
  set :: PropertyType "TimedMetadataBehavior" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "TimedMetadataBehavior" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty
        {timedMetadataBehavior :: Maybe (Value Text)
timedMetadataBehavior = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TimedMetadataBehavior" M3u8SettingsProperty
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "TimedMetadataPid" M3u8SettingsProperty where
  type PropertyType "TimedMetadataPid" M3u8SettingsProperty = Value Prelude.Text
  set :: PropertyType "TimedMetadataPid" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "TimedMetadataPid" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty
        {timedMetadataPid :: Maybe (Value Text)
timedMetadataPid = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TimedMetadataPid" M3u8SettingsProperty
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
instance Property "TransportStreamId" M3u8SettingsProperty where
  type PropertyType "TransportStreamId" M3u8SettingsProperty = Value Prelude.Integer
  set :: PropertyType "TransportStreamId" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "TransportStreamId" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty
        {transportStreamId :: Maybe (Value Integer)
transportStreamId = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TransportStreamId" M3u8SettingsProperty
Value Integer
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
videoPid :: Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
videoPid :: Maybe (Value Text)
..}
instance Property "VideoPid" M3u8SettingsProperty where
  type PropertyType "VideoPid" M3u8SettingsProperty = Value Prelude.Text
  set :: PropertyType "VideoPid" M3u8SettingsProperty
-> M3u8SettingsProperty -> M3u8SettingsProperty
set PropertyType "VideoPid" M3u8SettingsProperty
newValue M3u8SettingsProperty {Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: M3u8SettingsProperty -> ()
audioFramesPerPes :: M3u8SettingsProperty -> Maybe (Value Integer)
audioPids :: M3u8SettingsProperty -> Maybe (Value Text)
ecmPid :: M3u8SettingsProperty -> Maybe (Value Text)
klvBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
klvDataPids :: M3u8SettingsProperty -> Maybe (Value Text)
nielsenId3Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
patInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrControl :: M3u8SettingsProperty -> Maybe (Value Text)
pcrPeriod :: M3u8SettingsProperty -> Maybe (Value Integer)
pcrPid :: M3u8SettingsProperty -> Maybe (Value Text)
pmtInterval :: M3u8SettingsProperty -> Maybe (Value Integer)
pmtPid :: M3u8SettingsProperty -> Maybe (Value Text)
programNum :: M3u8SettingsProperty -> Maybe (Value Integer)
scte35Behavior :: M3u8SettingsProperty -> Maybe (Value Text)
scte35Pid :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataBehavior :: M3u8SettingsProperty -> Maybe (Value Text)
timedMetadataPid :: M3u8SettingsProperty -> Maybe (Value Text)
transportStreamId :: M3u8SettingsProperty -> Maybe (Value Integer)
videoPid :: M3u8SettingsProperty -> Maybe (Value Text)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
videoPid :: Maybe (Value Text)
..}
    = M3u8SettingsProperty {videoPid :: Maybe (Value Text)
videoPid = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "VideoPid" M3u8SettingsProperty
Value Text
newValue, Maybe (Value Integer)
Maybe (Value Text)
()
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
haddock_workaround_ :: ()
audioFramesPerPes :: Maybe (Value Integer)
audioPids :: Maybe (Value Text)
ecmPid :: Maybe (Value Text)
klvBehavior :: Maybe (Value Text)
klvDataPids :: Maybe (Value Text)
nielsenId3Behavior :: Maybe (Value Text)
patInterval :: Maybe (Value Integer)
pcrControl :: Maybe (Value Text)
pcrPeriod :: Maybe (Value Integer)
pcrPid :: Maybe (Value Text)
pmtInterval :: Maybe (Value Integer)
pmtPid :: Maybe (Value Text)
programNum :: Maybe (Value Integer)
scte35Behavior :: Maybe (Value Text)
scte35Pid :: Maybe (Value Text)
timedMetadataBehavior :: Maybe (Value Text)
timedMetadataPid :: Maybe (Value Text)
transportStreamId :: Maybe (Value Integer)
..}