module Stratosphere.MediaLive.Channel.InputSettingsProperty (
        module Exports, InputSettingsProperty(..), mkInputSettingsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.MediaLive.Channel.AudioSelectorProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaLive.Channel.CaptionSelectorProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaLive.Channel.NetworkInputSettingsProperty as Exports
import {-# SOURCE #-} Stratosphere.MediaLive.Channel.VideoSelectorProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data InputSettingsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-inputsettings.html>
    InputSettingsProperty {InputSettingsProperty -> ()
haddock_workaround_ :: (),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-inputsettings.html#cfn-medialive-channel-inputsettings-audioselectors>
                           InputSettingsProperty -> Maybe [AudioSelectorProperty]
audioSelectors :: (Prelude.Maybe [AudioSelectorProperty]),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-inputsettings.html#cfn-medialive-channel-inputsettings-captionselectors>
                           InputSettingsProperty -> Maybe [CaptionSelectorProperty]
captionSelectors :: (Prelude.Maybe [CaptionSelectorProperty]),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-inputsettings.html#cfn-medialive-channel-inputsettings-deblockfilter>
                           InputSettingsProperty -> Maybe (Value Text)
deblockFilter :: (Prelude.Maybe (Value Prelude.Text)),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-inputsettings.html#cfn-medialive-channel-inputsettings-denoisefilter>
                           InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: (Prelude.Maybe (Value Prelude.Text)),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-inputsettings.html#cfn-medialive-channel-inputsettings-filterstrength>
                           InputSettingsProperty -> Maybe (Value Integer)
filterStrength :: (Prelude.Maybe (Value Prelude.Integer)),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-inputsettings.html#cfn-medialive-channel-inputsettings-inputfilter>
                           InputSettingsProperty -> Maybe (Value Text)
inputFilter :: (Prelude.Maybe (Value Prelude.Text)),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-inputsettings.html#cfn-medialive-channel-inputsettings-networkinputsettings>
                           InputSettingsProperty -> Maybe NetworkInputSettingsProperty
networkInputSettings :: (Prelude.Maybe NetworkInputSettingsProperty),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-inputsettings.html#cfn-medialive-channel-inputsettings-scte35pid>
                           InputSettingsProperty -> Maybe (Value Integer)
scte35Pid :: (Prelude.Maybe (Value Prelude.Integer)),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-inputsettings.html#cfn-medialive-channel-inputsettings-smpte2038datapreference>
                           InputSettingsProperty -> Maybe (Value Text)
smpte2038DataPreference :: (Prelude.Maybe (Value Prelude.Text)),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-inputsettings.html#cfn-medialive-channel-inputsettings-sourceendbehavior>
                           InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: (Prelude.Maybe (Value Prelude.Text)),
                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-medialive-channel-inputsettings.html#cfn-medialive-channel-inputsettings-videoselector>
                           InputSettingsProperty -> Maybe VideoSelectorProperty
videoSelector :: (Prelude.Maybe VideoSelectorProperty)}
  deriving stock (InputSettingsProperty -> InputSettingsProperty -> Bool
(InputSettingsProperty -> InputSettingsProperty -> Bool)
-> (InputSettingsProperty -> InputSettingsProperty -> Bool)
-> Eq InputSettingsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: InputSettingsProperty -> InputSettingsProperty -> Bool
== :: InputSettingsProperty -> InputSettingsProperty -> Bool
$c/= :: InputSettingsProperty -> InputSettingsProperty -> Bool
/= :: InputSettingsProperty -> InputSettingsProperty -> Bool
Prelude.Eq, Int -> InputSettingsProperty -> ShowS
[InputSettingsProperty] -> ShowS
InputSettingsProperty -> String
(Int -> InputSettingsProperty -> ShowS)
-> (InputSettingsProperty -> String)
-> ([InputSettingsProperty] -> ShowS)
-> Show InputSettingsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> InputSettingsProperty -> ShowS
showsPrec :: Int -> InputSettingsProperty -> ShowS
$cshow :: InputSettingsProperty -> String
show :: InputSettingsProperty -> String
$cshowList :: [InputSettingsProperty] -> ShowS
showList :: [InputSettingsProperty] -> ShowS
Prelude.Show)
mkInputSettingsProperty :: InputSettingsProperty
mkInputSettingsProperty :: InputSettingsProperty
mkInputSettingsProperty
  = InputSettingsProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), audioSelectors :: Maybe [AudioSelectorProperty]
audioSelectors = Maybe [AudioSelectorProperty]
forall a. Maybe a
Prelude.Nothing,
       captionSelectors :: Maybe [CaptionSelectorProperty]
captionSelectors = Maybe [CaptionSelectorProperty]
forall a. Maybe a
Prelude.Nothing,
       deblockFilter :: Maybe (Value Text)
deblockFilter = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, denoiseFilter :: Maybe (Value Text)
denoiseFilter = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       filterStrength :: Maybe (Value Integer)
filterStrength = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing, inputFilter :: Maybe (Value Text)
inputFilter = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       networkInputSettings :: Maybe NetworkInputSettingsProperty
networkInputSettings = Maybe NetworkInputSettingsProperty
forall a. Maybe a
Prelude.Nothing,
       scte35Pid :: Maybe (Value Integer)
scte35Pid = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
       smpte2038DataPreference :: Maybe (Value Text)
smpte2038DataPreference = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       sourceEndBehavior :: Maybe (Value Text)
sourceEndBehavior = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       videoSelector :: Maybe VideoSelectorProperty
videoSelector = Maybe VideoSelectorProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties InputSettingsProperty where
  toResourceProperties :: InputSettingsProperty -> ResourceProperties
toResourceProperties InputSettingsProperty {Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: InputSettingsProperty -> ()
audioSelectors :: InputSettingsProperty -> Maybe [AudioSelectorProperty]
captionSelectors :: InputSettingsProperty -> Maybe [CaptionSelectorProperty]
deblockFilter :: InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: InputSettingsProperty -> Maybe (Value Text)
filterStrength :: InputSettingsProperty -> Maybe (Value Integer)
inputFilter :: InputSettingsProperty -> Maybe (Value Text)
networkInputSettings :: InputSettingsProperty -> Maybe NetworkInputSettingsProperty
scte35Pid :: InputSettingsProperty -> Maybe (Value Integer)
smpte2038DataPreference :: InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: InputSettingsProperty -> Maybe (Value Text)
videoSelector :: InputSettingsProperty -> Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::MediaLive::Channel.InputSettings",
         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 -> [AudioSelectorProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AudioSelectors" ([AudioSelectorProperty] -> (Key, Value))
-> Maybe [AudioSelectorProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [AudioSelectorProperty]
audioSelectors,
                            Key -> [CaptionSelectorProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CaptionSelectors" ([CaptionSelectorProperty] -> (Key, Value))
-> Maybe [CaptionSelectorProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [CaptionSelectorProperty]
captionSelectors,
                            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
"DeblockFilter" (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)
deblockFilter,
                            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
"DenoiseFilter" (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)
denoiseFilter,
                            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
"FilterStrength" (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)
filterStrength,
                            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
"InputFilter" (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)
inputFilter,
                            Key -> NetworkInputSettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"NetworkInputSettings" (NetworkInputSettingsProperty -> (Key, Value))
-> Maybe NetworkInputSettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe NetworkInputSettingsProperty
networkInputSettings,
                            Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Scte35Pid" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
scte35Pid,
                            Key -> Value 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
"Smpte2038DataPreference"
                              (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)
smpte2038DataPreference,
                            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
"SourceEndBehavior" (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)
sourceEndBehavior,
                            Key -> VideoSelectorProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VideoSelector" (VideoSelectorProperty -> (Key, Value))
-> Maybe VideoSelectorProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe VideoSelectorProperty
videoSelector])}
instance JSON.ToJSON InputSettingsProperty where
  toJSON :: InputSettingsProperty -> Value
toJSON InputSettingsProperty {Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: InputSettingsProperty -> ()
audioSelectors :: InputSettingsProperty -> Maybe [AudioSelectorProperty]
captionSelectors :: InputSettingsProperty -> Maybe [CaptionSelectorProperty]
deblockFilter :: InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: InputSettingsProperty -> Maybe (Value Text)
filterStrength :: InputSettingsProperty -> Maybe (Value Integer)
inputFilter :: InputSettingsProperty -> Maybe (Value Text)
networkInputSettings :: InputSettingsProperty -> Maybe NetworkInputSettingsProperty
scte35Pid :: InputSettingsProperty -> Maybe (Value Integer)
smpte2038DataPreference :: InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: InputSettingsProperty -> Maybe (Value Text)
videoSelector :: InputSettingsProperty -> Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
    = [(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 -> [AudioSelectorProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AudioSelectors" ([AudioSelectorProperty] -> (Key, Value))
-> Maybe [AudioSelectorProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [AudioSelectorProperty]
audioSelectors,
               Key -> [CaptionSelectorProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CaptionSelectors" ([CaptionSelectorProperty] -> (Key, Value))
-> Maybe [CaptionSelectorProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [CaptionSelectorProperty]
captionSelectors,
               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
"DeblockFilter" (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)
deblockFilter,
               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
"DenoiseFilter" (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)
denoiseFilter,
               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
"FilterStrength" (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)
filterStrength,
               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
"InputFilter" (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)
inputFilter,
               Key -> NetworkInputSettingsProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"NetworkInputSettings" (NetworkInputSettingsProperty -> (Key, Value))
-> Maybe NetworkInputSettingsProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe NetworkInputSettingsProperty
networkInputSettings,
               Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Scte35Pid" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
scte35Pid,
               Key -> Value 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
"Smpte2038DataPreference"
                 (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)
smpte2038DataPreference,
               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
"SourceEndBehavior" (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)
sourceEndBehavior,
               Key -> VideoSelectorProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VideoSelector" (VideoSelectorProperty -> (Key, Value))
-> Maybe VideoSelectorProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe VideoSelectorProperty
videoSelector]))
instance Property "AudioSelectors" InputSettingsProperty where
  type PropertyType "AudioSelectors" InputSettingsProperty = [AudioSelectorProperty]
  set :: PropertyType "AudioSelectors" InputSettingsProperty
-> InputSettingsProperty -> InputSettingsProperty
set PropertyType "AudioSelectors" InputSettingsProperty
newValue InputSettingsProperty {Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: InputSettingsProperty -> ()
audioSelectors :: InputSettingsProperty -> Maybe [AudioSelectorProperty]
captionSelectors :: InputSettingsProperty -> Maybe [CaptionSelectorProperty]
deblockFilter :: InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: InputSettingsProperty -> Maybe (Value Text)
filterStrength :: InputSettingsProperty -> Maybe (Value Integer)
inputFilter :: InputSettingsProperty -> Maybe (Value Text)
networkInputSettings :: InputSettingsProperty -> Maybe NetworkInputSettingsProperty
scte35Pid :: InputSettingsProperty -> Maybe (Value Integer)
smpte2038DataPreference :: InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: InputSettingsProperty -> Maybe (Value Text)
videoSelector :: InputSettingsProperty -> Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
    = InputSettingsProperty
        {audioSelectors :: Maybe [AudioSelectorProperty]
audioSelectors = [AudioSelectorProperty] -> Maybe [AudioSelectorProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [AudioSelectorProperty]
PropertyType "AudioSelectors" InputSettingsProperty
newValue, Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: ()
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
haddock_workaround_ :: ()
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
instance Property "CaptionSelectors" InputSettingsProperty where
  type PropertyType "CaptionSelectors" InputSettingsProperty = [CaptionSelectorProperty]
  set :: PropertyType "CaptionSelectors" InputSettingsProperty
-> InputSettingsProperty -> InputSettingsProperty
set PropertyType "CaptionSelectors" InputSettingsProperty
newValue InputSettingsProperty {Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: InputSettingsProperty -> ()
audioSelectors :: InputSettingsProperty -> Maybe [AudioSelectorProperty]
captionSelectors :: InputSettingsProperty -> Maybe [CaptionSelectorProperty]
deblockFilter :: InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: InputSettingsProperty -> Maybe (Value Text)
filterStrength :: InputSettingsProperty -> Maybe (Value Integer)
inputFilter :: InputSettingsProperty -> Maybe (Value Text)
networkInputSettings :: InputSettingsProperty -> Maybe NetworkInputSettingsProperty
scte35Pid :: InputSettingsProperty -> Maybe (Value Integer)
smpte2038DataPreference :: InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: InputSettingsProperty -> Maybe (Value Text)
videoSelector :: InputSettingsProperty -> Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
    = InputSettingsProperty
        {captionSelectors :: Maybe [CaptionSelectorProperty]
captionSelectors = [CaptionSelectorProperty] -> Maybe [CaptionSelectorProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [CaptionSelectorProperty]
PropertyType "CaptionSelectors" InputSettingsProperty
newValue, Maybe [AudioSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
instance Property "DeblockFilter" InputSettingsProperty where
  type PropertyType "DeblockFilter" InputSettingsProperty = Value Prelude.Text
  set :: PropertyType "DeblockFilter" InputSettingsProperty
-> InputSettingsProperty -> InputSettingsProperty
set PropertyType "DeblockFilter" InputSettingsProperty
newValue InputSettingsProperty {Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: InputSettingsProperty -> ()
audioSelectors :: InputSettingsProperty -> Maybe [AudioSelectorProperty]
captionSelectors :: InputSettingsProperty -> Maybe [CaptionSelectorProperty]
deblockFilter :: InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: InputSettingsProperty -> Maybe (Value Text)
filterStrength :: InputSettingsProperty -> Maybe (Value Integer)
inputFilter :: InputSettingsProperty -> Maybe (Value Text)
networkInputSettings :: InputSettingsProperty -> Maybe NetworkInputSettingsProperty
scte35Pid :: InputSettingsProperty -> Maybe (Value Integer)
smpte2038DataPreference :: InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: InputSettingsProperty -> Maybe (Value Text)
videoSelector :: InputSettingsProperty -> Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
    = InputSettingsProperty {deblockFilter :: Maybe (Value Text)
deblockFilter = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DeblockFilter" InputSettingsProperty
Value Text
newValue, Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
instance Property "DenoiseFilter" InputSettingsProperty where
  type PropertyType "DenoiseFilter" InputSettingsProperty = Value Prelude.Text
  set :: PropertyType "DenoiseFilter" InputSettingsProperty
-> InputSettingsProperty -> InputSettingsProperty
set PropertyType "DenoiseFilter" InputSettingsProperty
newValue InputSettingsProperty {Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: InputSettingsProperty -> ()
audioSelectors :: InputSettingsProperty -> Maybe [AudioSelectorProperty]
captionSelectors :: InputSettingsProperty -> Maybe [CaptionSelectorProperty]
deblockFilter :: InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: InputSettingsProperty -> Maybe (Value Text)
filterStrength :: InputSettingsProperty -> Maybe (Value Integer)
inputFilter :: InputSettingsProperty -> Maybe (Value Text)
networkInputSettings :: InputSettingsProperty -> Maybe NetworkInputSettingsProperty
scte35Pid :: InputSettingsProperty -> Maybe (Value Integer)
smpte2038DataPreference :: InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: InputSettingsProperty -> Maybe (Value Text)
videoSelector :: InputSettingsProperty -> Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
    = InputSettingsProperty {denoiseFilter :: Maybe (Value Text)
denoiseFilter = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "DenoiseFilter" InputSettingsProperty
Value Text
newValue, Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
instance Property "FilterStrength" InputSettingsProperty where
  type PropertyType "FilterStrength" InputSettingsProperty = Value Prelude.Integer
  set :: PropertyType "FilterStrength" InputSettingsProperty
-> InputSettingsProperty -> InputSettingsProperty
set PropertyType "FilterStrength" InputSettingsProperty
newValue InputSettingsProperty {Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: InputSettingsProperty -> ()
audioSelectors :: InputSettingsProperty -> Maybe [AudioSelectorProperty]
captionSelectors :: InputSettingsProperty -> Maybe [CaptionSelectorProperty]
deblockFilter :: InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: InputSettingsProperty -> Maybe (Value Text)
filterStrength :: InputSettingsProperty -> Maybe (Value Integer)
inputFilter :: InputSettingsProperty -> Maybe (Value Text)
networkInputSettings :: InputSettingsProperty -> Maybe NetworkInputSettingsProperty
scte35Pid :: InputSettingsProperty -> Maybe (Value Integer)
smpte2038DataPreference :: InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: InputSettingsProperty -> Maybe (Value Text)
videoSelector :: InputSettingsProperty -> Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
    = InputSettingsProperty
        {filterStrength :: Maybe (Value Integer)
filterStrength = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "FilterStrength" InputSettingsProperty
Value Integer
newValue, Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
instance Property "InputFilter" InputSettingsProperty where
  type PropertyType "InputFilter" InputSettingsProperty = Value Prelude.Text
  set :: PropertyType "InputFilter" InputSettingsProperty
-> InputSettingsProperty -> InputSettingsProperty
set PropertyType "InputFilter" InputSettingsProperty
newValue InputSettingsProperty {Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: InputSettingsProperty -> ()
audioSelectors :: InputSettingsProperty -> Maybe [AudioSelectorProperty]
captionSelectors :: InputSettingsProperty -> Maybe [CaptionSelectorProperty]
deblockFilter :: InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: InputSettingsProperty -> Maybe (Value Text)
filterStrength :: InputSettingsProperty -> Maybe (Value Integer)
inputFilter :: InputSettingsProperty -> Maybe (Value Text)
networkInputSettings :: InputSettingsProperty -> Maybe NetworkInputSettingsProperty
scte35Pid :: InputSettingsProperty -> Maybe (Value Integer)
smpte2038DataPreference :: InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: InputSettingsProperty -> Maybe (Value Text)
videoSelector :: InputSettingsProperty -> Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
    = InputSettingsProperty {inputFilter :: Maybe (Value Text)
inputFilter = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "InputFilter" InputSettingsProperty
Value Text
newValue, Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
instance Property "NetworkInputSettings" InputSettingsProperty where
  type PropertyType "NetworkInputSettings" InputSettingsProperty = NetworkInputSettingsProperty
  set :: PropertyType "NetworkInputSettings" InputSettingsProperty
-> InputSettingsProperty -> InputSettingsProperty
set PropertyType "NetworkInputSettings" InputSettingsProperty
newValue InputSettingsProperty {Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: InputSettingsProperty -> ()
audioSelectors :: InputSettingsProperty -> Maybe [AudioSelectorProperty]
captionSelectors :: InputSettingsProperty -> Maybe [CaptionSelectorProperty]
deblockFilter :: InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: InputSettingsProperty -> Maybe (Value Text)
filterStrength :: InputSettingsProperty -> Maybe (Value Integer)
inputFilter :: InputSettingsProperty -> Maybe (Value Text)
networkInputSettings :: InputSettingsProperty -> Maybe NetworkInputSettingsProperty
scte35Pid :: InputSettingsProperty -> Maybe (Value Integer)
smpte2038DataPreference :: InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: InputSettingsProperty -> Maybe (Value Text)
videoSelector :: InputSettingsProperty -> Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
    = InputSettingsProperty
        {networkInputSettings :: Maybe NetworkInputSettingsProperty
networkInputSettings = NetworkInputSettingsProperty -> Maybe NetworkInputSettingsProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "NetworkInputSettings" InputSettingsProperty
NetworkInputSettingsProperty
newValue, Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe VideoSelectorProperty
()
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
instance Property "Scte35Pid" InputSettingsProperty where
  type PropertyType "Scte35Pid" InputSettingsProperty = Value Prelude.Integer
  set :: PropertyType "Scte35Pid" InputSettingsProperty
-> InputSettingsProperty -> InputSettingsProperty
set PropertyType "Scte35Pid" InputSettingsProperty
newValue InputSettingsProperty {Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: InputSettingsProperty -> ()
audioSelectors :: InputSettingsProperty -> Maybe [AudioSelectorProperty]
captionSelectors :: InputSettingsProperty -> Maybe [CaptionSelectorProperty]
deblockFilter :: InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: InputSettingsProperty -> Maybe (Value Text)
filterStrength :: InputSettingsProperty -> Maybe (Value Integer)
inputFilter :: InputSettingsProperty -> Maybe (Value Text)
networkInputSettings :: InputSettingsProperty -> Maybe NetworkInputSettingsProperty
scte35Pid :: InputSettingsProperty -> Maybe (Value Integer)
smpte2038DataPreference :: InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: InputSettingsProperty -> Maybe (Value Text)
videoSelector :: InputSettingsProperty -> Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
    = InputSettingsProperty {scte35Pid :: Maybe (Value Integer)
scte35Pid = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Scte35Pid" InputSettingsProperty
Value Integer
newValue, Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
instance Property "Smpte2038DataPreference" InputSettingsProperty where
  type PropertyType "Smpte2038DataPreference" InputSettingsProperty = Value Prelude.Text
  set :: PropertyType "Smpte2038DataPreference" InputSettingsProperty
-> InputSettingsProperty -> InputSettingsProperty
set PropertyType "Smpte2038DataPreference" InputSettingsProperty
newValue InputSettingsProperty {Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: InputSettingsProperty -> ()
audioSelectors :: InputSettingsProperty -> Maybe [AudioSelectorProperty]
captionSelectors :: InputSettingsProperty -> Maybe [CaptionSelectorProperty]
deblockFilter :: InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: InputSettingsProperty -> Maybe (Value Text)
filterStrength :: InputSettingsProperty -> Maybe (Value Integer)
inputFilter :: InputSettingsProperty -> Maybe (Value Text)
networkInputSettings :: InputSettingsProperty -> Maybe NetworkInputSettingsProperty
scte35Pid :: InputSettingsProperty -> Maybe (Value Integer)
smpte2038DataPreference :: InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: InputSettingsProperty -> Maybe (Value Text)
videoSelector :: InputSettingsProperty -> Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
    = InputSettingsProperty
        {smpte2038DataPreference :: Maybe (Value Text)
smpte2038DataPreference = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Smpte2038DataPreference" InputSettingsProperty
Value Text
newValue, Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
instance Property "SourceEndBehavior" InputSettingsProperty where
  type PropertyType "SourceEndBehavior" InputSettingsProperty = Value Prelude.Text
  set :: PropertyType "SourceEndBehavior" InputSettingsProperty
-> InputSettingsProperty -> InputSettingsProperty
set PropertyType "SourceEndBehavior" InputSettingsProperty
newValue InputSettingsProperty {Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: InputSettingsProperty -> ()
audioSelectors :: InputSettingsProperty -> Maybe [AudioSelectorProperty]
captionSelectors :: InputSettingsProperty -> Maybe [CaptionSelectorProperty]
deblockFilter :: InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: InputSettingsProperty -> Maybe (Value Text)
filterStrength :: InputSettingsProperty -> Maybe (Value Integer)
inputFilter :: InputSettingsProperty -> Maybe (Value Text)
networkInputSettings :: InputSettingsProperty -> Maybe NetworkInputSettingsProperty
scte35Pid :: InputSettingsProperty -> Maybe (Value Integer)
smpte2038DataPreference :: InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: InputSettingsProperty -> Maybe (Value Text)
videoSelector :: InputSettingsProperty -> Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
    = InputSettingsProperty
        {sourceEndBehavior :: Maybe (Value Text)
sourceEndBehavior = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SourceEndBehavior" InputSettingsProperty
Value Text
newValue, Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
instance Property "VideoSelector" InputSettingsProperty where
  type PropertyType "VideoSelector" InputSettingsProperty = VideoSelectorProperty
  set :: PropertyType "VideoSelector" InputSettingsProperty
-> InputSettingsProperty -> InputSettingsProperty
set PropertyType "VideoSelector" InputSettingsProperty
newValue InputSettingsProperty {Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
Maybe VideoSelectorProperty
()
haddock_workaround_ :: InputSettingsProperty -> ()
audioSelectors :: InputSettingsProperty -> Maybe [AudioSelectorProperty]
captionSelectors :: InputSettingsProperty -> Maybe [CaptionSelectorProperty]
deblockFilter :: InputSettingsProperty -> Maybe (Value Text)
denoiseFilter :: InputSettingsProperty -> Maybe (Value Text)
filterStrength :: InputSettingsProperty -> Maybe (Value Integer)
inputFilter :: InputSettingsProperty -> Maybe (Value Text)
networkInputSettings :: InputSettingsProperty -> Maybe NetworkInputSettingsProperty
scte35Pid :: InputSettingsProperty -> Maybe (Value Integer)
smpte2038DataPreference :: InputSettingsProperty -> Maybe (Value Text)
sourceEndBehavior :: InputSettingsProperty -> Maybe (Value Text)
videoSelector :: InputSettingsProperty -> Maybe VideoSelectorProperty
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
videoSelector :: Maybe VideoSelectorProperty
..}
    = InputSettingsProperty {videoSelector :: Maybe VideoSelectorProperty
videoSelector = VideoSelectorProperty -> Maybe VideoSelectorProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "VideoSelector" InputSettingsProperty
VideoSelectorProperty
newValue, Maybe [AudioSelectorProperty]
Maybe [CaptionSelectorProperty]
Maybe (Value Integer)
Maybe (Value Text)
Maybe NetworkInputSettingsProperty
()
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
haddock_workaround_ :: ()
audioSelectors :: Maybe [AudioSelectorProperty]
captionSelectors :: Maybe [CaptionSelectorProperty]
deblockFilter :: Maybe (Value Text)
denoiseFilter :: Maybe (Value Text)
filterStrength :: Maybe (Value Integer)
inputFilter :: Maybe (Value Text)
networkInputSettings :: Maybe NetworkInputSettingsProperty
scte35Pid :: Maybe (Value Integer)
smpte2038DataPreference :: Maybe (Value Text)
sourceEndBehavior :: Maybe (Value Text)
..}