module Stratosphere.MediaLive.Multiplexprogram.MultiplexProgramPacketIdentifiersMapProperty (
        MultiplexProgramPacketIdentifiersMapProperty(..),
        mkMultiplexProgramPacketIdentifiersMapProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data MultiplexProgramPacketIdentifiersMapProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html>
    MultiplexProgramPacketIdentifiersMapProperty {MultiplexProgramPacketIdentifiersMapProperty -> ()
haddock_workaround_ :: (),
                                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html#cfn-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap-audiopids>
                                                  MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
audioPids :: (Prelude.Maybe (ValueList Prelude.Integer)),
                                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html#cfn-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap-dvbsubpids>
                                                  MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: (Prelude.Maybe (ValueList Prelude.Integer)),
                                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html#cfn-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap-dvbteletextpid>
                                                  MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
dvbTeletextPid :: (Prelude.Maybe (Value Prelude.Integer)),
                                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html#cfn-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap-etvplatformpid>
                                                  MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: (Prelude.Maybe (Value Prelude.Integer)),
                                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html#cfn-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap-etvsignalpid>
                                                  MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: (Prelude.Maybe (Value Prelude.Integer)),
                                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html#cfn-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap-klvdatapids>
                                                  MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
klvDataPids :: (Prelude.Maybe (ValueList Prelude.Integer)),
                                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html#cfn-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap-pcrpid>
                                                  MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pcrPid :: (Prelude.Maybe (Value Prelude.Integer)),
                                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html#cfn-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap-pmtpid>
                                                  MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: (Prelude.Maybe (Value Prelude.Integer)),
                                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html#cfn-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap-privatemetadatapid>
                                                  MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: (Prelude.Maybe (Value Prelude.Integer)),
                                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html#cfn-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap-scte27pids>
                                                  MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte27Pids :: (Prelude.Maybe (ValueList Prelude.Integer)),
                                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html#cfn-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap-scte35pid>
                                                  MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte35Pid :: (Prelude.Maybe (Value Prelude.Integer)),
                                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html#cfn-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap-timedmetadatapid>
                                                  MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: (Prelude.Maybe (Value Prelude.Integer)),
                                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap.html#cfn-medialive-multiplexprogram-multiplexprogrampacketidentifiersmap-videopid>
                                                  MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: (Prelude.Maybe (Value Prelude.Integer))}
  deriving stock (MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty -> Bool
(MultiplexProgramPacketIdentifiersMapProperty
 -> MultiplexProgramPacketIdentifiersMapProperty -> Bool)
-> (MultiplexProgramPacketIdentifiersMapProperty
    -> MultiplexProgramPacketIdentifiersMapProperty -> Bool)
-> Eq MultiplexProgramPacketIdentifiersMapProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty -> Bool
== :: MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty -> Bool
$c/= :: MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty -> Bool
/= :: MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty -> Bool
Prelude.Eq, Int -> MultiplexProgramPacketIdentifiersMapProperty -> ShowS
[MultiplexProgramPacketIdentifiersMapProperty] -> ShowS
MultiplexProgramPacketIdentifiersMapProperty -> String
(Int -> MultiplexProgramPacketIdentifiersMapProperty -> ShowS)
-> (MultiplexProgramPacketIdentifiersMapProperty -> String)
-> ([MultiplexProgramPacketIdentifiersMapProperty] -> ShowS)
-> Show MultiplexProgramPacketIdentifiersMapProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> MultiplexProgramPacketIdentifiersMapProperty -> ShowS
showsPrec :: Int -> MultiplexProgramPacketIdentifiersMapProperty -> ShowS
$cshow :: MultiplexProgramPacketIdentifiersMapProperty -> String
show :: MultiplexProgramPacketIdentifiersMapProperty -> String
$cshowList :: [MultiplexProgramPacketIdentifiersMapProperty] -> ShowS
showList :: [MultiplexProgramPacketIdentifiersMapProperty] -> ShowS
Prelude.Show)
mkMultiplexProgramPacketIdentifiersMapProperty ::
  MultiplexProgramPacketIdentifiersMapProperty
mkMultiplexProgramPacketIdentifiersMapProperty :: MultiplexProgramPacketIdentifiersMapProperty
mkMultiplexProgramPacketIdentifiersMapProperty
  = MultiplexProgramPacketIdentifiersMapProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), audioPids :: Maybe (ValueList Integer)
audioPids = Maybe (ValueList Integer)
forall a. Maybe a
Prelude.Nothing,
       dvbSubPids :: Maybe (ValueList Integer)
