module Stratosphere.Pinpoint.Segment.SegmentDimensionsProperty (
        module Exports, SegmentDimensionsProperty(..),
        mkSegmentDimensionsProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Pinpoint.Segment.BehaviorProperty as Exports
import {-# SOURCE #-} Stratosphere.Pinpoint.Segment.DemographicProperty as Exports
import {-# SOURCE #-} Stratosphere.Pinpoint.Segment.LocationProperty as Exports
import Stratosphere.ResourceProperties
data SegmentDimensionsProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpoint-segment-segmentdimensions.html>
    SegmentDimensionsProperty {SegmentDimensionsProperty -> ()
haddock_workaround_ :: (),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpoint-segment-segmentdimensions.html#cfn-pinpoint-segment-segmentdimensions-attributes>
                               SegmentDimensionsProperty -> Maybe Object
attributes :: (Prelude.Maybe JSON.Object),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpoint-segment-segmentdimensions.html#cfn-pinpoint-segment-segmentdimensions-behavior>
                               SegmentDimensionsProperty -> Maybe BehaviorProperty
behavior :: (Prelude.Maybe BehaviorProperty),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpoint-segment-segmentdimensions.html#cfn-pinpoint-segment-segmentdimensions-demographic>
                               SegmentDimensionsProperty -> Maybe DemographicProperty
demographic :: (Prelude.Maybe DemographicProperty),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpoint-segment-segmentdimensions.html#cfn-pinpoint-segment-segmentdimensions-location>
                               SegmentDimensionsProperty -> Maybe LocationProperty
location :: (Prelude.Maybe LocationProperty),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpoint-segment-segmentdimensions.html#cfn-pinpoint-segment-segmentdimensions-metrics>
                               SegmentDimensionsProperty -> Maybe Object
metrics :: (Prelude.Maybe JSON.Object),
                               -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-pinpoint-segment-segmentdimensions.html#cfn-pinpoint-segment-segmentdimensions-userattributes>
                               SegmentDimensionsProperty -> Maybe Object
userAttributes :: (Prelude.Maybe JSON.Object)}
  deriving stock (SegmentDimensionsProperty -> SegmentDimensionsProperty -> Bool
(SegmentDimensionsProperty -> SegmentDimensionsProperty -> Bool)
-> (SegmentDimensionsProperty -> SegmentDimensionsProperty -> Bool)
-> Eq SegmentDimensionsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: SegmentDimensionsProperty -> SegmentDimensionsProperty -> Bool
== :: SegmentDimensionsProperty -> SegmentDimensionsProperty -> Bool
$c/= :: SegmentDimensionsProperty -> SegmentDimensionsProperty -> Bool
/= :: SegmentDimensionsProperty -> SegmentDimensionsProperty -> Bool
Prelude.Eq, Int -> SegmentDimensionsProperty -> ShowS
[SegmentDimensionsProperty] -> ShowS
SegmentDimensionsProperty -> String
(Int -> SegmentDimensionsProperty -> ShowS)
-> (SegmentDimensionsProperty -> String)
-> ([SegmentDimensionsProperty] -> ShowS)
-> Show SegmentDimensionsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> SegmentDimensionsProperty -> ShowS
showsPrec :: Int -> SegmentDimensionsProperty -> ShowS
$cshow :: SegmentDimensionsProperty -> String
show :: SegmentDimensionsProperty -> String
$cshowList :: [SegmentDimensionsProperty] -> ShowS
showList :: [SegmentDimensionsProperty] -> ShowS
Prelude.Show)
mkSegmentDimensionsProperty :: SegmentDimensionsProperty
mkSegmentDimensionsProperty :: SegmentDimensionsProperty
mkSegmentDimensionsProperty
  = SegmentDimensionsProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), attributes :: Maybe Object
attributes = Maybe Object
forall a. Maybe a
Prelude.Nothing,
       behavior :: Maybe BehaviorProperty
behavior = Maybe BehaviorProperty
forall a. Maybe a
Prelude.Nothing, demographic :: Maybe DemographicProperty
demographic = Maybe DemographicProperty
forall a. Maybe a
Prelude.Nothing,
       location :: Maybe LocationProperty
location = Maybe LocationProperty
forall a. Maybe a
Prelude.Nothing, metrics :: Maybe Object
metrics = Maybe Object
forall a. Maybe a
Prelude.Nothing,
       userAttributes :: Maybe Object
userAttributes = Maybe Object
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties SegmentDimensionsProperty where
  toResourceProperties :: SegmentDimensionsProperty -> ResourceProperties
toResourceProperties SegmentDimensionsProperty {Maybe Object
Maybe BehaviorProperty
Maybe LocationProperty
Maybe DemographicProperty
()
haddock_workaround_ :: SegmentDimensionsProperty -> ()
attributes :: SegmentDimensionsProperty -> Maybe Object
behavior :: SegmentDimensionsProperty -> Maybe BehaviorProperty
demographic :: SegmentDimensionsProperty -> Maybe DemographicProperty
location :: SegmentDimensionsProperty -> Maybe LocationProperty
metrics :: SegmentDimensionsProperty -> Maybe Object
userAttributes :: SegmentDimensionsProperty -> Maybe Object
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Pinpoint::Segment.SegmentDimensions",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Attributes" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
attributes,
                            Key -> BehaviorProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Behavior" (BehaviorProperty -> (Key, Value))
-> Maybe BehaviorProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe BehaviorProperty
behavior,
                            Key -> DemographicProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Demographic" (DemographicProperty -> (Key, Value))
-> Maybe DemographicProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DemographicProperty
demographic,
                            Key -> LocationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Location" (LocationProperty -> (Key, Value))
-> Maybe LocationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe LocationProperty
location,
                            Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Metrics" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
metrics,
                            Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"UserAttributes" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
userAttributes])}
instance JSON.ToJSON SegmentDimensionsProperty where
  toJSON :: SegmentDimensionsProperty -> Value
