module Stratosphere.RUM.AppMonitor.AppMonitorConfigurationProperty (
        module Exports, AppMonitorConfigurationProperty(..),
        mkAppMonitorConfigurationProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.RUM.AppMonitor.MetricDestinationProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data AppMonitorConfigurationProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-rum-appmonitor-appmonitorconfiguration.html>
    AppMonitorConfigurationProperty {AppMonitorConfigurationProperty -> ()
haddock_workaround_ :: (),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-rum-appmonitor-appmonitorconfiguration.html#cfn-rum-appmonitor-appmonitorconfiguration-allowcookies>
                                     AppMonitorConfigurationProperty -> Maybe (Value Bool)
allowCookies :: (Prelude.Maybe (Value Prelude.Bool)),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-rum-appmonitor-appmonitorconfiguration.html#cfn-rum-appmonitor-appmonitorconfiguration-enablexray>
                                     AppMonitorConfigurationProperty -> Maybe (Value Bool)
enableXRay :: (Prelude.Maybe (Value Prelude.Bool)),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-rum-appmonitor-appmonitorconfiguration.html#cfn-rum-appmonitor-appmonitorconfiguration-excludedpages>
                                     AppMonitorConfigurationProperty -> Maybe (ValueList Text)
excludedPages :: (Prelude.Maybe (ValueList Prelude.Text)),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-rum-appmonitor-appmonitorconfiguration.html#cfn-rum-appmonitor-appmonitorconfiguration-favoritepages>
                                     AppMonitorConfigurationProperty -> Maybe (ValueList Text)
favoritePages :: (Prelude.Maybe (ValueList Prelude.Text)),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-rum-appmonitor-appmonitorconfiguration.html#cfn-rum-appmonitor-appmonitorconfiguration-guestrolearn>
                                     AppMonitorConfigurationProperty -> Maybe (Value Text)
guestRoleArn :: (Prelude.Maybe (Value Prelude.Text)),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-rum-appmonitor-appmonitorconfiguration.html#cfn-rum-appmonitor-appmonitorconfiguration-identitypoolid>
                                     AppMonitorConfigurationProperty -> Maybe (Value Text)
identityPoolId :: (Prelude.Maybe (Value Prelude.Text)),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-rum-appmonitor-appmonitorconfiguration.html#cfn-rum-appmonitor-appmonitorconfiguration-includedpages>
                                     AppMonitorConfigurationProperty -> Maybe (ValueList Text)
includedPages :: (Prelude.Maybe (ValueList Prelude.Text)),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-rum-appmonitor-appmonitorconfiguration.html#cfn-rum-appmonitor-appmonitorconfiguration-metricdestinations>
                                     AppMonitorConfigurationProperty
-> Maybe [MetricDestinationProperty]
metricDestinations :: (Prelude.Maybe [MetricDestinationProperty]),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-rum-appmonitor-appmonitorconfiguration.html#cfn-rum-appmonitor-appmonitorconfiguration-sessionsamplerate>
                                     AppMonitorConfigurationProperty -> Maybe (Value Double)
sessionSampleRate :: (Prelude.Maybe (Value Prelude.Double)),
                                     -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-rum-appmonitor-appmonitorconfiguration.html#cfn-rum-appmonitor-appmonitorconfiguration-telemetries>
                                     AppMonitorConfigurationProperty -> Maybe (ValueList Text)
telemetries :: (Prelude.Maybe (ValueList Prelude.Text))}
  deriving stock (AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty -> Bool
(AppMonitorConfigurationProperty
 -> AppMonitorConfigurationProperty -> Bool)
-> (AppMonitorConfigurationProperty
    -> AppMonitorConfigurationProperty -> Bool)
-> Eq AppMonitorConfigurationProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty -> Bool
== :: AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty -> Bool
$c/= :: AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty -> Bool
/= :: AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty -> Bool
Prelude.Eq, Int -> AppMonitorConfigurationProperty -> ShowS
[AppMonitorConfigurationProperty] -> ShowS
AppMonitorConfigurationProperty -> String
(Int -> AppMonitorConfigurationProperty -> ShowS)
-> (AppMonitorConfigurationProperty -> String)
-> ([AppMonitorConfigurationProperty] -> ShowS)
-> Show AppMonitorConfigurationProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> AppMonitorConfigurationProperty -> ShowS
showsPrec :: Int -> AppMonitorConfigurationProperty -> ShowS
$cshow :: AppMonitorConfigurationProperty -> String
show :: AppMonitorConfigurationProperty -> String
$cshowList :: [AppMonitorConfigurationProperty] -> ShowS
showList :: [AppMonitorConfigurationProperty] -> ShowS
Prelude.Show)
mkAppMonitorConfigurationProperty ::
  AppMonitorConfigurationProperty
mkAppMonitorConfigurationProperty :: AppMonitorConfigurationProperty
mkAppMonitorConfigurationProperty
  = AppMonitorConfigurationProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), allowCookies :: Maybe (Value Bool)