dvbSubPids = Maybe (ValueList Integer)
forall a. Maybe a
Prelude.Nothing, dvbTeletextPid :: Maybe (Value Integer)
dvbTeletextPid = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       etvPlatformPid :: Maybe (Value Integer)
etvPlatformPid = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, etvSignalPid :: Maybe (Value Integer)
etvSignalPid = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       klvDataPids :: Maybe (ValueList Integer)
klvDataPids = Maybe (ValueList Integer)
forall a. Maybe a
Prelude.Nothing, pcrPid :: Maybe (Value Integer)
pcrPid = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       pmtPid :: Maybe (Value Integer)
pmtPid = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, privateMetadataPid :: Maybe (Value Integer)
privateMetadataPid = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       scte27Pids :: Maybe (ValueList Integer)
scte27Pids = Maybe (ValueList Integer)
forall a. Maybe a
Prelude.Nothing, scte35Pid :: Maybe (Value Integer)
scte35Pid = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       timedMetadataPid :: Maybe (Value Integer)
timedMetadataPid = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, videoPid :: Maybe (Value Integer)
videoPid = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties MultiplexProgramPacketIdentifiersMapProperty where
  toResourceProperties :: MultiplexProgramPacketIdentifiersMapProperty -> ResourceProperties
toResourceProperties
    MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::MediaLive::Multiplexprogram.MultiplexProgramPacketIdentifiersMap",
         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 -> ValueList 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
"AudioPids" (ValueList Integer -> (Key, Value))
-> Maybe (ValueList Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Integer)
audioPids,
                            Key -> ValueList 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
"DvbSubPids" (ValueList Integer -> (Key, Value))
-> Maybe (ValueList Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Integer)
dvbSubPids,
                            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
"DvbTeletextPid" (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)
dvbTeletextPid,
                            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
"EtvPlatformPid" (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)
etvPlatformPid,
                            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
"EtvSignalPid" (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)
etvSignalPid,
                            Key -> ValueList 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
"KlvDataPids" (ValueList Integer -> (Key, Value))
-> Maybe (ValueList Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Integer)
klvDataPids,
                            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
"PcrPid" (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)
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
"PmtPid" (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)
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
"PrivateMetadataPid" (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)
privateMetadataPid,
                            Key -> ValueList 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
"Scte27Pids" (ValueList Integer -> (Key, Value))
-> Maybe (ValueList Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Integer)
scte27Pids,
                            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
"Scte35Pid" (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)
scte35Pid,
                            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
"TimedMetadataPid" (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)
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
"VideoPid" (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)
videoPid])}
instance JSON.ToJSON MultiplexProgramPacketIdentifiersMapProperty where
  toJSON :: MultiplexProgramPacketIdentifiersMapProperty -> Value
toJSON MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = [(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 -> ValueList 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
"AudioPids" (ValueList Integer -> (Key, Value))
-> Maybe (ValueList Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Integer)
audioPids,
               Key -> ValueList 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
"DvbSubPids" (ValueList Integer -> (Key, Value))
-> Maybe (ValueList Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Integer)
dvbSubPids,
               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
"DvbTeletextPid" (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)
dvbTeletextPid,
               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
"EtvPlatformPid" (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)
etvPlatformPid,
               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
"EtvSignalPid" (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)
etvSignalPid,
               Key -> ValueList 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
"KlvDataPids" (ValueList Integer -> (Key, Value))
-> Maybe (ValueList Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Integer)
klvDataPids,
               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
"PcrPid" (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)
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
"PmtPid" (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)
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
"PrivateMetadataPid" (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)
privateMetadataPid,
               Key -> ValueList 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
"Scte27Pids" (ValueList Integer -> (Key, Value))
-> Maybe (ValueList Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Integer)
scte27Pids,
               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
"Scte35Pid" (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)
scte35Pid,
               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
"TimedMetadataPid" (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)
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
"VideoPid" (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)
videoPid]))
instance Property "AudioPids" MultiplexProgramPacketIdentifiersMapProperty where
  type PropertyType "AudioPids" MultiplexProgramPacketIdentifiersMapProperty = ValueList Prelude.Integer
  set :: PropertyType
  "AudioPids" MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
set PropertyType
  "AudioPids" MultiplexProgramPacketIdentifiersMapProperty
