module Stratosphere.MediaPackageV2.OriginEndpoint.DashManifestConfigurationProperty (
module Exports, DashManifestConfigurationProperty(..),
mkDashManifestConfigurationProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.MediaPackageV2.OriginEndpoint.DashBaseUrlProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaPackageV2.OriginEndpoint.DashDvbSettingsProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaPackageV2.OriginEndpoint.DashProgramInformationProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaPackageV2.OriginEndpoint.DashSubtitleConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaPackageV2.OriginEndpoint.DashUtcTimingProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaPackageV2.OriginEndpoint.FilterConfigurationProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaPackageV2.OriginEndpoint.ScteDashProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data DashManifestConfigurationProperty
=
DashManifestConfigurationProperty {DashManifestConfigurationProperty -> ()
haddock_workaround_ :: (),
DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
baseUrls :: (Prelude.Maybe [DashBaseUrlProperty]),
DashManifestConfigurationProperty -> Maybe (Value Text)
compactness :: (Prelude.Maybe (Value Prelude.Text)),
DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: (Prelude.Maybe (Value Prelude.Text)),
DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
dvbSettings :: (Prelude.Maybe DashDvbSettingsProperty),
DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
filterConfiguration :: (Prelude.Maybe FilterConfigurationProperty),
DashManifestConfigurationProperty -> Value Text
manifestName :: (Value Prelude.Text),
DashManifestConfigurationProperty -> Maybe (Value Integer)
manifestWindowSeconds :: (Prelude.Maybe (Value Prelude.Integer)),
DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: (Prelude.Maybe (Value Prelude.Integer)),
DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: (Prelude.Maybe (Value Prelude.Integer)),
DashManifestConfigurationProperty -> Maybe (ValueList Text)
periodTriggers :: (Prelude.Maybe (ValueList Prelude.Text)),
DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: (Prelude.Maybe (ValueList Prelude.Text)),
DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
programInformation :: (Prelude.Maybe DashProgramInformationProperty),
DashManifestConfigurationProperty -> Maybe ScteDashProperty
scteDash :: (Prelude.Maybe ScteDashProperty),
DashManifestConfigurationProperty -> Maybe (Value Text)
segmentTemplateFormat :: (Prelude.Maybe (Value Prelude.Text)),
DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
subtitleConfiguration :: (Prelude.Maybe DashSubtitleConfigurationProperty),
DashManifestConfigurationProperty -> Maybe (Value Integer)
suggestedPresentationDelaySeconds :: (Prelude.Maybe (Value Prelude.Integer)),
DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
utcTiming :: (Prelude.Maybe DashUtcTimingProperty)}
deriving stock (DashManifestConfigurationProperty
-> DashManifestConfigurationProperty -> Bool
(DashManifestConfigurationProperty
-> DashManifestConfigurationProperty -> Bool)
-> (DashManifestConfigurationProperty
-> DashManifestConfigurationProperty -> Bool)
-> Eq DashManifestConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DashManifestConfigurationProperty
-> DashManifestConfigurationProperty -> Bool
== :: DashManifestConfigurationProperty
-> DashManifestConfigurationProperty -> Bool
$c/= :: DashManifestConfigurationProperty
-> DashManifestConfigurationProperty -> Bool
/= :: DashManifestConfigurationProperty
-> DashManifestConfigurationProperty -> Bool
Prelude.Eq, Int -> DashManifestConfigurationProperty -> ShowS
[DashManifestConfigurationProperty] -> ShowS
DashManifestConfigurationProperty -> String
(Int -> DashManifestConfigurationProperty -> ShowS)
-> (DashManifestConfigurationProperty -> String)
-> ([DashManifestConfigurationProperty] -> ShowS)
-> Show DashManifestConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DashManifestConfigurationProperty -> ShowS
showsPrec :: Int -> DashManifestConfigurationProperty -> ShowS
$cshow :: DashManifestConfigurationProperty -> String
show :: DashManifestConfigurationProperty -> String
$cshowList :: [DashManifestConfigurationProperty] -> ShowS
showList :: [DashManifestConfigurationProperty] -> ShowS
Prelude.Show)
mkDashManifestConfigurationProperty ::
Value Prelude.Text -> DashManifestConfigurationProperty
mkDashManifestConfigurationProperty :: Value Text -> DashManifestConfigurationProperty
mkDashManifestConfigurationProperty Value Text
manifestName
= DashManifestConfigurationProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), manifestName :: Value Text
manifestName = Value Text
manifestName,
baseUrls :: Maybe [DashBaseUrlProperty]
baseUrls = Maybe [DashBaseUrlProperty]
forall a. Maybe a
Prelude.Nothing, compactness :: Maybe (Value Text)
compactness = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
drmSignaling :: Maybe (Value Text)
drmSignaling = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, dvbSettings :: Maybe DashDvbSettingsProperty
dvbSettings = Maybe DashDvbSettingsProperty
forall a. Maybe a
Prelude.Nothing,
filterConfiguration :: Maybe FilterConfigurationProperty
filterConfiguration = Maybe FilterConfigurationProperty
forall a. Maybe a
Prelude.Nothing,
manifestWindowSeconds :: Maybe (Value Integer)
manifestWindowSeconds = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
minBufferTimeSeconds :: Maybe (Value Integer)
minBufferTimeSeconds = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
minUpdatePeriodSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
periodTriggers :: Maybe (ValueList Text)
periodTriggers = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing, profiles :: Maybe (ValueList Text)
profiles = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
programInformation :: Maybe DashProgramInformationProperty
programInformation = Maybe DashProgramInformationProperty
forall a. Maybe a
Prelude.Nothing, scteDash :: Maybe ScteDashProperty
scteDash = Maybe ScteDashProperty
forall a. Maybe a
Prelude.Nothing,
segmentTemplateFormat :: Maybe (Value Text)
segmentTemplateFormat = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
subtitleConfiguration = Maybe DashSubtitleConfigurationProperty
forall a. Maybe a
Prelude.Nothing,
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
suggestedPresentationDelaySeconds = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
utcTiming :: Maybe DashUtcTimingProperty
utcTiming = Maybe DashUtcTimingProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties DashManifestConfigurationProperty where
toResourceProperties :: DashManifestConfigurationProperty -> ResourceProperties
toResourceProperties DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::MediaPackageV2::OriginEndpoint.DashManifestConfiguration",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
[Key
"ManifestName" 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..= Value Text
manifestName]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> [DashBaseUrlProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"BaseUrls" ([DashBaseUrlProperty] -> (Key, Value))
-> Maybe [DashBaseUrlProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [DashBaseUrlProperty]
baseUrls,
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
"Compactness" (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)
compactness,
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
"DrmSignaling" (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)
drmSignaling,
Key -> DashDvbSettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DvbSettings" (DashDvbSettingsProperty -> (Key, Value))
-> Maybe DashDvbSettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DashDvbSettingsProperty
dvbSettings,
Key -> FilterConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FilterConfiguration" (FilterConfigurationProperty -> (Key, Value))
-> Maybe FilterConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FilterConfigurationProperty
filterConfiguration,
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
"ManifestWindowSeconds"
(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)
manifestWindowSeconds,
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
"MinBufferTimeSeconds" (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)
minBufferTimeSeconds,
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
"MinUpdatePeriodSeconds"
(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)
minUpdatePeriodSeconds,
Key -> ValueList 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
"PeriodTriggers" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
periodTriggers,
Key -> ValueList 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
"Profiles" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
profiles,
Key -> DashProgramInformationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ProgramInformation" (DashProgramInformationProperty -> (Key, Value))
-> Maybe DashProgramInformationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DashProgramInformationProperty
programInformation,
Key -> ScteDashProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ScteDash" (ScteDashProperty -> (Key, Value))
-> Maybe ScteDashProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ScteDashProperty
scteDash,
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
"SegmentTemplateFormat"
(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)
segmentTemplateFormat,
Key -> DashSubtitleConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SubtitleConfiguration"
(DashSubtitleConfigurationProperty -> (Key, Value))
-> Maybe DashSubtitleConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DashSubtitleConfigurationProperty
subtitleConfiguration,
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
"SuggestedPresentationDelaySeconds"
(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)
suggestedPresentationDelaySeconds,
Key -> DashUtcTimingProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"UtcTiming" (DashUtcTimingProperty -> (Key, Value))
-> Maybe DashUtcTimingProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DashUtcTimingProperty
utcTiming]))}
instance JSON.ToJSON DashManifestConfigurationProperty where
toJSON :: DashManifestConfigurationProperty -> Value
toJSON DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= [(Key, Value)] -> Value
JSON.object
([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
[Key
"ManifestName" 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..= Value Text
manifestName]
([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
[Key -> [DashBaseUrlProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"BaseUrls" ([DashBaseUrlProperty] -> (Key, Value))
-> Maybe [DashBaseUrlProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [DashBaseUrlProperty]
baseUrls,
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
"Compactness" (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)
compactness,
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
"DrmSignaling" (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)
drmSignaling,
Key -> DashDvbSettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DvbSettings" (DashDvbSettingsProperty -> (Key, Value))
-> Maybe DashDvbSettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DashDvbSettingsProperty
dvbSettings,
Key -> FilterConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FilterConfiguration" (FilterConfigurationProperty -> (Key, Value))
-> Maybe FilterConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe FilterConfigurationProperty
filterConfiguration,
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
"ManifestWindowSeconds"
(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)
manifestWindowSeconds,
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
"MinBufferTimeSeconds" (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)
minBufferTimeSeconds,
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
"MinUpdatePeriodSeconds"
(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)
minUpdatePeriodSeconds,
Key -> ValueList 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
"PeriodTriggers" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
periodTriggers,
Key -> ValueList 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
"Profiles" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
profiles,
Key -> DashProgramInformationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ProgramInformation" (DashProgramInformationProperty -> (Key, Value))
-> Maybe DashProgramInformationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DashProgramInformationProperty
programInformation,
Key -> ScteDashProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ScteDash" (ScteDashProperty -> (Key, Value))
-> Maybe ScteDashProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ScteDashProperty
scteDash,
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
"SegmentTemplateFormat"
(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)
segmentTemplateFormat,
Key -> DashSubtitleConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SubtitleConfiguration"
(DashSubtitleConfigurationProperty -> (Key, Value))
-> Maybe DashSubtitleConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DashSubtitleConfigurationProperty
subtitleConfiguration,
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
"SuggestedPresentationDelaySeconds"
(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)
suggestedPresentationDelaySeconds,
Key -> DashUtcTimingProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"UtcTiming" (DashUtcTimingProperty -> (Key, Value))
-> Maybe DashUtcTimingProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DashUtcTimingProperty
utcTiming])))
instance Property "BaseUrls" DashManifestConfigurationProperty where
type PropertyType "BaseUrls" DashManifestConfigurationProperty = [DashBaseUrlProperty]
set :: PropertyType "BaseUrls" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType "BaseUrls" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{baseUrls :: Maybe [DashBaseUrlProperty]
baseUrls = [DashBaseUrlProperty] -> Maybe [DashBaseUrlProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [DashBaseUrlProperty]
PropertyType "BaseUrls" DashManifestConfigurationProperty
newValue, Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "Compactness" DashManifestConfigurationProperty where
type PropertyType "Compactness" DashManifestConfigurationProperty = Value Prelude.Text
set :: PropertyType "Compactness" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType "Compactness" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{compactness :: Maybe (Value Text)
compactness = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Compactness" DashManifestConfigurationProperty
Value Text
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "DrmSignaling" DashManifestConfigurationProperty where
type PropertyType "DrmSignaling" DashManifestConfigurationProperty = Value Prelude.Text
set :: PropertyType "DrmSignaling" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType "DrmSignaling" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{drmSignaling :: Maybe (Value Text)
drmSignaling = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DrmSignaling" DashManifestConfigurationProperty
Value Text
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "DvbSettings" DashManifestConfigurationProperty where
type PropertyType "DvbSettings" DashManifestConfigurationProperty = DashDvbSettingsProperty
set :: PropertyType "DvbSettings" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType "DvbSettings" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{dvbSettings :: Maybe DashDvbSettingsProperty
dvbSettings = DashDvbSettingsProperty -> Maybe DashDvbSettingsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DvbSettings" DashManifestConfigurationProperty
DashDvbSettingsProperty
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "FilterConfiguration" DashManifestConfigurationProperty where
type PropertyType "FilterConfiguration" DashManifestConfigurationProperty = FilterConfigurationProperty
set :: PropertyType
"FilterConfiguration" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType
"FilterConfiguration" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{filterConfiguration :: Maybe FilterConfigurationProperty
filterConfiguration = FilterConfigurationProperty -> Maybe FilterConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"FilterConfiguration" DashManifestConfigurationProperty
FilterConfigurationProperty
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "ManifestName" DashManifestConfigurationProperty where
type PropertyType "ManifestName" DashManifestConfigurationProperty = Value Prelude.Text
set :: PropertyType "ManifestName" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType "ManifestName" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty {manifestName :: Value Text
manifestName = PropertyType "ManifestName" DashManifestConfigurationProperty
Value Text
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "ManifestWindowSeconds" DashManifestConfigurationProperty where
type PropertyType "ManifestWindowSeconds" DashManifestConfigurationProperty = Value Prelude.Integer
set :: PropertyType
"ManifestWindowSeconds" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType
"ManifestWindowSeconds" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{manifestWindowSeconds :: Maybe (Value Integer)
manifestWindowSeconds = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"ManifestWindowSeconds" DashManifestConfigurationProperty
Value Integer
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "MinBufferTimeSeconds" DashManifestConfigurationProperty where
type PropertyType "MinBufferTimeSeconds" DashManifestConfigurationProperty = Value Prelude.Integer
set :: PropertyType
"MinBufferTimeSeconds" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType
"MinBufferTimeSeconds" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{minBufferTimeSeconds :: Maybe (Value Integer)
minBufferTimeSeconds = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"MinBufferTimeSeconds" DashManifestConfigurationProperty
Value Integer
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "MinUpdatePeriodSeconds" DashManifestConfigurationProperty where
type PropertyType "MinUpdatePeriodSeconds" DashManifestConfigurationProperty = Value Prelude.Integer
set :: PropertyType
"MinUpdatePeriodSeconds" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType
"MinUpdatePeriodSeconds" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{minUpdatePeriodSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"MinUpdatePeriodSeconds" DashManifestConfigurationProperty
Value Integer
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "PeriodTriggers" DashManifestConfigurationProperty where
type PropertyType "PeriodTriggers" DashManifestConfigurationProperty = ValueList Prelude.Text
set :: PropertyType "PeriodTriggers" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType "PeriodTriggers" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{periodTriggers :: Maybe (ValueList Text)
periodTriggers = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PeriodTriggers" DashManifestConfigurationProperty
ValueList Text
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "Profiles" DashManifestConfigurationProperty where
type PropertyType "Profiles" DashManifestConfigurationProperty = ValueList Prelude.Text
set :: PropertyType "Profiles" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType "Profiles" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{profiles :: Maybe (ValueList Text)
profiles = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Profiles" DashManifestConfigurationProperty
ValueList Text
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "ProgramInformation" DashManifestConfigurationProperty where
type PropertyType "ProgramInformation" DashManifestConfigurationProperty = DashProgramInformationProperty
set :: PropertyType "ProgramInformation" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType "ProgramInformation" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{programInformation :: Maybe DashProgramInformationProperty
programInformation = DashProgramInformationProperty
-> Maybe DashProgramInformationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ProgramInformation" DashManifestConfigurationProperty
DashProgramInformationProperty
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "ScteDash" DashManifestConfigurationProperty where
type PropertyType "ScteDash" DashManifestConfigurationProperty = ScteDashProperty
set :: PropertyType "ScteDash" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType "ScteDash" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{scteDash :: Maybe ScteDashProperty
scteDash = ScteDashProperty -> Maybe ScteDashProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ScteDash" DashManifestConfigurationProperty
ScteDashProperty
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "SegmentTemplateFormat" DashManifestConfigurationProperty where
type PropertyType "SegmentTemplateFormat" DashManifestConfigurationProperty = Value Prelude.Text
set :: PropertyType
"SegmentTemplateFormat" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType
"SegmentTemplateFormat" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{segmentTemplateFormat :: Maybe (Value Text)
segmentTemplateFormat = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"SegmentTemplateFormat" DashManifestConfigurationProperty
Value Text
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "SubtitleConfiguration" DashManifestConfigurationProperty where
type PropertyType "SubtitleConfiguration" DashManifestConfigurationProperty = DashSubtitleConfigurationProperty
set :: PropertyType
"SubtitleConfiguration" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType
"SubtitleConfiguration" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
subtitleConfiguration = DashSubtitleConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"SubtitleConfiguration" DashManifestConfigurationProperty
DashSubtitleConfigurationProperty
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "SuggestedPresentationDelaySeconds" DashManifestConfigurationProperty where
type PropertyType "SuggestedPresentationDelaySeconds" DashManifestConfigurationProperty = Value Prelude.Integer
set :: PropertyType
"SuggestedPresentationDelaySeconds"
DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType
"SuggestedPresentationDelaySeconds"
DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{suggestedPresentationDelaySeconds :: Maybe (Value Integer)
suggestedPresentationDelaySeconds = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"SuggestedPresentationDelaySeconds"
DashManifestConfigurationProperty
Value Integer
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
utcTiming :: Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
utcTiming :: Maybe DashUtcTimingProperty
..}
instance Property "UtcTiming" DashManifestConfigurationProperty where
type PropertyType "UtcTiming" DashManifestConfigurationProperty = DashUtcTimingProperty
set :: PropertyType "UtcTiming" DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
-> DashManifestConfigurationProperty
set PropertyType "UtcTiming" DashManifestConfigurationProperty
newValue DashManifestConfigurationProperty {Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe DashUtcTimingProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: DashManifestConfigurationProperty -> ()
baseUrls :: DashManifestConfigurationProperty -> Maybe [DashBaseUrlProperty]
compactness :: DashManifestConfigurationProperty -> Maybe (Value Text)
drmSignaling :: DashManifestConfigurationProperty -> Maybe (Value Text)
dvbSettings :: DashManifestConfigurationProperty -> Maybe DashDvbSettingsProperty
filterConfiguration :: DashManifestConfigurationProperty
-> Maybe FilterConfigurationProperty
manifestName :: DashManifestConfigurationProperty -> Value Text
manifestWindowSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minBufferTimeSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
minUpdatePeriodSeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
periodTriggers :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
profiles :: DashManifestConfigurationProperty -> Maybe (ValueList Text)
programInformation :: DashManifestConfigurationProperty
-> Maybe DashProgramInformationProperty
scteDash :: DashManifestConfigurationProperty -> Maybe ScteDashProperty
segmentTemplateFormat :: DashManifestConfigurationProperty -> Maybe (Value Text)
subtitleConfiguration :: DashManifestConfigurationProperty
-> Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: DashManifestConfigurationProperty -> Maybe (Value Integer)
utcTiming :: DashManifestConfigurationProperty -> Maybe DashUtcTimingProperty
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
utcTiming :: Maybe DashUtcTimingProperty
..}
= DashManifestConfigurationProperty
{utcTiming :: Maybe DashUtcTimingProperty
utcTiming = DashUtcTimingProperty -> Maybe DashUtcTimingProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "UtcTiming" DashManifestConfigurationProperty
DashUtcTimingProperty
newValue, Maybe [DashBaseUrlProperty]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe DashDvbSettingsProperty
Maybe DashProgramInformationProperty
Maybe DashSubtitleConfigurationProperty
Maybe FilterConfigurationProperty
Maybe ScteDashProperty
()
Value Text
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
haddock_workaround_ :: ()
baseUrls :: Maybe [DashBaseUrlProperty]
compactness :: Maybe (Value Text)
drmSignaling :: Maybe (Value Text)
dvbSettings :: Maybe DashDvbSettingsProperty
filterConfiguration :: Maybe FilterConfigurationProperty
manifestName :: Value Text
manifestWindowSeconds :: Maybe (Value Integer)
minBufferTimeSeconds :: Maybe (Value Integer)
minUpdatePeriodSeconds :: Maybe (Value Integer)
periodTriggers :: Maybe (ValueList Text)
profiles :: Maybe (ValueList Text)
programInformation :: Maybe DashProgramInformationProperty
scteDash :: Maybe ScteDashProperty
segmentTemplateFormat :: Maybe (Value Text)
subtitleConfiguration :: Maybe DashSubtitleConfigurationProperty
suggestedPresentationDelaySeconds :: Maybe (Value Integer)
..}