allowCookies = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing,
       enableXRay :: Maybe (Value Bool)
enableXRay = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing, excludedPages :: Maybe (ValueList Text)
excludedPages = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
       favoritePages :: Maybe (ValueList Text)
favoritePages = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing, guestRoleArn :: Maybe (Value Text)
guestRoleArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       identityPoolId :: Maybe (Value Text)
identityPoolId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, includedPages :: Maybe (ValueList Text)
includedPages = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
       metricDestinations :: Maybe [MetricDestinationProperty]
metricDestinations = Maybe [MetricDestinationProperty]
forall a. Maybe a
Prelude.Nothing,
       sessionSampleRate :: Maybe (Value Double)
sessionSampleRate = Maybe (Value Double)
forall a. Maybe a
Prelude.Nothing, telemetries :: Maybe (ValueList Text)
telemetries = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties AppMonitorConfigurationProperty where
  toResourceProperties :: AppMonitorConfigurationProperty -> ResourceProperties
toResourceProperties AppMonitorConfigurationProperty {Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AppMonitorConfigurationProperty -> ()
allowCookies :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
enableXRay :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
excludedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
favoritePages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
guestRoleArn :: AppMonitorConfigurationProperty -> Maybe (Value Text)
identityPoolId :: AppMonitorConfigurationProperty -> Maybe (Value Text)
includedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
metricDestinations :: AppMonitorConfigurationProperty
-> Maybe [MetricDestinationProperty]
sessionSampleRate :: AppMonitorConfigurationProperty -> Maybe (Value Double)
telemetries :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::RUM::AppMonitor.AppMonitorConfiguration",
         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 -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AllowCookies" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
allowCookies,
                            Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnableXRay" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
enableXRay,
                            Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ExcludedPages" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
excludedPages,
                            Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FavoritePages" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
favoritePages,
                            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..=) Key
"GuestRoleArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
guestRoleArn,
                            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..=) Key
"IdentityPoolId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
identityPoolId,
                            Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IncludedPages" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
includedPages,
                            Key -> [MetricDestinationProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MetricDestinations" ([MetricDestinationProperty] -> (Key, Value))
-> Maybe [MetricDestinationProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [MetricDestinationProperty]
metricDestinations,
                            Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SessionSampleRate" (Value Double -> (Key, Value))
-> Maybe (Value Double) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Double)
sessionSampleRate,
                            Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Telemetries" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
telemetries])}
instance JSON.ToJSON AppMonitorConfigurationProperty where
  toJSON :: AppMonitorConfigurationProperty -> Value
toJSON AppMonitorConfigurationProperty {Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AppMonitorConfigurationProperty -> ()
allowCookies :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
enableXRay :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
excludedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
favoritePages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
guestRoleArn :: AppMonitorConfigurationProperty -> Maybe (Value Text)
identityPoolId :: AppMonitorConfigurationProperty -> Maybe (Value Text)
includedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
metricDestinations :: AppMonitorConfigurationProperty
-> Maybe [MetricDestinationProperty]
sessionSampleRate :: AppMonitorConfigurationProperty -> Maybe (Value Double)
telemetries :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
    = [(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 -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"AllowCookies" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
allowCookies,
               Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnableXRay" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
enableXRay,
               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ExcludedPages" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
excludedPages,
               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"FavoritePages" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
favoritePages,
               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..=) Key
"GuestRoleArn" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
guestRoleArn,
               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..=) Key
"IdentityPoolId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
identityPoolId,
               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"IncludedPages" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
includedPages,
               Key -> [MetricDestinationProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MetricDestinations" ([MetricDestinationProperty] -> (Key, Value))
-> Maybe [MetricDestinationProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [MetricDestinationProperty]
metricDestinations,
               Key -> Value Double -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"SessionSampleRate" (Value Double -> (Key, Value))
-> Maybe (Value Double) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Double)
sessionSampleRate,
               Key -> ValueList Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Telemetries" (ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
telemetries]))
instance Property "AllowCookies" AppMonitorConfigurationProperty where
  type PropertyType "AllowCookies" AppMonitorConfigurationProperty = Value Prelude.Bool
  set :: PropertyType "AllowCookies" AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
