packages feed

stratosphere 0.57.0 → 0.58.0

raw patch · 64 files changed

+2474/−127 lines, 64 files

Files

CHANGELOG.md view
@@ -1,5 +1,11 @@ # Change Log +## 0.58.0++* Update resource specification document to version 17.0.0+* Added `.cabal` files to repo (#179)+* Added `PATCH` constructor for `HttpMethod` (#176)+ ## 0.57.0  * Update resource specification document to version 16.3.0
+ library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationAlarm.hs view
@@ -0,0 +1,46 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-alarm.html++module Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarm where++import Stratosphere.ResourceImports+++-- | Full data type definition for ApplicationInsightsApplicationAlarm. See+-- 'applicationInsightsApplicationAlarm' for a more convenient constructor.+data ApplicationInsightsApplicationAlarm =+  ApplicationInsightsApplicationAlarm+  { _applicationInsightsApplicationAlarmAlarmName :: Val Text+  , _applicationInsightsApplicationAlarmSeverity :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON ApplicationInsightsApplicationAlarm where+  toJSON ApplicationInsightsApplicationAlarm{..} =+    object $+    catMaybes+    [ (Just . ("AlarmName",) . toJSON) _applicationInsightsApplicationAlarmAlarmName+    , fmap (("Severity",) . toJSON) _applicationInsightsApplicationAlarmSeverity+    ]++-- | Constructor for 'ApplicationInsightsApplicationAlarm' containing required+-- fields as arguments.+applicationInsightsApplicationAlarm+  :: Val Text -- ^ 'aiaaAlarmName'+  -> ApplicationInsightsApplicationAlarm+applicationInsightsApplicationAlarm alarmNamearg =+  ApplicationInsightsApplicationAlarm+  { _applicationInsightsApplicationAlarmAlarmName = alarmNamearg+  , _applicationInsightsApplicationAlarmSeverity = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-alarm.html#cfn-applicationinsights-application-alarm-alarmname+aiaaAlarmName :: Lens' ApplicationInsightsApplicationAlarm (Val Text)+aiaaAlarmName = lens _applicationInsightsApplicationAlarmAlarmName (\s a -> s { _applicationInsightsApplicationAlarmAlarmName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-alarm.html#cfn-applicationinsights-application-alarm-severity+aiaaSeverity :: Lens' ApplicationInsightsApplicationAlarm (Maybe (Val Text))+aiaaSeverity = lens _applicationInsightsApplicationAlarmSeverity (\s a -> s { _applicationInsightsApplicationAlarmSeverity = a })
+ library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationAlarmMetric.hs view
@@ -0,0 +1,40 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-alarmmetric.html++module Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarmMetric where++import Stratosphere.ResourceImports+++-- | Full data type definition for ApplicationInsightsApplicationAlarmMetric.+-- See 'applicationInsightsApplicationAlarmMetric' for a more convenient+-- constructor.+data ApplicationInsightsApplicationAlarmMetric =+  ApplicationInsightsApplicationAlarmMetric+  { _applicationInsightsApplicationAlarmMetricAlarmMetricName :: Val Text+  } deriving (Show, Eq)++instance ToJSON ApplicationInsightsApplicationAlarmMetric where+  toJSON ApplicationInsightsApplicationAlarmMetric{..} =+    object $+    catMaybes+    [ (Just . ("AlarmMetricName",) . toJSON) _applicationInsightsApplicationAlarmMetricAlarmMetricName+    ]++-- | Constructor for 'ApplicationInsightsApplicationAlarmMetric' containing+-- required fields as arguments.+applicationInsightsApplicationAlarmMetric+  :: Val Text -- ^ 'aiaamAlarmMetricName'+  -> ApplicationInsightsApplicationAlarmMetric+applicationInsightsApplicationAlarmMetric alarmMetricNamearg =+  ApplicationInsightsApplicationAlarmMetric+  { _applicationInsightsApplicationAlarmMetricAlarmMetricName = alarmMetricNamearg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-alarmmetric.html#cfn-applicationinsights-application-alarmmetric-alarmmetricname+aiaamAlarmMetricName :: Lens' ApplicationInsightsApplicationAlarmMetric (Val Text)+aiaamAlarmMetricName = lens _applicationInsightsApplicationAlarmMetricAlarmMetricName (\s a -> s { _applicationInsightsApplicationAlarmMetricAlarmMetricName = a })
+ library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationComponentConfiguration.hs view
@@ -0,0 +1,48 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentconfiguration.html++module Stratosphere.ResourceProperties.ApplicationInsightsApplicationComponentConfiguration where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationConfigurationDetails+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationSubComponentTypeConfiguration++-- | Full data type definition for+-- ApplicationInsightsApplicationComponentConfiguration. See+-- 'applicationInsightsApplicationComponentConfiguration' for a more+-- convenient constructor.+data ApplicationInsightsApplicationComponentConfiguration =+  ApplicationInsightsApplicationComponentConfiguration+  { _applicationInsightsApplicationComponentConfigurationConfigurationDetails :: Maybe ApplicationInsightsApplicationConfigurationDetails+  , _applicationInsightsApplicationComponentConfigurationSubComponentTypeConfigurations :: Maybe [ApplicationInsightsApplicationSubComponentTypeConfiguration]+  } deriving (Show, Eq)++instance ToJSON ApplicationInsightsApplicationComponentConfiguration where+  toJSON ApplicationInsightsApplicationComponentConfiguration{..} =+    object $+    catMaybes+    [ fmap (("ConfigurationDetails",) . toJSON) _applicationInsightsApplicationComponentConfigurationConfigurationDetails+    , fmap (("SubComponentTypeConfigurations",) . toJSON) _applicationInsightsApplicationComponentConfigurationSubComponentTypeConfigurations+    ]++-- | Constructor for 'ApplicationInsightsApplicationComponentConfiguration'+-- containing required fields as arguments.+applicationInsightsApplicationComponentConfiguration+  :: ApplicationInsightsApplicationComponentConfiguration+applicationInsightsApplicationComponentConfiguration  =+  ApplicationInsightsApplicationComponentConfiguration+  { _applicationInsightsApplicationComponentConfigurationConfigurationDetails = Nothing+  , _applicationInsightsApplicationComponentConfigurationSubComponentTypeConfigurations = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentconfiguration.html#cfn-applicationinsights-application-componentconfiguration-configurationdetails+aiaccConfigurationDetails :: Lens' ApplicationInsightsApplicationComponentConfiguration (Maybe ApplicationInsightsApplicationConfigurationDetails)+aiaccConfigurationDetails = lens _applicationInsightsApplicationComponentConfigurationConfigurationDetails (\s a -> s { _applicationInsightsApplicationComponentConfigurationConfigurationDetails = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentconfiguration.html#cfn-applicationinsights-application-componentconfiguration-subcomponenttypeconfigurations+aiaccSubComponentTypeConfigurations :: Lens' ApplicationInsightsApplicationComponentConfiguration (Maybe [ApplicationInsightsApplicationSubComponentTypeConfiguration])+aiaccSubComponentTypeConfigurations = lens _applicationInsightsApplicationComponentConfigurationSubComponentTypeConfigurations (\s a -> s { _applicationInsightsApplicationComponentConfigurationSubComponentTypeConfigurations = a })
+ library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationComponentMonitoringSetting.hs view
@@ -0,0 +1,76 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html++module Stratosphere.ResourceProperties.ApplicationInsightsApplicationComponentMonitoringSetting where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationComponentConfiguration++-- | Full data type definition for+-- ApplicationInsightsApplicationComponentMonitoringSetting. See+-- 'applicationInsightsApplicationComponentMonitoringSetting' for a more+-- convenient constructor.+data ApplicationInsightsApplicationComponentMonitoringSetting =+  ApplicationInsightsApplicationComponentMonitoringSetting+  { _applicationInsightsApplicationComponentMonitoringSettingComponentARN :: Maybe (Val Text)+  , _applicationInsightsApplicationComponentMonitoringSettingComponentConfigurationMode :: Maybe (Val Text)+  , _applicationInsightsApplicationComponentMonitoringSettingComponentName :: Maybe (Val Text)+  , _applicationInsightsApplicationComponentMonitoringSettingCustomComponentConfiguration :: Maybe ApplicationInsightsApplicationComponentConfiguration+  , _applicationInsightsApplicationComponentMonitoringSettingDefaultOverwriteComponentConfiguration :: Maybe ApplicationInsightsApplicationComponentConfiguration+  , _applicationInsightsApplicationComponentMonitoringSettingTier :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON ApplicationInsightsApplicationComponentMonitoringSetting where+  toJSON ApplicationInsightsApplicationComponentMonitoringSetting{..} =+    object $+    catMaybes+    [ fmap (("ComponentARN",) . toJSON) _applicationInsightsApplicationComponentMonitoringSettingComponentARN+    , fmap (("ComponentConfigurationMode",) . toJSON) _applicationInsightsApplicationComponentMonitoringSettingComponentConfigurationMode+    , fmap (("ComponentName",) . toJSON) _applicationInsightsApplicationComponentMonitoringSettingComponentName+    , fmap (("CustomComponentConfiguration",) . toJSON) _applicationInsightsApplicationComponentMonitoringSettingCustomComponentConfiguration+    , fmap (("DefaultOverwriteComponentConfiguration",) . toJSON) _applicationInsightsApplicationComponentMonitoringSettingDefaultOverwriteComponentConfiguration+    , fmap (("Tier",) . toJSON) _applicationInsightsApplicationComponentMonitoringSettingTier+    ]++-- | Constructor for+-- 'ApplicationInsightsApplicationComponentMonitoringSetting' containing+-- required fields as arguments.+applicationInsightsApplicationComponentMonitoringSetting+  :: ApplicationInsightsApplicationComponentMonitoringSetting+applicationInsightsApplicationComponentMonitoringSetting  =+  ApplicationInsightsApplicationComponentMonitoringSetting+  { _applicationInsightsApplicationComponentMonitoringSettingComponentARN = Nothing+  , _applicationInsightsApplicationComponentMonitoringSettingComponentConfigurationMode = Nothing+  , _applicationInsightsApplicationComponentMonitoringSettingComponentName = Nothing+  , _applicationInsightsApplicationComponentMonitoringSettingCustomComponentConfiguration = Nothing+  , _applicationInsightsApplicationComponentMonitoringSettingDefaultOverwriteComponentConfiguration = Nothing+  , _applicationInsightsApplicationComponentMonitoringSettingTier = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html#cfn-applicationinsights-application-componentmonitoringsetting-componentarn+aiacmsComponentARN :: Lens' ApplicationInsightsApplicationComponentMonitoringSetting (Maybe (Val Text))+aiacmsComponentARN = lens _applicationInsightsApplicationComponentMonitoringSettingComponentARN (\s a -> s { _applicationInsightsApplicationComponentMonitoringSettingComponentARN = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html#cfn-applicationinsights-application-componentmonitoringsetting-componentconfigurationmode+aiacmsComponentConfigurationMode :: Lens' ApplicationInsightsApplicationComponentMonitoringSetting (Maybe (Val Text))+aiacmsComponentConfigurationMode = lens _applicationInsightsApplicationComponentMonitoringSettingComponentConfigurationMode (\s a -> s { _applicationInsightsApplicationComponentMonitoringSettingComponentConfigurationMode = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html#cfn-applicationinsights-application-componentmonitoringsetting-componentname+aiacmsComponentName :: Lens' ApplicationInsightsApplicationComponentMonitoringSetting (Maybe (Val Text))+aiacmsComponentName = lens _applicationInsightsApplicationComponentMonitoringSettingComponentName (\s a -> s { _applicationInsightsApplicationComponentMonitoringSettingComponentName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html#cfn-applicationinsights-application-componentmonitoringsetting-customcomponentconfiguration+aiacmsCustomComponentConfiguration :: Lens' ApplicationInsightsApplicationComponentMonitoringSetting (Maybe ApplicationInsightsApplicationComponentConfiguration)+aiacmsCustomComponentConfiguration = lens _applicationInsightsApplicationComponentMonitoringSettingCustomComponentConfiguration (\s a -> s { _applicationInsightsApplicationComponentMonitoringSettingCustomComponentConfiguration = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html#cfn-applicationinsights-application-componentmonitoringsetting-defaultoverwritecomponentconfiguration+aiacmsDefaultOverwriteComponentConfiguration :: Lens' ApplicationInsightsApplicationComponentMonitoringSetting (Maybe ApplicationInsightsApplicationComponentConfiguration)+aiacmsDefaultOverwriteComponentConfiguration = lens _applicationInsightsApplicationComponentMonitoringSettingDefaultOverwriteComponentConfiguration (\s a -> s { _applicationInsightsApplicationComponentMonitoringSettingDefaultOverwriteComponentConfiguration = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-componentmonitoringsetting.html#cfn-applicationinsights-application-componentmonitoringsetting-tier+aiacmsTier :: Lens' ApplicationInsightsApplicationComponentMonitoringSetting (Maybe (Val Text))+aiacmsTier = lens _applicationInsightsApplicationComponentMonitoringSettingTier (\s a -> s { _applicationInsightsApplicationComponentMonitoringSettingTier = a })
+ library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationConfigurationDetails.hs view
@@ -0,0 +1,64 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-configurationdetails.html++module Stratosphere.ResourceProperties.ApplicationInsightsApplicationConfigurationDetails where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarmMetric+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarm+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationLog+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationWindowsEvent++-- | Full data type definition for+-- ApplicationInsightsApplicationConfigurationDetails. See+-- 'applicationInsightsApplicationConfigurationDetails' for a more+-- convenient constructor.+data ApplicationInsightsApplicationConfigurationDetails =+  ApplicationInsightsApplicationConfigurationDetails+  { _applicationInsightsApplicationConfigurationDetailsAlarmMetrics :: Maybe [ApplicationInsightsApplicationAlarmMetric]+  , _applicationInsightsApplicationConfigurationDetailsAlarms :: Maybe [ApplicationInsightsApplicationAlarm]+  , _applicationInsightsApplicationConfigurationDetailsLogs :: Maybe [ApplicationInsightsApplicationLog]+  , _applicationInsightsApplicationConfigurationDetailsWindowsEvents :: Maybe [ApplicationInsightsApplicationWindowsEvent]+  } deriving (Show, Eq)++instance ToJSON ApplicationInsightsApplicationConfigurationDetails where+  toJSON ApplicationInsightsApplicationConfigurationDetails{..} =+    object $+    catMaybes+    [ fmap (("AlarmMetrics",) . toJSON) _applicationInsightsApplicationConfigurationDetailsAlarmMetrics+    , fmap (("Alarms",) . toJSON) _applicationInsightsApplicationConfigurationDetailsAlarms+    , fmap (("Logs",) . toJSON) _applicationInsightsApplicationConfigurationDetailsLogs+    , fmap (("WindowsEvents",) . toJSON) _applicationInsightsApplicationConfigurationDetailsWindowsEvents+    ]++-- | Constructor for 'ApplicationInsightsApplicationConfigurationDetails'+-- containing required fields as arguments.+applicationInsightsApplicationConfigurationDetails+  :: ApplicationInsightsApplicationConfigurationDetails+applicationInsightsApplicationConfigurationDetails  =+  ApplicationInsightsApplicationConfigurationDetails+  { _applicationInsightsApplicationConfigurationDetailsAlarmMetrics = Nothing+  , _applicationInsightsApplicationConfigurationDetailsAlarms = Nothing+  , _applicationInsightsApplicationConfigurationDetailsLogs = Nothing+  , _applicationInsightsApplicationConfigurationDetailsWindowsEvents = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-configurationdetails.html#cfn-applicationinsights-application-configurationdetails-alarmmetrics+aiacdAlarmMetrics :: Lens' ApplicationInsightsApplicationConfigurationDetails (Maybe [ApplicationInsightsApplicationAlarmMetric])+aiacdAlarmMetrics = lens _applicationInsightsApplicationConfigurationDetailsAlarmMetrics (\s a -> s { _applicationInsightsApplicationConfigurationDetailsAlarmMetrics = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-configurationdetails.html#cfn-applicationinsights-application-configurationdetails-alarms+aiacdAlarms :: Lens' ApplicationInsightsApplicationConfigurationDetails (Maybe [ApplicationInsightsApplicationAlarm])+aiacdAlarms = lens _applicationInsightsApplicationConfigurationDetailsAlarms (\s a -> s { _applicationInsightsApplicationConfigurationDetailsAlarms = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-configurationdetails.html#cfn-applicationinsights-application-configurationdetails-logs+aiacdLogs :: Lens' ApplicationInsightsApplicationConfigurationDetails (Maybe [ApplicationInsightsApplicationLog])+aiacdLogs = lens _applicationInsightsApplicationConfigurationDetailsLogs (\s a -> s { _applicationInsightsApplicationConfigurationDetailsLogs = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-configurationdetails.html#cfn-applicationinsights-application-configurationdetails-windowsevents+aiacdWindowsEvents :: Lens' ApplicationInsightsApplicationConfigurationDetails (Maybe [ApplicationInsightsApplicationWindowsEvent])+aiacdWindowsEvents = lens _applicationInsightsApplicationConfigurationDetailsWindowsEvents (\s a -> s { _applicationInsightsApplicationConfigurationDetailsWindowsEvents = a })
+ library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationCustomComponent.hs view
@@ -0,0 +1,49 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-customcomponent.html++module Stratosphere.ResourceProperties.ApplicationInsightsApplicationCustomComponent where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- ApplicationInsightsApplicationCustomComponent. See+-- 'applicationInsightsApplicationCustomComponent' for a more convenient+-- constructor.+data ApplicationInsightsApplicationCustomComponent =+  ApplicationInsightsApplicationCustomComponent+  { _applicationInsightsApplicationCustomComponentComponentName :: Val Text+  , _applicationInsightsApplicationCustomComponentResourceList :: ValList Text+  } deriving (Show, Eq)++instance ToJSON ApplicationInsightsApplicationCustomComponent where+  toJSON ApplicationInsightsApplicationCustomComponent{..} =+    object $+    catMaybes+    [ (Just . ("ComponentName",) . toJSON) _applicationInsightsApplicationCustomComponentComponentName+    , (Just . ("ResourceList",) . toJSON) _applicationInsightsApplicationCustomComponentResourceList+    ]++-- | Constructor for 'ApplicationInsightsApplicationCustomComponent'+-- containing required fields as arguments.+applicationInsightsApplicationCustomComponent+  :: Val Text -- ^ 'aiaccComponentName'+  -> ValList Text -- ^ 'aiaccResourceList'+  -> ApplicationInsightsApplicationCustomComponent+applicationInsightsApplicationCustomComponent componentNamearg resourceListarg =+  ApplicationInsightsApplicationCustomComponent+  { _applicationInsightsApplicationCustomComponentComponentName = componentNamearg+  , _applicationInsightsApplicationCustomComponentResourceList = resourceListarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-customcomponent.html#cfn-applicationinsights-application-customcomponent-componentname+aiaccComponentName :: Lens' ApplicationInsightsApplicationCustomComponent (Val Text)+aiaccComponentName = lens _applicationInsightsApplicationCustomComponentComponentName (\s a -> s { _applicationInsightsApplicationCustomComponentComponentName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-customcomponent.html#cfn-applicationinsights-application-customcomponent-resourcelist+aiaccResourceList :: Lens' ApplicationInsightsApplicationCustomComponent (ValList Text)+aiaccResourceList = lens _applicationInsightsApplicationCustomComponentResourceList (\s a -> s { _applicationInsightsApplicationCustomComponentResourceList = a })
+ library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationLog.hs view
@@ -0,0 +1,67 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-log.html++module Stratosphere.ResourceProperties.ApplicationInsightsApplicationLog where++import Stratosphere.ResourceImports+++-- | Full data type definition for ApplicationInsightsApplicationLog. See+-- 'applicationInsightsApplicationLog' for a more convenient constructor.+data ApplicationInsightsApplicationLog =+  ApplicationInsightsApplicationLog+  { _applicationInsightsApplicationLogEncoding :: Maybe (Val Text)+  , _applicationInsightsApplicationLogLogGroupName :: Maybe (Val Text)+  , _applicationInsightsApplicationLogLogPath :: Maybe (Val Text)+  , _applicationInsightsApplicationLogLogType :: Val Text+  , _applicationInsightsApplicationLogPatternSet :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON ApplicationInsightsApplicationLog where+  toJSON ApplicationInsightsApplicationLog{..} =+    object $+    catMaybes+    [ fmap (("Encoding",) . toJSON) _applicationInsightsApplicationLogEncoding+    , fmap (("LogGroupName",) . toJSON) _applicationInsightsApplicationLogLogGroupName+    , fmap (("LogPath",) . toJSON) _applicationInsightsApplicationLogLogPath+    , (Just . ("LogType",) . toJSON) _applicationInsightsApplicationLogLogType+    , fmap (("PatternSet",) . toJSON) _applicationInsightsApplicationLogPatternSet+    ]++-- | Constructor for 'ApplicationInsightsApplicationLog' containing required+-- fields as arguments.+applicationInsightsApplicationLog+  :: Val Text -- ^ 'aialLogType'+  -> ApplicationInsightsApplicationLog+applicationInsightsApplicationLog logTypearg =+  ApplicationInsightsApplicationLog+  { _applicationInsightsApplicationLogEncoding = Nothing+  , _applicationInsightsApplicationLogLogGroupName = Nothing+  , _applicationInsightsApplicationLogLogPath = Nothing+  , _applicationInsightsApplicationLogLogType = logTypearg+  , _applicationInsightsApplicationLogPatternSet = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-log.html#cfn-applicationinsights-application-log-encoding+aialEncoding :: Lens' ApplicationInsightsApplicationLog (Maybe (Val Text))+aialEncoding = lens _applicationInsightsApplicationLogEncoding (\s a -> s { _applicationInsightsApplicationLogEncoding = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-log.html#cfn-applicationinsights-application-log-loggroupname+aialLogGroupName :: Lens' ApplicationInsightsApplicationLog (Maybe (Val Text))+aialLogGroupName = lens _applicationInsightsApplicationLogLogGroupName (\s a -> s { _applicationInsightsApplicationLogLogGroupName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-log.html#cfn-applicationinsights-application-log-logpath+aialLogPath :: Lens' ApplicationInsightsApplicationLog (Maybe (Val Text))+aialLogPath = lens _applicationInsightsApplicationLogLogPath (\s a -> s { _applicationInsightsApplicationLogLogPath = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-log.html#cfn-applicationinsights-application-log-logtype+aialLogType :: Lens' ApplicationInsightsApplicationLog (Val Text)+aialLogType = lens _applicationInsightsApplicationLogLogType (\s a -> s { _applicationInsightsApplicationLogLogType = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-log.html#cfn-applicationinsights-application-log-patternset+aialPatternSet :: Lens' ApplicationInsightsApplicationLog (Maybe (Val Text))+aialPatternSet = lens _applicationInsightsApplicationLogPatternSet (\s a -> s { _applicationInsightsApplicationLogPatternSet = a })
+ library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationLogPattern.hs view
@@ -0,0 +1,56 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpattern.html++module Stratosphere.ResourceProperties.ApplicationInsightsApplicationLogPattern where++import Stratosphere.ResourceImports+++-- | Full data type definition for ApplicationInsightsApplicationLogPattern.+-- See 'applicationInsightsApplicationLogPattern' for a more convenient+-- constructor.+data ApplicationInsightsApplicationLogPattern =+  ApplicationInsightsApplicationLogPattern+  { _applicationInsightsApplicationLogPatternPattern :: Val Text+  , _applicationInsightsApplicationLogPatternPatternName :: Val Text+  , _applicationInsightsApplicationLogPatternRank :: Val Integer+  } deriving (Show, Eq)++instance ToJSON ApplicationInsightsApplicationLogPattern where+  toJSON ApplicationInsightsApplicationLogPattern{..} =+    object $+    catMaybes+    [ (Just . ("Pattern",) . toJSON) _applicationInsightsApplicationLogPatternPattern+    , (Just . ("PatternName",) . toJSON) _applicationInsightsApplicationLogPatternPatternName+    , (Just . ("Rank",) . toJSON) _applicationInsightsApplicationLogPatternRank+    ]++-- | Constructor for 'ApplicationInsightsApplicationLogPattern' containing+-- required fields as arguments.+applicationInsightsApplicationLogPattern+  :: Val Text -- ^ 'aialpPattern'+  -> Val Text -- ^ 'aialpPatternName'+  -> Val Integer -- ^ 'aialpRank'+  -> ApplicationInsightsApplicationLogPattern+applicationInsightsApplicationLogPattern patternarg patternNamearg rankarg =+  ApplicationInsightsApplicationLogPattern+  { _applicationInsightsApplicationLogPatternPattern = patternarg+  , _applicationInsightsApplicationLogPatternPatternName = patternNamearg+  , _applicationInsightsApplicationLogPatternRank = rankarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpattern.html#cfn-applicationinsights-application-logpattern-pattern+aialpPattern :: Lens' ApplicationInsightsApplicationLogPattern (Val Text)+aialpPattern = lens _applicationInsightsApplicationLogPatternPattern (\s a -> s { _applicationInsightsApplicationLogPatternPattern = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpattern.html#cfn-applicationinsights-application-logpattern-patternname+aialpPatternName :: Lens' ApplicationInsightsApplicationLogPattern (Val Text)+aialpPatternName = lens _applicationInsightsApplicationLogPatternPatternName (\s a -> s { _applicationInsightsApplicationLogPatternPatternName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpattern.html#cfn-applicationinsights-application-logpattern-rank+aialpRank :: Lens' ApplicationInsightsApplicationLogPattern (Val Integer)+aialpRank = lens _applicationInsightsApplicationLogPatternRank (\s a -> s { _applicationInsightsApplicationLogPatternRank = a })
+ library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationLogPatternSet.hs view
@@ -0,0 +1,49 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpatternset.html++module Stratosphere.ResourceProperties.ApplicationInsightsApplicationLogPatternSet where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationLogPattern++-- | Full data type definition for+-- ApplicationInsightsApplicationLogPatternSet. See+-- 'applicationInsightsApplicationLogPatternSet' for a more convenient+-- constructor.+data ApplicationInsightsApplicationLogPatternSet =+  ApplicationInsightsApplicationLogPatternSet+  { _applicationInsightsApplicationLogPatternSetLogPatterns :: [ApplicationInsightsApplicationLogPattern]+  , _applicationInsightsApplicationLogPatternSetPatternSetName :: Val Text+  } deriving (Show, Eq)++instance ToJSON ApplicationInsightsApplicationLogPatternSet where+  toJSON ApplicationInsightsApplicationLogPatternSet{..} =+    object $+    catMaybes+    [ (Just . ("LogPatterns",) . toJSON) _applicationInsightsApplicationLogPatternSetLogPatterns+    , (Just . ("PatternSetName",) . toJSON) _applicationInsightsApplicationLogPatternSetPatternSetName+    ]++-- | Constructor for 'ApplicationInsightsApplicationLogPatternSet' containing+-- required fields as arguments.+applicationInsightsApplicationLogPatternSet+  :: [ApplicationInsightsApplicationLogPattern] -- ^ 'aialpsLogPatterns'+  -> Val Text -- ^ 'aialpsPatternSetName'+  -> ApplicationInsightsApplicationLogPatternSet+applicationInsightsApplicationLogPatternSet logPatternsarg patternSetNamearg =+  ApplicationInsightsApplicationLogPatternSet+  { _applicationInsightsApplicationLogPatternSetLogPatterns = logPatternsarg+  , _applicationInsightsApplicationLogPatternSetPatternSetName = patternSetNamearg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpatternset.html#cfn-applicationinsights-application-logpatternset-logpatterns+aialpsLogPatterns :: Lens' ApplicationInsightsApplicationLogPatternSet [ApplicationInsightsApplicationLogPattern]+aialpsLogPatterns = lens _applicationInsightsApplicationLogPatternSetLogPatterns (\s a -> s { _applicationInsightsApplicationLogPatternSetLogPatterns = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-logpatternset.html#cfn-applicationinsights-application-logpatternset-patternsetname+aialpsPatternSetName :: Lens' ApplicationInsightsApplicationLogPatternSet (Val Text)+aialpsPatternSetName = lens _applicationInsightsApplicationLogPatternSetPatternSetName (\s a -> s { _applicationInsightsApplicationLogPatternSetPatternSetName = a })
+ library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationSubComponentConfigurationDetails.hs view
@@ -0,0 +1,57 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponentconfigurationdetails.html++module Stratosphere.ResourceProperties.ApplicationInsightsApplicationSubComponentConfigurationDetails where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarmMetric+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationLog+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationWindowsEvent++-- | Full data type definition for+-- ApplicationInsightsApplicationSubComponentConfigurationDetails. See+-- 'applicationInsightsApplicationSubComponentConfigurationDetails' for a+-- more convenient constructor.+data ApplicationInsightsApplicationSubComponentConfigurationDetails =+  ApplicationInsightsApplicationSubComponentConfigurationDetails+  { _applicationInsightsApplicationSubComponentConfigurationDetailsAlarmMetrics :: Maybe [ApplicationInsightsApplicationAlarmMetric]+  , _applicationInsightsApplicationSubComponentConfigurationDetailsLogs :: Maybe [ApplicationInsightsApplicationLog]+  , _applicationInsightsApplicationSubComponentConfigurationDetailsWindowsEvents :: Maybe [ApplicationInsightsApplicationWindowsEvent]+  } deriving (Show, Eq)++instance ToJSON ApplicationInsightsApplicationSubComponentConfigurationDetails where+  toJSON ApplicationInsightsApplicationSubComponentConfigurationDetails{..} =+    object $+    catMaybes+    [ fmap (("AlarmMetrics",) . toJSON) _applicationInsightsApplicationSubComponentConfigurationDetailsAlarmMetrics+    , fmap (("Logs",) . toJSON) _applicationInsightsApplicationSubComponentConfigurationDetailsLogs+    , fmap (("WindowsEvents",) . toJSON) _applicationInsightsApplicationSubComponentConfigurationDetailsWindowsEvents+    ]++-- | Constructor for+-- 'ApplicationInsightsApplicationSubComponentConfigurationDetails'+-- containing required fields as arguments.+applicationInsightsApplicationSubComponentConfigurationDetails+  :: ApplicationInsightsApplicationSubComponentConfigurationDetails+applicationInsightsApplicationSubComponentConfigurationDetails  =+  ApplicationInsightsApplicationSubComponentConfigurationDetails+  { _applicationInsightsApplicationSubComponentConfigurationDetailsAlarmMetrics = Nothing+  , _applicationInsightsApplicationSubComponentConfigurationDetailsLogs = Nothing+  , _applicationInsightsApplicationSubComponentConfigurationDetailsWindowsEvents = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponentconfigurationdetails.html#cfn-applicationinsights-application-subcomponentconfigurationdetails-alarmmetrics+aiasccdAlarmMetrics :: Lens' ApplicationInsightsApplicationSubComponentConfigurationDetails (Maybe [ApplicationInsightsApplicationAlarmMetric])+aiasccdAlarmMetrics = lens _applicationInsightsApplicationSubComponentConfigurationDetailsAlarmMetrics (\s a -> s { _applicationInsightsApplicationSubComponentConfigurationDetailsAlarmMetrics = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponentconfigurationdetails.html#cfn-applicationinsights-application-subcomponentconfigurationdetails-logs+aiasccdLogs :: Lens' ApplicationInsightsApplicationSubComponentConfigurationDetails (Maybe [ApplicationInsightsApplicationLog])+aiasccdLogs = lens _applicationInsightsApplicationSubComponentConfigurationDetailsLogs (\s a -> s { _applicationInsightsApplicationSubComponentConfigurationDetailsLogs = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponentconfigurationdetails.html#cfn-applicationinsights-application-subcomponentconfigurationdetails-windowsevents+aiasccdWindowsEvents :: Lens' ApplicationInsightsApplicationSubComponentConfigurationDetails (Maybe [ApplicationInsightsApplicationWindowsEvent])+aiasccdWindowsEvents = lens _applicationInsightsApplicationSubComponentConfigurationDetailsWindowsEvents (\s a -> s { _applicationInsightsApplicationSubComponentConfigurationDetailsWindowsEvents = a })
+ library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationSubComponentTypeConfiguration.hs view
@@ -0,0 +1,50 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponenttypeconfiguration.html++module Stratosphere.ResourceProperties.ApplicationInsightsApplicationSubComponentTypeConfiguration where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationSubComponentConfigurationDetails++-- | Full data type definition for+-- ApplicationInsightsApplicationSubComponentTypeConfiguration. See+-- 'applicationInsightsApplicationSubComponentTypeConfiguration' for a more+-- convenient constructor.+data ApplicationInsightsApplicationSubComponentTypeConfiguration =+  ApplicationInsightsApplicationSubComponentTypeConfiguration+  { _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentConfigurationDetails :: ApplicationInsightsApplicationSubComponentConfigurationDetails+  , _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentType :: Val Text+  } deriving (Show, Eq)++instance ToJSON ApplicationInsightsApplicationSubComponentTypeConfiguration where+  toJSON ApplicationInsightsApplicationSubComponentTypeConfiguration{..} =+    object $+    catMaybes+    [ (Just . ("SubComponentConfigurationDetails",) . toJSON) _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentConfigurationDetails+    , (Just . ("SubComponentType",) . toJSON) _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentType+    ]++-- | Constructor for+-- 'ApplicationInsightsApplicationSubComponentTypeConfiguration' containing+-- required fields as arguments.+applicationInsightsApplicationSubComponentTypeConfiguration+  :: ApplicationInsightsApplicationSubComponentConfigurationDetails -- ^ 'aiasctcSubComponentConfigurationDetails'+  -> Val Text -- ^ 'aiasctcSubComponentType'+  -> ApplicationInsightsApplicationSubComponentTypeConfiguration+applicationInsightsApplicationSubComponentTypeConfiguration subComponentConfigurationDetailsarg subComponentTypearg =+  ApplicationInsightsApplicationSubComponentTypeConfiguration+  { _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentConfigurationDetails = subComponentConfigurationDetailsarg+  , _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentType = subComponentTypearg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponenttypeconfiguration.html#cfn-applicationinsights-application-subcomponenttypeconfiguration-subcomponentconfigurationdetails+aiasctcSubComponentConfigurationDetails :: Lens' ApplicationInsightsApplicationSubComponentTypeConfiguration ApplicationInsightsApplicationSubComponentConfigurationDetails+aiasctcSubComponentConfigurationDetails = lens _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentConfigurationDetails (\s a -> s { _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentConfigurationDetails = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-subcomponenttypeconfiguration.html#cfn-applicationinsights-application-subcomponenttypeconfiguration-subcomponenttype+aiasctcSubComponentType :: Lens' ApplicationInsightsApplicationSubComponentTypeConfiguration (Val Text)+aiasctcSubComponentType = lens _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentType (\s a -> s { _applicationInsightsApplicationSubComponentTypeConfigurationSubComponentType = a })
+ library-gen/Stratosphere/ResourceProperties/ApplicationInsightsApplicationWindowsEvent.hs view
@@ -0,0 +1,63 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-windowsevent.html++module Stratosphere.ResourceProperties.ApplicationInsightsApplicationWindowsEvent where++import Stratosphere.ResourceImports+++-- | Full data type definition for ApplicationInsightsApplicationWindowsEvent.+-- See 'applicationInsightsApplicationWindowsEvent' for a more convenient+-- constructor.+data ApplicationInsightsApplicationWindowsEvent =+  ApplicationInsightsApplicationWindowsEvent+  { _applicationInsightsApplicationWindowsEventEventLevels :: ValList Text+  , _applicationInsightsApplicationWindowsEventEventName :: Val Text+  , _applicationInsightsApplicationWindowsEventLogGroupName :: Val Text+  , _applicationInsightsApplicationWindowsEventPatternSet :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON ApplicationInsightsApplicationWindowsEvent where+  toJSON ApplicationInsightsApplicationWindowsEvent{..} =+    object $+    catMaybes+    [ (Just . ("EventLevels",) . toJSON) _applicationInsightsApplicationWindowsEventEventLevels+    , (Just . ("EventName",) . toJSON) _applicationInsightsApplicationWindowsEventEventName+    , (Just . ("LogGroupName",) . toJSON) _applicationInsightsApplicationWindowsEventLogGroupName+    , fmap (("PatternSet",) . toJSON) _applicationInsightsApplicationWindowsEventPatternSet+    ]++-- | Constructor for 'ApplicationInsightsApplicationWindowsEvent' containing+-- required fields as arguments.+applicationInsightsApplicationWindowsEvent+  :: ValList Text -- ^ 'aiaweEventLevels'+  -> Val Text -- ^ 'aiaweEventName'+  -> Val Text -- ^ 'aiaweLogGroupName'+  -> ApplicationInsightsApplicationWindowsEvent+applicationInsightsApplicationWindowsEvent eventLevelsarg eventNamearg logGroupNamearg =+  ApplicationInsightsApplicationWindowsEvent+  { _applicationInsightsApplicationWindowsEventEventLevels = eventLevelsarg+  , _applicationInsightsApplicationWindowsEventEventName = eventNamearg+  , _applicationInsightsApplicationWindowsEventLogGroupName = logGroupNamearg+  , _applicationInsightsApplicationWindowsEventPatternSet = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-windowsevent.html#cfn-applicationinsights-application-windowsevent-eventlevels+aiaweEventLevels :: Lens' ApplicationInsightsApplicationWindowsEvent (ValList Text)+aiaweEventLevels = lens _applicationInsightsApplicationWindowsEventEventLevels (\s a -> s { _applicationInsightsApplicationWindowsEventEventLevels = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-windowsevent.html#cfn-applicationinsights-application-windowsevent-eventname+aiaweEventName :: Lens' ApplicationInsightsApplicationWindowsEvent (Val Text)+aiaweEventName = lens _applicationInsightsApplicationWindowsEventEventName (\s a -> s { _applicationInsightsApplicationWindowsEventEventName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-windowsevent.html#cfn-applicationinsights-application-windowsevent-loggroupname+aiaweLogGroupName :: Lens' ApplicationInsightsApplicationWindowsEvent (Val Text)+aiaweLogGroupName = lens _applicationInsightsApplicationWindowsEventLogGroupName (\s a -> s { _applicationInsightsApplicationWindowsEventLogGroupName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-applicationinsights-application-windowsevent.html#cfn-applicationinsights-application-windowsevent-patternset+aiawePatternSet :: Lens' ApplicationInsightsApplicationWindowsEvent (Maybe (Val Text))+aiawePatternSet = lens _applicationInsightsApplicationWindowsEventPatternSet (\s a -> s { _applicationInsightsApplicationWindowsEventPatternSet = a })
library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryCode.hs view
@@ -14,14 +14,16 @@ -- 'codeCommitRepositoryCode' for a more convenient constructor. data CodeCommitRepositoryCode =   CodeCommitRepositoryCode-  { _codeCommitRepositoryCodeS3 :: CodeCommitRepositoryS3+  { _codeCommitRepositoryCodeBranchName :: Maybe (Val Text)+  , _codeCommitRepositoryCodeS3 :: CodeCommitRepositoryS3   } deriving (Show, Eq)  instance ToJSON CodeCommitRepositoryCode where   toJSON CodeCommitRepositoryCode{..} =     object $     catMaybes-    [ (Just . ("S3",) . toJSON) _codeCommitRepositoryCodeS3+    [ fmap (("BranchName",) . toJSON) _codeCommitRepositoryCodeBranchName+    , (Just . ("S3",) . toJSON) _codeCommitRepositoryCodeS3     ]  -- | Constructor for 'CodeCommitRepositoryCode' containing required fields as@@ -31,8 +33,13 @@   -> CodeCommitRepositoryCode codeCommitRepositoryCode s3arg =   CodeCommitRepositoryCode-  { _codeCommitRepositoryCodeS3 = s3arg+  { _codeCommitRepositoryCodeBranchName = Nothing+  , _codeCommitRepositoryCodeS3 = s3arg   }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-code.html#cfn-codecommit-repository-code-branchname+ccrcBranchName :: Lens' CodeCommitRepositoryCode (Maybe (Val Text))+ccrcBranchName = lens _codeCommitRepositoryCodeBranchName (\s a -> s { _codeCommitRepositoryCodeBranchName = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-codecommit-repository-code.html#cfn-codecommit-repository-code-s3 ccrcS3 :: Lens' CodeCommitRepositoryCode CodeCommitRepositoryS3
+ library-gen/Stratosphere/ResourceProperties/EC2CarrierGatewayTags.hs view
@@ -0,0 +1,38 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-carriergateway-tags.html++module Stratosphere.ResourceProperties.EC2CarrierGatewayTags where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.Tag++-- | Full data type definition for EC2CarrierGatewayTags. See+-- 'ec2CarrierGatewayTags' for a more convenient constructor.+data EC2CarrierGatewayTags =+  EC2CarrierGatewayTags+  { _eC2CarrierGatewayTagsTags :: Maybe [Tag]+  } deriving (Show, Eq)++instance ToJSON EC2CarrierGatewayTags where+  toJSON EC2CarrierGatewayTags{..} =+    object $+    catMaybes+    [ fmap (("Tags",) . toJSON) _eC2CarrierGatewayTagsTags+    ]++-- | Constructor for 'EC2CarrierGatewayTags' containing required fields as+-- arguments.+ec2CarrierGatewayTags+  :: EC2CarrierGatewayTags+ec2CarrierGatewayTags  =+  EC2CarrierGatewayTags+  { _eC2CarrierGatewayTagsTags = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ec2-carriergateway-tags.html#cfn-ec2-carriergateway-tags-tags+eccgtTags :: Lens' EC2CarrierGatewayTags (Maybe [Tag])+eccgtTags = lens _eC2CarrierGatewayTagsTags (\s a -> s { _eC2CarrierGatewayTagsTags = a })
− library-gen/Stratosphere/ResourceProperties/ECRRepositoryLifecyclePolicy.hs
@@ -1,45 +0,0 @@-{-# LANGUAGE OverloadedStrings #-}-{-# LANGUAGE RecordWildCards #-}-{-# LANGUAGE StrictData #-}-{-# LANGUAGE TupleSections #-}---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecr-repository-lifecyclepolicy.html--module Stratosphere.ResourceProperties.ECRRepositoryLifecyclePolicy where--import Stratosphere.ResourceImports----- | Full data type definition for ECRRepositoryLifecyclePolicy. See--- 'ecrRepositoryLifecyclePolicy' for a more convenient constructor.-data ECRRepositoryLifecyclePolicy =-  ECRRepositoryLifecyclePolicy-  { _eCRRepositoryLifecyclePolicyLifecyclePolicyText :: Maybe (Val Text)-  , _eCRRepositoryLifecyclePolicyRegistryId :: Maybe (Val Text)-  } deriving (Show, Eq)--instance ToJSON ECRRepositoryLifecyclePolicy where-  toJSON ECRRepositoryLifecyclePolicy{..} =-    object $-    catMaybes-    [ fmap (("LifecyclePolicyText",) . toJSON) _eCRRepositoryLifecyclePolicyLifecyclePolicyText-    , fmap (("RegistryId",) . toJSON) _eCRRepositoryLifecyclePolicyRegistryId-    ]---- | Constructor for 'ECRRepositoryLifecyclePolicy' containing required fields--- as arguments.-ecrRepositoryLifecyclePolicy-  :: ECRRepositoryLifecyclePolicy-ecrRepositoryLifecyclePolicy  =-  ECRRepositoryLifecyclePolicy-  { _eCRRepositoryLifecyclePolicyLifecyclePolicyText = Nothing-  , _eCRRepositoryLifecyclePolicyRegistryId = Nothing-  }---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecr-repository-lifecyclepolicy.html#cfn-ecr-repository-lifecyclepolicy-lifecyclepolicytext-ecrrlpLifecyclePolicyText :: Lens' ECRRepositoryLifecyclePolicy (Maybe (Val Text))-ecrrlpLifecyclePolicyText = lens _eCRRepositoryLifecyclePolicyLifecyclePolicyText (\s a -> s { _eCRRepositoryLifecyclePolicyLifecyclePolicyText = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecr-repository-lifecyclepolicy.html#cfn-ecr-repository-lifecyclepolicy-registryid-ecrrlpRegistryId :: Lens' ECRRepositoryLifecyclePolicy (Maybe (Val Text))-ecrrlpRegistryId = lens _eCRRepositoryLifecyclePolicyRegistryId (\s a -> s { _eCRRepositoryLifecyclePolicyRegistryId = a })
+ library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionAuthorizationConfig.hs view
@@ -0,0 +1,45 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-authorizationconfig.html++module Stratosphere.ResourceProperties.ECSTaskDefinitionAuthorizationConfig where++import Stratosphere.ResourceImports+++-- | Full data type definition for ECSTaskDefinitionAuthorizationConfig. See+-- 'ecsTaskDefinitionAuthorizationConfig' for a more convenient constructor.+data ECSTaskDefinitionAuthorizationConfig =+  ECSTaskDefinitionAuthorizationConfig+  { _eCSTaskDefinitionAuthorizationConfigAccessPointId :: Maybe (Val Text)+  , _eCSTaskDefinitionAuthorizationConfigIAM :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON ECSTaskDefinitionAuthorizationConfig where+  toJSON ECSTaskDefinitionAuthorizationConfig{..} =+    object $+    catMaybes+    [ fmap (("AccessPointId",) . toJSON) _eCSTaskDefinitionAuthorizationConfigAccessPointId+    , fmap (("IAM",) . toJSON) _eCSTaskDefinitionAuthorizationConfigIAM+    ]++-- | Constructor for 'ECSTaskDefinitionAuthorizationConfig' containing+-- required fields as arguments.+ecsTaskDefinitionAuthorizationConfig+  :: ECSTaskDefinitionAuthorizationConfig+ecsTaskDefinitionAuthorizationConfig  =+  ECSTaskDefinitionAuthorizationConfig+  { _eCSTaskDefinitionAuthorizationConfigAccessPointId = Nothing+  , _eCSTaskDefinitionAuthorizationConfigIAM = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-authorizationconfig.html#cfn-ecs-taskdefinition-authorizationconfig-accesspointid+ecstdacAccessPointId :: Lens' ECSTaskDefinitionAuthorizationConfig (Maybe (Val Text))+ecstdacAccessPointId = lens _eCSTaskDefinitionAuthorizationConfigAccessPointId (\s a -> s { _eCSTaskDefinitionAuthorizationConfigAccessPointId = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-authorizationconfig.html#cfn-ecs-taskdefinition-authorizationconfig-iam+ecstdacIAM :: Lens' ECSTaskDefinitionAuthorizationConfig (Maybe (Val Text))+ecstdacIAM = lens _eCSTaskDefinitionAuthorizationConfigIAM (\s a -> s { _eCSTaskDefinitionAuthorizationConfigIAM = a })
library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDefinition.hs view
@@ -10,6 +10,7 @@ import Stratosphere.ResourceImports import Stratosphere.ResourceProperties.ECSTaskDefinitionContainerDependency import Stratosphere.ResourceProperties.ECSTaskDefinitionKeyValuePair+import Stratosphere.ResourceProperties.ECSTaskDefinitionEnvironmentFile import Stratosphere.ResourceProperties.ECSTaskDefinitionHostEntry import Stratosphere.ResourceProperties.ECSTaskDefinitionFirelensConfiguration import Stratosphere.ResourceProperties.ECSTaskDefinitionHealthCheck@@ -38,6 +39,7 @@   , _eCSTaskDefinitionContainerDefinitionDockerSecurityOptions :: Maybe (ValList Text)   , _eCSTaskDefinitionContainerDefinitionEntryPoint :: Maybe (ValList Text)   , _eCSTaskDefinitionContainerDefinitionEnvironment :: Maybe [ECSTaskDefinitionKeyValuePair]+  , _eCSTaskDefinitionContainerDefinitionEnvironmentFiles :: Maybe [ECSTaskDefinitionEnvironmentFile]   , _eCSTaskDefinitionContainerDefinitionEssential :: Maybe (Val Bool)   , _eCSTaskDefinitionContainerDefinitionExtraHosts :: Maybe [ECSTaskDefinitionHostEntry]   , _eCSTaskDefinitionContainerDefinitionFirelensConfiguration :: Maybe ECSTaskDefinitionFirelensConfiguration@@ -82,6 +84,7 @@     , fmap (("DockerSecurityOptions",) . toJSON) _eCSTaskDefinitionContainerDefinitionDockerSecurityOptions     , fmap (("EntryPoint",) . toJSON) _eCSTaskDefinitionContainerDefinitionEntryPoint     , fmap (("Environment",) . toJSON) _eCSTaskDefinitionContainerDefinitionEnvironment+    , fmap (("EnvironmentFiles",) . toJSON) _eCSTaskDefinitionContainerDefinitionEnvironmentFiles     , fmap (("Essential",) . toJSON) _eCSTaskDefinitionContainerDefinitionEssential     , fmap (("ExtraHosts",) . toJSON) _eCSTaskDefinitionContainerDefinitionExtraHosts     , fmap (("FirelensConfiguration",) . toJSON) _eCSTaskDefinitionContainerDefinitionFirelensConfiguration@@ -130,6 +133,7 @@   , _eCSTaskDefinitionContainerDefinitionDockerSecurityOptions = Nothing   , _eCSTaskDefinitionContainerDefinitionEntryPoint = Nothing   , _eCSTaskDefinitionContainerDefinitionEnvironment = Nothing+  , _eCSTaskDefinitionContainerDefinitionEnvironmentFiles = Nothing   , _eCSTaskDefinitionContainerDefinitionEssential = Nothing   , _eCSTaskDefinitionContainerDefinitionExtraHosts = Nothing   , _eCSTaskDefinitionContainerDefinitionFirelensConfiguration = Nothing@@ -199,6 +203,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdefinitions.html#cfn-ecs-taskdefinition-containerdefinition-environment ecstdcdEnvironment :: Lens' ECSTaskDefinitionContainerDefinition (Maybe [ECSTaskDefinitionKeyValuePair]) ecstdcdEnvironment = lens _eCSTaskDefinitionContainerDefinitionEnvironment (\s a -> s { _eCSTaskDefinitionContainerDefinitionEnvironment = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdefinitions.html#cfn-ecs-taskdefinition-containerdefinition-environmentfiles+ecstdcdEnvironmentFiles :: Lens' ECSTaskDefinitionContainerDefinition (Maybe [ECSTaskDefinitionEnvironmentFile])+ecstdcdEnvironmentFiles = lens _eCSTaskDefinitionContainerDefinitionEnvironmentFiles (\s a -> s { _eCSTaskDefinitionContainerDefinitionEnvironmentFiles = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdefinitions.html#cfn-ecs-taskdefinition-containerdefinition-essential ecstdcdEssential :: Lens' ECSTaskDefinitionContainerDefinition (Maybe (Val Bool))
+ library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionEFSVolumeConfiguration.hs view
@@ -0,0 +1,68 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-efsvolumeconfiguration.html++module Stratosphere.ResourceProperties.ECSTaskDefinitionEFSVolumeConfiguration where++import Stratosphere.ResourceImports+++-- | Full data type definition for ECSTaskDefinitionEFSVolumeConfiguration.+-- See 'ecsTaskDefinitionEFSVolumeConfiguration' for a more convenient+-- constructor.+data ECSTaskDefinitionEFSVolumeConfiguration =+  ECSTaskDefinitionEFSVolumeConfiguration+  { _eCSTaskDefinitionEFSVolumeConfigurationAuthorizationConfig :: Maybe Object+  , _eCSTaskDefinitionEFSVolumeConfigurationFilesystemId :: Val Text+  , _eCSTaskDefinitionEFSVolumeConfigurationRootDirectory :: Maybe (Val Text)+  , _eCSTaskDefinitionEFSVolumeConfigurationTransitEncryption :: Maybe (Val Text)+  , _eCSTaskDefinitionEFSVolumeConfigurationTransitEncryptionPort :: Maybe (Val Integer)+  } deriving (Show, Eq)++instance ToJSON ECSTaskDefinitionEFSVolumeConfiguration where+  toJSON ECSTaskDefinitionEFSVolumeConfiguration{..} =+    object $+    catMaybes+    [ fmap (("AuthorizationConfig",) . toJSON) _eCSTaskDefinitionEFSVolumeConfigurationAuthorizationConfig+    , (Just . ("FilesystemId",) . toJSON) _eCSTaskDefinitionEFSVolumeConfigurationFilesystemId+    , fmap (("RootDirectory",) . toJSON) _eCSTaskDefinitionEFSVolumeConfigurationRootDirectory+    , fmap (("TransitEncryption",) . toJSON) _eCSTaskDefinitionEFSVolumeConfigurationTransitEncryption+    , fmap (("TransitEncryptionPort",) . toJSON) _eCSTaskDefinitionEFSVolumeConfigurationTransitEncryptionPort+    ]++-- | Constructor for 'ECSTaskDefinitionEFSVolumeConfiguration' containing+-- required fields as arguments.+ecsTaskDefinitionEFSVolumeConfiguration+  :: Val Text -- ^ 'ecstdefsvcFilesystemId'+  -> ECSTaskDefinitionEFSVolumeConfiguration+ecsTaskDefinitionEFSVolumeConfiguration filesystemIdarg =+  ECSTaskDefinitionEFSVolumeConfiguration+  { _eCSTaskDefinitionEFSVolumeConfigurationAuthorizationConfig = Nothing+  , _eCSTaskDefinitionEFSVolumeConfigurationFilesystemId = filesystemIdarg+  , _eCSTaskDefinitionEFSVolumeConfigurationRootDirectory = Nothing+  , _eCSTaskDefinitionEFSVolumeConfigurationTransitEncryption = Nothing+  , _eCSTaskDefinitionEFSVolumeConfigurationTransitEncryptionPort = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-efsvolumeconfiguration.html#cfn-ecs-taskdefinition-efsvolumeconfiguration-authorizationconfig+ecstdefsvcAuthorizationConfig :: Lens' ECSTaskDefinitionEFSVolumeConfiguration (Maybe Object)+ecstdefsvcAuthorizationConfig = lens _eCSTaskDefinitionEFSVolumeConfigurationAuthorizationConfig (\s a -> s { _eCSTaskDefinitionEFSVolumeConfigurationAuthorizationConfig = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-efsvolumeconfiguration.html#cfn-ecs-taskdefinition-efsvolumeconfiguration-filesystemid+ecstdefsvcFilesystemId :: Lens' ECSTaskDefinitionEFSVolumeConfiguration (Val Text)+ecstdefsvcFilesystemId = lens _eCSTaskDefinitionEFSVolumeConfigurationFilesystemId (\s a -> s { _eCSTaskDefinitionEFSVolumeConfigurationFilesystemId = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-efsvolumeconfiguration.html#cfn-ecs-taskdefinition-efsvolumeconfiguration-rootdirectory+ecstdefsvcRootDirectory :: Lens' ECSTaskDefinitionEFSVolumeConfiguration (Maybe (Val Text))+ecstdefsvcRootDirectory = lens _eCSTaskDefinitionEFSVolumeConfigurationRootDirectory (\s a -> s { _eCSTaskDefinitionEFSVolumeConfigurationRootDirectory = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-efsvolumeconfiguration.html#cfn-ecs-taskdefinition-efsvolumeconfiguration-transitencryption+ecstdefsvcTransitEncryption :: Lens' ECSTaskDefinitionEFSVolumeConfiguration (Maybe (Val Text))+ecstdefsvcTransitEncryption = lens _eCSTaskDefinitionEFSVolumeConfigurationTransitEncryption (\s a -> s { _eCSTaskDefinitionEFSVolumeConfigurationTransitEncryption = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-efsvolumeconfiguration.html#cfn-ecs-taskdefinition-efsvolumeconfiguration-transitencryptionport+ecstdefsvcTransitEncryptionPort :: Lens' ECSTaskDefinitionEFSVolumeConfiguration (Maybe (Val Integer))+ecstdefsvcTransitEncryptionPort = lens _eCSTaskDefinitionEFSVolumeConfigurationTransitEncryptionPort (\s a -> s { _eCSTaskDefinitionEFSVolumeConfigurationTransitEncryptionPort = a })
+ library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionEnvironmentFile.hs view
@@ -0,0 +1,45 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-environmentfile.html++module Stratosphere.ResourceProperties.ECSTaskDefinitionEnvironmentFile where++import Stratosphere.ResourceImports+++-- | Full data type definition for ECSTaskDefinitionEnvironmentFile. See+-- 'ecsTaskDefinitionEnvironmentFile' for a more convenient constructor.+data ECSTaskDefinitionEnvironmentFile =+  ECSTaskDefinitionEnvironmentFile+  { _eCSTaskDefinitionEnvironmentFileType :: Maybe (Val Text)+  , _eCSTaskDefinitionEnvironmentFileValue :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON ECSTaskDefinitionEnvironmentFile where+  toJSON ECSTaskDefinitionEnvironmentFile{..} =+    object $+    catMaybes+    [ fmap (("Type",) . toJSON) _eCSTaskDefinitionEnvironmentFileType+    , fmap (("Value",) . toJSON) _eCSTaskDefinitionEnvironmentFileValue+    ]++-- | Constructor for 'ECSTaskDefinitionEnvironmentFile' containing required+-- fields as arguments.+ecsTaskDefinitionEnvironmentFile+  :: ECSTaskDefinitionEnvironmentFile+ecsTaskDefinitionEnvironmentFile  =+  ECSTaskDefinitionEnvironmentFile+  { _eCSTaskDefinitionEnvironmentFileType = Nothing+  , _eCSTaskDefinitionEnvironmentFileValue = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-environmentfile.html#cfn-ecs-taskdefinition-environmentfile-type+ecstdefType :: Lens' ECSTaskDefinitionEnvironmentFile (Maybe (Val Text))+ecstdefType = lens _eCSTaskDefinitionEnvironmentFileType (\s a -> s { _eCSTaskDefinitionEnvironmentFileType = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-environmentfile.html#cfn-ecs-taskdefinition-environmentfile-value+ecstdefValue :: Lens' ECSTaskDefinitionEnvironmentFile (Maybe (Val Text))+ecstdefValue = lens _eCSTaskDefinitionEnvironmentFileValue (\s a -> s { _eCSTaskDefinitionEnvironmentFileValue = a })
library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionFirelensConfiguration.hs view
@@ -16,7 +16,7 @@ data ECSTaskDefinitionFirelensConfiguration =   ECSTaskDefinitionFirelensConfiguration   { _eCSTaskDefinitionFirelensConfigurationOptions :: Maybe Object-  , _eCSTaskDefinitionFirelensConfigurationType :: Val Text+  , _eCSTaskDefinitionFirelensConfigurationType :: Maybe (Val Text)   } deriving (Show, Eq)  instance ToJSON ECSTaskDefinitionFirelensConfiguration where@@ -24,18 +24,17 @@     object $     catMaybes     [ fmap (("Options",) . toJSON) _eCSTaskDefinitionFirelensConfigurationOptions-    , (Just . ("Type",) . toJSON) _eCSTaskDefinitionFirelensConfigurationType+    , fmap (("Type",) . toJSON) _eCSTaskDefinitionFirelensConfigurationType     ]  -- | Constructor for 'ECSTaskDefinitionFirelensConfiguration' containing -- required fields as arguments. ecsTaskDefinitionFirelensConfiguration-  :: Val Text -- ^ 'ecstdfcType'-  -> ECSTaskDefinitionFirelensConfiguration-ecsTaskDefinitionFirelensConfiguration typearg =+  :: ECSTaskDefinitionFirelensConfiguration+ecsTaskDefinitionFirelensConfiguration  =   ECSTaskDefinitionFirelensConfiguration   { _eCSTaskDefinitionFirelensConfigurationOptions = Nothing-  , _eCSTaskDefinitionFirelensConfigurationType = typearg+  , _eCSTaskDefinitionFirelensConfigurationType = Nothing   }  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-firelensconfiguration.html#cfn-ecs-taskdefinition-firelensconfiguration-options@@ -43,5 +42,5 @@ ecstdfcOptions = lens _eCSTaskDefinitionFirelensConfigurationOptions (\s a -> s { _eCSTaskDefinitionFirelensConfigurationOptions = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-firelensconfiguration.html#cfn-ecs-taskdefinition-firelensconfiguration-type-ecstdfcType :: Lens' ECSTaskDefinitionFirelensConfiguration (Val Text)+ecstdfcType :: Lens' ECSTaskDefinitionFirelensConfiguration (Maybe (Val Text)) ecstdfcType = lens _eCSTaskDefinitionFirelensConfigurationType (\s a -> s { _eCSTaskDefinitionFirelensConfigurationType = a })
library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolume.hs view
@@ -9,6 +9,7 @@  import Stratosphere.ResourceImports import Stratosphere.ResourceProperties.ECSTaskDefinitionDockerVolumeConfiguration+import Stratosphere.ResourceProperties.ECSTaskDefinitionEFSVolumeConfiguration import Stratosphere.ResourceProperties.ECSTaskDefinitionHostVolumeProperties  -- | Full data type definition for ECSTaskDefinitionVolume. See@@ -16,6 +17,7 @@ data ECSTaskDefinitionVolume =   ECSTaskDefinitionVolume   { _eCSTaskDefinitionVolumeDockerVolumeConfiguration :: Maybe ECSTaskDefinitionDockerVolumeConfiguration+  , _eCSTaskDefinitionVolumeEFSVolumeConfiguration :: Maybe ECSTaskDefinitionEFSVolumeConfiguration   , _eCSTaskDefinitionVolumeHost :: Maybe ECSTaskDefinitionHostVolumeProperties   , _eCSTaskDefinitionVolumeName :: Maybe (Val Text)   } deriving (Show, Eq)@@ -25,6 +27,7 @@     object $     catMaybes     [ fmap (("DockerVolumeConfiguration",) . toJSON) _eCSTaskDefinitionVolumeDockerVolumeConfiguration+    , fmap (("EFSVolumeConfiguration",) . toJSON) _eCSTaskDefinitionVolumeEFSVolumeConfiguration     , fmap (("Host",) . toJSON) _eCSTaskDefinitionVolumeHost     , fmap (("Name",) . toJSON) _eCSTaskDefinitionVolumeName     ]@@ -36,6 +39,7 @@ ecsTaskDefinitionVolume  =   ECSTaskDefinitionVolume   { _eCSTaskDefinitionVolumeDockerVolumeConfiguration = Nothing+  , _eCSTaskDefinitionVolumeEFSVolumeConfiguration = Nothing   , _eCSTaskDefinitionVolumeHost = Nothing   , _eCSTaskDefinitionVolumeName = Nothing   }@@ -43,6 +47,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-volumes.html#cfn-ecs-taskdefinition-volume-dockervolumeconfiguration ecstdvDockerVolumeConfiguration :: Lens' ECSTaskDefinitionVolume (Maybe ECSTaskDefinitionDockerVolumeConfiguration) ecstdvDockerVolumeConfiguration = lens _eCSTaskDefinitionVolumeDockerVolumeConfiguration (\s a -> s { _eCSTaskDefinitionVolumeDockerVolumeConfiguration = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-volumes.html#cfn-ecs-taskdefinition-volume-efsvolumeconfiguration+ecstdvEFSVolumeConfiguration :: Lens' ECSTaskDefinitionVolume (Maybe ECSTaskDefinitionEFSVolumeConfiguration)+ecstdvEFSVolumeConfiguration = lens _eCSTaskDefinitionVolumeEFSVolumeConfiguration (\s a -> s { _eCSTaskDefinitionVolumeEFSVolumeConfiguration = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-volumes.html#cfn-ecs-taskdefinition-volumes-host ecstdvHost :: Lens' ECSTaskDefinitionVolume (Maybe ECSTaskDefinitionHostVolumeProperties)
+ library-gen/Stratosphere/ResourceProperties/EKSNodegroupLaunchTemplateSpecification.hs view
@@ -0,0 +1,53 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-eks-nodegroup-launchtemplatespecification.html++module Stratosphere.ResourceProperties.EKSNodegroupLaunchTemplateSpecification where++import Stratosphere.ResourceImports+++-- | Full data type definition for EKSNodegroupLaunchTemplateSpecification.+-- See 'eksNodegroupLaunchTemplateSpecification' for a more convenient+-- constructor.+data EKSNodegroupLaunchTemplateSpecification =+  EKSNodegroupLaunchTemplateSpecification+  { _eKSNodegroupLaunchTemplateSpecificationId :: Maybe (Val Text)+  , _eKSNodegroupLaunchTemplateSpecificationName :: Maybe (Val Text)+  , _eKSNodegroupLaunchTemplateSpecificationVersion :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON EKSNodegroupLaunchTemplateSpecification where+  toJSON EKSNodegroupLaunchTemplateSpecification{..} =+    object $+    catMaybes+    [ fmap (("Id",) . toJSON) _eKSNodegroupLaunchTemplateSpecificationId+    , fmap (("Name",) . toJSON) _eKSNodegroupLaunchTemplateSpecificationName+    , fmap (("Version",) . toJSON) _eKSNodegroupLaunchTemplateSpecificationVersion+    ]++-- | Constructor for 'EKSNodegroupLaunchTemplateSpecification' containing+-- required fields as arguments.+eksNodegroupLaunchTemplateSpecification+  :: EKSNodegroupLaunchTemplateSpecification+eksNodegroupLaunchTemplateSpecification  =+  EKSNodegroupLaunchTemplateSpecification+  { _eKSNodegroupLaunchTemplateSpecificationId = Nothing+  , _eKSNodegroupLaunchTemplateSpecificationName = Nothing+  , _eKSNodegroupLaunchTemplateSpecificationVersion = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-eks-nodegroup-launchtemplatespecification.html#cfn-eks-nodegroup-launchtemplatespecification-id+eksnltsId :: Lens' EKSNodegroupLaunchTemplateSpecification (Maybe (Val Text))+eksnltsId = lens _eKSNodegroupLaunchTemplateSpecificationId (\s a -> s { _eKSNodegroupLaunchTemplateSpecificationId = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-eks-nodegroup-launchtemplatespecification.html#cfn-eks-nodegroup-launchtemplatespecification-name+eksnltsName :: Lens' EKSNodegroupLaunchTemplateSpecification (Maybe (Val Text))+eksnltsName = lens _eKSNodegroupLaunchTemplateSpecificationName (\s a -> s { _eKSNodegroupLaunchTemplateSpecificationName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-eks-nodegroup-launchtemplatespecification.html#cfn-eks-nodegroup-launchtemplatespecification-version+eksnltsVersion :: Lens' EKSNodegroupLaunchTemplateSpecification (Maybe (Val Text))+eksnltsVersion = lens _eKSNodegroupLaunchTemplateSpecificationVersion (\s a -> s { _eKSNodegroupLaunchTemplateSpecificationVersion = a })
library-gen/Stratosphere/ResourceProperties/FSxFileSystemLustreConfiguration.hs view
@@ -19,6 +19,7 @@   , _fSxFileSystemLustreConfigurationCopyTagsToBackups :: Maybe (Val Bool)   , _fSxFileSystemLustreConfigurationDailyAutomaticBackupStartTime :: Maybe (Val Text)   , _fSxFileSystemLustreConfigurationDeploymentType :: Maybe (Val Text)+  , _fSxFileSystemLustreConfigurationDriveCacheType :: Maybe (Val Text)   , _fSxFileSystemLustreConfigurationExportPath :: Maybe (Val Text)   , _fSxFileSystemLustreConfigurationImportPath :: Maybe (Val Text)   , _fSxFileSystemLustreConfigurationImportedFileChunkSize :: Maybe (Val Integer)@@ -35,6 +36,7 @@     , fmap (("CopyTagsToBackups",) . toJSON) _fSxFileSystemLustreConfigurationCopyTagsToBackups     , fmap (("DailyAutomaticBackupStartTime",) . toJSON) _fSxFileSystemLustreConfigurationDailyAutomaticBackupStartTime     , fmap (("DeploymentType",) . toJSON) _fSxFileSystemLustreConfigurationDeploymentType+    , fmap (("DriveCacheType",) . toJSON) _fSxFileSystemLustreConfigurationDriveCacheType     , fmap (("ExportPath",) . toJSON) _fSxFileSystemLustreConfigurationExportPath     , fmap (("ImportPath",) . toJSON) _fSxFileSystemLustreConfigurationImportPath     , fmap (("ImportedFileChunkSize",) . toJSON) _fSxFileSystemLustreConfigurationImportedFileChunkSize@@ -53,6 +55,7 @@   , _fSxFileSystemLustreConfigurationCopyTagsToBackups = Nothing   , _fSxFileSystemLustreConfigurationDailyAutomaticBackupStartTime = Nothing   , _fSxFileSystemLustreConfigurationDeploymentType = Nothing+  , _fSxFileSystemLustreConfigurationDriveCacheType = Nothing   , _fSxFileSystemLustreConfigurationExportPath = Nothing   , _fSxFileSystemLustreConfigurationImportPath = Nothing   , _fSxFileSystemLustreConfigurationImportedFileChunkSize = Nothing@@ -79,6 +82,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-fsx-filesystem-lustreconfiguration.html#cfn-fsx-filesystem-lustreconfiguration-deploymenttype fsfslcDeploymentType :: Lens' FSxFileSystemLustreConfiguration (Maybe (Val Text)) fsfslcDeploymentType = lens _fSxFileSystemLustreConfigurationDeploymentType (\s a -> s { _fSxFileSystemLustreConfigurationDeploymentType = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-fsx-filesystem-lustreconfiguration.html#cfn-fsx-filesystem-lustreconfiguration-drivecachetype+fsfslcDriveCacheType :: Lens' FSxFileSystemLustreConfiguration (Maybe (Val Text))+fsfslcDriveCacheType = lens _fSxFileSystemLustreConfigurationDriveCacheType (\s a -> s { _fSxFileSystemLustreConfigurationDriveCacheType = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-fsx-filesystem-lustreconfiguration.html#cfn-fsx-filesystem-lustreconfiguration-exportpath fsfslcExportPath :: Lens' FSxFileSystemLustreConfiguration (Maybe (Val Text))
+ library-gen/Stratosphere/ResourceProperties/IoTProvisioningTemplateTags.hs view
@@ -0,0 +1,38 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-iot-provisioningtemplate-tags.html++module Stratosphere.ResourceProperties.IoTProvisioningTemplateTags where++import Stratosphere.ResourceImports+++-- | Full data type definition for IoTProvisioningTemplateTags. See+-- 'ioTProvisioningTemplateTags' for a more convenient constructor.+data IoTProvisioningTemplateTags =+  IoTProvisioningTemplateTags+  { _ioTProvisioningTemplateTagsTags :: Maybe [Object]+  } deriving (Show, Eq)++instance ToJSON IoTProvisioningTemplateTags where+  toJSON IoTProvisioningTemplateTags{..} =+    object $+    catMaybes+    [ fmap (("Tags",) . toJSON) _ioTProvisioningTemplateTagsTags+    ]++-- | Constructor for 'IoTProvisioningTemplateTags' containing required fields+-- as arguments.+ioTProvisioningTemplateTags+  :: IoTProvisioningTemplateTags+ioTProvisioningTemplateTags  =+  IoTProvisioningTemplateTags+  { _ioTProvisioningTemplateTagsTags = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-iot-provisioningtemplate-tags.html#cfn-iot-provisioningtemplate-tags-tags+itpttTags :: Lens' IoTProvisioningTemplateTags (Maybe [Object])+itpttTags = lens _ioTProvisioningTemplateTagsTags (\s a -> s { _ioTProvisioningTemplateTagsTags = a })
library-gen/Stratosphere/ResourceProperties/LambdaEventSourceMappingDestinationConfig.hs view
@@ -15,26 +15,25 @@ -- constructor. data LambdaEventSourceMappingDestinationConfig =   LambdaEventSourceMappingDestinationConfig-  { _lambdaEventSourceMappingDestinationConfigOnFailure :: LambdaEventSourceMappingOnFailure+  { _lambdaEventSourceMappingDestinationConfigOnFailure :: Maybe LambdaEventSourceMappingOnFailure   } deriving (Show, Eq)  instance ToJSON LambdaEventSourceMappingDestinationConfig where   toJSON LambdaEventSourceMappingDestinationConfig{..} =     object $     catMaybes-    [ (Just . ("OnFailure",) . toJSON) _lambdaEventSourceMappingDestinationConfigOnFailure+    [ fmap (("OnFailure",) . toJSON) _lambdaEventSourceMappingDestinationConfigOnFailure     ]  -- | Constructor for 'LambdaEventSourceMappingDestinationConfig' containing -- required fields as arguments. lambdaEventSourceMappingDestinationConfig-  :: LambdaEventSourceMappingOnFailure -- ^ 'lesmdcOnFailure'-  -> LambdaEventSourceMappingDestinationConfig-lambdaEventSourceMappingDestinationConfig onFailurearg =+  :: LambdaEventSourceMappingDestinationConfig+lambdaEventSourceMappingDestinationConfig  =   LambdaEventSourceMappingDestinationConfig-  { _lambdaEventSourceMappingDestinationConfigOnFailure = onFailurearg+  { _lambdaEventSourceMappingDestinationConfigOnFailure = Nothing   }  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-lambda-eventsourcemapping-destinationconfig.html#cfn-lambda-eventsourcemapping-destinationconfig-onfailure-lesmdcOnFailure :: Lens' LambdaEventSourceMappingDestinationConfig LambdaEventSourceMappingOnFailure+lesmdcOnFailure :: Lens' LambdaEventSourceMappingDestinationConfig (Maybe LambdaEventSourceMappingOnFailure) lesmdcOnFailure = lens _lambdaEventSourceMappingDestinationConfigOnFailure (\s a -> s { _lambdaEventSourceMappingDestinationConfigOnFailure = a })
library-gen/Stratosphere/ResourceProperties/LambdaEventSourceMappingOnFailure.hs view
@@ -14,26 +14,25 @@ -- 'lambdaEventSourceMappingOnFailure' for a more convenient constructor. data LambdaEventSourceMappingOnFailure =   LambdaEventSourceMappingOnFailure-  { _lambdaEventSourceMappingOnFailureDestination :: Val Text+  { _lambdaEventSourceMappingOnFailureDestination :: Maybe (Val Text)   } deriving (Show, Eq)  instance ToJSON LambdaEventSourceMappingOnFailure where   toJSON LambdaEventSourceMappingOnFailure{..} =     object $     catMaybes-    [ (Just . ("Destination",) . toJSON) _lambdaEventSourceMappingOnFailureDestination+    [ fmap (("Destination",) . toJSON) _lambdaEventSourceMappingOnFailureDestination     ]  -- | Constructor for 'LambdaEventSourceMappingOnFailure' containing required -- fields as arguments. lambdaEventSourceMappingOnFailure-  :: Val Text -- ^ 'lesmofDestination'-  -> LambdaEventSourceMappingOnFailure-lambdaEventSourceMappingOnFailure destinationarg =+  :: LambdaEventSourceMappingOnFailure+lambdaEventSourceMappingOnFailure  =   LambdaEventSourceMappingOnFailure-  { _lambdaEventSourceMappingOnFailureDestination = destinationarg+  { _lambdaEventSourceMappingOnFailureDestination = Nothing   }  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-lambda-eventsourcemapping-onfailure.html#cfn-lambda-eventsourcemapping-onfailure-destination-lesmofDestination :: Lens' LambdaEventSourceMappingOnFailure (Val Text)+lesmofDestination :: Lens' LambdaEventSourceMappingOnFailure (Maybe (Val Text)) lesmofDestination = lens _lambdaEventSourceMappingOnFailureDestination (\s a -> s { _lambdaEventSourceMappingOnFailureDestination = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleBaselineConfig.hs view
@@ -0,0 +1,47 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-baselineconfig.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleBaselineConfig where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleConstraintsResource+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleStatisticsResource++-- | Full data type definition for SageMakerMonitoringScheduleBaselineConfig.+-- See 'sageMakerMonitoringScheduleBaselineConfig' for a more convenient+-- constructor.+data SageMakerMonitoringScheduleBaselineConfig =+  SageMakerMonitoringScheduleBaselineConfig+  { _sageMakerMonitoringScheduleBaselineConfigConstraintsResource :: Maybe SageMakerMonitoringScheduleConstraintsResource+  , _sageMakerMonitoringScheduleBaselineConfigStatisticsResource :: Maybe SageMakerMonitoringScheduleStatisticsResource+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleBaselineConfig where+  toJSON SageMakerMonitoringScheduleBaselineConfig{..} =+    object $+    catMaybes+    [ fmap (("ConstraintsResource",) . toJSON) _sageMakerMonitoringScheduleBaselineConfigConstraintsResource+    , fmap (("StatisticsResource",) . toJSON) _sageMakerMonitoringScheduleBaselineConfigStatisticsResource+    ]++-- | Constructor for 'SageMakerMonitoringScheduleBaselineConfig' containing+-- required fields as arguments.+sageMakerMonitoringScheduleBaselineConfig+  :: SageMakerMonitoringScheduleBaselineConfig+sageMakerMonitoringScheduleBaselineConfig  =+  SageMakerMonitoringScheduleBaselineConfig+  { _sageMakerMonitoringScheduleBaselineConfigConstraintsResource = Nothing+  , _sageMakerMonitoringScheduleBaselineConfigStatisticsResource = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-baselineconfig.html#cfn-sagemaker-monitoringschedule-baselineconfig-constraintsresource+smmsbcConstraintsResource :: Lens' SageMakerMonitoringScheduleBaselineConfig (Maybe SageMakerMonitoringScheduleConstraintsResource)+smmsbcConstraintsResource = lens _sageMakerMonitoringScheduleBaselineConfigConstraintsResource (\s a -> s { _sageMakerMonitoringScheduleBaselineConfigConstraintsResource = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-baselineconfig.html#cfn-sagemaker-monitoringschedule-baselineconfig-statisticsresource+smmsbcStatisticsResource :: Lens' SageMakerMonitoringScheduleBaselineConfig (Maybe SageMakerMonitoringScheduleStatisticsResource)+smmsbcStatisticsResource = lens _sageMakerMonitoringScheduleBaselineConfigStatisticsResource (\s a -> s { _sageMakerMonitoringScheduleBaselineConfigStatisticsResource = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleClusterConfig.hs view
@@ -0,0 +1,63 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-clusterconfig.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleClusterConfig where++import Stratosphere.ResourceImports+++-- | Full data type definition for SageMakerMonitoringScheduleClusterConfig.+-- See 'sageMakerMonitoringScheduleClusterConfig' for a more convenient+-- constructor.+data SageMakerMonitoringScheduleClusterConfig =+  SageMakerMonitoringScheduleClusterConfig+  { _sageMakerMonitoringScheduleClusterConfigInstanceCount :: Val Integer+  , _sageMakerMonitoringScheduleClusterConfigInstanceType :: Val Text+  , _sageMakerMonitoringScheduleClusterConfigVolumeKmsKeyId :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleClusterConfigVolumeSizeInGB :: Val Integer+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleClusterConfig where+  toJSON SageMakerMonitoringScheduleClusterConfig{..} =+    object $+    catMaybes+    [ (Just . ("InstanceCount",) . toJSON) _sageMakerMonitoringScheduleClusterConfigInstanceCount+    , (Just . ("InstanceType",) . toJSON) _sageMakerMonitoringScheduleClusterConfigInstanceType+    , fmap (("VolumeKmsKeyId",) . toJSON) _sageMakerMonitoringScheduleClusterConfigVolumeKmsKeyId+    , (Just . ("VolumeSizeInGB",) . toJSON) _sageMakerMonitoringScheduleClusterConfigVolumeSizeInGB+    ]++-- | Constructor for 'SageMakerMonitoringScheduleClusterConfig' containing+-- required fields as arguments.+sageMakerMonitoringScheduleClusterConfig+  :: Val Integer -- ^ 'smmsccInstanceCount'+  -> Val Text -- ^ 'smmsccInstanceType'+  -> Val Integer -- ^ 'smmsccVolumeSizeInGB'+  -> SageMakerMonitoringScheduleClusterConfig+sageMakerMonitoringScheduleClusterConfig instanceCountarg instanceTypearg volumeSizeInGBarg =+  SageMakerMonitoringScheduleClusterConfig+  { _sageMakerMonitoringScheduleClusterConfigInstanceCount = instanceCountarg+  , _sageMakerMonitoringScheduleClusterConfigInstanceType = instanceTypearg+  , _sageMakerMonitoringScheduleClusterConfigVolumeKmsKeyId = Nothing+  , _sageMakerMonitoringScheduleClusterConfigVolumeSizeInGB = volumeSizeInGBarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-clusterconfig.html#cfn-sagemaker-monitoringschedule-clusterconfig-instancecount+smmsccInstanceCount :: Lens' SageMakerMonitoringScheduleClusterConfig (Val Integer)+smmsccInstanceCount = lens _sageMakerMonitoringScheduleClusterConfigInstanceCount (\s a -> s { _sageMakerMonitoringScheduleClusterConfigInstanceCount = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-clusterconfig.html#cfn-sagemaker-monitoringschedule-clusterconfig-instancetype+smmsccInstanceType :: Lens' SageMakerMonitoringScheduleClusterConfig (Val Text)+smmsccInstanceType = lens _sageMakerMonitoringScheduleClusterConfigInstanceType (\s a -> s { _sageMakerMonitoringScheduleClusterConfigInstanceType = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-clusterconfig.html#cfn-sagemaker-monitoringschedule-clusterconfig-volumekmskeyid+smmsccVolumeKmsKeyId :: Lens' SageMakerMonitoringScheduleClusterConfig (Maybe (Val Text))+smmsccVolumeKmsKeyId = lens _sageMakerMonitoringScheduleClusterConfigVolumeKmsKeyId (\s a -> s { _sageMakerMonitoringScheduleClusterConfigVolumeKmsKeyId = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-clusterconfig.html#cfn-sagemaker-monitoringschedule-clusterconfig-volumesizeingb+smmsccVolumeSizeInGB :: Lens' SageMakerMonitoringScheduleClusterConfig (Val Integer)+smmsccVolumeSizeInGB = lens _sageMakerMonitoringScheduleClusterConfigVolumeSizeInGB (\s a -> s { _sageMakerMonitoringScheduleClusterConfigVolumeSizeInGB = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleConstraintsResource.hs view
@@ -0,0 +1,40 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-constraintsresource.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleConstraintsResource where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- SageMakerMonitoringScheduleConstraintsResource. See+-- 'sageMakerMonitoringScheduleConstraintsResource' for a more convenient+-- constructor.+data SageMakerMonitoringScheduleConstraintsResource =+  SageMakerMonitoringScheduleConstraintsResource+  { _sageMakerMonitoringScheduleConstraintsResourceS3Uri :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleConstraintsResource where+  toJSON SageMakerMonitoringScheduleConstraintsResource{..} =+    object $+    catMaybes+    [ fmap (("S3Uri",) . toJSON) _sageMakerMonitoringScheduleConstraintsResourceS3Uri+    ]++-- | Constructor for 'SageMakerMonitoringScheduleConstraintsResource'+-- containing required fields as arguments.+sageMakerMonitoringScheduleConstraintsResource+  :: SageMakerMonitoringScheduleConstraintsResource+sageMakerMonitoringScheduleConstraintsResource  =+  SageMakerMonitoringScheduleConstraintsResource+  { _sageMakerMonitoringScheduleConstraintsResourceS3Uri = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-constraintsresource.html#cfn-sagemaker-monitoringschedule-constraintsresource-s3uri+smmscrS3Uri :: Lens' SageMakerMonitoringScheduleConstraintsResource (Maybe (Val Text))+smmscrS3Uri = lens _sageMakerMonitoringScheduleConstraintsResourceS3Uri (\s a -> s { _sageMakerMonitoringScheduleConstraintsResourceS3Uri = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleEndpointInput.hs view
@@ -0,0 +1,62 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-endpointinput.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleEndpointInput where++import Stratosphere.ResourceImports+++-- | Full data type definition for SageMakerMonitoringScheduleEndpointInput.+-- See 'sageMakerMonitoringScheduleEndpointInput' for a more convenient+-- constructor.+data SageMakerMonitoringScheduleEndpointInput =+  SageMakerMonitoringScheduleEndpointInput+  { _sageMakerMonitoringScheduleEndpointInputEndpointName :: Val Text+  , _sageMakerMonitoringScheduleEndpointInputLocalPath :: Val Text+  , _sageMakerMonitoringScheduleEndpointInputS3DataDistributionType :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleEndpointInputS3InputMode :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleEndpointInput where+  toJSON SageMakerMonitoringScheduleEndpointInput{..} =+    object $+    catMaybes+    [ (Just . ("EndpointName",) . toJSON) _sageMakerMonitoringScheduleEndpointInputEndpointName+    , (Just . ("LocalPath",) . toJSON) _sageMakerMonitoringScheduleEndpointInputLocalPath+    , fmap (("S3DataDistributionType",) . toJSON) _sageMakerMonitoringScheduleEndpointInputS3DataDistributionType+    , fmap (("S3InputMode",) . toJSON) _sageMakerMonitoringScheduleEndpointInputS3InputMode+    ]++-- | Constructor for 'SageMakerMonitoringScheduleEndpointInput' containing+-- required fields as arguments.+sageMakerMonitoringScheduleEndpointInput+  :: Val Text -- ^ 'smmseiEndpointName'+  -> Val Text -- ^ 'smmseiLocalPath'+  -> SageMakerMonitoringScheduleEndpointInput+sageMakerMonitoringScheduleEndpointInput endpointNamearg localPatharg =+  SageMakerMonitoringScheduleEndpointInput+  { _sageMakerMonitoringScheduleEndpointInputEndpointName = endpointNamearg+  , _sageMakerMonitoringScheduleEndpointInputLocalPath = localPatharg+  , _sageMakerMonitoringScheduleEndpointInputS3DataDistributionType = Nothing+  , _sageMakerMonitoringScheduleEndpointInputS3InputMode = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-endpointinput.html#cfn-sagemaker-monitoringschedule-endpointinput-endpointname+smmseiEndpointName :: Lens' SageMakerMonitoringScheduleEndpointInput (Val Text)+smmseiEndpointName = lens _sageMakerMonitoringScheduleEndpointInputEndpointName (\s a -> s { _sageMakerMonitoringScheduleEndpointInputEndpointName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-endpointinput.html#cfn-sagemaker-monitoringschedule-endpointinput-localpath+smmseiLocalPath :: Lens' SageMakerMonitoringScheduleEndpointInput (Val Text)+smmseiLocalPath = lens _sageMakerMonitoringScheduleEndpointInputLocalPath (\s a -> s { _sageMakerMonitoringScheduleEndpointInputLocalPath = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-endpointinput.html#cfn-sagemaker-monitoringschedule-endpointinput-s3datadistributiontype+smmseiS3DataDistributionType :: Lens' SageMakerMonitoringScheduleEndpointInput (Maybe (Val Text))+smmseiS3DataDistributionType = lens _sageMakerMonitoringScheduleEndpointInputS3DataDistributionType (\s a -> s { _sageMakerMonitoringScheduleEndpointInputS3DataDistributionType = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-endpointinput.html#cfn-sagemaker-monitoringschedule-endpointinput-s3inputmode+smmseiS3InputMode :: Lens' SageMakerMonitoringScheduleEndpointInput (Maybe (Val Text))+smmseiS3InputMode = lens _sageMakerMonitoringScheduleEndpointInputS3InputMode (\s a -> s { _sageMakerMonitoringScheduleEndpointInputS3InputMode = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringAppSpecification.hs view
@@ -0,0 +1,69 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringappspecification.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringAppSpecification where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- SageMakerMonitoringScheduleMonitoringAppSpecification. See+-- 'sageMakerMonitoringScheduleMonitoringAppSpecification' for a more+-- convenient constructor.+data SageMakerMonitoringScheduleMonitoringAppSpecification =+  SageMakerMonitoringScheduleMonitoringAppSpecification+  { _sageMakerMonitoringScheduleMonitoringAppSpecificationContainerArguments :: Maybe (ValList Text)+  , _sageMakerMonitoringScheduleMonitoringAppSpecificationContainerEntrypoint :: Maybe (ValList Text)+  , _sageMakerMonitoringScheduleMonitoringAppSpecificationImageUri :: Val Text+  , _sageMakerMonitoringScheduleMonitoringAppSpecificationPostAnalyticsProcessorSourceUri :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleMonitoringAppSpecificationRecordPreprocessorSourceUri :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleMonitoringAppSpecification where+  toJSON SageMakerMonitoringScheduleMonitoringAppSpecification{..} =+    object $+    catMaybes+    [ fmap (("ContainerArguments",) . toJSON) _sageMakerMonitoringScheduleMonitoringAppSpecificationContainerArguments+    , fmap (("ContainerEntrypoint",) . toJSON) _sageMakerMonitoringScheduleMonitoringAppSpecificationContainerEntrypoint+    , (Just . ("ImageUri",) . toJSON) _sageMakerMonitoringScheduleMonitoringAppSpecificationImageUri+    , fmap (("PostAnalyticsProcessorSourceUri",) . toJSON) _sageMakerMonitoringScheduleMonitoringAppSpecificationPostAnalyticsProcessorSourceUri+    , fmap (("RecordPreprocessorSourceUri",) . toJSON) _sageMakerMonitoringScheduleMonitoringAppSpecificationRecordPreprocessorSourceUri+    ]++-- | Constructor for 'SageMakerMonitoringScheduleMonitoringAppSpecification'+-- containing required fields as arguments.+sageMakerMonitoringScheduleMonitoringAppSpecification+  :: Val Text -- ^ 'smmsmasImageUri'+  -> SageMakerMonitoringScheduleMonitoringAppSpecification+sageMakerMonitoringScheduleMonitoringAppSpecification imageUriarg =+  SageMakerMonitoringScheduleMonitoringAppSpecification+  { _sageMakerMonitoringScheduleMonitoringAppSpecificationContainerArguments = Nothing+  , _sageMakerMonitoringScheduleMonitoringAppSpecificationContainerEntrypoint = Nothing+  , _sageMakerMonitoringScheduleMonitoringAppSpecificationImageUri = imageUriarg+  , _sageMakerMonitoringScheduleMonitoringAppSpecificationPostAnalyticsProcessorSourceUri = Nothing+  , _sageMakerMonitoringScheduleMonitoringAppSpecificationRecordPreprocessorSourceUri = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringappspecification.html#cfn-sagemaker-monitoringschedule-monitoringappspecification-containerarguments+smmsmasContainerArguments :: Lens' SageMakerMonitoringScheduleMonitoringAppSpecification (Maybe (ValList Text))+smmsmasContainerArguments = lens _sageMakerMonitoringScheduleMonitoringAppSpecificationContainerArguments (\s a -> s { _sageMakerMonitoringScheduleMonitoringAppSpecificationContainerArguments = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringappspecification.html#cfn-sagemaker-monitoringschedule-monitoringappspecification-containerentrypoint+smmsmasContainerEntrypoint :: Lens' SageMakerMonitoringScheduleMonitoringAppSpecification (Maybe (ValList Text))+smmsmasContainerEntrypoint = lens _sageMakerMonitoringScheduleMonitoringAppSpecificationContainerEntrypoint (\s a -> s { _sageMakerMonitoringScheduleMonitoringAppSpecificationContainerEntrypoint = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringappspecification.html#cfn-sagemaker-monitoringschedule-monitoringappspecification-imageuri+smmsmasImageUri :: Lens' SageMakerMonitoringScheduleMonitoringAppSpecification (Val Text)+smmsmasImageUri = lens _sageMakerMonitoringScheduleMonitoringAppSpecificationImageUri (\s a -> s { _sageMakerMonitoringScheduleMonitoringAppSpecificationImageUri = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringappspecification.html#cfn-sagemaker-monitoringschedule-monitoringappspecification-postanalyticsprocessorsourceuri+smmsmasPostAnalyticsProcessorSourceUri :: Lens' SageMakerMonitoringScheduleMonitoringAppSpecification (Maybe (Val Text))+smmsmasPostAnalyticsProcessorSourceUri = lens _sageMakerMonitoringScheduleMonitoringAppSpecificationPostAnalyticsProcessorSourceUri (\s a -> s { _sageMakerMonitoringScheduleMonitoringAppSpecificationPostAnalyticsProcessorSourceUri = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringappspecification.html#cfn-sagemaker-monitoringschedule-monitoringappspecification-recordpreprocessorsourceuri+smmsmasRecordPreprocessorSourceUri :: Lens' SageMakerMonitoringScheduleMonitoringAppSpecification (Maybe (Val Text))+smmsmasRecordPreprocessorSourceUri = lens _sageMakerMonitoringScheduleMonitoringAppSpecificationRecordPreprocessorSourceUri (\s a -> s { _sageMakerMonitoringScheduleMonitoringAppSpecificationRecordPreprocessorSourceUri = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringExecutionSummary.hs view
@@ -0,0 +1,94 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringexecutionsummary.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringExecutionSummary where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- SageMakerMonitoringScheduleMonitoringExecutionSummary. See+-- 'sageMakerMonitoringScheduleMonitoringExecutionSummary' for a more+-- convenient constructor.+data SageMakerMonitoringScheduleMonitoringExecutionSummary =+  SageMakerMonitoringScheduleMonitoringExecutionSummary+  { _sageMakerMonitoringScheduleMonitoringExecutionSummaryCreationTime :: Val Text+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryEndpointName :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryFailureReason :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryLastModifiedTime :: Val Text+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryMonitoringExecutionStatus :: Val Text+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryMonitoringScheduleName :: Val Text+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryProcessingJobArn :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryScheduledTime :: Val Text+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleMonitoringExecutionSummary where+  toJSON SageMakerMonitoringScheduleMonitoringExecutionSummary{..} =+    object $+    catMaybes+    [ (Just . ("CreationTime",) . toJSON) _sageMakerMonitoringScheduleMonitoringExecutionSummaryCreationTime+    , fmap (("EndpointName",) . toJSON) _sageMakerMonitoringScheduleMonitoringExecutionSummaryEndpointName+    , fmap (("FailureReason",) . toJSON) _sageMakerMonitoringScheduleMonitoringExecutionSummaryFailureReason+    , (Just . ("LastModifiedTime",) . toJSON) _sageMakerMonitoringScheduleMonitoringExecutionSummaryLastModifiedTime+    , (Just . ("MonitoringExecutionStatus",) . toJSON) _sageMakerMonitoringScheduleMonitoringExecutionSummaryMonitoringExecutionStatus+    , (Just . ("MonitoringScheduleName",) . toJSON) _sageMakerMonitoringScheduleMonitoringExecutionSummaryMonitoringScheduleName+    , fmap (("ProcessingJobArn",) . toJSON) _sageMakerMonitoringScheduleMonitoringExecutionSummaryProcessingJobArn+    , (Just . ("ScheduledTime",) . toJSON) _sageMakerMonitoringScheduleMonitoringExecutionSummaryScheduledTime+    ]++-- | Constructor for 'SageMakerMonitoringScheduleMonitoringExecutionSummary'+-- containing required fields as arguments.+sageMakerMonitoringScheduleMonitoringExecutionSummary+  :: Val Text -- ^ 'smmsmesCreationTime'+  -> Val Text -- ^ 'smmsmesLastModifiedTime'+  -> Val Text -- ^ 'smmsmesMonitoringExecutionStatus'+  -> Val Text -- ^ 'smmsmesMonitoringScheduleName'+  -> Val Text -- ^ 'smmsmesScheduledTime'+  -> SageMakerMonitoringScheduleMonitoringExecutionSummary+sageMakerMonitoringScheduleMonitoringExecutionSummary creationTimearg lastModifiedTimearg monitoringExecutionStatusarg monitoringScheduleNamearg scheduledTimearg =+  SageMakerMonitoringScheduleMonitoringExecutionSummary+  { _sageMakerMonitoringScheduleMonitoringExecutionSummaryCreationTime = creationTimearg+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryEndpointName = Nothing+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryFailureReason = Nothing+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryLastModifiedTime = lastModifiedTimearg+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryMonitoringExecutionStatus = monitoringExecutionStatusarg+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryMonitoringScheduleName = monitoringScheduleNamearg+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryProcessingJobArn = Nothing+  , _sageMakerMonitoringScheduleMonitoringExecutionSummaryScheduledTime = scheduledTimearg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringexecutionsummary.html#cfn-sagemaker-monitoringschedule-monitoringexecutionsummary-creationtime+smmsmesCreationTime :: Lens' SageMakerMonitoringScheduleMonitoringExecutionSummary (Val Text)+smmsmesCreationTime = lens _sageMakerMonitoringScheduleMonitoringExecutionSummaryCreationTime (\s a -> s { _sageMakerMonitoringScheduleMonitoringExecutionSummaryCreationTime = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringexecutionsummary.html#cfn-sagemaker-monitoringschedule-monitoringexecutionsummary-endpointname+smmsmesEndpointName :: Lens' SageMakerMonitoringScheduleMonitoringExecutionSummary (Maybe (Val Text))+smmsmesEndpointName = lens _sageMakerMonitoringScheduleMonitoringExecutionSummaryEndpointName (\s a -> s { _sageMakerMonitoringScheduleMonitoringExecutionSummaryEndpointName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringexecutionsummary.html#cfn-sagemaker-monitoringschedule-monitoringexecutionsummary-failurereason+smmsmesFailureReason :: Lens' SageMakerMonitoringScheduleMonitoringExecutionSummary (Maybe (Val Text))+smmsmesFailureReason = lens _sageMakerMonitoringScheduleMonitoringExecutionSummaryFailureReason (\s a -> s { _sageMakerMonitoringScheduleMonitoringExecutionSummaryFailureReason = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringexecutionsummary.html#cfn-sagemaker-monitoringschedule-monitoringexecutionsummary-lastmodifiedtime+smmsmesLastModifiedTime :: Lens' SageMakerMonitoringScheduleMonitoringExecutionSummary (Val Text)+smmsmesLastModifiedTime = lens _sageMakerMonitoringScheduleMonitoringExecutionSummaryLastModifiedTime (\s a -> s { _sageMakerMonitoringScheduleMonitoringExecutionSummaryLastModifiedTime = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringexecutionsummary.html#cfn-sagemaker-monitoringschedule-monitoringexecutionsummary-monitoringexecutionstatus+smmsmesMonitoringExecutionStatus :: Lens' SageMakerMonitoringScheduleMonitoringExecutionSummary (Val Text)+smmsmesMonitoringExecutionStatus = lens _sageMakerMonitoringScheduleMonitoringExecutionSummaryMonitoringExecutionStatus (\s a -> s { _sageMakerMonitoringScheduleMonitoringExecutionSummaryMonitoringExecutionStatus = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringexecutionsummary.html#cfn-sagemaker-monitoringschedule-monitoringexecutionsummary-monitoringschedulename+smmsmesMonitoringScheduleName :: Lens' SageMakerMonitoringScheduleMonitoringExecutionSummary (Val Text)+smmsmesMonitoringScheduleName = lens _sageMakerMonitoringScheduleMonitoringExecutionSummaryMonitoringScheduleName (\s a -> s { _sageMakerMonitoringScheduleMonitoringExecutionSummaryMonitoringScheduleName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringexecutionsummary.html#cfn-sagemaker-monitoringschedule-monitoringexecutionsummary-processingjobarn+smmsmesProcessingJobArn :: Lens' SageMakerMonitoringScheduleMonitoringExecutionSummary (Maybe (Val Text))+smmsmesProcessingJobArn = lens _sageMakerMonitoringScheduleMonitoringExecutionSummaryProcessingJobArn (\s a -> s { _sageMakerMonitoringScheduleMonitoringExecutionSummaryProcessingJobArn = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringexecutionsummary.html#cfn-sagemaker-monitoringschedule-monitoringexecutionsummary-scheduledtime+smmsmesScheduledTime :: Lens' SageMakerMonitoringScheduleMonitoringExecutionSummary (Val Text)+smmsmesScheduledTime = lens _sageMakerMonitoringScheduleMonitoringExecutionSummaryScheduledTime (\s a -> s { _sageMakerMonitoringScheduleMonitoringExecutionSummaryScheduledTime = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringInput.hs view
@@ -0,0 +1,40 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringinput.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringInput where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleEndpointInput++-- | Full data type definition for SageMakerMonitoringScheduleMonitoringInput.+-- See 'sageMakerMonitoringScheduleMonitoringInput' for a more convenient+-- constructor.+data SageMakerMonitoringScheduleMonitoringInput =+  SageMakerMonitoringScheduleMonitoringInput+  { _sageMakerMonitoringScheduleMonitoringInputEndpointInput :: SageMakerMonitoringScheduleEndpointInput+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleMonitoringInput where+  toJSON SageMakerMonitoringScheduleMonitoringInput{..} =+    object $+    catMaybes+    [ (Just . ("EndpointInput",) . toJSON) _sageMakerMonitoringScheduleMonitoringInputEndpointInput+    ]++-- | Constructor for 'SageMakerMonitoringScheduleMonitoringInput' containing+-- required fields as arguments.+sageMakerMonitoringScheduleMonitoringInput+  :: SageMakerMonitoringScheduleEndpointInput -- ^ 'smmsmiEndpointInput'+  -> SageMakerMonitoringScheduleMonitoringInput+sageMakerMonitoringScheduleMonitoringInput endpointInputarg =+  SageMakerMonitoringScheduleMonitoringInput+  { _sageMakerMonitoringScheduleMonitoringInputEndpointInput = endpointInputarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringinput.html#cfn-sagemaker-monitoringschedule-monitoringinput-endpointinput+smmsmiEndpointInput :: Lens' SageMakerMonitoringScheduleMonitoringInput SageMakerMonitoringScheduleEndpointInput+smmsmiEndpointInput = lens _sageMakerMonitoringScheduleMonitoringInputEndpointInput (\s a -> s { _sageMakerMonitoringScheduleMonitoringInputEndpointInput = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringInputs.hs view
@@ -0,0 +1,40 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringinputs.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringInputs where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringInput++-- | Full data type definition for+-- SageMakerMonitoringScheduleMonitoringInputs. See+-- 'sageMakerMonitoringScheduleMonitoringInputs' for a more convenient+-- constructor.+data SageMakerMonitoringScheduleMonitoringInputs =+  SageMakerMonitoringScheduleMonitoringInputs+  { _sageMakerMonitoringScheduleMonitoringInputsMonitoringInputs :: Maybe [SageMakerMonitoringScheduleMonitoringInput]+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleMonitoringInputs where+  toJSON SageMakerMonitoringScheduleMonitoringInputs{..} =+    object $+    catMaybes+    [ fmap (("MonitoringInputs",) . toJSON) _sageMakerMonitoringScheduleMonitoringInputsMonitoringInputs+    ]++-- | Constructor for 'SageMakerMonitoringScheduleMonitoringInputs' containing+-- required fields as arguments.+sageMakerMonitoringScheduleMonitoringInputs+  :: SageMakerMonitoringScheduleMonitoringInputs+sageMakerMonitoringScheduleMonitoringInputs  =+  SageMakerMonitoringScheduleMonitoringInputs+  { _sageMakerMonitoringScheduleMonitoringInputsMonitoringInputs = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringinputs.html#cfn-sagemaker-monitoringschedule-monitoringinputs-monitoringinputs+smmsmiMonitoringInputs :: Lens' SageMakerMonitoringScheduleMonitoringInputs (Maybe [SageMakerMonitoringScheduleMonitoringInput])+smmsmiMonitoringInputs = lens _sageMakerMonitoringScheduleMonitoringInputsMonitoringInputs (\s a -> s { _sageMakerMonitoringScheduleMonitoringInputsMonitoringInputs = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringJobDefinition.hs view
@@ -0,0 +1,100 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringjobdefinition.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringJobDefinition where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleBaselineConfig+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringAppSpecification+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringInputs+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringOutputConfig+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringResources+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleNetworkConfig+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleStoppingCondition++-- | Full data type definition for+-- SageMakerMonitoringScheduleMonitoringJobDefinition. See+-- 'sageMakerMonitoringScheduleMonitoringJobDefinition' for a more+-- convenient constructor.+data SageMakerMonitoringScheduleMonitoringJobDefinition =+  SageMakerMonitoringScheduleMonitoringJobDefinition+  { _sageMakerMonitoringScheduleMonitoringJobDefinitionBaselineConfig :: Maybe SageMakerMonitoringScheduleBaselineConfig+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringAppSpecification :: SageMakerMonitoringScheduleMonitoringAppSpecification+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringInputs :: SageMakerMonitoringScheduleMonitoringInputs+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringOutputConfig :: SageMakerMonitoringScheduleMonitoringOutputConfig+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringResources :: SageMakerMonitoringScheduleMonitoringResources+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionNetworkConfig :: Maybe SageMakerMonitoringScheduleNetworkConfig+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionRoleArn :: Val Text+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionStoppingCondition :: Maybe SageMakerMonitoringScheduleStoppingCondition+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleMonitoringJobDefinition where+  toJSON SageMakerMonitoringScheduleMonitoringJobDefinition{..} =+    object $+    catMaybes+    [ fmap (("BaselineConfig",) . toJSON) _sageMakerMonitoringScheduleMonitoringJobDefinitionBaselineConfig+    , (Just . ("MonitoringAppSpecification",) . toJSON) _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringAppSpecification+    , (Just . ("MonitoringInputs",) . toJSON) _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringInputs+    , (Just . ("MonitoringOutputConfig",) . toJSON) _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringOutputConfig+    , (Just . ("MonitoringResources",) . toJSON) _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringResources+    , fmap (("NetworkConfig",) . toJSON) _sageMakerMonitoringScheduleMonitoringJobDefinitionNetworkConfig+    , (Just . ("RoleArn",) . toJSON) _sageMakerMonitoringScheduleMonitoringJobDefinitionRoleArn+    , fmap (("StoppingCondition",) . toJSON) _sageMakerMonitoringScheduleMonitoringJobDefinitionStoppingCondition+    ]++-- | Constructor for 'SageMakerMonitoringScheduleMonitoringJobDefinition'+-- containing required fields as arguments.+sageMakerMonitoringScheduleMonitoringJobDefinition+  :: SageMakerMonitoringScheduleMonitoringAppSpecification -- ^ 'smmsmjdMonitoringAppSpecification'+  -> SageMakerMonitoringScheduleMonitoringInputs -- ^ 'smmsmjdMonitoringInputs'+  -> SageMakerMonitoringScheduleMonitoringOutputConfig -- ^ 'smmsmjdMonitoringOutputConfig'+  -> SageMakerMonitoringScheduleMonitoringResources -- ^ 'smmsmjdMonitoringResources'+  -> Val Text -- ^ 'smmsmjdRoleArn'+  -> SageMakerMonitoringScheduleMonitoringJobDefinition+sageMakerMonitoringScheduleMonitoringJobDefinition monitoringAppSpecificationarg monitoringInputsarg monitoringOutputConfigarg monitoringResourcesarg roleArnarg =+  SageMakerMonitoringScheduleMonitoringJobDefinition+  { _sageMakerMonitoringScheduleMonitoringJobDefinitionBaselineConfig = Nothing+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringAppSpecification = monitoringAppSpecificationarg+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringInputs = monitoringInputsarg+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringOutputConfig = monitoringOutputConfigarg+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringResources = monitoringResourcesarg+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionNetworkConfig = Nothing+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionRoleArn = roleArnarg+  , _sageMakerMonitoringScheduleMonitoringJobDefinitionStoppingCondition = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringjobdefinition.html#cfn-sagemaker-monitoringschedule-monitoringjobdefinition-baselineconfig+smmsmjdBaselineConfig :: Lens' SageMakerMonitoringScheduleMonitoringJobDefinition (Maybe SageMakerMonitoringScheduleBaselineConfig)+smmsmjdBaselineConfig = lens _sageMakerMonitoringScheduleMonitoringJobDefinitionBaselineConfig (\s a -> s { _sageMakerMonitoringScheduleMonitoringJobDefinitionBaselineConfig = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringjobdefinition.html#cfn-sagemaker-monitoringschedule-monitoringjobdefinition-monitoringappspecification+smmsmjdMonitoringAppSpecification :: Lens' SageMakerMonitoringScheduleMonitoringJobDefinition SageMakerMonitoringScheduleMonitoringAppSpecification+smmsmjdMonitoringAppSpecification = lens _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringAppSpecification (\s a -> s { _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringAppSpecification = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringjobdefinition.html#cfn-sagemaker-monitoringschedule-monitoringjobdefinition-monitoringinputs+smmsmjdMonitoringInputs :: Lens' SageMakerMonitoringScheduleMonitoringJobDefinition SageMakerMonitoringScheduleMonitoringInputs+smmsmjdMonitoringInputs = lens _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringInputs (\s a -> s { _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringInputs = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringjobdefinition.html#cfn-sagemaker-monitoringschedule-monitoringjobdefinition-monitoringoutputconfig+smmsmjdMonitoringOutputConfig :: Lens' SageMakerMonitoringScheduleMonitoringJobDefinition SageMakerMonitoringScheduleMonitoringOutputConfig+smmsmjdMonitoringOutputConfig = lens _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringOutputConfig (\s a -> s { _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringOutputConfig = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringjobdefinition.html#cfn-sagemaker-monitoringschedule-monitoringjobdefinition-monitoringresources+smmsmjdMonitoringResources :: Lens' SageMakerMonitoringScheduleMonitoringJobDefinition SageMakerMonitoringScheduleMonitoringResources+smmsmjdMonitoringResources = lens _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringResources (\s a -> s { _sageMakerMonitoringScheduleMonitoringJobDefinitionMonitoringResources = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringjobdefinition.html#cfn-sagemaker-monitoringschedule-monitoringjobdefinition-networkconfig+smmsmjdNetworkConfig :: Lens' SageMakerMonitoringScheduleMonitoringJobDefinition (Maybe SageMakerMonitoringScheduleNetworkConfig)+smmsmjdNetworkConfig = lens _sageMakerMonitoringScheduleMonitoringJobDefinitionNetworkConfig (\s a -> s { _sageMakerMonitoringScheduleMonitoringJobDefinitionNetworkConfig = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringjobdefinition.html#cfn-sagemaker-monitoringschedule-monitoringjobdefinition-rolearn+smmsmjdRoleArn :: Lens' SageMakerMonitoringScheduleMonitoringJobDefinition (Val Text)+smmsmjdRoleArn = lens _sageMakerMonitoringScheduleMonitoringJobDefinitionRoleArn (\s a -> s { _sageMakerMonitoringScheduleMonitoringJobDefinitionRoleArn = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringjobdefinition.html#cfn-sagemaker-monitoringschedule-monitoringjobdefinition-stoppingcondition+smmsmjdStoppingCondition :: Lens' SageMakerMonitoringScheduleMonitoringJobDefinition (Maybe SageMakerMonitoringScheduleStoppingCondition)+smmsmjdStoppingCondition = lens _sageMakerMonitoringScheduleMonitoringJobDefinitionStoppingCondition (\s a -> s { _sageMakerMonitoringScheduleMonitoringJobDefinitionStoppingCondition = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringOutput.hs view
@@ -0,0 +1,41 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringoutput.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringOutput where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleS3Output++-- | Full data type definition for+-- SageMakerMonitoringScheduleMonitoringOutput. See+-- 'sageMakerMonitoringScheduleMonitoringOutput' for a more convenient+-- constructor.+data SageMakerMonitoringScheduleMonitoringOutput =+  SageMakerMonitoringScheduleMonitoringOutput+  { _sageMakerMonitoringScheduleMonitoringOutputS3Output :: SageMakerMonitoringScheduleS3Output+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleMonitoringOutput where+  toJSON SageMakerMonitoringScheduleMonitoringOutput{..} =+    object $+    catMaybes+    [ (Just . ("S3Output",) . toJSON) _sageMakerMonitoringScheduleMonitoringOutputS3Output+    ]++-- | Constructor for 'SageMakerMonitoringScheduleMonitoringOutput' containing+-- required fields as arguments.+sageMakerMonitoringScheduleMonitoringOutput+  :: SageMakerMonitoringScheduleS3Output -- ^ 'smmsmoS3Output'+  -> SageMakerMonitoringScheduleMonitoringOutput+sageMakerMonitoringScheduleMonitoringOutput s3Outputarg =+  SageMakerMonitoringScheduleMonitoringOutput+  { _sageMakerMonitoringScheduleMonitoringOutputS3Output = s3Outputarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringoutput.html#cfn-sagemaker-monitoringschedule-monitoringoutput-s3output+smmsmoS3Output :: Lens' SageMakerMonitoringScheduleMonitoringOutput SageMakerMonitoringScheduleS3Output+smmsmoS3Output = lens _sageMakerMonitoringScheduleMonitoringOutputS3Output (\s a -> s { _sageMakerMonitoringScheduleMonitoringOutputS3Output = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringOutputConfig.hs view
@@ -0,0 +1,48 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringoutputconfig.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringOutputConfig where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringOutput++-- | Full data type definition for+-- SageMakerMonitoringScheduleMonitoringOutputConfig. See+-- 'sageMakerMonitoringScheduleMonitoringOutputConfig' for a more convenient+-- constructor.+data SageMakerMonitoringScheduleMonitoringOutputConfig =+  SageMakerMonitoringScheduleMonitoringOutputConfig+  { _sageMakerMonitoringScheduleMonitoringOutputConfigKmsKeyId :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleMonitoringOutputConfigMonitoringOutputs :: [SageMakerMonitoringScheduleMonitoringOutput]+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleMonitoringOutputConfig where+  toJSON SageMakerMonitoringScheduleMonitoringOutputConfig{..} =+    object $+    catMaybes+    [ fmap (("KmsKeyId",) . toJSON) _sageMakerMonitoringScheduleMonitoringOutputConfigKmsKeyId+    , (Just . ("MonitoringOutputs",) . toJSON) _sageMakerMonitoringScheduleMonitoringOutputConfigMonitoringOutputs+    ]++-- | Constructor for 'SageMakerMonitoringScheduleMonitoringOutputConfig'+-- containing required fields as arguments.+sageMakerMonitoringScheduleMonitoringOutputConfig+  :: [SageMakerMonitoringScheduleMonitoringOutput] -- ^ 'smmsmocMonitoringOutputs'+  -> SageMakerMonitoringScheduleMonitoringOutputConfig+sageMakerMonitoringScheduleMonitoringOutputConfig monitoringOutputsarg =+  SageMakerMonitoringScheduleMonitoringOutputConfig+  { _sageMakerMonitoringScheduleMonitoringOutputConfigKmsKeyId = Nothing+  , _sageMakerMonitoringScheduleMonitoringOutputConfigMonitoringOutputs = monitoringOutputsarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringoutputconfig.html#cfn-sagemaker-monitoringschedule-monitoringoutputconfig-kmskeyid+smmsmocKmsKeyId :: Lens' SageMakerMonitoringScheduleMonitoringOutputConfig (Maybe (Val Text))+smmsmocKmsKeyId = lens _sageMakerMonitoringScheduleMonitoringOutputConfigKmsKeyId (\s a -> s { _sageMakerMonitoringScheduleMonitoringOutputConfigKmsKeyId = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringoutputconfig.html#cfn-sagemaker-monitoringschedule-monitoringoutputconfig-monitoringoutputs+smmsmocMonitoringOutputs :: Lens' SageMakerMonitoringScheduleMonitoringOutputConfig [SageMakerMonitoringScheduleMonitoringOutput]+smmsmocMonitoringOutputs = lens _sageMakerMonitoringScheduleMonitoringOutputConfigMonitoringOutputs (\s a -> s { _sageMakerMonitoringScheduleMonitoringOutputConfigMonitoringOutputs = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringResources.hs view
@@ -0,0 +1,41 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringresources.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringResources where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleClusterConfig++-- | Full data type definition for+-- SageMakerMonitoringScheduleMonitoringResources. See+-- 'sageMakerMonitoringScheduleMonitoringResources' for a more convenient+-- constructor.+data SageMakerMonitoringScheduleMonitoringResources =+  SageMakerMonitoringScheduleMonitoringResources+  { _sageMakerMonitoringScheduleMonitoringResourcesClusterConfig :: SageMakerMonitoringScheduleClusterConfig+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleMonitoringResources where+  toJSON SageMakerMonitoringScheduleMonitoringResources{..} =+    object $+    catMaybes+    [ (Just . ("ClusterConfig",) . toJSON) _sageMakerMonitoringScheduleMonitoringResourcesClusterConfig+    ]++-- | Constructor for 'SageMakerMonitoringScheduleMonitoringResources'+-- containing required fields as arguments.+sageMakerMonitoringScheduleMonitoringResources+  :: SageMakerMonitoringScheduleClusterConfig -- ^ 'smmsmrClusterConfig'+  -> SageMakerMonitoringScheduleMonitoringResources+sageMakerMonitoringScheduleMonitoringResources clusterConfigarg =+  SageMakerMonitoringScheduleMonitoringResources+  { _sageMakerMonitoringScheduleMonitoringResourcesClusterConfig = clusterConfigarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringresources.html#cfn-sagemaker-monitoringschedule-monitoringresources-clusterconfig+smmsmrClusterConfig :: Lens' SageMakerMonitoringScheduleMonitoringResources SageMakerMonitoringScheduleClusterConfig+smmsmrClusterConfig = lens _sageMakerMonitoringScheduleMonitoringResourcesClusterConfig (\s a -> s { _sageMakerMonitoringScheduleMonitoringResourcesClusterConfig = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleMonitoringScheduleConfig.hs view
@@ -0,0 +1,49 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringscheduleconfig.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringScheduleConfig where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringJobDefinition+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleScheduleConfig++-- | Full data type definition for+-- SageMakerMonitoringScheduleMonitoringScheduleConfig. See+-- 'sageMakerMonitoringScheduleMonitoringScheduleConfig' for a more+-- convenient constructor.+data SageMakerMonitoringScheduleMonitoringScheduleConfig =+  SageMakerMonitoringScheduleMonitoringScheduleConfig+  { _sageMakerMonitoringScheduleMonitoringScheduleConfigMonitoringJobDefinition :: SageMakerMonitoringScheduleMonitoringJobDefinition+  , _sageMakerMonitoringScheduleMonitoringScheduleConfigScheduleConfig :: Maybe SageMakerMonitoringScheduleScheduleConfig+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleMonitoringScheduleConfig where+  toJSON SageMakerMonitoringScheduleMonitoringScheduleConfig{..} =+    object $+    catMaybes+    [ (Just . ("MonitoringJobDefinition",) . toJSON) _sageMakerMonitoringScheduleMonitoringScheduleConfigMonitoringJobDefinition+    , fmap (("ScheduleConfig",) . toJSON) _sageMakerMonitoringScheduleMonitoringScheduleConfigScheduleConfig+    ]++-- | Constructor for 'SageMakerMonitoringScheduleMonitoringScheduleConfig'+-- containing required fields as arguments.+sageMakerMonitoringScheduleMonitoringScheduleConfig+  :: SageMakerMonitoringScheduleMonitoringJobDefinition -- ^ 'smmsmscMonitoringJobDefinition'+  -> SageMakerMonitoringScheduleMonitoringScheduleConfig+sageMakerMonitoringScheduleMonitoringScheduleConfig monitoringJobDefinitionarg =+  SageMakerMonitoringScheduleMonitoringScheduleConfig+  { _sageMakerMonitoringScheduleMonitoringScheduleConfigMonitoringJobDefinition = monitoringJobDefinitionarg+  , _sageMakerMonitoringScheduleMonitoringScheduleConfigScheduleConfig = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringscheduleconfig.html#cfn-sagemaker-monitoringschedule-monitoringscheduleconfig-monitoringjobdefinition+smmsmscMonitoringJobDefinition :: Lens' SageMakerMonitoringScheduleMonitoringScheduleConfig SageMakerMonitoringScheduleMonitoringJobDefinition+smmsmscMonitoringJobDefinition = lens _sageMakerMonitoringScheduleMonitoringScheduleConfigMonitoringJobDefinition (\s a -> s { _sageMakerMonitoringScheduleMonitoringScheduleConfigMonitoringJobDefinition = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-monitoringscheduleconfig.html#cfn-sagemaker-monitoringschedule-monitoringscheduleconfig-scheduleconfig+smmsmscScheduleConfig :: Lens' SageMakerMonitoringScheduleMonitoringScheduleConfig (Maybe SageMakerMonitoringScheduleScheduleConfig)+smmsmscScheduleConfig = lens _sageMakerMonitoringScheduleMonitoringScheduleConfigScheduleConfig (\s a -> s { _sageMakerMonitoringScheduleMonitoringScheduleConfigScheduleConfig = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleNetworkConfig.hs view
@@ -0,0 +1,53 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-networkconfig.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleNetworkConfig where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleVpcConfig++-- | Full data type definition for SageMakerMonitoringScheduleNetworkConfig.+-- See 'sageMakerMonitoringScheduleNetworkConfig' for a more convenient+-- constructor.+data SageMakerMonitoringScheduleNetworkConfig =+  SageMakerMonitoringScheduleNetworkConfig+  { _sageMakerMonitoringScheduleNetworkConfigEnableInterContainerTrafficEncryption :: Maybe (Val Bool)+  , _sageMakerMonitoringScheduleNetworkConfigEnableNetworkIsolation :: Maybe (Val Bool)+  , _sageMakerMonitoringScheduleNetworkConfigVpcConfig :: Maybe SageMakerMonitoringScheduleVpcConfig+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleNetworkConfig where+  toJSON SageMakerMonitoringScheduleNetworkConfig{..} =+    object $+    catMaybes+    [ fmap (("EnableInterContainerTrafficEncryption",) . toJSON) _sageMakerMonitoringScheduleNetworkConfigEnableInterContainerTrafficEncryption+    , fmap (("EnableNetworkIsolation",) . toJSON) _sageMakerMonitoringScheduleNetworkConfigEnableNetworkIsolation+    , fmap (("VpcConfig",) . toJSON) _sageMakerMonitoringScheduleNetworkConfigVpcConfig+    ]++-- | Constructor for 'SageMakerMonitoringScheduleNetworkConfig' containing+-- required fields as arguments.+sageMakerMonitoringScheduleNetworkConfig+  :: SageMakerMonitoringScheduleNetworkConfig+sageMakerMonitoringScheduleNetworkConfig  =+  SageMakerMonitoringScheduleNetworkConfig+  { _sageMakerMonitoringScheduleNetworkConfigEnableInterContainerTrafficEncryption = Nothing+  , _sageMakerMonitoringScheduleNetworkConfigEnableNetworkIsolation = Nothing+  , _sageMakerMonitoringScheduleNetworkConfigVpcConfig = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-networkconfig.html#cfn-sagemaker-monitoringschedule-networkconfig-enableintercontainertrafficencryption+smmsncEnableInterContainerTrafficEncryption :: Lens' SageMakerMonitoringScheduleNetworkConfig (Maybe (Val Bool))+smmsncEnableInterContainerTrafficEncryption = lens _sageMakerMonitoringScheduleNetworkConfigEnableInterContainerTrafficEncryption (\s a -> s { _sageMakerMonitoringScheduleNetworkConfigEnableInterContainerTrafficEncryption = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-networkconfig.html#cfn-sagemaker-monitoringschedule-networkconfig-enablenetworkisolation+smmsncEnableNetworkIsolation :: Lens' SageMakerMonitoringScheduleNetworkConfig (Maybe (Val Bool))+smmsncEnableNetworkIsolation = lens _sageMakerMonitoringScheduleNetworkConfigEnableNetworkIsolation (\s a -> s { _sageMakerMonitoringScheduleNetworkConfigEnableNetworkIsolation = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-networkconfig.html#cfn-sagemaker-monitoringschedule-networkconfig-vpcconfig+smmsncVpcConfig :: Lens' SageMakerMonitoringScheduleNetworkConfig (Maybe SageMakerMonitoringScheduleVpcConfig)+smmsncVpcConfig = lens _sageMakerMonitoringScheduleNetworkConfigVpcConfig (\s a -> s { _sageMakerMonitoringScheduleNetworkConfigVpcConfig = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleS3Output.hs view
@@ -0,0 +1,54 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-s3output.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleS3Output where++import Stratosphere.ResourceImports+++-- | Full data type definition for SageMakerMonitoringScheduleS3Output. See+-- 'sageMakerMonitoringScheduleS3Output' for a more convenient constructor.+data SageMakerMonitoringScheduleS3Output =+  SageMakerMonitoringScheduleS3Output+  { _sageMakerMonitoringScheduleS3OutputLocalPath :: Val Text+  , _sageMakerMonitoringScheduleS3OutputS3UploadMode :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleS3OutputS3Uri :: Val Text+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleS3Output where+  toJSON SageMakerMonitoringScheduleS3Output{..} =+    object $+    catMaybes+    [ (Just . ("LocalPath",) . toJSON) _sageMakerMonitoringScheduleS3OutputLocalPath+    , fmap (("S3UploadMode",) . toJSON) _sageMakerMonitoringScheduleS3OutputS3UploadMode+    , (Just . ("S3Uri",) . toJSON) _sageMakerMonitoringScheduleS3OutputS3Uri+    ]++-- | Constructor for 'SageMakerMonitoringScheduleS3Output' containing required+-- fields as arguments.+sageMakerMonitoringScheduleS3Output+  :: Val Text -- ^ 'smmssoLocalPath'+  -> Val Text -- ^ 'smmssoS3Uri'+  -> SageMakerMonitoringScheduleS3Output+sageMakerMonitoringScheduleS3Output localPatharg s3Uriarg =+  SageMakerMonitoringScheduleS3Output+  { _sageMakerMonitoringScheduleS3OutputLocalPath = localPatharg+  , _sageMakerMonitoringScheduleS3OutputS3UploadMode = Nothing+  , _sageMakerMonitoringScheduleS3OutputS3Uri = s3Uriarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-s3output.html#cfn-sagemaker-monitoringschedule-s3output-localpath+smmssoLocalPath :: Lens' SageMakerMonitoringScheduleS3Output (Val Text)+smmssoLocalPath = lens _sageMakerMonitoringScheduleS3OutputLocalPath (\s a -> s { _sageMakerMonitoringScheduleS3OutputLocalPath = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-s3output.html#cfn-sagemaker-monitoringschedule-s3output-s3uploadmode+smmssoS3UploadMode :: Lens' SageMakerMonitoringScheduleS3Output (Maybe (Val Text))+smmssoS3UploadMode = lens _sageMakerMonitoringScheduleS3OutputS3UploadMode (\s a -> s { _sageMakerMonitoringScheduleS3OutputS3UploadMode = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-s3output.html#cfn-sagemaker-monitoringschedule-s3output-s3uri+smmssoS3Uri :: Lens' SageMakerMonitoringScheduleS3Output (Val Text)+smmssoS3Uri = lens _sageMakerMonitoringScheduleS3OutputS3Uri (\s a -> s { _sageMakerMonitoringScheduleS3OutputS3Uri = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleScheduleConfig.hs view
@@ -0,0 +1,40 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-scheduleconfig.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleScheduleConfig where++import Stratosphere.ResourceImports+++-- | Full data type definition for SageMakerMonitoringScheduleScheduleConfig.+-- See 'sageMakerMonitoringScheduleScheduleConfig' for a more convenient+-- constructor.+data SageMakerMonitoringScheduleScheduleConfig =+  SageMakerMonitoringScheduleScheduleConfig+  { _sageMakerMonitoringScheduleScheduleConfigScheduleExpression :: Val Text+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleScheduleConfig where+  toJSON SageMakerMonitoringScheduleScheduleConfig{..} =+    object $+    catMaybes+    [ (Just . ("ScheduleExpression",) . toJSON) _sageMakerMonitoringScheduleScheduleConfigScheduleExpression+    ]++-- | Constructor for 'SageMakerMonitoringScheduleScheduleConfig' containing+-- required fields as arguments.+sageMakerMonitoringScheduleScheduleConfig+  :: Val Text -- ^ 'smmsscScheduleExpression'+  -> SageMakerMonitoringScheduleScheduleConfig+sageMakerMonitoringScheduleScheduleConfig scheduleExpressionarg =+  SageMakerMonitoringScheduleScheduleConfig+  { _sageMakerMonitoringScheduleScheduleConfigScheduleExpression = scheduleExpressionarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-scheduleconfig.html#cfn-sagemaker-monitoringschedule-scheduleconfig-scheduleexpression+smmsscScheduleExpression :: Lens' SageMakerMonitoringScheduleScheduleConfig (Val Text)+smmsscScheduleExpression = lens _sageMakerMonitoringScheduleScheduleConfigScheduleExpression (\s a -> s { _sageMakerMonitoringScheduleScheduleConfigScheduleExpression = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleStatisticsResource.hs view
@@ -0,0 +1,40 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-statisticsresource.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleStatisticsResource where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- SageMakerMonitoringScheduleStatisticsResource. See+-- 'sageMakerMonitoringScheduleStatisticsResource' for a more convenient+-- constructor.+data SageMakerMonitoringScheduleStatisticsResource =+  SageMakerMonitoringScheduleStatisticsResource+  { _sageMakerMonitoringScheduleStatisticsResourceS3Uri :: Maybe (Val Text)+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleStatisticsResource where+  toJSON SageMakerMonitoringScheduleStatisticsResource{..} =+    object $+    catMaybes+    [ fmap (("S3Uri",) . toJSON) _sageMakerMonitoringScheduleStatisticsResourceS3Uri+    ]++-- | Constructor for 'SageMakerMonitoringScheduleStatisticsResource'+-- containing required fields as arguments.+sageMakerMonitoringScheduleStatisticsResource+  :: SageMakerMonitoringScheduleStatisticsResource+sageMakerMonitoringScheduleStatisticsResource  =+  SageMakerMonitoringScheduleStatisticsResource+  { _sageMakerMonitoringScheduleStatisticsResourceS3Uri = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-statisticsresource.html#cfn-sagemaker-monitoringschedule-statisticsresource-s3uri+smmssrS3Uri :: Lens' SageMakerMonitoringScheduleStatisticsResource (Maybe (Val Text))+smmssrS3Uri = lens _sageMakerMonitoringScheduleStatisticsResourceS3Uri (\s a -> s { _sageMakerMonitoringScheduleStatisticsResourceS3Uri = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleStoppingCondition.hs view
@@ -0,0 +1,41 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-stoppingcondition.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleStoppingCondition where++import Stratosphere.ResourceImports+++-- | Full data type definition for+-- SageMakerMonitoringScheduleStoppingCondition. See+-- 'sageMakerMonitoringScheduleStoppingCondition' for a more convenient+-- constructor.+data SageMakerMonitoringScheduleStoppingCondition =+  SageMakerMonitoringScheduleStoppingCondition+  { _sageMakerMonitoringScheduleStoppingConditionMaxRuntimeInSeconds :: Val Integer+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleStoppingCondition where+  toJSON SageMakerMonitoringScheduleStoppingCondition{..} =+    object $+    catMaybes+    [ (Just . ("MaxRuntimeInSeconds",) . toJSON) _sageMakerMonitoringScheduleStoppingConditionMaxRuntimeInSeconds+    ]++-- | Constructor for 'SageMakerMonitoringScheduleStoppingCondition' containing+-- required fields as arguments.+sageMakerMonitoringScheduleStoppingCondition+  :: Val Integer -- ^ 'smmsscMaxRuntimeInSeconds'+  -> SageMakerMonitoringScheduleStoppingCondition+sageMakerMonitoringScheduleStoppingCondition maxRuntimeInSecondsarg =+  SageMakerMonitoringScheduleStoppingCondition+  { _sageMakerMonitoringScheduleStoppingConditionMaxRuntimeInSeconds = maxRuntimeInSecondsarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-stoppingcondition.html#cfn-sagemaker-monitoringschedule-stoppingcondition-maxruntimeinseconds+smmsscMaxRuntimeInSeconds :: Lens' SageMakerMonitoringScheduleStoppingCondition (Val Integer)+smmsscMaxRuntimeInSeconds = lens _sageMakerMonitoringScheduleStoppingConditionMaxRuntimeInSeconds (\s a -> s { _sageMakerMonitoringScheduleStoppingConditionMaxRuntimeInSeconds = a })
+ library-gen/Stratosphere/ResourceProperties/SageMakerMonitoringScheduleVpcConfig.hs view
@@ -0,0 +1,47 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-vpcconfig.html++module Stratosphere.ResourceProperties.SageMakerMonitoringScheduleVpcConfig where++import Stratosphere.ResourceImports+++-- | Full data type definition for SageMakerMonitoringScheduleVpcConfig. See+-- 'sageMakerMonitoringScheduleVpcConfig' for a more convenient constructor.+data SageMakerMonitoringScheduleVpcConfig =+  SageMakerMonitoringScheduleVpcConfig+  { _sageMakerMonitoringScheduleVpcConfigSecurityGroupIds :: ValList Text+  , _sageMakerMonitoringScheduleVpcConfigSubnets :: ValList Text+  } deriving (Show, Eq)++instance ToJSON SageMakerMonitoringScheduleVpcConfig where+  toJSON SageMakerMonitoringScheduleVpcConfig{..} =+    object $+    catMaybes+    [ (Just . ("SecurityGroupIds",) . toJSON) _sageMakerMonitoringScheduleVpcConfigSecurityGroupIds+    , (Just . ("Subnets",) . toJSON) _sageMakerMonitoringScheduleVpcConfigSubnets+    ]++-- | Constructor for 'SageMakerMonitoringScheduleVpcConfig' containing+-- required fields as arguments.+sageMakerMonitoringScheduleVpcConfig+  :: ValList Text -- ^ 'smmsvcSecurityGroupIds'+  -> ValList Text -- ^ 'smmsvcSubnets'+  -> SageMakerMonitoringScheduleVpcConfig+sageMakerMonitoringScheduleVpcConfig securityGroupIdsarg subnetsarg =+  SageMakerMonitoringScheduleVpcConfig+  { _sageMakerMonitoringScheduleVpcConfigSecurityGroupIds = securityGroupIdsarg+  , _sageMakerMonitoringScheduleVpcConfigSubnets = subnetsarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-vpcconfig.html#cfn-sagemaker-monitoringschedule-vpcconfig-securitygroupids+smmsvcSecurityGroupIds :: Lens' SageMakerMonitoringScheduleVpcConfig (ValList Text)+smmsvcSecurityGroupIds = lens _sageMakerMonitoringScheduleVpcConfigSecurityGroupIds (\s a -> s { _sageMakerMonitoringScheduleVpcConfigSecurityGroupIds = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sagemaker-monitoringschedule-vpcconfig.html#cfn-sagemaker-monitoringschedule-vpcconfig-subnets+smmsvcSubnets :: Lens' SageMakerMonitoringScheduleVpcConfig (ValList Text)+smmsvcSubnets = lens _sageMakerMonitoringScheduleVpcConfigSubnets (\s a -> s { _sageMakerMonitoringScheduleVpcConfigSubnets = a })
library-gen/Stratosphere/ResourceProperties/StepFunctionsStateMachineCloudWatchLogsLogGroup.hs view
@@ -3,7 +3,7 @@ {-# LANGUAGE StrictData #-} {-# LANGUAGE TupleSections #-} --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-stepfunctions-statemachine-logdestination-cloudwatchlogsloggroup.html+-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-stepfunctions-statemachine-cloudwatchlogsloggroup.html  module Stratosphere.ResourceProperties.StepFunctionsStateMachineCloudWatchLogsLogGroup where @@ -16,26 +16,25 @@ -- constructor. data StepFunctionsStateMachineCloudWatchLogsLogGroup =   StepFunctionsStateMachineCloudWatchLogsLogGroup-  { _stepFunctionsStateMachineCloudWatchLogsLogGroupLogGroupArn :: Val Text+  { _stepFunctionsStateMachineCloudWatchLogsLogGroupLogGroupArn :: Maybe (Val Text)   } deriving (Show, Eq)  instance ToJSON StepFunctionsStateMachineCloudWatchLogsLogGroup where   toJSON StepFunctionsStateMachineCloudWatchLogsLogGroup{..} =     object $     catMaybes-    [ (Just . ("LogGroupArn",) . toJSON) _stepFunctionsStateMachineCloudWatchLogsLogGroupLogGroupArn+    [ fmap (("LogGroupArn",) . toJSON) _stepFunctionsStateMachineCloudWatchLogsLogGroupLogGroupArn     ]  -- | Constructor for 'StepFunctionsStateMachineCloudWatchLogsLogGroup' -- containing required fields as arguments. stepFunctionsStateMachineCloudWatchLogsLogGroup-  :: Val Text -- ^ 'sfsmcwllgLogGroupArn'-  -> StepFunctionsStateMachineCloudWatchLogsLogGroup-stepFunctionsStateMachineCloudWatchLogsLogGroup logGroupArnarg =+  :: StepFunctionsStateMachineCloudWatchLogsLogGroup+stepFunctionsStateMachineCloudWatchLogsLogGroup  =   StepFunctionsStateMachineCloudWatchLogsLogGroup-  { _stepFunctionsStateMachineCloudWatchLogsLogGroupLogGroupArn = logGroupArnarg+  { _stepFunctionsStateMachineCloudWatchLogsLogGroupLogGroupArn = Nothing   } --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-stepfunctions-statemachine-logdestination-cloudwatchlogsloggroup.html#cfn-stepfunctions-statemachine-logdestination-cloudwatchlogsloggroup-loggrouparn-sfsmcwllgLogGroupArn :: Lens' StepFunctionsStateMachineCloudWatchLogsLogGroup (Val Text)+-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-stepfunctions-statemachine-cloudwatchlogsloggroup.html#cfn-stepfunctions-statemachine-cloudwatchlogsloggroup-loggrouparn+sfsmcwllgLogGroupArn :: Lens' StepFunctionsStateMachineCloudWatchLogsLogGroup (Maybe (Val Text)) sfsmcwllgLogGroupArn = lens _stepFunctionsStateMachineCloudWatchLogsLogGroupLogGroupArn (\s a -> s { _stepFunctionsStateMachineCloudWatchLogsLogGroupLogGroupArn = a })
library-gen/Stratosphere/ResourceProperties/StepFunctionsStateMachineTracingConfiguration.hs view
@@ -16,26 +16,25 @@ -- constructor. data StepFunctionsStateMachineTracingConfiguration =   StepFunctionsStateMachineTracingConfiguration-  { _stepFunctionsStateMachineTracingConfigurationEnabled :: Val Bool+  { _stepFunctionsStateMachineTracingConfigurationEnabled :: Maybe (Val Bool)   } deriving (Show, Eq)  instance ToJSON StepFunctionsStateMachineTracingConfiguration where   toJSON StepFunctionsStateMachineTracingConfiguration{..} =     object $     catMaybes-    [ (Just . ("Enabled",) . toJSON) _stepFunctionsStateMachineTracingConfigurationEnabled+    [ fmap (("Enabled",) . toJSON) _stepFunctionsStateMachineTracingConfigurationEnabled     ]  -- | Constructor for 'StepFunctionsStateMachineTracingConfiguration' -- containing required fields as arguments. stepFunctionsStateMachineTracingConfiguration-  :: Val Bool -- ^ 'sfsmtcEnabled'-  -> StepFunctionsStateMachineTracingConfiguration-stepFunctionsStateMachineTracingConfiguration enabledarg =+  :: StepFunctionsStateMachineTracingConfiguration+stepFunctionsStateMachineTracingConfiguration  =   StepFunctionsStateMachineTracingConfiguration-  { _stepFunctionsStateMachineTracingConfigurationEnabled = enabledarg+  { _stepFunctionsStateMachineTracingConfigurationEnabled = Nothing   }  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-stepfunctions-statemachine-tracingconfiguration.html#cfn-stepfunctions-statemachine-tracingconfiguration-enabled-sfsmtcEnabled :: Lens' StepFunctionsStateMachineTracingConfiguration (Val Bool)+sfsmtcEnabled :: Lens' StepFunctionsStateMachineTracingConfiguration (Maybe (Val Bool)) sfsmtcEnabled = lens _stepFunctionsStateMachineTracingConfigurationEnabled (\s a -> s { _stepFunctionsStateMachineTracingConfigurationEnabled = a })
library-gen/Stratosphere/Resources.hs view
@@ -115,6 +115,7 @@ import Stratosphere.Resources.AppSyncResolver as X import Stratosphere.Resources.ApplicationAutoScalingScalableTarget as X import Stratosphere.Resources.ApplicationAutoScalingScalingPolicy as X+import Stratosphere.Resources.ApplicationInsightsApplication as X import Stratosphere.Resources.AthenaDataCatalog as X import Stratosphere.Resources.AthenaNamedQuery as X import Stratosphere.Resources.AthenaWorkGroup as X@@ -207,6 +208,7 @@ import Stratosphere.Resources.DocDBDBSubnetGroup as X import Stratosphere.Resources.DynamoDBTable as X import Stratosphere.Resources.EC2CapacityReservation as X+import Stratosphere.Resources.EC2CarrierGateway as X import Stratosphere.Resources.EC2ClientVpnAuthorizationRule as X import Stratosphere.Resources.EC2ClientVpnEndpoint as X import Stratosphere.Resources.EC2ClientVpnRoute as X@@ -535,6 +537,7 @@ import Stratosphere.Resources.SageMakerEndpoint as X import Stratosphere.Resources.SageMakerEndpointConfig as X import Stratosphere.Resources.SageMakerModel as X+import Stratosphere.Resources.SageMakerMonitoringSchedule as X import Stratosphere.Resources.SageMakerNotebookInstance as X import Stratosphere.Resources.SageMakerNotebookInstanceLifecycleConfig as X import Stratosphere.Resources.SageMakerWorkteam as X@@ -781,6 +784,18 @@ import Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyStepAdjustment as X import Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration as X import Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration as X+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarm as X+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarmMetric as X+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationComponentConfiguration as X+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationComponentMonitoringSetting as X+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationConfigurationDetails as X+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationCustomComponent as X+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationLog as X+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationLogPattern as X+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationLogPatternSet as X+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationSubComponentConfigurationDetails as X+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationSubComponentTypeConfiguration as X+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationWindowsEvent as X import Stratosphere.ResourceProperties.AthenaDataCatalogTags as X import Stratosphere.ResourceProperties.AthenaWorkGroupEncryptionConfiguration as X import Stratosphere.ResourceProperties.AthenaWorkGroupResultConfiguration as X@@ -1031,6 +1046,7 @@ import Stratosphere.ResourceProperties.DynamoDBTableStreamSpecification as X import Stratosphere.ResourceProperties.DynamoDBTableTimeToLiveSpecification as X import Stratosphere.ResourceProperties.EC2CapacityReservationTagSpecification as X+import Stratosphere.ResourceProperties.EC2CarrierGatewayTags as X import Stratosphere.ResourceProperties.EC2ClientVpnEndpointCertificateAuthenticationRequest as X import Stratosphere.ResourceProperties.EC2ClientVpnEndpointClientAuthenticationRequest as X import Stratosphere.ResourceProperties.EC2ClientVpnEndpointConnectionLogOptions as X@@ -1113,7 +1129,6 @@ import Stratosphere.ResourceProperties.EC2SpotFleetTargetGroupsConfig as X import Stratosphere.ResourceProperties.EC2TrafficMirrorFilterRuleTrafficMirrorPortRange as X import Stratosphere.ResourceProperties.EC2VPNConnectionVpnTunnelOptionsSpecification as X-import Stratosphere.ResourceProperties.ECRRepositoryLifecyclePolicy as X import Stratosphere.ResourceProperties.ECSCapacityProviderAutoScalingGroupProvider as X import Stratosphere.ResourceProperties.ECSCapacityProviderManagedScaling as X import Stratosphere.ResourceProperties.ECSClusterCapacityProviderStrategyItem as X@@ -1126,10 +1141,13 @@ import Stratosphere.ResourceProperties.ECSServicePlacementConstraint as X import Stratosphere.ResourceProperties.ECSServicePlacementStrategy as X import Stratosphere.ResourceProperties.ECSServiceServiceRegistry as X+import Stratosphere.ResourceProperties.ECSTaskDefinitionAuthorizationConfig as X import Stratosphere.ResourceProperties.ECSTaskDefinitionContainerDefinition as X import Stratosphere.ResourceProperties.ECSTaskDefinitionContainerDependency as X import Stratosphere.ResourceProperties.ECSTaskDefinitionDevice as X import Stratosphere.ResourceProperties.ECSTaskDefinitionDockerVolumeConfiguration as X+import Stratosphere.ResourceProperties.ECSTaskDefinitionEFSVolumeConfiguration as X+import Stratosphere.ResourceProperties.ECSTaskDefinitionEnvironmentFile as X import Stratosphere.ResourceProperties.ECSTaskDefinitionFirelensConfiguration as X import Stratosphere.ResourceProperties.ECSTaskDefinitionHealthCheck as X import Stratosphere.ResourceProperties.ECSTaskDefinitionHostEntry as X@@ -1166,6 +1184,7 @@ import Stratosphere.ResourceProperties.EKSClusterEncryptionConfig as X import Stratosphere.ResourceProperties.EKSClusterProvider as X import Stratosphere.ResourceProperties.EKSClusterResourcesVpcConfig as X+import Stratosphere.ResourceProperties.EKSNodegroupLaunchTemplateSpecification as X import Stratosphere.ResourceProperties.EKSNodegroupRemoteAccess as X import Stratosphere.ResourceProperties.EKSNodegroupScalingConfig as X import Stratosphere.ResourceProperties.EMRClusterApplication as X@@ -1425,6 +1444,7 @@ import Stratosphere.ResourceProperties.IoT1ClickProjectDeviceTemplate as X import Stratosphere.ResourceProperties.IoT1ClickProjectPlacementTemplate as X import Stratosphere.ResourceProperties.IoTProvisioningTemplateProvisioningHook as X+import Stratosphere.ResourceProperties.IoTProvisioningTemplateTags as X import Stratosphere.ResourceProperties.IoTThingAttributePayload as X import Stratosphere.ResourceProperties.IoTTopicRuleAction as X import Stratosphere.ResourceProperties.IoTTopicRuleAssetPropertyTimestamp as X@@ -1904,6 +1924,25 @@ import Stratosphere.ResourceProperties.SageMakerEndpointConfigProductionVariant as X import Stratosphere.ResourceProperties.SageMakerModelContainerDefinition as X import Stratosphere.ResourceProperties.SageMakerModelVpcConfig as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleBaselineConfig as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleClusterConfig as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleConstraintsResource as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleEndpointInput as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringAppSpecification as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringExecutionSummary as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringInput as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringInputs as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringJobDefinition as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringOutput as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringOutputConfig as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringResources as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringScheduleConfig as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleNetworkConfig as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleS3Output as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleScheduleConfig as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleStatisticsResource as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleStoppingCondition as X+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleVpcConfig as X import Stratosphere.ResourceProperties.SageMakerNotebookInstanceLifecycleConfigNotebookInstanceLifecycleHook as X import Stratosphere.ResourceProperties.SageMakerWorkteamCognitoMemberDefinition as X import Stratosphere.ResourceProperties.SageMakerWorkteamMemberDefinition as X
+ library-gen/Stratosphere/Resources/ApplicationInsightsApplication.hs view
@@ -0,0 +1,101 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-applicationinsights-application.html++module Stratosphere.Resources.ApplicationInsightsApplication where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationComponentMonitoringSetting+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationCustomComponent+import Stratosphere.ResourceProperties.ApplicationInsightsApplicationLogPatternSet+import Stratosphere.ResourceProperties.Tag++-- | Full data type definition for ApplicationInsightsApplication. See+-- 'applicationInsightsApplication' for a more convenient constructor.+data ApplicationInsightsApplication =+  ApplicationInsightsApplication+  { _applicationInsightsApplicationAutoConfigurationEnabled :: Maybe (Val Bool)+  , _applicationInsightsApplicationCWEMonitorEnabled :: Maybe (Val Bool)+  , _applicationInsightsApplicationComponentMonitoringSettings :: Maybe [ApplicationInsightsApplicationComponentMonitoringSetting]+  , _applicationInsightsApplicationCustomComponents :: Maybe [ApplicationInsightsApplicationCustomComponent]+  , _applicationInsightsApplicationLogPatternSets :: Maybe [ApplicationInsightsApplicationLogPatternSet]+  , _applicationInsightsApplicationOpsCenterEnabled :: Maybe (Val Bool)+  , _applicationInsightsApplicationOpsItemSNSTopicArn :: Maybe (Val Text)+  , _applicationInsightsApplicationResourceGroupName :: Val Text+  , _applicationInsightsApplicationTags :: Maybe [Tag]+  } deriving (Show, Eq)++instance ToResourceProperties ApplicationInsightsApplication where+  toResourceProperties ApplicationInsightsApplication{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::ApplicationInsights::Application"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ fmap (("AutoConfigurationEnabled",) . toJSON) _applicationInsightsApplicationAutoConfigurationEnabled+        , fmap (("CWEMonitorEnabled",) . toJSON) _applicationInsightsApplicationCWEMonitorEnabled+        , fmap (("ComponentMonitoringSettings",) . toJSON) _applicationInsightsApplicationComponentMonitoringSettings+        , fmap (("CustomComponents",) . toJSON) _applicationInsightsApplicationCustomComponents+        , fmap (("LogPatternSets",) . toJSON) _applicationInsightsApplicationLogPatternSets+        , fmap (("OpsCenterEnabled",) . toJSON) _applicationInsightsApplicationOpsCenterEnabled+        , fmap (("OpsItemSNSTopicArn",) . toJSON) _applicationInsightsApplicationOpsItemSNSTopicArn+        , (Just . ("ResourceGroupName",) . toJSON) _applicationInsightsApplicationResourceGroupName+        , fmap (("Tags",) . toJSON) _applicationInsightsApplicationTags+        ]+    }++-- | Constructor for 'ApplicationInsightsApplication' containing required+-- fields as arguments.+applicationInsightsApplication+  :: Val Text -- ^ 'aiaResourceGroupName'+  -> ApplicationInsightsApplication+applicationInsightsApplication resourceGroupNamearg =+  ApplicationInsightsApplication+  { _applicationInsightsApplicationAutoConfigurationEnabled = Nothing+  , _applicationInsightsApplicationCWEMonitorEnabled = Nothing+  , _applicationInsightsApplicationComponentMonitoringSettings = Nothing+  , _applicationInsightsApplicationCustomComponents = Nothing+  , _applicationInsightsApplicationLogPatternSets = Nothing+  , _applicationInsightsApplicationOpsCenterEnabled = Nothing+  , _applicationInsightsApplicationOpsItemSNSTopicArn = Nothing+  , _applicationInsightsApplicationResourceGroupName = resourceGroupNamearg+  , _applicationInsightsApplicationTags = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-applicationinsights-application.html#cfn-applicationinsights-application-autoconfigurationenabled+aiaAutoConfigurationEnabled :: Lens' ApplicationInsightsApplication (Maybe (Val Bool))+aiaAutoConfigurationEnabled = lens _applicationInsightsApplicationAutoConfigurationEnabled (\s a -> s { _applicationInsightsApplicationAutoConfigurationEnabled = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-applicationinsights-application.html#cfn-applicationinsights-application-cwemonitorenabled+aiaCWEMonitorEnabled :: Lens' ApplicationInsightsApplication (Maybe (Val Bool))+aiaCWEMonitorEnabled = lens _applicationInsightsApplicationCWEMonitorEnabled (\s a -> s { _applicationInsightsApplicationCWEMonitorEnabled = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-applicationinsights-application.html#cfn-applicationinsights-application-componentmonitoringsettings+aiaComponentMonitoringSettings :: Lens' ApplicationInsightsApplication (Maybe [ApplicationInsightsApplicationComponentMonitoringSetting])+aiaComponentMonitoringSettings = lens _applicationInsightsApplicationComponentMonitoringSettings (\s a -> s { _applicationInsightsApplicationComponentMonitoringSettings = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-applicationinsights-application.html#cfn-applicationinsights-application-customcomponents+aiaCustomComponents :: Lens' ApplicationInsightsApplication (Maybe [ApplicationInsightsApplicationCustomComponent])+aiaCustomComponents = lens _applicationInsightsApplicationCustomComponents (\s a -> s { _applicationInsightsApplicationCustomComponents = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-applicationinsights-application.html#cfn-applicationinsights-application-logpatternsets+aiaLogPatternSets :: Lens' ApplicationInsightsApplication (Maybe [ApplicationInsightsApplicationLogPatternSet])+aiaLogPatternSets = lens _applicationInsightsApplicationLogPatternSets (\s a -> s { _applicationInsightsApplicationLogPatternSets = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-applicationinsights-application.html#cfn-applicationinsights-application-opscenterenabled+aiaOpsCenterEnabled :: Lens' ApplicationInsightsApplication (Maybe (Val Bool))+aiaOpsCenterEnabled = lens _applicationInsightsApplicationOpsCenterEnabled (\s a -> s { _applicationInsightsApplicationOpsCenterEnabled = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-applicationinsights-application.html#cfn-applicationinsights-application-opsitemsnstopicarn+aiaOpsItemSNSTopicArn :: Lens' ApplicationInsightsApplication (Maybe (Val Text))+aiaOpsItemSNSTopicArn = lens _applicationInsightsApplicationOpsItemSNSTopicArn (\s a -> s { _applicationInsightsApplicationOpsItemSNSTopicArn = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-applicationinsights-application.html#cfn-applicationinsights-application-resourcegroupname+aiaResourceGroupName :: Lens' ApplicationInsightsApplication (Val Text)+aiaResourceGroupName = lens _applicationInsightsApplicationResourceGroupName (\s a -> s { _applicationInsightsApplicationResourceGroupName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-applicationinsights-application.html#cfn-applicationinsights-application-tags+aiaTags :: Lens' ApplicationInsightsApplication (Maybe [Tag])+aiaTags = lens _applicationInsightsApplicationTags (\s a -> s { _applicationInsightsApplicationTags = a })
+ library-gen/Stratosphere/Resources/EC2CarrierGateway.hs view
@@ -0,0 +1,49 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-carriergateway.html++module Stratosphere.Resources.EC2CarrierGateway where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.EC2CarrierGatewayTags++-- | Full data type definition for EC2CarrierGateway. See 'ec2CarrierGateway'+-- for a more convenient constructor.+data EC2CarrierGateway =+  EC2CarrierGateway+  { _eC2CarrierGatewayTags :: Maybe EC2CarrierGatewayTags+  , _eC2CarrierGatewayVpcId :: Val Text+  } deriving (Show, Eq)++instance ToResourceProperties EC2CarrierGateway where+  toResourceProperties EC2CarrierGateway{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::EC2::CarrierGateway"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ fmap (("Tags",) . toJSON) _eC2CarrierGatewayTags+        , (Just . ("VpcId",) . toJSON) _eC2CarrierGatewayVpcId+        ]+    }++-- | Constructor for 'EC2CarrierGateway' containing required fields as+-- arguments.+ec2CarrierGateway+  :: Val Text -- ^ 'eccagVpcId'+  -> EC2CarrierGateway+ec2CarrierGateway vpcIdarg =+  EC2CarrierGateway+  { _eC2CarrierGatewayTags = Nothing+  , _eC2CarrierGatewayVpcId = vpcIdarg+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-carriergateway.html#cfn-ec2-carriergateway-tags+eccagTags :: Lens' EC2CarrierGateway (Maybe EC2CarrierGatewayTags)+eccagTags = lens _eC2CarrierGatewayTags (\s a -> s { _eC2CarrierGatewayTags = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-carriergateway.html#cfn-ec2-carriergateway-vpcid+eccagVpcId :: Lens' EC2CarrierGateway (Val Text)+eccagVpcId = lens _eC2CarrierGatewayVpcId (\s a -> s { _eC2CarrierGatewayVpcId = a })
library-gen/Stratosphere/Resources/EC2CustomerGateway.hs view
@@ -36,9 +36,9 @@ -- | Constructor for 'EC2CustomerGateway' containing required fields as -- arguments. ec2CustomerGateway-  :: Val Integer -- ^ 'eccgBgpAsn'-  -> Val Text -- ^ 'eccgIpAddress'-  -> Val Text -- ^ 'eccgType'+  :: Val Integer -- ^ 'eccugBgpAsn'+  -> Val Text -- ^ 'eccugIpAddress'+  -> Val Text -- ^ 'eccugType'   -> EC2CustomerGateway ec2CustomerGateway bgpAsnarg ipAddressarg typearg =   EC2CustomerGateway@@ -49,17 +49,17 @@   }  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-customer-gateway.html#cfn-ec2-customergateway-bgpasn-eccgBgpAsn :: Lens' EC2CustomerGateway (Val Integer)-eccgBgpAsn = lens _eC2CustomerGatewayBgpAsn (\s a -> s { _eC2CustomerGatewayBgpAsn = a })+eccugBgpAsn :: Lens' EC2CustomerGateway (Val Integer)+eccugBgpAsn = lens _eC2CustomerGatewayBgpAsn (\s a -> s { _eC2CustomerGatewayBgpAsn = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-customer-gateway.html#cfn-ec2-customergateway-ipaddress-eccgIpAddress :: Lens' EC2CustomerGateway (Val Text)-eccgIpAddress = lens _eC2CustomerGatewayIpAddress (\s a -> s { _eC2CustomerGatewayIpAddress = a })+eccugIpAddress :: Lens' EC2CustomerGateway (Val Text)+eccugIpAddress = lens _eC2CustomerGatewayIpAddress (\s a -> s { _eC2CustomerGatewayIpAddress = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-customer-gateway.html#cfn-ec2-customergateway-tags-eccgTags :: Lens' EC2CustomerGateway (Maybe [Tag])-eccgTags = lens _eC2CustomerGatewayTags (\s a -> s { _eC2CustomerGatewayTags = a })+eccugTags :: Lens' EC2CustomerGateway (Maybe [Tag])+eccugTags = lens _eC2CustomerGatewayTags (\s a -> s { _eC2CustomerGatewayTags = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-customer-gateway.html#cfn-ec2-customergateway-type-eccgType :: Lens' EC2CustomerGateway (Val Text)-eccgType = lens _eC2CustomerGatewayType (\s a -> s { _eC2CustomerGatewayType = a })+eccugType :: Lens' EC2CustomerGateway (Val Text)+eccugType = lens _eC2CustomerGatewayType (\s a -> s { _eC2CustomerGatewayType = a })
library-gen/Stratosphere/Resources/EC2TransitGateway.hs view
@@ -20,6 +20,7 @@   , _eC2TransitGatewayDefaultRouteTablePropagation :: Maybe (Val Text)   , _eC2TransitGatewayDescription :: Maybe (Val Text)   , _eC2TransitGatewayDnsSupport :: Maybe (Val Text)+  , _eC2TransitGatewayMulticastSupport :: Maybe (Val Text)   , _eC2TransitGatewayTags :: Maybe [Tag]   , _eC2TransitGatewayVpnEcmpSupport :: Maybe (Val Text)   } deriving (Show, Eq)@@ -36,6 +37,7 @@         , fmap (("DefaultRouteTablePropagation",) . toJSON) _eC2TransitGatewayDefaultRouteTablePropagation         , fmap (("Description",) . toJSON) _eC2TransitGatewayDescription         , fmap (("DnsSupport",) . toJSON) _eC2TransitGatewayDnsSupport+        , fmap (("MulticastSupport",) . toJSON) _eC2TransitGatewayMulticastSupport         , fmap (("Tags",) . toJSON) _eC2TransitGatewayTags         , fmap (("VpnEcmpSupport",) . toJSON) _eC2TransitGatewayVpnEcmpSupport         ]@@ -53,6 +55,7 @@   , _eC2TransitGatewayDefaultRouteTablePropagation = Nothing   , _eC2TransitGatewayDescription = Nothing   , _eC2TransitGatewayDnsSupport = Nothing+  , _eC2TransitGatewayMulticastSupport = Nothing   , _eC2TransitGatewayTags = Nothing   , _eC2TransitGatewayVpnEcmpSupport = Nothing   }@@ -80,6 +83,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-transitgateway.html#cfn-ec2-transitgateway-dnssupport ectgDnsSupport :: Lens' EC2TransitGateway (Maybe (Val Text)) ectgDnsSupport = lens _eC2TransitGatewayDnsSupport (\s a -> s { _eC2TransitGatewayDnsSupport = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-transitgateway.html#cfn-ec2-transitgateway-multicastsupport+ectgMulticastSupport :: Lens' EC2TransitGateway (Maybe (Val Text))+ectgMulticastSupport = lens _eC2TransitGatewayMulticastSupport (\s a -> s { _eC2TransitGatewayMulticastSupport = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-transitgateway.html#cfn-ec2-transitgateway-tags ectgTags :: Lens' EC2TransitGateway (Maybe [Tag])
library-gen/Stratosphere/Resources/ECRRepository.hs view
@@ -8,14 +8,15 @@ module Stratosphere.Resources.ECRRepository where  import Stratosphere.ResourceImports-import Stratosphere.ResourceProperties.ECRRepositoryLifecyclePolicy import Stratosphere.ResourceProperties.Tag  -- | Full data type definition for ECRRepository. See 'ecrRepository' for a -- more convenient constructor. data ECRRepository =   ECRRepository-  { _eCRRepositoryLifecyclePolicy :: Maybe ECRRepositoryLifecyclePolicy+  { _eCRRepositoryImageScanningConfiguration :: Maybe Object+  , _eCRRepositoryImageTagMutability :: Maybe (Val Text)+  , _eCRRepositoryLifecyclePolicy :: Maybe Object   , _eCRRepositoryRepositoryName :: Maybe (Val Text)   , _eCRRepositoryRepositoryPolicyText :: Maybe Object   , _eCRRepositoryTags :: Maybe [Tag]@@ -27,7 +28,9 @@     { resourcePropertiesType = "AWS::ECR::Repository"     , resourcePropertiesProperties =         hashMapFromList $ catMaybes-        [ fmap (("LifecyclePolicy",) . toJSON) _eCRRepositoryLifecyclePolicy+        [ fmap (("ImageScanningConfiguration",) . toJSON) _eCRRepositoryImageScanningConfiguration+        , fmap (("ImageTagMutability",) . toJSON) _eCRRepositoryImageTagMutability+        , fmap (("LifecyclePolicy",) . toJSON) _eCRRepositoryLifecyclePolicy         , fmap (("RepositoryName",) . toJSON) _eCRRepositoryRepositoryName         , fmap (("RepositoryPolicyText",) . toJSON) _eCRRepositoryRepositoryPolicyText         , fmap (("Tags",) . toJSON) _eCRRepositoryTags@@ -39,14 +42,24 @@   :: ECRRepository ecrRepository  =   ECRRepository-  { _eCRRepositoryLifecyclePolicy = Nothing+  { _eCRRepositoryImageScanningConfiguration = Nothing+  , _eCRRepositoryImageTagMutability = Nothing+  , _eCRRepositoryLifecyclePolicy = Nothing   , _eCRRepositoryRepositoryName = Nothing   , _eCRRepositoryRepositoryPolicyText = Nothing   , _eCRRepositoryTags = Nothing   } +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ecr-repository.html#cfn-ecr-repository-imagescanningconfiguration+ecrrImageScanningConfiguration :: Lens' ECRRepository (Maybe Object)+ecrrImageScanningConfiguration = lens _eCRRepositoryImageScanningConfiguration (\s a -> s { _eCRRepositoryImageScanningConfiguration = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ecr-repository.html#cfn-ecr-repository-imagetagmutability+ecrrImageTagMutability :: Lens' ECRRepository (Maybe (Val Text))+ecrrImageTagMutability = lens _eCRRepositoryImageTagMutability (\s a -> s { _eCRRepositoryImageTagMutability = a })+ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ecr-repository.html#cfn-ecr-repository-lifecyclepolicy-ecrrLifecyclePolicy :: Lens' ECRRepository (Maybe ECRRepositoryLifecyclePolicy)+ecrrLifecyclePolicy :: Lens' ECRRepository (Maybe Object) ecrrLifecyclePolicy = lens _eCRRepositoryLifecyclePolicy (\s a -> s { _eCRRepositoryLifecyclePolicy = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ecr-repository.html#cfn-ecr-repository-repositoryname
library-gen/Stratosphere/Resources/EKSNodegroup.hs view
@@ -8,6 +8,7 @@ module Stratosphere.Resources.EKSNodegroup where  import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.EKSNodegroupLaunchTemplateSpecification import Stratosphere.ResourceProperties.EKSNodegroupRemoteAccess import Stratosphere.ResourceProperties.EKSNodegroupScalingConfig @@ -21,6 +22,7 @@   , _eKSNodegroupForceUpdateEnabled :: Maybe (Val Bool)   , _eKSNodegroupInstanceTypes :: Maybe (ValList Text)   , _eKSNodegroupLabels :: Maybe Object+  , _eKSNodegroupLaunchTemplate :: Maybe EKSNodegroupLaunchTemplateSpecification   , _eKSNodegroupNodeRole :: Val Text   , _eKSNodegroupNodegroupName :: Maybe (Val Text)   , _eKSNodegroupReleaseVersion :: Maybe (Val Text)@@ -43,6 +45,7 @@         , fmap (("ForceUpdateEnabled",) . toJSON) _eKSNodegroupForceUpdateEnabled         , fmap (("InstanceTypes",) . toJSON) _eKSNodegroupInstanceTypes         , fmap (("Labels",) . toJSON) _eKSNodegroupLabels+        , fmap (("LaunchTemplate",) . toJSON) _eKSNodegroupLaunchTemplate         , (Just . ("NodeRole",) . toJSON) _eKSNodegroupNodeRole         , fmap (("NodegroupName",) . toJSON) _eKSNodegroupNodegroupName         , fmap (("ReleaseVersion",) . toJSON) _eKSNodegroupReleaseVersion@@ -68,6 +71,7 @@   , _eKSNodegroupForceUpdateEnabled = Nothing   , _eKSNodegroupInstanceTypes = Nothing   , _eKSNodegroupLabels = Nothing+  , _eKSNodegroupLaunchTemplate = Nothing   , _eKSNodegroupNodeRole = nodeRolearg   , _eKSNodegroupNodegroupName = Nothing   , _eKSNodegroupReleaseVersion = Nothing@@ -101,6 +105,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-eks-nodegroup.html#cfn-eks-nodegroup-labels eksnLabels :: Lens' EKSNodegroup (Maybe Object) eksnLabels = lens _eKSNodegroupLabels (\s a -> s { _eKSNodegroupLabels = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-eks-nodegroup.html#cfn-eks-nodegroup-launchtemplate+eksnLaunchTemplate :: Lens' EKSNodegroup (Maybe EKSNodegroupLaunchTemplateSpecification)+eksnLaunchTemplate = lens _eKSNodegroupLaunchTemplate (\s a -> s { _eKSNodegroupLaunchTemplate = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-eks-nodegroup.html#cfn-eks-nodegroup-noderole eksnNodeRole :: Lens' EKSNodegroup (Val Text)
library-gen/Stratosphere/Resources/IoTCertificate.hs view
@@ -14,7 +14,10 @@ -- more convenient constructor. data IoTCertificate =   IoTCertificate-  { _ioTCertificateCertificateSigningRequest :: Val Text+  { _ioTCertificateCACertificatePem :: Maybe (Val Text)+  , _ioTCertificateCertificateMode :: Maybe (Val Text)+  , _ioTCertificateCertificatePem :: Maybe (Val Text)+  , _ioTCertificateCertificateSigningRequest :: Maybe (Val Text)   , _ioTCertificateStatus :: Val Text   } deriving (Show, Eq) @@ -24,24 +27,41 @@     { resourcePropertiesType = "AWS::IoT::Certificate"     , resourcePropertiesProperties =         hashMapFromList $ catMaybes-        [ (Just . ("CertificateSigningRequest",) . toJSON) _ioTCertificateCertificateSigningRequest+        [ fmap (("CACertificatePem",) . toJSON) _ioTCertificateCACertificatePem+        , fmap (("CertificateMode",) . toJSON) _ioTCertificateCertificateMode+        , fmap (("CertificatePem",) . toJSON) _ioTCertificateCertificatePem+        , fmap (("CertificateSigningRequest",) . toJSON) _ioTCertificateCertificateSigningRequest         , (Just . ("Status",) . toJSON) _ioTCertificateStatus         ]     }  -- | Constructor for 'IoTCertificate' containing required fields as arguments. ioTCertificate-  :: Val Text -- ^ 'itcCertificateSigningRequest'-  -> Val Text -- ^ 'itcStatus'+  :: Val Text -- ^ 'itcStatus'   -> IoTCertificate-ioTCertificate certificateSigningRequestarg statusarg =+ioTCertificate statusarg =   IoTCertificate-  { _ioTCertificateCertificateSigningRequest = certificateSigningRequestarg+  { _ioTCertificateCACertificatePem = Nothing+  , _ioTCertificateCertificateMode = Nothing+  , _ioTCertificateCertificatePem = Nothing+  , _ioTCertificateCertificateSigningRequest = Nothing   , _ioTCertificateStatus = statusarg   } +-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-iot-certificate.html#cfn-iot-certificate-cacertificatepem+itcCACertificatePem :: Lens' IoTCertificate (Maybe (Val Text))+itcCACertificatePem = lens _ioTCertificateCACertificatePem (\s a -> s { _ioTCertificateCACertificatePem = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-iot-certificate.html#cfn-iot-certificate-certificatemode+itcCertificateMode :: Lens' IoTCertificate (Maybe (Val Text))+itcCertificateMode = lens _ioTCertificateCertificateMode (\s a -> s { _ioTCertificateCertificateMode = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-iot-certificate.html#cfn-iot-certificate-certificatepem+itcCertificatePem :: Lens' IoTCertificate (Maybe (Val Text))+itcCertificatePem = lens _ioTCertificateCertificatePem (\s a -> s { _ioTCertificateCertificatePem = a })+ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-iot-certificate.html#cfn-iot-certificate-certificatesigningrequest-itcCertificateSigningRequest :: Lens' IoTCertificate (Val Text)+itcCertificateSigningRequest :: Lens' IoTCertificate (Maybe (Val Text)) itcCertificateSigningRequest = lens _ioTCertificateCertificateSigningRequest (\s a -> s { _ioTCertificateCertificateSigningRequest = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-iot-certificate.html#cfn-iot-certificate-status
library-gen/Stratosphere/Resources/IoTProvisioningTemplate.hs view
@@ -9,6 +9,7 @@  import Stratosphere.ResourceImports import Stratosphere.ResourceProperties.IoTProvisioningTemplateProvisioningHook+import Stratosphere.ResourceProperties.IoTProvisioningTemplateTags  -- | Full data type definition for IoTProvisioningTemplate. See -- 'ioTProvisioningTemplate' for a more convenient constructor.@@ -18,7 +19,7 @@   , _ioTProvisioningTemplateEnabled :: Maybe (Val Bool)   , _ioTProvisioningTemplatePreProvisioningHook :: Maybe IoTProvisioningTemplateProvisioningHook   , _ioTProvisioningTemplateProvisioningRoleArn :: Val Text-  , _ioTProvisioningTemplateTags :: Maybe [Object]+  , _ioTProvisioningTemplateTags :: Maybe IoTProvisioningTemplateTags   , _ioTProvisioningTemplateTemplateBody :: Val Text   , _ioTProvisioningTemplateTemplateName :: Maybe (Val Text)   } deriving (Show, Eq)@@ -73,7 +74,7 @@ itptProvisioningRoleArn = lens _ioTProvisioningTemplateProvisioningRoleArn (\s a -> s { _ioTProvisioningTemplateProvisioningRoleArn = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-iot-provisioningtemplate.html#cfn-iot-provisioningtemplate-tags-itptTags :: Lens' IoTProvisioningTemplate (Maybe [Object])+itptTags :: Lens' IoTProvisioningTemplate (Maybe IoTProvisioningTemplateTags) itptTags = lens _ioTProvisioningTemplateTags (\s a -> s { _ioTProvisioningTemplateTags = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-iot-provisioningtemplate.html#cfn-iot-provisioningtemplate-templatebody
library-gen/Stratosphere/Resources/LambdaEventSourceMapping.hs view
@@ -25,6 +25,7 @@   , _lambdaEventSourceMappingMaximumRetryAttempts :: Maybe (Val Integer)   , _lambdaEventSourceMappingParallelizationFactor :: Maybe (Val Integer)   , _lambdaEventSourceMappingStartingPosition :: Maybe (Val Text)+  , _lambdaEventSourceMappingTopics :: Maybe (ValList Text)   } deriving (Show, Eq)  instance ToResourceProperties LambdaEventSourceMapping where@@ -44,6 +45,7 @@         , fmap (("MaximumRetryAttempts",) . toJSON) _lambdaEventSourceMappingMaximumRetryAttempts         , fmap (("ParallelizationFactor",) . toJSON) _lambdaEventSourceMappingParallelizationFactor         , fmap (("StartingPosition",) . toJSON) _lambdaEventSourceMappingStartingPosition+        , fmap (("Topics",) . toJSON) _lambdaEventSourceMappingTopics         ]     } @@ -66,6 +68,7 @@   , _lambdaEventSourceMappingMaximumRetryAttempts = Nothing   , _lambdaEventSourceMappingParallelizationFactor = Nothing   , _lambdaEventSourceMappingStartingPosition = Nothing+  , _lambdaEventSourceMappingTopics = Nothing   }  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-lambda-eventsourcemapping.html#cfn-lambda-eventsourcemapping-batchsize@@ -111,3 +114,7 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-lambda-eventsourcemapping.html#cfn-lambda-eventsourcemapping-startingposition lesmStartingPosition :: Lens' LambdaEventSourceMapping (Maybe (Val Text)) lesmStartingPosition = lens _lambdaEventSourceMappingStartingPosition (\s a -> s { _lambdaEventSourceMappingStartingPosition = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-lambda-eventsourcemapping.html#cfn-lambda-eventsourcemapping-topics+lesmTopics :: Lens' LambdaEventSourceMapping (Maybe (ValList Text))+lesmTopics = lens _lambdaEventSourceMappingTopics (\s a -> s { _lambdaEventSourceMappingTopics = a })
library-gen/Stratosphere/Resources/SNSTopic.hs view
@@ -17,7 +17,6 @@   SNSTopic   { _sNSTopicContentBasedDeduplication :: Maybe (Val Bool)   , _sNSTopicDisplayName :: Maybe (Val Text)-  , _sNSTopicFifoTopic :: Maybe (Val Bool)   , _sNSTopicKmsMasterKeyId :: Maybe (Val Text)   , _sNSTopicSubscription :: Maybe [SNSTopicSubscription]   , _sNSTopicTags :: Maybe [Tag]@@ -32,7 +31,6 @@         hashMapFromList $ catMaybes         [ fmap (("ContentBasedDeduplication",) . toJSON) _sNSTopicContentBasedDeduplication         , fmap (("DisplayName",) . toJSON) _sNSTopicDisplayName-        , fmap (("FifoTopic",) . toJSON) _sNSTopicFifoTopic         , fmap (("KmsMasterKeyId",) . toJSON) _sNSTopicKmsMasterKeyId         , fmap (("Subscription",) . toJSON) _sNSTopicSubscription         , fmap (("Tags",) . toJSON) _sNSTopicTags@@ -47,7 +45,6 @@   SNSTopic   { _sNSTopicContentBasedDeduplication = Nothing   , _sNSTopicDisplayName = Nothing-  , _sNSTopicFifoTopic = Nothing   , _sNSTopicKmsMasterKeyId = Nothing   , _sNSTopicSubscription = Nothing   , _sNSTopicTags = Nothing@@ -61,10 +58,6 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sns-topic.html#cfn-sns-topic-displayname snstDisplayName :: Lens' SNSTopic (Maybe (Val Text)) snstDisplayName = lens _sNSTopicDisplayName (\s a -> s { _sNSTopicDisplayName = a })---- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sns-topic.html#cfn-sns-topic-fifotopic-snstFifoTopic :: Lens' SNSTopic (Maybe (Val Bool))-snstFifoTopic = lens _sNSTopicFifoTopic (\s a -> s { _sNSTopicFifoTopic = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-sns-topic.html#cfn-sns-topic-kmsmasterkeyid snstKmsMasterKeyId :: Lens' SNSTopic (Maybe (Val Text))
+ library-gen/Stratosphere/Resources/SageMakerMonitoringSchedule.hs view
@@ -0,0 +1,108 @@+{-# LANGUAGE OverloadedStrings #-}+{-# LANGUAGE RecordWildCards #-}+{-# LANGUAGE StrictData #-}+{-# LANGUAGE TupleSections #-}++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-monitoringschedule.html++module Stratosphere.Resources.SageMakerMonitoringSchedule where++import Stratosphere.ResourceImports+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringExecutionSummary+import Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringScheduleConfig+import Stratosphere.ResourceProperties.Tag++-- | Full data type definition for SageMakerMonitoringSchedule. See+-- 'sageMakerMonitoringSchedule' for a more convenient constructor.+data SageMakerMonitoringSchedule =+  SageMakerMonitoringSchedule+  { _sageMakerMonitoringScheduleCreationTime :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleEndpointName :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleFailureReason :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleLastModifiedTime :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleLastMonitoringExecutionSummary :: Maybe SageMakerMonitoringScheduleMonitoringExecutionSummary+  , _sageMakerMonitoringScheduleMonitoringScheduleArn :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleMonitoringScheduleConfig :: SageMakerMonitoringScheduleMonitoringScheduleConfig+  , _sageMakerMonitoringScheduleMonitoringScheduleName :: Val Text+  , _sageMakerMonitoringScheduleMonitoringScheduleStatus :: Maybe (Val Text)+  , _sageMakerMonitoringScheduleTags :: Maybe [Tag]+  } deriving (Show, Eq)++instance ToResourceProperties SageMakerMonitoringSchedule where+  toResourceProperties SageMakerMonitoringSchedule{..} =+    ResourceProperties+    { resourcePropertiesType = "AWS::SageMaker::MonitoringSchedule"+    , resourcePropertiesProperties =+        hashMapFromList $ catMaybes+        [ fmap (("CreationTime",) . toJSON) _sageMakerMonitoringScheduleCreationTime+        , fmap (("EndpointName",) . toJSON) _sageMakerMonitoringScheduleEndpointName+        , fmap (("FailureReason",) . toJSON) _sageMakerMonitoringScheduleFailureReason+        , fmap (("LastModifiedTime",) . toJSON) _sageMakerMonitoringScheduleLastModifiedTime+        , fmap (("LastMonitoringExecutionSummary",) . toJSON) _sageMakerMonitoringScheduleLastMonitoringExecutionSummary+        , fmap (("MonitoringScheduleArn",) . toJSON) _sageMakerMonitoringScheduleMonitoringScheduleArn+        , (Just . ("MonitoringScheduleConfig",) . toJSON) _sageMakerMonitoringScheduleMonitoringScheduleConfig+        , (Just . ("MonitoringScheduleName",) . toJSON) _sageMakerMonitoringScheduleMonitoringScheduleName+        , fmap (("MonitoringScheduleStatus",) . toJSON) _sageMakerMonitoringScheduleMonitoringScheduleStatus+        , fmap (("Tags",) . toJSON) _sageMakerMonitoringScheduleTags+        ]+    }++-- | Constructor for 'SageMakerMonitoringSchedule' containing required fields+-- as arguments.+sageMakerMonitoringSchedule+  :: SageMakerMonitoringScheduleMonitoringScheduleConfig -- ^ 'smmsMonitoringScheduleConfig'+  -> Val Text -- ^ 'smmsMonitoringScheduleName'+  -> SageMakerMonitoringSchedule+sageMakerMonitoringSchedule monitoringScheduleConfigarg monitoringScheduleNamearg =+  SageMakerMonitoringSchedule+  { _sageMakerMonitoringScheduleCreationTime = Nothing+  , _sageMakerMonitoringScheduleEndpointName = Nothing+  , _sageMakerMonitoringScheduleFailureReason = Nothing+  , _sageMakerMonitoringScheduleLastModifiedTime = Nothing+  , _sageMakerMonitoringScheduleLastMonitoringExecutionSummary = Nothing+  , _sageMakerMonitoringScheduleMonitoringScheduleArn = Nothing+  , _sageMakerMonitoringScheduleMonitoringScheduleConfig = monitoringScheduleConfigarg+  , _sageMakerMonitoringScheduleMonitoringScheduleName = monitoringScheduleNamearg+  , _sageMakerMonitoringScheduleMonitoringScheduleStatus = Nothing+  , _sageMakerMonitoringScheduleTags = Nothing+  }++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-monitoringschedule.html#cfn-sagemaker-monitoringschedule-creationtime+smmsCreationTime :: Lens' SageMakerMonitoringSchedule (Maybe (Val Text))+smmsCreationTime = lens _sageMakerMonitoringScheduleCreationTime (\s a -> s { _sageMakerMonitoringScheduleCreationTime = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-monitoringschedule.html#cfn-sagemaker-monitoringschedule-endpointname+smmsEndpointName :: Lens' SageMakerMonitoringSchedule (Maybe (Val Text))+smmsEndpointName = lens _sageMakerMonitoringScheduleEndpointName (\s a -> s { _sageMakerMonitoringScheduleEndpointName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-monitoringschedule.html#cfn-sagemaker-monitoringschedule-failurereason+smmsFailureReason :: Lens' SageMakerMonitoringSchedule (Maybe (Val Text))+smmsFailureReason = lens _sageMakerMonitoringScheduleFailureReason (\s a -> s { _sageMakerMonitoringScheduleFailureReason = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-monitoringschedule.html#cfn-sagemaker-monitoringschedule-lastmodifiedtime+smmsLastModifiedTime :: Lens' SageMakerMonitoringSchedule (Maybe (Val Text))+smmsLastModifiedTime = lens _sageMakerMonitoringScheduleLastModifiedTime (\s a -> s { _sageMakerMonitoringScheduleLastModifiedTime = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-monitoringschedule.html#cfn-sagemaker-monitoringschedule-lastmonitoringexecutionsummary+smmsLastMonitoringExecutionSummary :: Lens' SageMakerMonitoringSchedule (Maybe SageMakerMonitoringScheduleMonitoringExecutionSummary)+smmsLastMonitoringExecutionSummary = lens _sageMakerMonitoringScheduleLastMonitoringExecutionSummary (\s a -> s { _sageMakerMonitoringScheduleLastMonitoringExecutionSummary = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-monitoringschedule.html#cfn-sagemaker-monitoringschedule-monitoringschedulearn+smmsMonitoringScheduleArn :: Lens' SageMakerMonitoringSchedule (Maybe (Val Text))+smmsMonitoringScheduleArn = lens _sageMakerMonitoringScheduleMonitoringScheduleArn (\s a -> s { _sageMakerMonitoringScheduleMonitoringScheduleArn = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-monitoringschedule.html#cfn-sagemaker-monitoringschedule-monitoringscheduleconfig+smmsMonitoringScheduleConfig :: Lens' SageMakerMonitoringSchedule SageMakerMonitoringScheduleMonitoringScheduleConfig+smmsMonitoringScheduleConfig = lens _sageMakerMonitoringScheduleMonitoringScheduleConfig (\s a -> s { _sageMakerMonitoringScheduleMonitoringScheduleConfig = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-monitoringschedule.html#cfn-sagemaker-monitoringschedule-monitoringschedulename+smmsMonitoringScheduleName :: Lens' SageMakerMonitoringSchedule (Val Text)+smmsMonitoringScheduleName = lens _sageMakerMonitoringScheduleMonitoringScheduleName (\s a -> s { _sageMakerMonitoringScheduleMonitoringScheduleName = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-monitoringschedule.html#cfn-sagemaker-monitoringschedule-monitoringschedulestatus+smmsMonitoringScheduleStatus :: Lens' SageMakerMonitoringSchedule (Maybe (Val Text))+smmsMonitoringScheduleStatus = lens _sageMakerMonitoringScheduleMonitoringScheduleStatus (\s a -> s { _sageMakerMonitoringScheduleMonitoringScheduleStatus = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-sagemaker-monitoringschedule.html#cfn-sagemaker-monitoringschedule-tags+smmsTags :: Lens' SageMakerMonitoringSchedule (Maybe [Tag])+smmsTags = lens _sageMakerMonitoringScheduleTags (\s a -> s { _sageMakerMonitoringScheduleTags = a })
library-gen/Stratosphere/Resources/StepFunctionsStateMachine.hs view
@@ -19,6 +19,7 @@   StepFunctionsStateMachine   { _stepFunctionsStateMachineDefinitionS3Location :: Maybe StepFunctionsStateMachineS3Location   , _stepFunctionsStateMachineDefinitionString :: Maybe (Val Text)+  , _stepFunctionsStateMachineDefinitionSubstitutions :: Maybe Object   , _stepFunctionsStateMachineLoggingConfiguration :: Maybe StepFunctionsStateMachineLoggingConfiguration   , _stepFunctionsStateMachineRoleArn :: Val Text   , _stepFunctionsStateMachineStateMachineName :: Maybe (Val Text)@@ -35,6 +36,7 @@         hashMapFromList $ catMaybes         [ fmap (("DefinitionS3Location",) . toJSON) _stepFunctionsStateMachineDefinitionS3Location         , fmap (("DefinitionString",) . toJSON) _stepFunctionsStateMachineDefinitionString+        , fmap (("DefinitionSubstitutions",) . toJSON) _stepFunctionsStateMachineDefinitionSubstitutions         , fmap (("LoggingConfiguration",) . toJSON) _stepFunctionsStateMachineLoggingConfiguration         , (Just . ("RoleArn",) . toJSON) _stepFunctionsStateMachineRoleArn         , fmap (("StateMachineName",) . toJSON) _stepFunctionsStateMachineStateMachineName@@ -53,6 +55,7 @@   StepFunctionsStateMachine   { _stepFunctionsStateMachineDefinitionS3Location = Nothing   , _stepFunctionsStateMachineDefinitionString = Nothing+  , _stepFunctionsStateMachineDefinitionSubstitutions = Nothing   , _stepFunctionsStateMachineLoggingConfiguration = Nothing   , _stepFunctionsStateMachineRoleArn = roleArnarg   , _stepFunctionsStateMachineStateMachineName = Nothing@@ -68,6 +71,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-stepfunctions-statemachine.html#cfn-stepfunctions-statemachine-definitionstring sfsmDefinitionString :: Lens' StepFunctionsStateMachine (Maybe (Val Text)) sfsmDefinitionString = lens _stepFunctionsStateMachineDefinitionString (\s a -> s { _stepFunctionsStateMachineDefinitionString = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-stepfunctions-statemachine.html#cfn-stepfunctions-statemachine-definitionsubstitutions+sfsmDefinitionSubstitutions :: Lens' StepFunctionsStateMachine (Maybe Object)+sfsmDefinitionSubstitutions = lens _stepFunctionsStateMachineDefinitionSubstitutions (\s a -> s { _stepFunctionsStateMachineDefinitionSubstitutions = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-stepfunctions-statemachine.html#cfn-stepfunctions-statemachine-loggingconfiguration sfsmLoggingConfiguration :: Lens' StepFunctionsStateMachine (Maybe StepFunctionsStateMachineLoggingConfiguration)
library-gen/Stratosphere/Resources/TransferServer.hs view
@@ -22,6 +22,7 @@   , _transferServerIdentityProviderDetails :: Maybe TransferServerIdentityProviderDetails   , _transferServerIdentityProviderType :: Maybe (Val Text)   , _transferServerLoggingRole :: Maybe (Val Text)+  , _transferServerSecurityPolicyName :: Maybe (Val Text)   , _transferServerTags :: Maybe [Tag]   } deriving (Show, Eq) @@ -37,6 +38,7 @@         , fmap (("IdentityProviderDetails",) . toJSON) _transferServerIdentityProviderDetails         , fmap (("IdentityProviderType",) . toJSON) _transferServerIdentityProviderType         , fmap (("LoggingRole",) . toJSON) _transferServerLoggingRole+        , fmap (("SecurityPolicyName",) . toJSON) _transferServerSecurityPolicyName         , fmap (("Tags",) . toJSON) _transferServerTags         ]     }@@ -52,6 +54,7 @@   , _transferServerIdentityProviderDetails = Nothing   , _transferServerIdentityProviderType = Nothing   , _transferServerLoggingRole = Nothing+  , _transferServerSecurityPolicyName = Nothing   , _transferServerTags = Nothing   } @@ -78,6 +81,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-loggingrole tsLoggingRole :: Lens' TransferServer (Maybe (Val Text)) tsLoggingRole = lens _transferServerLoggingRole (\s a -> s { _transferServerLoggingRole = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-securitypolicyname+tsSecurityPolicyName :: Lens' TransferServer (Maybe (Val Text))+tsSecurityPolicyName = lens _transferServerSecurityPolicyName (\s a -> s { _transferServerSecurityPolicyName = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-transfer-server.html#cfn-transfer-server-tags tsTags :: Lens' TransferServer (Maybe [Tag])
library/Stratosphere/Types.hs view
@@ -53,13 +53,14 @@   deriving (Show, Read, Eq, Generic, ToJSON)  data HttpMethod-  = GET-  | POST-  | PUT-  | HEAD+  = ANY   | DELETE+  | GET+  | HEAD   | OPTIONS-  | ANY+  | PATCH+  | POST+  | PUT   deriving (Show, Read, Eq, Generic, ToJSON)  data LoggingLevel
stratosphere.cabal view
@@ -1,13 +1,13 @@ cabal-version: 1.12 --- This file has been generated from package.yaml by hpack version 0.31.2.+-- This file has been generated from package.yaml by hpack version 0.33.0. -- -- see: https://github.com/sol/hpack ----- hash: ecd31917c6c788877da2721c4104df8ed1332353827cfe1604bc815f79e42762+-- hash: 6765ec959bba1c4110c24af5f8d27cdf62644e46306cf6d01cf0e5610210b434  name:           stratosphere-version:        0.57.0+version:        0.58.0 synopsis:       EDSL for AWS CloudFormation description:    EDSL for AWS CloudFormation category:       AWS, Cloud@@ -123,6 +123,18 @@       Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyStepAdjustment       Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration       Stratosphere.ResourceProperties.ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration+      Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarm+      Stratosphere.ResourceProperties.ApplicationInsightsApplicationAlarmMetric+      Stratosphere.ResourceProperties.ApplicationInsightsApplicationComponentConfiguration+      Stratosphere.ResourceProperties.ApplicationInsightsApplicationComponentMonitoringSetting+      Stratosphere.ResourceProperties.ApplicationInsightsApplicationConfigurationDetails+      Stratosphere.ResourceProperties.ApplicationInsightsApplicationCustomComponent+      Stratosphere.ResourceProperties.ApplicationInsightsApplicationLog+      Stratosphere.ResourceProperties.ApplicationInsightsApplicationLogPattern+      Stratosphere.ResourceProperties.ApplicationInsightsApplicationLogPatternSet+      Stratosphere.ResourceProperties.ApplicationInsightsApplicationSubComponentConfigurationDetails+      Stratosphere.ResourceProperties.ApplicationInsightsApplicationSubComponentTypeConfiguration+      Stratosphere.ResourceProperties.ApplicationInsightsApplicationWindowsEvent       Stratosphere.ResourceProperties.AppMeshGatewayRouteGatewayRouteSpec       Stratosphere.ResourceProperties.AppMeshGatewayRouteGatewayRouteTarget       Stratosphere.ResourceProperties.AppMeshGatewayRouteGatewayRouteVirtualService@@ -491,6 +503,7 @@       Stratosphere.ResourceProperties.DynamoDBTableStreamSpecification       Stratosphere.ResourceProperties.DynamoDBTableTimeToLiveSpecification       Stratosphere.ResourceProperties.EC2CapacityReservationTagSpecification+      Stratosphere.ResourceProperties.EC2CarrierGatewayTags       Stratosphere.ResourceProperties.EC2ClientVpnEndpointCertificateAuthenticationRequest       Stratosphere.ResourceProperties.EC2ClientVpnEndpointClientAuthenticationRequest       Stratosphere.ResourceProperties.EC2ClientVpnEndpointConnectionLogOptions@@ -573,7 +586,6 @@       Stratosphere.ResourceProperties.EC2SpotFleetTargetGroupsConfig       Stratosphere.ResourceProperties.EC2TrafficMirrorFilterRuleTrafficMirrorPortRange       Stratosphere.ResourceProperties.EC2VPNConnectionVpnTunnelOptionsSpecification-      Stratosphere.ResourceProperties.ECRRepositoryLifecyclePolicy       Stratosphere.ResourceProperties.ECSCapacityProviderAutoScalingGroupProvider       Stratosphere.ResourceProperties.ECSCapacityProviderManagedScaling       Stratosphere.ResourceProperties.ECSClusterCapacityProviderStrategyItem@@ -586,10 +598,13 @@       Stratosphere.ResourceProperties.ECSServicePlacementConstraint       Stratosphere.ResourceProperties.ECSServicePlacementStrategy       Stratosphere.ResourceProperties.ECSServiceServiceRegistry+      Stratosphere.ResourceProperties.ECSTaskDefinitionAuthorizationConfig       Stratosphere.ResourceProperties.ECSTaskDefinitionContainerDefinition       Stratosphere.ResourceProperties.ECSTaskDefinitionContainerDependency       Stratosphere.ResourceProperties.ECSTaskDefinitionDevice       Stratosphere.ResourceProperties.ECSTaskDefinitionDockerVolumeConfiguration+      Stratosphere.ResourceProperties.ECSTaskDefinitionEFSVolumeConfiguration+      Stratosphere.ResourceProperties.ECSTaskDefinitionEnvironmentFile       Stratosphere.ResourceProperties.ECSTaskDefinitionFirelensConfiguration       Stratosphere.ResourceProperties.ECSTaskDefinitionHealthCheck       Stratosphere.ResourceProperties.ECSTaskDefinitionHostEntry@@ -626,6 +641,7 @@       Stratosphere.ResourceProperties.EKSClusterEncryptionConfig       Stratosphere.ResourceProperties.EKSClusterProvider       Stratosphere.ResourceProperties.EKSClusterResourcesVpcConfig+      Stratosphere.ResourceProperties.EKSNodegroupLaunchTemplateSpecification       Stratosphere.ResourceProperties.EKSNodegroupRemoteAccess       Stratosphere.ResourceProperties.EKSNodegroupScalingConfig       Stratosphere.ResourceProperties.ElastiCacheReplicationGroupNodeGroupConfiguration@@ -950,6 +966,7 @@       Stratosphere.ResourceProperties.IoTEventsInputAttribute       Stratosphere.ResourceProperties.IoTEventsInputInputDefinition       Stratosphere.ResourceProperties.IoTProvisioningTemplateProvisioningHook+      Stratosphere.ResourceProperties.IoTProvisioningTemplateTags       Stratosphere.ResourceProperties.IoTThingAttributePayload       Stratosphere.ResourceProperties.IoTThingsGraphFlowTemplateDefinitionDocument       Stratosphere.ResourceProperties.IoTTopicRuleAction@@ -1327,6 +1344,25 @@       Stratosphere.ResourceProperties.SageMakerEndpointVariantProperty       Stratosphere.ResourceProperties.SageMakerModelContainerDefinition       Stratosphere.ResourceProperties.SageMakerModelVpcConfig+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleBaselineConfig+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleClusterConfig+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleConstraintsResource+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleEndpointInput+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringAppSpecification+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringExecutionSummary+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringInput+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringInputs+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringJobDefinition+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringOutput+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringOutputConfig+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringResources+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleMonitoringScheduleConfig+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleNetworkConfig+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleS3Output+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleScheduleConfig+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleStatisticsResource+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleStoppingCondition+      Stratosphere.ResourceProperties.SageMakerMonitoringScheduleVpcConfig       Stratosphere.ResourceProperties.SageMakerNotebookInstanceLifecycleConfigNotebookInstanceLifecycleHook       Stratosphere.ResourceProperties.SageMakerWorkteamCognitoMemberDefinition       Stratosphere.ResourceProperties.SageMakerWorkteamMemberDefinition@@ -1526,6 +1562,7 @@       Stratosphere.Resources.AppConfigHostedConfigurationVersion       Stratosphere.Resources.ApplicationAutoScalingScalableTarget       Stratosphere.Resources.ApplicationAutoScalingScalingPolicy+      Stratosphere.Resources.ApplicationInsightsApplication       Stratosphere.Resources.AppMeshGatewayRoute       Stratosphere.Resources.AppMeshMesh       Stratosphere.Resources.AppMeshRoute@@ -1640,6 +1677,7 @@       Stratosphere.Resources.DocDBDBSubnetGroup       Stratosphere.Resources.DynamoDBTable       Stratosphere.Resources.EC2CapacityReservation+      Stratosphere.Resources.EC2CarrierGateway       Stratosphere.Resources.EC2ClientVpnAuthorizationRule       Stratosphere.Resources.EC2ClientVpnEndpoint       Stratosphere.Resources.EC2ClientVpnRoute@@ -1948,6 +1986,7 @@       Stratosphere.Resources.SageMakerEndpoint       Stratosphere.Resources.SageMakerEndpointConfig       Stratosphere.Resources.SageMakerModel+      Stratosphere.Resources.SageMakerMonitoringSchedule       Stratosphere.Resources.SageMakerNotebookInstance       Stratosphere.Resources.SageMakerNotebookInstanceLifecycleConfig       Stratosphere.Resources.SageMakerWorkteam