module Stratosphere.MediaLive.Channel.H265ColorSpaceSettingsProperty (
        module Exports, H265ColorSpaceSettingsProperty(..),
        mkH265ColorSpaceSettingsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.MediaLive.Channel.ColorSpacePassthroughSettingsProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaLive.Channel.DolbyVision81SettingsProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaLive.Channel.Hdr10SettingsProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaLive.Channel.Rec601SettingsProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaLive.Channel.Rec709SettingsProperty as Exports
import Stratosphere.ResourceProperties
data H265ColorSpaceSettingsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-h265colorspacesettings.html>
    H265ColorSpaceSettingsProperty {H265ColorSpaceSettingsProperty -> ()
haddock_workaround_ :: (),
                                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-h265colorspacesettings.html#cfn-medialive-channel-h265colorspacesettings-colorspacepassthroughsettings>
                                    H265ColorSpaceSettingsProperty
-> Maybe ColorSpacePassthroughSettingsProperty
colorSpacePassthroughSettings :: (Prelude.Maybe ColorSpacePassthroughSettingsProperty),
                                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-h265colorspacesettings.html#cfn-medialive-channel-h265colorspacesettings-dolbyvision81settings>
                                    H265ColorSpaceSettingsProperty
-> Maybe DolbyVision81SettingsProperty
dolbyVision81Settings :: (Prelude.Maybe DolbyVision81SettingsProperty),
                                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-h265colorspacesettings.html#cfn-medialive-channel-h265colorspacesettings-hdr10settings>
                                    H265ColorSpaceSettingsProperty -> Maybe Hdr10SettingsProperty
hdr10Settings :: (Prelude.Maybe Hdr10SettingsProperty),
                                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-h265colorspacesettings.html#cfn-medialive-channel-h265colorspacesettings-rec601settings>
                                    H265ColorSpaceSettingsProperty -> Maybe Rec601SettingsProperty
rec601Settings :: (Prelude.Maybe Rec601SettingsProperty),
                                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-h265colorspacesettings.html#cfn-medialive-channel-h265colorspacesettings-rec709settings>
                                    H265ColorSpaceSettingsProperty -> Maybe Rec709SettingsProperty
rec709Settings :: (Prelude.Maybe Rec709SettingsProperty)}
  deriving stock (H265ColorSpaceSettingsProperty
-> H265ColorSpaceSettingsProperty -> Bool
(H265ColorSpaceSettingsProperty
 -> H265ColorSpaceSettingsProperty -> Bool)
-> (H265ColorSpaceSettingsProperty
    -> H265ColorSpaceSettingsProperty -> Bool)
-> Eq H265ColorSpaceSettingsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: H265ColorSpaceSettingsProperty
-> H265ColorSpaceSettingsProperty -> Bool
== :: H265ColorSpaceSettingsProperty
-> H265ColorSpaceSettingsProperty -> Bool
$c/= :: H265ColorSpaceSettingsProperty
-> H265ColorSpaceSettingsProperty -> Bool
/= :: H265ColorSpaceSettingsProperty
-> H265ColorSpaceSettingsProperty -> Bool
Prelude.Eq, Int -> H265ColorSpaceSettingsProperty -> ShowS
[H265ColorSpaceSettingsProperty] -> ShowS
H265ColorSpaceSettingsProperty -> String
(Int -> H265ColorSpaceSettingsProperty -> ShowS)
-> (H265ColorSpaceSettingsProperty -> String)
-> ([H265ColorSpaceSettingsProperty] -> ShowS)
-> Show H265ColorSpaceSettingsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> H265ColorSpaceSettingsProperty -> ShowS
showsPrec :: Int -> H265ColorSpaceSettingsProperty -> ShowS
$cshow :: H265ColorSpaceSettingsProperty -> String
show :: H265ColorSpaceSettingsProperty -> String
$cshowList :: [H265ColorSpaceSettingsProperty] -> ShowS
showList :: [H265ColorSpaceSettingsProperty] -> ShowS
Prelude.Show)
mkH265ColorSpaceSettingsProperty :: H265ColorSpaceSettingsProperty
mkH265ColorSpaceSettingsProperty :: H265ColorSpaceSettingsProperty
mkH265ColorSpaceSettingsProperty
  = H265ColorSpaceSettingsProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (),
       colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
colorSpacePassthroughSettings = Maybe ColorSpacePassthroughSettingsProperty
forall a. Maybe a
Prelude.Nothing,
       dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
dolbyVision81Settings = Maybe DolbyVision81SettingsProperty
forall a. Maybe a
Prelude.Nothing,
       hdr10Settings :: Maybe Hdr10SettingsProperty
hdr10Settings = Maybe Hdr10SettingsProperty
forall a. Maybe a
Prelude.Nothing, rec601Settings :: Maybe Rec601SettingsProperty
rec601Settings = Maybe Rec601SettingsProperty
forall a. Maybe a
Prelude.Nothing,
       rec709Settings :: Maybe Rec709SettingsProperty
rec709Settings = Maybe Rec709SettingsProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties H265ColorSpaceSettingsProperty where
  toResourceProperties :: H265ColorSpaceSettingsProperty -> ResourceProperties
toResourceProperties H265ColorSpaceSettingsProperty {Maybe ColorSpacePassthroughSettingsProperty
Maybe DolbyVision81SettingsProperty
Maybe Hdr10SettingsProperty
Maybe Rec601SettingsProperty
Maybe Rec709SettingsProperty
()
haddock_workaround_ :: H265ColorSpaceSettingsProperty -> ()
colorSpacePassthroughSettings :: H265ColorSpaceSettingsProperty
-> Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: H265ColorSpaceSettingsProperty
-> Maybe DolbyVision81SettingsProperty
hdr10Settings :: H265ColorSpaceSettingsProperty -> Maybe Hdr10SettingsProperty
rec601Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec601SettingsProperty
rec709Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec709SettingsProperty
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::MediaLive::Channel.H265ColorSpaceSettings",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [Key -> ColorSpacePassthroughSettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ColorSpacePassthroughSettings"
                              (ColorSpacePassthroughSettingsProperty -> (Key, Value))
-> Maybe ColorSpacePassthroughSettingsProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ColorSpacePassthroughSettingsProperty
colorSpacePassthroughSettings,
                            Key -> DolbyVision81SettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DolbyVision81Settings"
                              (DolbyVision81SettingsProperty -> (Key, Value))
-> Maybe DolbyVision81SettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DolbyVision81SettingsProperty
dolbyVision81Settings,
                            Key -> Hdr10SettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Hdr10Settings" (Hdr10SettingsProperty -> (Key, Value))
-> Maybe Hdr10SettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Hdr10SettingsProperty
hdr10Settings,
                            Key -> Rec601SettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Rec601Settings" (Rec601SettingsProperty -> (Key, Value))
-> Maybe Rec601SettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Rec601SettingsProperty
rec601Settings,
                            Key -> Rec709SettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Rec709Settings" (Rec709SettingsProperty -> (Key, Value))
-> Maybe Rec709SettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Rec709SettingsProperty
rec709Settings])}
instance JSON.ToJSON H265ColorSpaceSettingsProperty where
  toJSON :: H265ColorSpaceSettingsProperty -> Value
