module Stratosphere.QuickSight.Analysis.GeospatialPointLayerProperty (
        module Exports, GeospatialPointLayerProperty(..),
        mkGeospatialPointLayerProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.QuickSight.Analysis.GeospatialPointStyleProperty as Exports
import Stratosphere.ResourceProperties
data GeospatialPointLayerProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-geospatialpointlayer.html>
    GeospatialPointLayerProperty {GeospatialPointLayerProperty -> ()
haddock_workaround_ :: (),
                                  -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-analysis-geospatialpointlayer.html#cfn-quicksight-analysis-geospatialpointlayer-style>
                                  GeospatialPointLayerProperty -> GeospatialPointStyleProperty
style :: GeospatialPointStyleProperty}
  deriving stock (GeospatialPointLayerProperty
-> GeospatialPointLayerProperty -> Bool
(GeospatialPointLayerProperty
 -> GeospatialPointLayerProperty -> Bool)
-> (GeospatialPointLayerProperty
    -> GeospatialPointLayerProperty -> Bool)
-> Eq GeospatialPointLayerProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GeospatialPointLayerProperty
-> GeospatialPointLayerProperty -> Bool
== :: GeospatialPointLayerProperty
-> GeospatialPointLayerProperty -> Bool
$c/= :: GeospatialPointLayerProperty
-> GeospatialPointLayerProperty -> Bool
/= :: GeospatialPointLayerProperty
-> GeospatialPointLayerProperty -> Bool
Prelude.Eq, Int -> GeospatialPointLayerProperty -> ShowS
[GeospatialPointLayerProperty] -> ShowS
GeospatialPointLayerProperty -> String
(Int -> GeospatialPointLayerProperty -> ShowS)
-> (GeospatialPointLayerProperty -> String)
-> ([GeospatialPointLayerProperty] -> ShowS)
-> Show GeospatialPointLayerProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> GeospatialPointLayerProperty -> ShowS
showsPrec :: Int -> GeospatialPointLayerProperty -> ShowS
$cshow :: GeospatialPointLayerProperty -> String
show :: GeospatialPointLayerProperty -> String
$cshowList :: [GeospatialPointLayerProperty] -> ShowS
showList :: [GeospatialPointLayerProperty] -> ShowS
Prelude.Show)
mkGeospatialPointLayerProperty ::
  GeospatialPointStyleProperty -> GeospatialPointLayerProperty
mkGeospatialPointLayerProperty :: GeospatialPointStyleProperty -> GeospatialPointLayerProperty
mkGeospatialPointLayerProperty GeospatialPointStyleProperty
style
  = GeospatialPointLayerProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), style :: GeospatialPointStyleProperty
style = GeospatialPointStyleProperty
style}
instance ToResourceProperties GeospatialPointLayerProperty where
  toResourceProperties :: GeospatialPointLayerProperty -> ResourceProperties
toResourceProperties GeospatialPointLayerProperty {()
GeospatialPointStyleProperty
haddock_workaround_ :: GeospatialPointLayerProperty -> ()
style :: GeospatialPointLayerProperty -> GeospatialPointStyleProperty
haddock_workaround_ :: ()
style :: GeospatialPointStyleProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::QuickSight::Analysis.GeospatialPointLayer",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False, properties :: Object
properties = [Key
"Style" Key -> GeospatialPointStyleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= GeospatialPointStyleProperty
style]}
instance JSON.ToJSON GeospatialPointLayerProperty where
  toJSON :: GeospatialPointLayerProperty -> Value
toJSON GeospatialPointLayerProperty {()
GeospatialPointStyleProperty
haddock_workaround_ :: GeospatialPointLayerProperty -> ()
style :: GeospatialPointLayerProperty -> GeospatialPointStyleProperty
haddock_workaround_ :: ()
style :: GeospatialPointStyleProperty
..}
    = [(Key, Value)] -> Value
JSON.object [Key
"Style" Key -> GeospatialPointStyleProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= GeospatialPointStyleProperty
style]
instance Property "Style" GeospatialPointLayerProperty where
  type PropertyType "Style" GeospatialPointLayerProperty = GeospatialPointStyleProperty
  set :: PropertyType "Style" GeospatialPointLayerProperty
-> GeospatialPointLayerProperty -> GeospatialPointLayerProperty
set PropertyType "Style" GeospatialPointLayerProperty
newValue GeospatialPointLayerProperty {()
GeospatialPointStyleProperty
haddock_workaround_ :: GeospatialPointLayerProperty -> ()
style :: GeospatialPointLayerProperty -> GeospatialPointStyleProperty
haddock_workaround_ :: ()
style :: GeospatialPointStyleProperty
..}
    = GeospatialPointLayerProperty {style :: GeospatialPointStyleProperty
style = PropertyType "Style" GeospatialPointLayerProperty
GeospatialPointStyleProperty
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}