module Stratosphere.MediaLive.Channel.SmpteTtDestinationSettingsProperty (
SmpteTtDestinationSettingsProperty(..),
mkSmpteTtDestinationSettingsProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.ResourceProperties
data SmpteTtDestinationSettingsProperty
=
SmpteTtDestinationSettingsProperty {SmpteTtDestinationSettingsProperty -> ()
haddock_workaround_ :: ()}
deriving stock (SmpteTtDestinationSettingsProperty
-> SmpteTtDestinationSettingsProperty -> Bool
(SmpteTtDestinationSettingsProperty
-> SmpteTtDestinationSettingsProperty -> Bool)
-> (SmpteTtDestinationSettingsProperty
-> SmpteTtDestinationSettingsProperty -> Bool)
-> Eq SmpteTtDestinationSettingsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SmpteTtDestinationSettingsProperty
-> SmpteTtDestinationSettingsProperty -> Bool
== :: SmpteTtDestinationSettingsProperty
-> SmpteTtDestinationSettingsProperty -> Bool
$c/= :: SmpteTtDestinationSettingsProperty
-> SmpteTtDestinationSettingsProperty -> Bool
/= :: SmpteTtDestinationSettingsProperty
-> SmpteTtDestinationSettingsProperty -> Bool
Prelude.Eq, Int -> SmpteTtDestinationSettingsProperty -> ShowS
[SmpteTtDestinationSettingsProperty] -> ShowS
SmpteTtDestinationSettingsProperty -> String
(Int -> SmpteTtDestinationSettingsProperty -> ShowS)
-> (SmpteTtDestinationSettingsProperty -> String)
-> ([SmpteTtDestinationSettingsProperty] -> ShowS)
-> Show SmpteTtDestinationSettingsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SmpteTtDestinationSettingsProperty -> ShowS
showsPrec :: Int -> SmpteTtDestinationSettingsProperty -> ShowS
$cshow :: SmpteTtDestinationSettingsProperty -> String
show :: SmpteTtDestinationSettingsProperty -> String
$cshowList :: [SmpteTtDestinationSettingsProperty] -> ShowS
showList :: [SmpteTtDestinationSettingsProperty] -> ShowS
Prelude.Show)
mkSmpteTtDestinationSettingsProperty ::
SmpteTtDestinationSettingsProperty
mkSmpteTtDestinationSettingsProperty :: SmpteTtDestinationSettingsProperty
mkSmpteTtDestinationSettingsProperty
= SmpteTtDestinationSettingsProperty {haddock_workaround_ :: ()
haddock_workaround_ = ()}
instance ToResourceProperties SmpteTtDestinationSettingsProperty where
toResourceProperties :: SmpteTtDestinationSettingsProperty -> ResourceProperties
toResourceProperties SmpteTtDestinationSettingsProperty {}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::MediaLive::Channel.SmpteTtDestinationSettings",
supportsTags :: Bool
supportsTags = Bool
Prelude.False, properties :: Object
properties = []}
instance JSON.ToJSON SmpteTtDestinationSettingsProperty where
toJSON :: SmpteTtDestinationSettingsProperty -> Value
toJSON SmpteTtDestinationSettingsProperty {} = [Pair] -> Value
JSON.object []