toJSON H265ColorSpaceSettingsProperty {Maybe ColorSpacePassthroughSettingsProperty
Maybe DolbyVision81SettingsProperty
Maybe Hdr10SettingsProperty
Maybe Rec601SettingsProperty
Maybe Rec709SettingsProperty
()
haddock_workaround_ :: H265ColorSpaceSettingsProperty -> ()
colorSpacePassthroughSettings :: H265ColorSpaceSettingsProperty
-> Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: H265ColorSpaceSettingsProperty
-> Maybe DolbyVision81SettingsProperty
hdr10Settings :: H265ColorSpaceSettingsProperty -> Maybe Hdr10SettingsProperty
rec601Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec601SettingsProperty
rec709Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec709SettingsProperty
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [Key -> ColorSpacePassthroughSettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ColorSpacePassthroughSettings"
                 (ColorSpacePassthroughSettingsProperty -> (Key, Value))
-> Maybe ColorSpacePassthroughSettingsProperty
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ColorSpacePassthroughSettingsProperty
colorSpacePassthroughSettings,
               Key -> DolbyVision81SettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DolbyVision81Settings"
                 (DolbyVision81SettingsProperty -> (Key, Value))
-> Maybe DolbyVision81SettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DolbyVision81SettingsProperty
dolbyVision81Settings,
               Key -> Hdr10SettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Hdr10Settings" (Hdr10SettingsProperty -> (Key, Value))
-> Maybe Hdr10SettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Hdr10SettingsProperty
hdr10Settings,
               Key -> Rec601SettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Rec601Settings" (Rec601SettingsProperty -> (Key, Value))
-> Maybe Rec601SettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Rec601SettingsProperty
rec601Settings,
               Key -> Rec709SettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Rec709Settings" (Rec709SettingsProperty -> (Key, Value))
-> Maybe Rec709SettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Rec709SettingsProperty
rec709Settings]))
instance Property "ColorSpacePassthroughSettings" H265ColorSpaceSettingsProperty where
  type PropertyType "ColorSpacePassthroughSettings" H265ColorSpaceSettingsProperty = ColorSpacePassthroughSettingsProperty
  set :: PropertyType
  "ColorSpacePassthroughSettings" H265ColorSpaceSettingsProperty