newValue MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = MultiplexProgramPacketIdentifiersMapProperty
        {audioPids :: Maybe (ValueList Integer)
audioPids = ValueList Integer -> Maybe (ValueList Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "AudioPids" MultiplexProgramPacketIdentifiersMapProperty
ValueList Integer
newValue, Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
haddock_workaround_ :: ()
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
instance Property "DvbSubPids" MultiplexProgramPacketIdentifiersMapProperty where
  type PropertyType "DvbSubPids" MultiplexProgramPacketIdentifiersMapProperty = ValueList Prelude.Integer
  set :: PropertyType
  "DvbSubPids" MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
set PropertyType
  "DvbSubPids" MultiplexProgramPacketIdentifiersMapProperty
newValue MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = MultiplexProgramPacketIdentifiersMapProperty
        {dvbSubPids :: Maybe (ValueList Integer)
dvbSubPids = ValueList Integer -> Maybe (ValueList Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "DvbSubPids" MultiplexProgramPacketIdentifiersMapProperty
ValueList Integer
newValue, Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
instance Property "DvbTeletextPid" MultiplexProgramPacketIdentifiersMapProperty where
  type PropertyType "DvbTeletextPid" MultiplexProgramPacketIdentifiersMapProperty = Value Prelude.Integer
  set :: PropertyType
  "DvbTeletextPid" MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
set PropertyType
  "DvbTeletextPid" MultiplexProgramPacketIdentifiersMapProperty
newValue MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = MultiplexProgramPacketIdentifiersMapProperty
        {dvbTeletextPid :: Maybe (Value Integer)
dvbTeletextPid = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "DvbTeletextPid" MultiplexProgramPacketIdentifiersMapProperty
Value Integer
newValue, Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
instance Property "EtvPlatformPid" MultiplexProgramPacketIdentifiersMapProperty where
  type PropertyType "EtvPlatformPid" MultiplexProgramPacketIdentifiersMapProperty = Value Prelude.Integer
  set :: PropertyType
  "EtvPlatformPid" MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
set PropertyType
  "EtvPlatformPid" MultiplexProgramPacketIdentifiersMapProperty
newValue MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = MultiplexProgramPacketIdentifiersMapProperty
        {etvPlatformPid :: Maybe (Value Integer)
etvPlatformPid = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "EtvPlatformPid" MultiplexProgramPacketIdentifiersMapProperty
Value Integer
newValue, Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
instance Property "EtvSignalPid" MultiplexProgramPacketIdentifiersMapProperty where
  type PropertyType "EtvSignalPid" MultiplexProgramPacketIdentifiersMapProperty = Value Prelude.Integer
  set :: PropertyType
  "EtvSignalPid" MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
set PropertyType
  "EtvSignalPid" MultiplexProgramPacketIdentifiersMapProperty
newValue MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = MultiplexProgramPacketIdentifiersMapProperty
        {etvSignalPid :: Maybe (Value Integer)
etvSignalPid = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "EtvSignalPid" MultiplexProgramPacketIdentifiersMapProperty
Value Integer
newValue, Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
instance Property "KlvDataPids" MultiplexProgramPacketIdentifiersMapProperty where
  type PropertyType "KlvDataPids" MultiplexProgramPacketIdentifiersMapProperty = ValueList Prelude.Integer
  set :: PropertyType
  "KlvDataPids" MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
set PropertyType
  "KlvDataPids" MultiplexProgramPacketIdentifiersMapProperty
newValue MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = MultiplexProgramPacketIdentifiersMapProperty
        {klvDataPids :: Maybe (ValueList Integer)
klvDataPids = ValueList Integer -> Maybe (ValueList Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "KlvDataPids" MultiplexProgramPacketIdentifiersMapProperty
ValueList Integer
newValue, Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
instance Property "PcrPid" MultiplexProgramPacketIdentifiersMapProperty where
  type PropertyType "PcrPid" MultiplexProgramPacketIdentifiersMapProperty = Value Prelude.Integer
  set :: PropertyType "PcrPid" MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
set PropertyType "PcrPid" MultiplexProgramPacketIdentifiersMapProperty
newValue MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = MultiplexProgramPacketIdentifiersMapProperty
        {pcrPid :: Maybe (Value Integer)
pcrPid = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PcrPid" MultiplexProgramPacketIdentifiersMapProperty
Value Integer
newValue, Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
instance Property "PmtPid" MultiplexProgramPacketIdentifiersMapProperty where
  type PropertyType "PmtPid" MultiplexProgramPacketIdentifiersMapProperty = Value Prelude.Integer
  set :: PropertyType "PmtPid" MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
set PropertyType "PmtPid" MultiplexProgramPacketIdentifiersMapProperty
newValue MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = MultiplexProgramPacketIdentifiersMapProperty
        {pmtPid :: Maybe (Value Integer)
pmtPid = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PmtPid" MultiplexProgramPacketIdentifiersMapProperty
Value Integer
newValue, Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
instance Property "PrivateMetadataPid" MultiplexProgramPacketIdentifiersMapProperty where
  type PropertyType "PrivateMetadataPid" MultiplexProgramPacketIdentifiersMapProperty = Value Prelude.Integer
  set :: PropertyType
  "PrivateMetadataPid" MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
set PropertyType
  "PrivateMetadataPid" MultiplexProgramPacketIdentifiersMapProperty
newValue MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = MultiplexProgramPacketIdentifiersMapProperty
        {privateMetadataPid :: Maybe (Value Integer)
privateMetadataPid = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "PrivateMetadataPid" MultiplexProgramPacketIdentifiersMapProperty
Value Integer
newValue, Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
instance Property "Scte27Pids" MultiplexProgramPacketIdentifiersMapProperty where
  type PropertyType "Scte27Pids" MultiplexProgramPacketIdentifiersMapProperty = ValueList Prelude.Integer
  set :: PropertyType
  "Scte27Pids" MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
set PropertyType
  "Scte27Pids" MultiplexProgramPacketIdentifiersMapProperty
newValue MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = MultiplexProgramPacketIdentifiersMapProperty
        {scte27Pids :: Maybe (ValueList Integer)
scte27Pids = ValueList Integer -> Maybe (ValueList Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "Scte27Pids" MultiplexProgramPacketIdentifiersMapProperty
ValueList Integer
newValue, Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
instance Property "Scte35Pid" MultiplexProgramPacketIdentifiersMapProperty where
  type PropertyType "Scte35Pid" MultiplexProgramPacketIdentifiersMapProperty = Value Prelude.Integer
  set :: PropertyType
  "Scte35Pid" MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
set PropertyType
  "Scte35Pid" MultiplexProgramPacketIdentifiersMapProperty
newValue MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = MultiplexProgramPacketIdentifiersMapProperty
        {scte35Pid :: Maybe (Value Integer)
scte35Pid = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "Scte35Pid" MultiplexProgramPacketIdentifiersMapProperty
Value Integer
newValue, Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
instance Property "TimedMetadataPid" MultiplexProgramPacketIdentifiersMapProperty where
  type PropertyType "TimedMetadataPid" MultiplexProgramPacketIdentifiersMapProperty = Value Prelude.Integer
  set :: PropertyType
  "TimedMetadataPid" MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
set PropertyType
  "TimedMetadataPid" MultiplexProgramPacketIdentifiersMapProperty
newValue MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = MultiplexProgramPacketIdentifiersMapProperty
        {timedMetadataPid :: Maybe (Value Integer)
timedMetadataPid = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "TimedMetadataPid" MultiplexProgramPacketIdentifiersMapProperty
Value Integer
newValue, Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
instance Property "VideoPid" MultiplexProgramPacketIdentifiersMapProperty where
  type PropertyType "VideoPid" MultiplexProgramPacketIdentifiersMapProperty = Value Prelude.Integer
  set :: PropertyType
  "VideoPid" MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
-> MultiplexProgramPacketIdentifiersMapProperty
set PropertyType
  "VideoPid" MultiplexProgramPacketIdentifiersMapProperty
newValue MultiplexProgramPacketIdentifiersMapProperty {Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: MultiplexProgramPacketIdentifiersMapProperty -> ()
audioPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbSubPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
dvbTeletextPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvPlatformPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
etvSignalPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
klvDataPids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
pcrPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
pmtPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
privateMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
scte27Pids :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (ValueList Integer)
scte35Pid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
timedMetadataPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
videoPid :: MultiplexProgramPacketIdentifiersMapProperty
-> Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
videoPid :: Maybe (Value Integer)
..}
    = MultiplexProgramPacketIdentifiersMapProperty
        {videoPid :: Maybe (Value Integer)
videoPid = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "VideoPid" MultiplexProgramPacketIdentifiersMapProperty
Value Integer
newValue, Maybe (ValueList Integer)
Maybe (Value Integer)
()
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
haddock_workaround_ :: ()
audioPids :: Maybe (ValueList Integer)
dvbSubPids :: Maybe (ValueList Integer)
dvbTeletextPid :: Maybe (Value Integer)
etvPlatformPid :: Maybe (Value Integer)
etvSignalPid :: Maybe (Value Integer)
klvDataPids :: Maybe (ValueList Integer)
pcrPid :: Maybe (Value Integer)
pmtPid :: Maybe (Value Integer)
privateMetadataPid :: Maybe (Value Integer)
scte27Pids :: Maybe (ValueList Integer)
scte35Pid :: Maybe (Value Integer)
timedMetadataPid :: Maybe (Value Integer)
..}