module Stratosphere.KinesisAnalytics.ApplicationOutput.LambdaOutputProperty (
        LambdaOutputProperty(..), mkLambdaOutputProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data LambdaOutputProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-kinesisanalytics-applicationoutput-lambdaoutput.html>
    LambdaOutputProperty {LambdaOutputProperty -> ()
haddock_workaround_ :: (),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-kinesisanalytics-applicationoutput-lambdaoutput.html#cfn-kinesisanalytics-applicationoutput-lambdaoutput-resourcearn>
                          LambdaOutputProperty -> Value Text
resourceARN :: (Value Prelude.Text),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-kinesisanalytics-applicationoutput-lambdaoutput.html#cfn-kinesisanalytics-applicationoutput-lambdaoutput-rolearn>
                          LambdaOutputProperty -> Value Text
roleARN :: (Value Prelude.Text)}
  deriving stock (LambdaOutputProperty -> LambdaOutputProperty -> Bool
(LambdaOutputProperty -> LambdaOutputProperty -> Bool)
-> (LambdaOutputProperty -> LambdaOutputProperty -> Bool)
-> Eq LambdaOutputProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: LambdaOutputProperty -> LambdaOutputProperty -> Bool
== :: LambdaOutputProperty -> LambdaOutputProperty -> Bool
$c/= :: LambdaOutputProperty -> LambdaOutputProperty -> Bool
/= :: LambdaOutputProperty -> LambdaOutputProperty -> Bool
Prelude.Eq, Int -> LambdaOutputProperty -> ShowS
[LambdaOutputProperty] -> ShowS
LambdaOutputProperty -> String
(Int -> LambdaOutputProperty -> ShowS)
-> (LambdaOutputProperty -> String)
-> ([LambdaOutputProperty] -> ShowS)
-> Show LambdaOutputProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> LambdaOutputProperty -> ShowS
showsPrec :: Int -> LambdaOutputProperty -> ShowS
$cshow :: LambdaOutputProperty -> String
show :: LambdaOutputProperty -> String
$cshowList :: [LambdaOutputProperty] -> ShowS
showList :: [LambdaOutputProperty] -> ShowS
Prelude.Show)
mkLambdaOutputProperty ::
  Value Prelude.Text -> Value Prelude.Text -> LambdaOutputProperty
mkLambdaOutputProperty :: Value Text -> Value Text -> LambdaOutputProperty
mkLambdaOutputProperty Value Text
resourceARN Value Text
roleARN
  = LambdaOutputProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), resourceARN :: Value Text
resourceARN = Value Text
resourceARN,
       roleARN :: Value Text
roleARN = Value Text
roleARN}
instance ToResourceProperties LambdaOutputProperty where
  toResourceProperties :: LambdaOutputProperty -> ResourceProperties
toResourceProperties LambdaOutputProperty {()
Value Text
haddock_workaround_ :: LambdaOutputProperty -> ()
resourceARN :: LambdaOutputProperty -> Value Text
roleARN :: LambdaOutputProperty -> Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
roleARN :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::KinesisAnalytics::ApplicationOutput.LambdaOutput",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"ResourceARN" 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
resourceARN,
                       Key
"RoleARN" 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
roleARN]}
instance JSON.ToJSON LambdaOutputProperty where
  toJSON :: LambdaOutputProperty -> Value
toJSON LambdaOutputProperty {()
Value Text
haddock_workaround_ :: LambdaOutputProperty -> ()
resourceARN :: LambdaOutputProperty -> Value Text
roleARN :: LambdaOutputProperty -> Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
roleARN :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"ResourceARN" 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
resourceARN, Key
"RoleARN" 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
roleARN]
instance Property "ResourceARN" LambdaOutputProperty where
  type PropertyType "ResourceARN" LambdaOutputProperty = Value Prelude.Text
  set :: PropertyType "ResourceARN" LambdaOutputProperty
-> LambdaOutputProperty -> LambdaOutputProperty
set PropertyType "ResourceARN" LambdaOutputProperty
newValue LambdaOutputProperty {()
Value Text
haddock_workaround_ :: LambdaOutputProperty -> ()
resourceARN :: LambdaOutputProperty -> Value Text
roleARN :: LambdaOutputProperty -> Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
roleARN :: Value Text
..}
    = LambdaOutputProperty {resourceARN :: Value Text
resourceARN = PropertyType "ResourceARN" LambdaOutputProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
roleARN :: Value Text
haddock_workaround_ :: ()
roleARN :: Value Text
..}
instance Property "RoleARN" LambdaOutputProperty where
  type PropertyType "RoleARN" LambdaOutputProperty = Value Prelude.Text
  set :: PropertyType "RoleARN" LambdaOutputProperty
-> LambdaOutputProperty -> LambdaOutputProperty
set PropertyType "RoleARN" LambdaOutputProperty
newValue LambdaOutputProperty {()
Value Text
haddock_workaround_ :: LambdaOutputProperty -> ()
resourceARN :: LambdaOutputProperty -> Value Text
roleARN :: LambdaOutputProperty -> Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
roleARN :: Value Text
..}
    = LambdaOutputProperty {roleARN :: Value Text
roleARN = PropertyType "RoleARN" LambdaOutputProperty
Value Text
newValue, ()
Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
haddock_workaround_ :: ()
resourceARN :: Value Text
..}