-> H265ColorSpaceSettingsProperty -> H265ColorSpaceSettingsProperty
set PropertyType
  "ColorSpacePassthroughSettings" H265ColorSpaceSettingsProperty
newValue H265ColorSpaceSettingsProperty {Maybe ColorSpacePassthroughSettingsProperty
Maybe DolbyVision81SettingsProperty
Maybe Hdr10SettingsProperty
Maybe Rec601SettingsProperty
Maybe Rec709SettingsProperty
()
haddock_workaround_ :: H265ColorSpaceSettingsProperty -> ()
colorSpacePassthroughSettings :: H265ColorSpaceSettingsProperty
-> Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: H265ColorSpaceSettingsProperty
-> Maybe DolbyVision81SettingsProperty
hdr10Settings :: H265ColorSpaceSettingsProperty -> Maybe Hdr10SettingsProperty
rec601Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec601SettingsProperty
rec709Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec709SettingsProperty
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
..}
    = H265ColorSpaceSettingsProperty
        {colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
colorSpacePassthroughSettings = ColorSpacePassthroughSettingsProperty
-> Maybe ColorSpacePassthroughSettingsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "ColorSpacePassthroughSettings" H265ColorSpaceSettingsProperty
ColorSpacePassthroughSettingsProperty
newValue, Maybe DolbyVision81SettingsProperty
Maybe Hdr10SettingsProperty
Maybe Rec601SettingsProperty
Maybe Rec709SettingsProperty
()
haddock_workaround_ :: ()
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
haddock_workaround_ :: ()
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
..}
instance Property "DolbyVision81Settings" H265ColorSpaceSettingsProperty where
  type PropertyType "DolbyVision81Settings" H265ColorSpaceSettingsProperty = DolbyVision81SettingsProperty
  set :: PropertyType "DolbyVision81Settings" H265ColorSpaceSettingsProperty
-> H265ColorSpaceSettingsProperty -> H265ColorSpaceSettingsProperty
set PropertyType "DolbyVision81Settings" H265ColorSpaceSettingsProperty
newValue H265ColorSpaceSettingsProperty {Maybe ColorSpacePassthroughSettingsProperty
Maybe DolbyVision81SettingsProperty
Maybe Hdr10SettingsProperty
Maybe Rec601SettingsProperty
Maybe Rec709SettingsProperty
()
haddock_workaround_ :: H265ColorSpaceSettingsProperty -> ()
colorSpacePassthroughSettings :: H265ColorSpaceSettingsProperty
-> Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: H265ColorSpaceSettingsProperty
-> Maybe DolbyVision81SettingsProperty
hdr10Settings :: H265ColorSpaceSettingsProperty -> Maybe Hdr10SettingsProperty
rec601Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec601SettingsProperty
rec709Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec709SettingsProperty
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
..}
    = H265ColorSpaceSettingsProperty
        {dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
dolbyVision81Settings = DolbyVision81SettingsProperty
-> Maybe DolbyVision81SettingsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DolbyVision81Settings" H265ColorSpaceSettingsProperty
DolbyVision81SettingsProperty
newValue, Maybe ColorSpacePassthroughSettingsProperty
Maybe Hdr10SettingsProperty
Maybe Rec601SettingsProperty
Maybe Rec709SettingsProperty
()
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
..}
instance Property "Hdr10Settings" H265ColorSpaceSettingsProperty where
  type PropertyType "Hdr10Settings" H265ColorSpaceSettingsProperty = Hdr10SettingsProperty
  set :: PropertyType "Hdr10Settings" H265ColorSpaceSettingsProperty
