module Stratosphere.QuickSight.Dashboard.GeospatialPointStyleProperty ( module Exports, GeospatialPointStyleProperty(..), mkGeospatialPointStyleProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import {-# SOURCE #-} Stratosphere.QuickSight.Dashboard.GeospatialCircleSymbolStyleProperty as Exports import Stratosphere.ResourceProperties data GeospatialPointStyleProperty = -- | See: GeospatialPointStyleProperty {haddock_workaround_ :: (), -- | See: circleSymbolStyle :: (Prelude.Maybe GeospatialCircleSymbolStyleProperty)} deriving stock (Prelude.Eq, Prelude.Show) mkGeospatialPointStyleProperty :: GeospatialPointStyleProperty mkGeospatialPointStyleProperty = GeospatialPointStyleProperty {haddock_workaround_ = (), circleSymbolStyle = Prelude.Nothing} instance ToResourceProperties GeospatialPointStyleProperty where toResourceProperties GeospatialPointStyleProperty {..} = ResourceProperties {awsType = "AWS::QuickSight::Dashboard.GeospatialPointStyle", supportsTags = Prelude.False, properties = Prelude.fromList (Prelude.catMaybes [(JSON..=) "CircleSymbolStyle" Prelude.<$> circleSymbolStyle])} instance JSON.ToJSON GeospatialPointStyleProperty where toJSON GeospatialPointStyleProperty {..} = JSON.object (Prelude.fromList (Prelude.catMaybes [(JSON..=) "CircleSymbolStyle" Prelude.<$> circleSymbolStyle])) instance Property "CircleSymbolStyle" GeospatialPointStyleProperty where type PropertyType "CircleSymbolStyle" GeospatialPointStyleProperty = GeospatialCircleSymbolStyleProperty set newValue GeospatialPointStyleProperty {..} = GeospatialPointStyleProperty {circleSymbolStyle = Prelude.pure newValue, ..}