module Stratosphere.QuickSight.Dashboard.DataPathSortProperty (
        module Exports, DataPathSortProperty(..), mkDataPathSortProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.QuickSight.Dashboard.DataPathValueProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data DataPathSortProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-dashboard-datapathsort.html>
    DataPathSortProperty {DataPathSortProperty -> ()
haddock_workaround_ :: (),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-dashboard-datapathsort.html#cfn-quicksight-dashboard-datapathsort-direction>
                          DataPathSortProperty -> Value Text
direction :: (Value Prelude.Text),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-quicksight-dashboard-datapathsort.html#cfn-quicksight-dashboard-datapathsort-sortpaths>
                          DataPathSortProperty -> [DataPathValueProperty]
sortPaths :: [DataPathValueProperty]}
  deriving stock (DataPathSortProperty -> DataPathSortProperty -> Bool
(DataPathSortProperty -> DataPathSortProperty -> Bool)
-> (DataPathSortProperty -> DataPathSortProperty -> Bool)
-> Eq DataPathSortProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DataPathSortProperty -> DataPathSortProperty -> Bool
== :: DataPathSortProperty -> DataPathSortProperty -> Bool
$c/= :: DataPathSortProperty -> DataPathSortProperty -> Bool
/= :: DataPathSortProperty -> DataPathSortProperty -> Bool
Prelude.Eq, Int -> DataPathSortProperty -> ShowS
[DataPathSortProperty] -> ShowS
DataPathSortProperty -> String
(Int -> DataPathSortProperty -> ShowS)
-> (DataPathSortProperty -> String)
-> ([DataPathSortProperty] -> ShowS)
-> Show DataPathSortProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DataPathSortProperty -> ShowS
showsPrec :: Int -> DataPathSortProperty -> ShowS
$cshow :: DataPathSortProperty -> String
show :: DataPathSortProperty -> String
$cshowList :: [DataPathSortProperty] -> ShowS
showList :: [DataPathSortProperty] -> ShowS
Prelude.Show)
mkDataPathSortProperty ::
  Value Prelude.Text
  -> [DataPathValueProperty] -> DataPathSortProperty
mkDataPathSortProperty :: Value Text -> [DataPathValueProperty] -> DataPathSortProperty
mkDataPathSortProperty Value Text
direction [DataPathValueProperty]
sortPaths
  = DataPathSortProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), direction :: Value Text
direction = Value Text
direction,
       sortPaths :: [DataPathValueProperty]
sortPaths = [DataPathValueProperty]
sortPaths}
instance ToResourceProperties DataPathSortProperty where
  toResourceProperties :: DataPathSortProperty -> ResourceProperties
toResourceProperties DataPathSortProperty {[DataPathValueProperty]
()
Value Text
haddock_workaround_ :: DataPathSortProperty -> ()
direction :: DataPathSortProperty -> Value Text
sortPaths :: DataPathSortProperty -> [DataPathValueProperty]
haddock_workaround_ :: ()
direction :: Value Text
sortPaths :: [DataPathValueProperty]
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::QuickSight::Dashboard.DataPathSort",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"Direction" 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
direction,
                       Key
"SortPaths" Key -> [DataPathValueProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [DataPathValueProperty]
sortPaths]}
instance JSON.ToJSON DataPathSortProperty where
  toJSON :: DataPathSortProperty -> Value
toJSON DataPathSortProperty {[DataPathValueProperty]
()
Value Text
haddock_workaround_ :: DataPathSortProperty -> ()
direction :: DataPathSortProperty -> Value Text
sortPaths :: DataPathSortProperty -> [DataPathValueProperty]
haddock_workaround_ :: ()
direction :: Value Text
sortPaths :: [DataPathValueProperty]
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"Direction" 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
direction, Key
"SortPaths" Key -> [DataPathValueProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= [DataPathValueProperty]
sortPaths]
instance Property "Direction" DataPathSortProperty where
  type PropertyType "Direction" DataPathSortProperty = Value Prelude.Text
  set :: PropertyType "Direction" DataPathSortProperty
-> DataPathSortProperty -> DataPathSortProperty
set PropertyType "Direction" DataPathSortProperty
newValue DataPathSortProperty {[DataPathValueProperty]
()
Value Text
haddock_workaround_ :: DataPathSortProperty -> ()
direction :: DataPathSortProperty -> Value Text
sortPaths :: DataPathSortProperty -> [DataPathValueProperty]
haddock_workaround_ :: ()
direction :: Value Text
sortPaths :: [DataPathValueProperty]
..}
    = DataPathSortProperty {direction :: Value Text
direction = PropertyType "Direction" DataPathSortProperty
Value Text
newValue, [DataPathValueProperty]
()
haddock_workaround_ :: ()
sortPaths :: [DataPathValueProperty]
haddock_workaround_ :: ()
sortPaths :: [DataPathValueProperty]
..}
instance Property "SortPaths" DataPathSortProperty where
  type PropertyType "SortPaths" DataPathSortProperty = [DataPathValueProperty]
  set :: PropertyType "SortPaths" DataPathSortProperty
-> DataPathSortProperty -> DataPathSortProperty
set PropertyType "SortPaths" DataPathSortProperty
newValue DataPathSortProperty {[DataPathValueProperty]
()
Value Text
haddock_workaround_ :: DataPathSortProperty -> ()
direction :: DataPathSortProperty -> Value Text
sortPaths :: DataPathSortProperty -> [DataPathValueProperty]
haddock_workaround_ :: ()
direction :: Value Text
sortPaths :: [DataPathValueProperty]
..}
    = DataPathSortProperty {sortPaths :: [DataPathValueProperty]
sortPaths = [DataPathValueProperty]
PropertyType "SortPaths" DataPathSortProperty
newValue, ()
Value Text
haddock_workaround_ :: ()
direction :: Value Text
haddock_workaround_ :: ()
direction :: Value Text
..}