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