toJSON SegmentDimensionsProperty {Maybe Object
Maybe BehaviorProperty
Maybe LocationProperty
Maybe DemographicProperty
()
haddock_workaround_ :: SegmentDimensionsProperty -> ()
attributes :: SegmentDimensionsProperty -> Maybe Object
behavior :: SegmentDimensionsProperty -> Maybe BehaviorProperty
demographic :: SegmentDimensionsProperty -> Maybe DemographicProperty
location :: SegmentDimensionsProperty -> Maybe LocationProperty
metrics :: SegmentDimensionsProperty -> Maybe Object
userAttributes :: SegmentDimensionsProperty -> Maybe Object
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Attributes" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
attributes,
               Key -> BehaviorProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Behavior" (BehaviorProperty -> (Key, Value))
-> Maybe BehaviorProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe BehaviorProperty
behavior,
               Key -> DemographicProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Demographic" (DemographicProperty -> (Key, Value))
-> Maybe DemographicProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe DemographicProperty
demographic,
               Key -> LocationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Location" (LocationProperty -> (Key, Value))
-> Maybe LocationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe LocationProperty
location,
               Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Metrics" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
metrics,
               Key -> Object -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"UserAttributes" (Object -> (Key, Value)) -> Maybe Object -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Object
userAttributes]))
instance Property "Attributes" SegmentDimensionsProperty where
  type PropertyType "Attributes" SegmentDimensionsProperty = JSON.Object
  set :: PropertyType "Attributes" SegmentDimensionsProperty