set PropertyType "AllowCookies" AppMonitorConfigurationProperty
newValue AppMonitorConfigurationProperty {Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AppMonitorConfigurationProperty -> ()
allowCookies :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
enableXRay :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
excludedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
favoritePages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
guestRoleArn :: AppMonitorConfigurationProperty -> Maybe (Value Text)
identityPoolId :: AppMonitorConfigurationProperty -> Maybe (Value Text)
includedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
metricDestinations :: AppMonitorConfigurationProperty
-> Maybe [MetricDestinationProperty]
sessionSampleRate :: AppMonitorConfigurationProperty -> Maybe (Value Double)
telemetries :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
    = AppMonitorConfigurationProperty
        {allowCookies :: Maybe (Value Bool)
allowCookies = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AllowCookies" AppMonitorConfigurationProperty
Value Bool
newValue, Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
haddock_workaround_ :: ()
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
instance Property "EnableXRay" AppMonitorConfigurationProperty where
  type PropertyType "EnableXRay" AppMonitorConfigurationProperty = Value Prelude.Bool
  set :: PropertyType "EnableXRay" AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
set PropertyType "EnableXRay" AppMonitorConfigurationProperty
newValue AppMonitorConfigurationProperty {Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AppMonitorConfigurationProperty -> ()
allowCookies :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
enableXRay :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
excludedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
favoritePages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
guestRoleArn :: AppMonitorConfigurationProperty -> Maybe (Value Text)
identityPoolId :: AppMonitorConfigurationProperty -> Maybe (Value Text)
includedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
metricDestinations :: AppMonitorConfigurationProperty
-> Maybe [MetricDestinationProperty]
sessionSampleRate :: AppMonitorConfigurationProperty -> Maybe (Value Double)
telemetries :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
    = AppMonitorConfigurationProperty
        {enableXRay :: Maybe (Value Bool)
enableXRay = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EnableXRay" AppMonitorConfigurationProperty
Value Bool
newValue, Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
instance Property "ExcludedPages" AppMonitorConfigurationProperty where
  type PropertyType "ExcludedPages" AppMonitorConfigurationProperty = ValueList Prelude.Text
  set :: PropertyType "ExcludedPages" AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
set PropertyType "ExcludedPages" AppMonitorConfigurationProperty
newValue AppMonitorConfigurationProperty {Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AppMonitorConfigurationProperty -> ()
allowCookies :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
enableXRay :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
excludedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
favoritePages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
guestRoleArn :: AppMonitorConfigurationProperty -> Maybe (Value Text)
identityPoolId :: AppMonitorConfigurationProperty -> Maybe (Value Text)
includedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
metricDestinations :: AppMonitorConfigurationProperty
-> Maybe [MetricDestinationProperty]
sessionSampleRate :: AppMonitorConfigurationProperty -> Maybe (Value Double)
telemetries :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
    = AppMonitorConfigurationProperty
        {excludedPages :: Maybe (ValueList Text)
excludedPages = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ExcludedPages" AppMonitorConfigurationProperty
ValueList Text
newValue, Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
instance Property "FavoritePages" AppMonitorConfigurationProperty where
  type PropertyType "FavoritePages" AppMonitorConfigurationProperty = ValueList Prelude.Text
  set :: PropertyType "FavoritePages" AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
set PropertyType "FavoritePages" AppMonitorConfigurationProperty
newValue AppMonitorConfigurationProperty {Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AppMonitorConfigurationProperty -> ()
allowCookies :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
enableXRay :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
excludedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
favoritePages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
guestRoleArn :: AppMonitorConfigurationProperty -> Maybe (Value Text)
identityPoolId :: AppMonitorConfigurationProperty -> Maybe (Value Text)
includedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
metricDestinations :: AppMonitorConfigurationProperty
-> Maybe [MetricDestinationProperty]
sessionSampleRate :: AppMonitorConfigurationProperty -> Maybe (Value Double)
telemetries :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
    = AppMonitorConfigurationProperty
        {favoritePages :: Maybe (ValueList Text)
favoritePages = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "FavoritePages" AppMonitorConfigurationProperty
ValueList Text
newValue, Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
instance Property "GuestRoleArn" AppMonitorConfigurationProperty where
  type PropertyType "GuestRoleArn" AppMonitorConfigurationProperty = Value Prelude.Text
  set :: PropertyType "GuestRoleArn" AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
set PropertyType "GuestRoleArn" AppMonitorConfigurationProperty
newValue AppMonitorConfigurationProperty {Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AppMonitorConfigurationProperty -> ()
allowCookies :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
enableXRay :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
excludedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
favoritePages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
guestRoleArn :: AppMonitorConfigurationProperty -> Maybe (Value Text)
identityPoolId :: AppMonitorConfigurationProperty -> Maybe (Value Text)
includedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
metricDestinations :: AppMonitorConfigurationProperty
-> Maybe [MetricDestinationProperty]
sessionSampleRate :: AppMonitorConfigurationProperty -> Maybe (Value Double)
telemetries :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
    = AppMonitorConfigurationProperty
        {guestRoleArn :: Maybe (Value Text)
guestRoleArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "GuestRoleArn" AppMonitorConfigurationProperty
Value Text
newValue, Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
instance Property "IdentityPoolId" AppMonitorConfigurationProperty where
  type PropertyType "IdentityPoolId" AppMonitorConfigurationProperty = Value Prelude.Text
  set :: PropertyType "IdentityPoolId" AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
set PropertyType "IdentityPoolId" AppMonitorConfigurationProperty
newValue AppMonitorConfigurationProperty {Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AppMonitorConfigurationProperty -> ()
allowCookies :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
enableXRay :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
excludedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
favoritePages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
guestRoleArn :: AppMonitorConfigurationProperty -> Maybe (Value Text)
identityPoolId :: AppMonitorConfigurationProperty -> Maybe (Value Text)
includedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
metricDestinations :: AppMonitorConfigurationProperty
-> Maybe [MetricDestinationProperty]
sessionSampleRate :: AppMonitorConfigurationProperty -> Maybe (Value Double)
telemetries :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
    = AppMonitorConfigurationProperty
        {identityPoolId :: Maybe (Value Text)
identityPoolId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "IdentityPoolId" AppMonitorConfigurationProperty
Value Text
newValue, Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
instance Property "IncludedPages" AppMonitorConfigurationProperty where
  type PropertyType "IncludedPages" AppMonitorConfigurationProperty = ValueList Prelude.Text
  set :: PropertyType "IncludedPages" AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
set PropertyType "IncludedPages" AppMonitorConfigurationProperty
newValue AppMonitorConfigurationProperty {Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AppMonitorConfigurationProperty -> ()
allowCookies :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
enableXRay :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
excludedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
favoritePages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
guestRoleArn :: AppMonitorConfigurationProperty -> Maybe (Value Text)
identityPoolId :: AppMonitorConfigurationProperty -> Maybe (Value Text)
includedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
metricDestinations :: AppMonitorConfigurationProperty
-> Maybe [MetricDestinationProperty]
sessionSampleRate :: AppMonitorConfigurationProperty -> Maybe (Value Double)
telemetries :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
    = AppMonitorConfigurationProperty
        {includedPages :: Maybe (ValueList Text)
includedPages = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "IncludedPages" AppMonitorConfigurationProperty
ValueList Text
newValue, Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
instance Property "MetricDestinations" AppMonitorConfigurationProperty where
  type PropertyType "MetricDestinations" AppMonitorConfigurationProperty = [MetricDestinationProperty]
  set :: PropertyType "MetricDestinations" AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
set PropertyType "MetricDestinations" AppMonitorConfigurationProperty
newValue AppMonitorConfigurationProperty {Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AppMonitorConfigurationProperty -> ()
allowCookies :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
enableXRay :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
excludedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
favoritePages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
guestRoleArn :: AppMonitorConfigurationProperty -> Maybe (Value Text)
identityPoolId :: AppMonitorConfigurationProperty -> Maybe (Value Text)
includedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
metricDestinations :: AppMonitorConfigurationProperty
-> Maybe [MetricDestinationProperty]
sessionSampleRate :: AppMonitorConfigurationProperty -> Maybe (Value Double)
telemetries :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
    = AppMonitorConfigurationProperty
        {metricDestinations :: Maybe [MetricDestinationProperty]
metricDestinations = [MetricDestinationProperty] -> Maybe [MetricDestinationProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [MetricDestinationProperty]
PropertyType "MetricDestinations" AppMonitorConfigurationProperty
newValue, Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
instance Property "SessionSampleRate" AppMonitorConfigurationProperty where
  type PropertyType "SessionSampleRate" AppMonitorConfigurationProperty = Value Prelude.Double
  set :: PropertyType "SessionSampleRate" AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
set PropertyType "SessionSampleRate" AppMonitorConfigurationProperty
newValue AppMonitorConfigurationProperty {Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AppMonitorConfigurationProperty -> ()
allowCookies :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
enableXRay :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
excludedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
favoritePages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
guestRoleArn :: AppMonitorConfigurationProperty -> Maybe (Value Text)
identityPoolId :: AppMonitorConfigurationProperty -> Maybe (Value Text)
includedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
metricDestinations :: AppMonitorConfigurationProperty
-> Maybe [MetricDestinationProperty]
sessionSampleRate :: AppMonitorConfigurationProperty -> Maybe (Value Double)
telemetries :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
    = AppMonitorConfigurationProperty
        {sessionSampleRate :: Maybe (Value Double)
sessionSampleRate = Value Double -> Maybe (Value Double)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SessionSampleRate" AppMonitorConfigurationProperty
Value Double
newValue, Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Text)
()
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
telemetries :: Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
telemetries :: Maybe (ValueList Text)
..}
instance Property "Telemetries" AppMonitorConfigurationProperty where
  type PropertyType "Telemetries" AppMonitorConfigurationProperty = ValueList Prelude.Text
  set :: PropertyType "Telemetries" AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
-> AppMonitorConfigurationProperty
set PropertyType "Telemetries" AppMonitorConfigurationProperty
newValue AppMonitorConfigurationProperty {Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: AppMonitorConfigurationProperty -> ()
allowCookies :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
enableXRay :: AppMonitorConfigurationProperty -> Maybe (Value Bool)
excludedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
favoritePages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
guestRoleArn :: AppMonitorConfigurationProperty -> Maybe (Value Text)
identityPoolId :: AppMonitorConfigurationProperty -> Maybe (Value Text)
includedPages :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
metricDestinations :: AppMonitorConfigurationProperty
-> Maybe [MetricDestinationProperty]
sessionSampleRate :: AppMonitorConfigurationProperty -> Maybe (Value Double)
telemetries :: AppMonitorConfigurationProperty -> Maybe (ValueList Text)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
telemetries :: Maybe (ValueList Text)
..}
    = AppMonitorConfigurationProperty
        {telemetries :: Maybe (ValueList Text)
telemetries = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Telemetries" AppMonitorConfigurationProperty
ValueList Text
newValue, Maybe [MetricDestinationProperty]
Maybe (ValueList Text)
Maybe (Value Bool)
Maybe (Value Double)
Maybe (Value Text)
()
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
haddock_workaround_ :: ()
allowCookies :: Maybe (Value Bool)
enableXRay :: Maybe (Value Bool)
excludedPages :: Maybe (ValueList Text)
favoritePages :: Maybe (ValueList Text)
guestRoleArn :: Maybe (Value Text)
identityPoolId :: Maybe (Value Text)
includedPages :: Maybe (ValueList Text)
metricDestinations :: Maybe [MetricDestinationProperty]
sessionSampleRate :: Maybe (Value Double)
..}