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