-> SegmentDimensionsProperty -> SegmentDimensionsProperty
set PropertyType "Attributes" SegmentDimensionsProperty
newValue SegmentDimensionsProperty {Maybe Object
Maybe BehaviorProperty
Maybe LocationProperty
Maybe DemographicProperty
()
haddock_workaround_ :: SegmentDimensionsProperty -> ()
attributes :: SegmentDimensionsProperty -> Maybe Object
behavior :: SegmentDimensionsProperty -> Maybe BehaviorProperty
demographic :: SegmentDimensionsProperty -> Maybe DemographicProperty
location :: SegmentDimensionsProperty -> Maybe LocationProperty
metrics :: SegmentDimensionsProperty -> Maybe Object
userAttributes :: SegmentDimensionsProperty -> Maybe Object
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
..}
    = SegmentDimensionsProperty
        {attributes :: Maybe Object
attributes = Object -> Maybe Object
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Object
PropertyType "Attributes" SegmentDimensionsProperty
newValue, Maybe Object
Maybe BehaviorProperty
Maybe LocationProperty
Maybe DemographicProperty
()
haddock_workaround_ :: ()
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
haddock_workaround_ :: ()
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
..}
instance Property "Behavior" SegmentDimensionsProperty where
  type PropertyType "Behavior" SegmentDimensionsProperty = BehaviorProperty
  set :: PropertyType "Behavior" SegmentDimensionsProperty
-> SegmentDimensionsProperty -> SegmentDimensionsProperty
set PropertyType "Behavior" SegmentDimensionsProperty
newValue SegmentDimensionsProperty {Maybe Object
Maybe BehaviorProperty
Maybe LocationProperty
Maybe DemographicProperty
()
haddock_workaround_ :: SegmentDimensionsProperty -> ()
attributes :: SegmentDimensionsProperty -> Maybe Object
behavior :: SegmentDimensionsProperty -> Maybe BehaviorProperty
demographic :: SegmentDimensionsProperty -> Maybe DemographicProperty
location :: SegmentDimensionsProperty -> Maybe LocationProperty
metrics :: SegmentDimensionsProperty -> Maybe Object
userAttributes :: SegmentDimensionsProperty -> Maybe Object
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
..}
    = SegmentDimensionsProperty {behavior :: Maybe BehaviorProperty
behavior = BehaviorProperty -> Maybe BehaviorProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Behavior" SegmentDimensionsProperty
BehaviorProperty
newValue, Maybe Object
Maybe LocationProperty
Maybe DemographicProperty
()
haddock_workaround_ :: ()
attributes :: Maybe Object
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
haddock_workaround_ :: ()
attributes :: Maybe Object
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
..}
instance Property "Demographic" SegmentDimensionsProperty where
  type PropertyType "Demographic" SegmentDimensionsProperty = DemographicProperty
  set :: PropertyType "Demographic" SegmentDimensionsProperty
-> SegmentDimensionsProperty -> SegmentDimensionsProperty
set PropertyType "Demographic" SegmentDimensionsProperty
newValue SegmentDimensionsProperty {Maybe Object
Maybe BehaviorProperty
Maybe LocationProperty
Maybe DemographicProperty
()
haddock_workaround_ :: SegmentDimensionsProperty -> ()
attributes :: SegmentDimensionsProperty -> Maybe Object
behavior :: SegmentDimensionsProperty -> Maybe BehaviorProperty
demographic :: SegmentDimensionsProperty -> Maybe DemographicProperty
location :: SegmentDimensionsProperty -> Maybe LocationProperty
metrics :: SegmentDimensionsProperty -> Maybe Object
userAttributes :: SegmentDimensionsProperty -> Maybe Object
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
..}
    = SegmentDimensionsProperty
        {demographic :: Maybe DemographicProperty
demographic = DemographicProperty -> Maybe DemographicProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Demographic" SegmentDimensionsProperty
DemographicProperty
newValue, Maybe Object
Maybe BehaviorProperty
Maybe LocationProperty
()
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
..}
instance Property "Location" SegmentDimensionsProperty where
  type PropertyType "Location" SegmentDimensionsProperty = LocationProperty
  set :: PropertyType "Location" SegmentDimensionsProperty