-> H265ColorSpaceSettingsProperty -> H265ColorSpaceSettingsProperty
set PropertyType "Hdr10Settings" H265ColorSpaceSettingsProperty
newValue H265ColorSpaceSettingsProperty {Maybe ColorSpacePassthroughSettingsProperty
Maybe DolbyVision81SettingsProperty
Maybe Hdr10SettingsProperty
Maybe Rec601SettingsProperty
Maybe Rec709SettingsProperty
()
haddock_workaround_ :: H265ColorSpaceSettingsProperty -> ()
colorSpacePassthroughSettings :: H265ColorSpaceSettingsProperty
-> Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: H265ColorSpaceSettingsProperty
-> Maybe DolbyVision81SettingsProperty
hdr10Settings :: H265ColorSpaceSettingsProperty -> Maybe Hdr10SettingsProperty
rec601Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec601SettingsProperty
rec709Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec709SettingsProperty
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
..}
    = H265ColorSpaceSettingsProperty
        {hdr10Settings :: Maybe Hdr10SettingsProperty
hdr10Settings = Hdr10SettingsProperty -> Maybe Hdr10SettingsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Hdr10Settings" H265ColorSpaceSettingsProperty
Hdr10SettingsProperty
newValue, Maybe ColorSpacePassthroughSettingsProperty
Maybe DolbyVision81SettingsProperty
Maybe Rec601SettingsProperty
Maybe Rec709SettingsProperty
()
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
..}
instance Property "Rec601Settings" H265ColorSpaceSettingsProperty where
  type PropertyType "Rec601Settings" H265ColorSpaceSettingsProperty = Rec601SettingsProperty
  set :: PropertyType "Rec601Settings" H265ColorSpaceSettingsProperty
-> H265ColorSpaceSettingsProperty -> H265ColorSpaceSettingsProperty
set PropertyType "Rec601Settings" H265ColorSpaceSettingsProperty
newValue H265ColorSpaceSettingsProperty {Maybe ColorSpacePassthroughSettingsProperty
Maybe DolbyVision81SettingsProperty
Maybe Hdr10SettingsProperty
Maybe Rec601SettingsProperty
Maybe Rec709SettingsProperty
()
haddock_workaround_ :: H265ColorSpaceSettingsProperty -> ()
colorSpacePassthroughSettings :: H265ColorSpaceSettingsProperty
-> Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: H265ColorSpaceSettingsProperty
-> Maybe DolbyVision81SettingsProperty
hdr10Settings :: H265ColorSpaceSettingsProperty -> Maybe Hdr10SettingsProperty
rec601Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec601SettingsProperty
rec709Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec709SettingsProperty
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
..}
    = H265ColorSpaceSettingsProperty
        {rec601Settings :: Maybe Rec601SettingsProperty
rec601Settings = Rec601SettingsProperty -> Maybe Rec601SettingsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Rec601Settings" H265ColorSpaceSettingsProperty
Rec601SettingsProperty
newValue, Maybe ColorSpacePassthroughSettingsProperty
Maybe DolbyVision81SettingsProperty
Maybe Hdr10SettingsProperty
Maybe Rec709SettingsProperty
()
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
..}
instance Property "Rec709Settings" H265ColorSpaceSettingsProperty where
  type PropertyType "Rec709Settings" H265ColorSpaceSettingsProperty = Rec709SettingsProperty
  set :: PropertyType "Rec709Settings" H265ColorSpaceSettingsProperty
-> H265ColorSpaceSettingsProperty -> H265ColorSpaceSettingsProperty
set PropertyType "Rec709Settings" H265ColorSpaceSettingsProperty
newValue H265ColorSpaceSettingsProperty {Maybe ColorSpacePassthroughSettingsProperty
Maybe DolbyVision81SettingsProperty
Maybe Hdr10SettingsProperty
Maybe Rec601SettingsProperty
Maybe Rec709SettingsProperty
()
haddock_workaround_ :: H265ColorSpaceSettingsProperty -> ()
colorSpacePassthroughSettings :: H265ColorSpaceSettingsProperty
-> Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: H265ColorSpaceSettingsProperty
-> Maybe DolbyVision81SettingsProperty
hdr10Settings :: H265ColorSpaceSettingsProperty -> Maybe Hdr10SettingsProperty
rec601Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec601SettingsProperty
rec709Settings :: H265ColorSpaceSettingsProperty -> Maybe Rec709SettingsProperty
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
rec709Settings :: Maybe Rec709SettingsProperty
..}
    = H265ColorSpaceSettingsProperty
        {rec709Settings :: Maybe Rec709SettingsProperty
rec709Settings = Rec709SettingsProperty -> Maybe Rec709SettingsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Rec709Settings" H265ColorSpaceSettingsProperty
Rec709SettingsProperty
newValue, Maybe ColorSpacePassthroughSettingsProperty
Maybe DolbyVision81SettingsProperty
Maybe Hdr10SettingsProperty
Maybe Rec601SettingsProperty
()
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
haddock_workaround_ :: ()
colorSpacePassthroughSettings :: Maybe ColorSpacePassthroughSettingsProperty
dolbyVision81Settings :: Maybe DolbyVision81SettingsProperty
hdr10Settings :: Maybe Hdr10SettingsProperty
rec601Settings :: Maybe Rec601SettingsProperty
..}