module Stratosphere.QuickSight.Analysis.CustomNarrativeOptionsProperty (
        CustomNarrativeOptionsProperty(..),
        mkCustomNarrativeOptionsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data CustomNarrativeOptionsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-customnarrativeoptions.html>
    CustomNarrativeOptionsProperty {CustomNarrativeOptionsProperty -> ()
haddock_workaround_ :: (),
                                    -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-customnarrativeoptions.html#cfn-quicksight-analysis-customnarrativeoptions-narrative>
                                    CustomNarrativeOptionsProperty -> Value Text
narrative :: (Value Prelude.Text)}
  deriving stock (CustomNarrativeOptionsProperty
-> CustomNarrativeOptionsProperty -> Bool
(CustomNarrativeOptionsProperty
 -> CustomNarrativeOptionsProperty -> Bool)
-> (CustomNarrativeOptionsProperty
    -> CustomNarrativeOptionsProperty -> Bool)
-> Eq CustomNarrativeOptionsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CustomNarrativeOptionsProperty
-> CustomNarrativeOptionsProperty -> Bool
== :: CustomNarrativeOptionsProperty
-> CustomNarrativeOptionsProperty -> Bool
$c/= :: CustomNarrativeOptionsProperty
-> CustomNarrativeOptionsProperty -> Bool
/= :: CustomNarrativeOptionsProperty
-> CustomNarrativeOptionsProperty -> Bool
Prelude.Eq, Int -> CustomNarrativeOptionsProperty -> ShowS
[CustomNarrativeOptionsProperty] -> ShowS
CustomNarrativeOptionsProperty -> String
(Int -> CustomNarrativeOptionsProperty -> ShowS)
-> (CustomNarrativeOptionsProperty -> String)
-> ([CustomNarrativeOptionsProperty] -> ShowS)
-> Show CustomNarrativeOptionsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> CustomNarrativeOptionsProperty -> ShowS
showsPrec :: Int -> CustomNarrativeOptionsProperty -> ShowS
$cshow :: CustomNarrativeOptionsProperty -> String
show :: CustomNarrativeOptionsProperty -> String
$cshowList :: [CustomNarrativeOptionsProperty] -> ShowS
showList :: [CustomNarrativeOptionsProperty] -> ShowS
Prelude.Show)
mkCustomNarrativeOptionsProperty ::
  Value Prelude.Text -> CustomNarrativeOptionsProperty
mkCustomNarrativeOptionsProperty :: Value Text -> CustomNarrativeOptionsProperty
mkCustomNarrativeOptionsProperty Value Text
narrative
  = CustomNarrativeOptionsProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), narrative :: Value Text
narrative = Value Text
narrative}
instance ToResourceProperties CustomNarrativeOptionsProperty where
  toResourceProperties :: CustomNarrativeOptionsProperty -> ResourceProperties
toResourceProperties CustomNarrativeOptionsProperty {()
Value Text
haddock_workaround_ :: CustomNarrativeOptionsProperty -> ()
narrative :: CustomNarrativeOptionsProperty -> Value Text
haddock_workaround_ :: ()
narrative :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::QuickSight::Analysis.CustomNarrativeOptions",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"Narrative" 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
narrative]}
instance JSON.ToJSON CustomNarrativeOptionsProperty where
  toJSON :: CustomNarrativeOptionsProperty -> Value
toJSON CustomNarrativeOptionsProperty {()
Value Text
haddock_workaround_ :: CustomNarrativeOptionsProperty -> ()
narrative :: CustomNarrativeOptionsProperty -> Value Text
haddock_workaround_ :: ()
narrative :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"Narrative" 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
narrative]
instance Property "Narrative" CustomNarrativeOptionsProperty where
  type PropertyType "Narrative" CustomNarrativeOptionsProperty = Value Prelude.Text
  set :: PropertyType "Narrative" CustomNarrativeOptionsProperty
-> CustomNarrativeOptionsProperty -> CustomNarrativeOptionsProperty
set PropertyType "Narrative" CustomNarrativeOptionsProperty
newValue CustomNarrativeOptionsProperty {()
Value Text
haddock_workaround_ :: CustomNarrativeOptionsProperty -> ()
narrative :: CustomNarrativeOptionsProperty -> Value Text
haddock_workaround_ :: ()
narrative :: Value Text
..}
    = CustomNarrativeOptionsProperty {narrative :: Value Text
narrative = PropertyType "Narrative" CustomNarrativeOptionsProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}