-> SegmentDimensionsProperty -> SegmentDimensionsProperty
set PropertyType "Location" SegmentDimensionsProperty
newValue SegmentDimensionsProperty {Maybe Object
Maybe BehaviorProperty
Maybe LocationProperty
Maybe DemographicProperty
()
haddock_workaround_ :: SegmentDimensionsProperty -> ()
attributes :: SegmentDimensionsProperty -> Maybe Object
behavior :: SegmentDimensionsProperty -> Maybe BehaviorProperty
demographic :: SegmentDimensionsProperty -> Maybe DemographicProperty
location :: SegmentDimensionsProperty -> Maybe LocationProperty
metrics :: SegmentDimensionsProperty -> Maybe Object
userAttributes :: SegmentDimensionsProperty -> Maybe Object
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
..}
    = SegmentDimensionsProperty {location :: Maybe LocationProperty
location = LocationProperty -> Maybe LocationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Location" SegmentDimensionsProperty
LocationProperty
newValue, Maybe Object
Maybe BehaviorProperty
Maybe DemographicProperty
()
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
..}
instance Property "Metrics" SegmentDimensionsProperty where
  type PropertyType "Metrics" SegmentDimensionsProperty = JSON.Object
  set :: PropertyType "Metrics" SegmentDimensionsProperty
-> SegmentDimensionsProperty -> SegmentDimensionsProperty
set PropertyType "Metrics" SegmentDimensionsProperty
newValue SegmentDimensionsProperty {Maybe Object
Maybe BehaviorProperty
Maybe LocationProperty
Maybe DemographicProperty
()
haddock_workaround_ :: SegmentDimensionsProperty -> ()
attributes :: SegmentDimensionsProperty -> Maybe Object
behavior :: SegmentDimensionsProperty -> Maybe BehaviorProperty
demographic :: SegmentDimensionsProperty -> Maybe DemographicProperty
location :: SegmentDimensionsProperty -> Maybe LocationProperty
metrics :: SegmentDimensionsProperty -> Maybe Object
userAttributes :: SegmentDimensionsProperty -> Maybe Object
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
..}
    = SegmentDimensionsProperty {metrics :: Maybe Object
metrics = Object -> Maybe Object
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Object
PropertyType "Metrics" SegmentDimensionsProperty
newValue, Maybe Object
Maybe BehaviorProperty
Maybe LocationProperty
Maybe DemographicProperty
()
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
userAttributes :: Maybe Object
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
userAttributes :: Maybe Object
..}
instance Property "UserAttributes" SegmentDimensionsProperty where
  type PropertyType "UserAttributes" SegmentDimensionsProperty = JSON.Object
  set :: PropertyType "UserAttributes" SegmentDimensionsProperty
-> SegmentDimensionsProperty -> SegmentDimensionsProperty
set PropertyType "UserAttributes" SegmentDimensionsProperty
newValue SegmentDimensionsProperty {Maybe Object
Maybe BehaviorProperty
Maybe LocationProperty
Maybe DemographicProperty
()
haddock_workaround_ :: SegmentDimensionsProperty -> ()
attributes :: SegmentDimensionsProperty -> Maybe Object
behavior :: SegmentDimensionsProperty -> Maybe BehaviorProperty
demographic :: SegmentDimensionsProperty -> Maybe DemographicProperty
location :: SegmentDimensionsProperty -> Maybe LocationProperty
metrics :: SegmentDimensionsProperty -> Maybe Object
userAttributes :: SegmentDimensionsProperty -> Maybe Object
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
userAttributes :: Maybe Object
..}
    = SegmentDimensionsProperty
        {userAttributes :: Maybe Object
userAttributes = Object -> Maybe Object
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure Object
PropertyType "UserAttributes" SegmentDimensionsProperty
newValue, Maybe Object
Maybe BehaviorProperty
Maybe LocationProperty
Maybe DemographicProperty
()
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
haddock_workaround_ :: ()
attributes :: Maybe Object
behavior :: Maybe BehaviorProperty
demographic :: Maybe DemographicProperty
location :: Maybe LocationProperty
metrics :: Maybe Object
..}