module Stratosphere.QuickSight.Template.FreeFormLayoutScreenCanvasSizeOptionsProperty (
FreeFormLayoutScreenCanvasSizeOptionsProperty(..),
mkFreeFormLayoutScreenCanvasSizeOptionsProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data FreeFormLayoutScreenCanvasSizeOptionsProperty
=
FreeFormLayoutScreenCanvasSizeOptionsProperty {FreeFormLayoutScreenCanvasSizeOptionsProperty -> ()
haddock_workaround_ :: (),
FreeFormLayoutScreenCanvasSizeOptionsProperty -> Value Text
optimizedViewPortWidth :: (Value Prelude.Text)}
deriving stock (FreeFormLayoutScreenCanvasSizeOptionsProperty
-> FreeFormLayoutScreenCanvasSizeOptionsProperty -> Bool
(FreeFormLayoutScreenCanvasSizeOptionsProperty
-> FreeFormLayoutScreenCanvasSizeOptionsProperty -> Bool)
-> (FreeFormLayoutScreenCanvasSizeOptionsProperty
-> FreeFormLayoutScreenCanvasSizeOptionsProperty -> Bool)
-> Eq FreeFormLayoutScreenCanvasSizeOptionsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: FreeFormLayoutScreenCanvasSizeOptionsProperty
-> FreeFormLayoutScreenCanvasSizeOptionsProperty -> Bool
== :: FreeFormLayoutScreenCanvasSizeOptionsProperty
-> FreeFormLayoutScreenCanvasSizeOptionsProperty -> Bool
$c/= :: FreeFormLayoutScreenCanvasSizeOptionsProperty
-> FreeFormLayoutScreenCanvasSizeOptionsProperty -> Bool
/= :: FreeFormLayoutScreenCanvasSizeOptionsProperty
-> FreeFormLayoutScreenCanvasSizeOptionsProperty -> Bool
Prelude.Eq, Int -> FreeFormLayoutScreenCanvasSizeOptionsProperty -> ShowS
[FreeFormLayoutScreenCanvasSizeOptionsProperty] -> ShowS
FreeFormLayoutScreenCanvasSizeOptionsProperty -> String
(Int -> FreeFormLayoutScreenCanvasSizeOptionsProperty -> ShowS)
-> (FreeFormLayoutScreenCanvasSizeOptionsProperty -> String)
-> ([FreeFormLayoutScreenCanvasSizeOptionsProperty] -> ShowS)
-> Show FreeFormLayoutScreenCanvasSizeOptionsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> FreeFormLayoutScreenCanvasSizeOptionsProperty -> ShowS
showsPrec :: Int -> FreeFormLayoutScreenCanvasSizeOptionsProperty -> ShowS
$cshow :: FreeFormLayoutScreenCanvasSizeOptionsProperty -> String
show :: FreeFormLayoutScreenCanvasSizeOptionsProperty -> String
$cshowList :: [FreeFormLayoutScreenCanvasSizeOptionsProperty] -> ShowS
showList :: [FreeFormLayoutScreenCanvasSizeOptionsProperty] -> ShowS
Prelude.Show)
mkFreeFormLayoutScreenCanvasSizeOptionsProperty ::
Value Prelude.Text -> FreeFormLayoutScreenCanvasSizeOptionsProperty
mkFreeFormLayoutScreenCanvasSizeOptionsProperty :: Value Text -> FreeFormLayoutScreenCanvasSizeOptionsProperty
mkFreeFormLayoutScreenCanvasSizeOptionsProperty
Value Text
optimizedViewPortWidth
= FreeFormLayoutScreenCanvasSizeOptionsProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
optimizedViewPortWidth :: Value Text
optimizedViewPortWidth = Value Text
optimizedViewPortWidth}
instance ToResourceProperties FreeFormLayoutScreenCanvasSizeOptionsProperty where
toResourceProperties :: FreeFormLayoutScreenCanvasSizeOptionsProperty -> ResourceProperties
toResourceProperties
FreeFormLayoutScreenCanvasSizeOptionsProperty {()
Value Text
haddock_workaround_ :: FreeFormLayoutScreenCanvasSizeOptionsProperty -> ()
optimizedViewPortWidth :: FreeFormLayoutScreenCanvasSizeOptionsProperty -> Value Text
haddock_workaround_ :: ()
optimizedViewPortWidth :: Value Text
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::QuickSight::Template.FreeFormLayoutScreenCanvasSizeOptions",
supportsTags :: Bool
supportsTags = Bool
Prelude.False,
properties :: Object
properties = [Key
"OptimizedViewPortWidth"
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
optimizedViewPortWidth]}
instance JSON.ToJSON FreeFormLayoutScreenCanvasSizeOptionsProperty where
toJSON :: FreeFormLayoutScreenCanvasSizeOptionsProperty -> Value
toJSON FreeFormLayoutScreenCanvasSizeOptionsProperty {()
Value Text
haddock_workaround_ :: FreeFormLayoutScreenCanvasSizeOptionsProperty -> ()
optimizedViewPortWidth :: FreeFormLayoutScreenCanvasSizeOptionsProperty -> Value Text
haddock_workaround_ :: ()
optimizedViewPortWidth :: Value Text
..}
= [(Key, Value)] -> Value
JSON.object
[Key
"OptimizedViewPortWidth" 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
optimizedViewPortWidth]
instance Property "OptimizedViewPortWidth" FreeFormLayoutScreenCanvasSizeOptionsProperty where
type PropertyType "OptimizedViewPortWidth" FreeFormLayoutScreenCanvasSizeOptionsProperty = Value Prelude.Text
set :: PropertyType
"OptimizedViewPortWidth"
FreeFormLayoutScreenCanvasSizeOptionsProperty
-> FreeFormLayoutScreenCanvasSizeOptionsProperty
-> FreeFormLayoutScreenCanvasSizeOptionsProperty
set PropertyType
"OptimizedViewPortWidth"
FreeFormLayoutScreenCanvasSizeOptionsProperty
newValue FreeFormLayoutScreenCanvasSizeOptionsProperty {()
Value Text
haddock_workaround_ :: FreeFormLayoutScreenCanvasSizeOptionsProperty -> ()
optimizedViewPortWidth :: FreeFormLayoutScreenCanvasSizeOptionsProperty -> Value Text
haddock_workaround_ :: ()
optimizedViewPortWidth :: Value Text
..}
= FreeFormLayoutScreenCanvasSizeOptionsProperty
{optimizedViewPortWidth :: Value Text
optimizedViewPortWidth = PropertyType
"OptimizedViewPortWidth"
FreeFormLayoutScreenCanvasSizeOptionsProperty
Value Text
newValue, ()
haddock_workaround_ :: ()
haddock_workaround_ :: ()
..}