module Stratosphere.MediaTailor.Channel.TimeShiftConfigurationProperty (
        TimeShiftConfigurationProperty(..),
        mkTimeShiftConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data TimeShiftConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediatailor-channel-timeshiftconfiguration.html>
    TimeShiftConfigurationProperty {TimeShiftConfigurationProperty -> ()
haddock_workaround_ :: (),
                                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-mediatailor-channel-timeshiftconfiguration.html#cfn-mediatailor-channel-timeshiftconfiguration-maxtimedelayseconds>
                                    TimeShiftConfigurationProperty -> Value Double
maxTimeDelaySeconds :: (Value Prelude.Double)}
  deriving stock (TimeShiftConfigurationProperty
-> TimeShiftConfigurationProperty -> Bool
(TimeShiftConfigurationProperty
 -> TimeShiftConfigurationProperty -> Bool)
-> (TimeShiftConfigurationProperty
    -> TimeShiftConfigurationProperty -> Bool)
-> Eq TimeShiftConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TimeShiftConfigurationProperty
-> TimeShiftConfigurationProperty -> Bool
== :: TimeShiftConfigurationProperty
-> TimeShiftConfigurationProperty -> Bool
$c/= :: TimeShiftConfigurationProperty
-> TimeShiftConfigurationProperty -> Bool
/= :: TimeShiftConfigurationProperty
-> TimeShiftConfigurationProperty -> Bool
Prelude.Eq, Int -> TimeShiftConfigurationProperty -> ShowS
[TimeShiftConfigurationProperty] -> ShowS
TimeShiftConfigurationProperty -> String
(Int -> TimeShiftConfigurationProperty -> ShowS)
-> (TimeShiftConfigurationProperty -> String)
-> ([TimeShiftConfigurationProperty] -> ShowS)
-> Show TimeShiftConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TimeShiftConfigurationProperty -> ShowS
showsPrec :: Int -> TimeShiftConfigurationProperty -> ShowS
$cshow :: TimeShiftConfigurationProperty -> String
show :: TimeShiftConfigurationProperty -> String
$cshowList :: [TimeShiftConfigurationProperty] -> ShowS
showList :: [TimeShiftConfigurationProperty] -> ShowS
Prelude.Show)
mkTimeShiftConfigurationProperty ::
  Value Prelude.Double -> TimeShiftConfigurationProperty
mkTimeShiftConfigurationProperty :: Value Double -> TimeShiftConfigurationProperty
mkTimeShiftConfigurationProperty Value Double
maxTimeDelaySeconds
  = TimeShiftConfigurationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (),
       maxTimeDelaySeconds :: Value Double
maxTimeDelaySeconds = Value Double
maxTimeDelaySeconds}
instance ToResourceProperties TimeShiftConfigurationProperty where
  toResourceProperties :: TimeShiftConfigurationProperty -> ResourceProperties
toResourceProperties TimeShiftConfigurationProperty {()
Value Double
haddock_workaround_ :: TimeShiftConfigurationProperty -> ()
maxTimeDelaySeconds :: TimeShiftConfigurationProperty -> Value Double
haddock_workaround_ :: ()
maxTimeDelaySeconds :: Value Double
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::MediaTailor::Channel.TimeShiftConfiguration",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"MaxTimeDelaySeconds" Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Double
maxTimeDelaySeconds]}
instance JSON.ToJSON TimeShiftConfigurationProperty where
  toJSON :: TimeShiftConfigurationProperty -> Value
toJSON TimeShiftConfigurationProperty {()
Value Double
haddock_workaround_ :: TimeShiftConfigurationProperty -> ()
maxTimeDelaySeconds :: TimeShiftConfigurationProperty -> Value Double
haddock_workaround_ :: ()
maxTimeDelaySeconds :: Value Double
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"MaxTimeDelaySeconds" Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Double
maxTimeDelaySeconds]
instance Property "MaxTimeDelaySeconds" TimeShiftConfigurationProperty where
  type PropertyType "MaxTimeDelaySeconds" TimeShiftConfigurationProperty = Value Prelude.Double
  set :: PropertyType "MaxTimeDelaySeconds" TimeShiftConfigurationProperty
-> TimeShiftConfigurationProperty -> TimeShiftConfigurationProperty
set PropertyType "MaxTimeDelaySeconds" TimeShiftConfigurationProperty
newValue TimeShiftConfigurationProperty {()
Value Double
haddock_workaround_ :: TimeShiftConfigurationProperty -> ()
maxTimeDelaySeconds :: TimeShiftConfigurationProperty -> Value Double
haddock_workaround_ :: ()
maxTimeDelaySeconds :: Value Double
..}
    = TimeShiftConfigurationProperty
        {maxTimeDelaySeconds :: Value Double
maxTimeDelaySeconds = PropertyType "MaxTimeDelaySeconds" TimeShiftConfigurationProperty
Value Double
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}