packages feed

stratosphere 0.3.1 → 0.4.0

raw patch · 458 files changed

+524/−492 lines, 458 files

Files

CHANGELOG.md view
@@ -1,5 +1,17 @@ # Change Log +## 0.4.0++* Derive the `Eq` type class for everything. This is useful when comparing two+  templates.+* Added the new `Fn::Split` function.+* Fix error in resource specification document where+  `AWS::AutoScaling::AutoScalingGroup.Tags` was mistakenly called `AsTags`.+* Fix error in resource specification document where the two properties `Image`+  and `Name` in `AWS::ECS::TaskDefinition.ContainerDefinition` were incorrectly+  marked as *not* required, even though they are required.+* Fix JSON instances for auto scaling group update policies+ ## 0.3.1  * Updated resource specification document to version 1.1.1.
README.md view
@@ -137,12 +137,6 @@  ## Future Work -The library is usable in its current state and it is already much more-enjoyable to work with than writing JSON templates by hand, but there are of-course a few possible future improvements:--* Not all resources implemented. Adding resources is very easy though. Just-  request them and I will implement them :) * Implement basic checker for things like undefined Refs and duplicate field   names. This stuff would be too unwieldy to do in types, and performing a   checking pass over a template should be pretty straightforward.
library-gen/Stratosphere/ResourceProperties/ApiGatewayApiKeyStageKey.hs view
@@ -20,7 +20,7 @@   ApiGatewayApiKeyStageKey   { _apiGatewayApiKeyStageKeyRestApiId :: Maybe (Val Text)   , _apiGatewayApiKeyStageKeyStageName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayApiKeyStageKey where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 25, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentMethodSetting.hs view
@@ -28,7 +28,7 @@   , _apiGatewayDeploymentMethodSettingResourcePath :: Maybe (Val Text)   , _apiGatewayDeploymentMethodSettingThrottlingBurstLimit :: Maybe (Val Integer')   , _apiGatewayDeploymentMethodSettingThrottlingRateLimit :: Maybe (Val Double')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayDeploymentMethodSetting where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentStageDescription.hs view
@@ -34,7 +34,7 @@   , _apiGatewayDeploymentStageDescriptionThrottlingBurstLimit :: Maybe (Val Integer')   , _apiGatewayDeploymentStageDescriptionThrottlingRateLimit :: Maybe (Val Double')   , _apiGatewayDeploymentStageDescriptionVariables :: Maybe Object-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayDeploymentStageDescription where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 37, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegration.hs view
@@ -29,7 +29,7 @@   , _apiGatewayMethodIntegrationRequestTemplates :: Maybe Object   , _apiGatewayMethodIntegrationType :: Maybe (Val ApiBackendType)   , _apiGatewayMethodIntegrationUri :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayMethodIntegration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegrationResponse.hs view
@@ -22,7 +22,7 @@   , _apiGatewayMethodIntegrationResponseResponseTemplates :: Maybe Object   , _apiGatewayMethodIntegrationResponseSelectionPattern :: Maybe (Val Text)   , _apiGatewayMethodIntegrationResponseStatusCode :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayMethodIntegrationResponse where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodMethodResponse.hs view
@@ -21,7 +21,7 @@   { _apiGatewayMethodMethodResponseResponseModels :: Maybe Object   , _apiGatewayMethodMethodResponseResponseParameters :: Maybe Object   , _apiGatewayMethodMethodResponseStatusCode :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayMethodMethodResponse where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiS3Location.hs view
@@ -22,7 +22,7 @@   , _apiGatewayRestApiS3LocationETag :: Maybe (Val Text)   , _apiGatewayRestApiS3LocationKey :: Maybe (Val Text)   , _apiGatewayRestApiS3LocationVersion :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayRestApiS3Location where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ApiGatewayStageMethodSetting.hs view
@@ -28,7 +28,7 @@   , _apiGatewayStageMethodSettingResourcePath :: Maybe (Val Text)   , _apiGatewayStageMethodSettingThrottlingBurstLimit :: Maybe (Val Integer')   , _apiGatewayStageMethodSettingThrottlingRateLimit :: Maybe (Val Double')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayStageMethodSetting where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanApiStage.hs view
@@ -20,7 +20,7 @@   ApiGatewayUsagePlanApiStage   { _apiGatewayUsagePlanApiStageApiId :: Maybe (Val Text)   , _apiGatewayUsagePlanApiStageStage :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayUsagePlanApiStage where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanQuotaSettings.hs view
@@ -21,7 +21,7 @@   { _apiGatewayUsagePlanQuotaSettingsLimit :: Maybe (Val Integer')   , _apiGatewayUsagePlanQuotaSettingsOffset :: Maybe (Val Integer')   , _apiGatewayUsagePlanQuotaSettingsPeriod :: Maybe (Val Period)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayUsagePlanQuotaSettings where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanThrottleSettings.hs view
@@ -20,7 +20,7 @@   ApiGatewayUsagePlanThrottleSettings   { _apiGatewayUsagePlanThrottleSettingsBurstLimit :: Maybe (Val Integer')   , _apiGatewayUsagePlanThrottleSettingsRateLimit :: Maybe (Val Double')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayUsagePlanThrottleSettings where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepAdjustment.hs view
@@ -23,7 +23,7 @@   { _applicationAutoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound :: Maybe (Val Double')   , _applicationAutoScalingScalingPolicyStepAdjustmentMetricIntervalUpperBound :: Maybe (Val Double')   , _applicationAutoScalingScalingPolicyStepAdjustmentScalingAdjustment :: Val Integer'-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApplicationAutoScalingScalingPolicyStepAdjustment where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 50, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration.hs view
@@ -25,7 +25,7 @@   , _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationMetricAggregationType :: Maybe (Val Text)   , _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationMinAdjustmentMagnitude :: Maybe (Val Integer')   , _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationStepAdjustments :: Maybe [ApplicationAutoScalingScalingPolicyStepAdjustment]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 66, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMetricsCollection.hs view
@@ -22,7 +22,7 @@   AutoScalingAutoScalingGroupMetricsCollection   { _autoScalingAutoScalingGroupMetricsCollectionGranularity :: Val Text   , _autoScalingAutoScalingGroupMetricsCollectionMetrics :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingAutoScalingGroupMetricsCollection where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 45, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupNotificationConfigurations.hs view
@@ -22,7 +22,7 @@   AutoScalingAutoScalingGroupNotificationConfigurations   { _autoScalingAutoScalingGroupNotificationConfigurationsNotificationTypes :: Maybe [Val Text]   , _autoScalingAutoScalingGroupNotificationConfigurationsTopicARN :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingAutoScalingGroupNotificationConfigurations where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 54, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupTagProperty.hs view
@@ -22,7 +22,7 @@   { _autoScalingAutoScalingGroupTagPropertyKey :: Val Text   , _autoScalingAutoScalingGroupTagPropertyPropagateAtLaunch :: Val Bool'   , _autoScalingAutoScalingGroupTagPropertyValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingAutoScalingGroupTagProperty where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 39, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDevice.hs view
@@ -25,7 +25,7 @@   , _autoScalingLaunchConfigurationBlockDeviceSnapshotId :: Maybe (Val Text)   , _autoScalingLaunchConfigurationBlockDeviceVolumeSize :: Maybe (Val Text)   , _autoScalingLaunchConfigurationBlockDeviceVolumeType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingLaunchConfigurationBlockDevice where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 42, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDeviceMapping.hs view
@@ -24,7 +24,7 @@   , _autoScalingLaunchConfigurationBlockDeviceMappingEbs :: Maybe AutoScalingLaunchConfigurationBlockDevice   , _autoScalingLaunchConfigurationBlockDeviceMappingNoDevice :: Maybe (Val Bool')   , _autoScalingLaunchConfigurationBlockDeviceMappingVirtualName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingLaunchConfigurationBlockDeviceMapping where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 49, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyStepAdjustment.hs view
@@ -22,7 +22,7 @@   { _autoScalingScalingPolicyStepAdjustmentMetricIntervalLowerBound :: Maybe (Val Double')   , _autoScalingScalingPolicyStepAdjustmentMetricIntervalUpperBound :: Maybe (Val Double')   , _autoScalingScalingPolicyStepAdjustmentScalingAdjustment :: Val Integer'-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingScalingPolicyStepAdjustment where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 39, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CertificateManagerCertificateDomainValidationOption.hs view
@@ -22,7 +22,7 @@   CertificateManagerCertificateDomainValidationOption   { _certificateManagerCertificateDomainValidationOptionDomainName :: Val Text   , _certificateManagerCertificateDomainValidationOptionValidationDomain :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CertificateManagerCertificateDomainValidationOption where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 52, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCacheBehavior.hs view
@@ -30,7 +30,7 @@   , _cloudFrontDistributionCacheBehaviorTargetOriginId :: Val Text   , _cloudFrontDistributionCacheBehaviorTrustedSigners :: Maybe [Val Text]   , _cloudFrontDistributionCacheBehaviorViewerProtocolPolicy :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionCacheBehavior where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCookies.hs view
@@ -20,7 +20,7 @@   CloudFrontDistributionCookies   { _cloudFrontDistributionCookiesForward :: Val Text   , _cloudFrontDistributionCookiesWhitelistedNames :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionCookies where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomErrorResponse.hs view
@@ -23,7 +23,7 @@   , _cloudFrontDistributionCustomErrorResponseErrorCode :: Val Integer'   , _cloudFrontDistributionCustomErrorResponseResponseCode :: Maybe (Val Integer')   , _cloudFrontDistributionCustomErrorResponseResponsePagePath :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionCustomErrorResponse where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 42, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomOriginConfig.hs view
@@ -23,7 +23,7 @@   , _cloudFrontDistributionCustomOriginConfigHTTPSPort :: Maybe (Val Integer')   , _cloudFrontDistributionCustomOriginConfigOriginProtocolPolicy :: Val Text   , _cloudFrontDistributionCustomOriginConfigOriginSSLProtocols :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionCustomOriginConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 41, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDefaultCacheBehavior.hs view
@@ -30,7 +30,7 @@   , _cloudFrontDistributionDefaultCacheBehaviorTargetOriginId :: Val Text   , _cloudFrontDistributionDefaultCacheBehaviorTrustedSigners :: Maybe [Val Text]   , _cloudFrontDistributionDefaultCacheBehaviorViewerProtocolPolicy :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionDefaultCacheBehavior where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 43, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDistributionConfig.hs view
@@ -39,7 +39,7 @@   , _cloudFrontDistributionDistributionConfigRestrictions :: Maybe CloudFrontDistributionRestrictions   , _cloudFrontDistributionDistributionConfigViewerCertificate :: Maybe CloudFrontDistributionViewerCertificate   , _cloudFrontDistributionDistributionConfigWebACLId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionDistributionConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 41, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionForwardedValues.hs view
@@ -23,7 +23,7 @@   , _cloudFrontDistributionForwardedValuesHeaders :: Maybe [Val Text]   , _cloudFrontDistributionForwardedValuesQueryString :: Val Bool'   , _cloudFrontDistributionForwardedValuesQueryStringCacheKeys :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionForwardedValues where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 38, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionGeoRestriction.hs view
@@ -20,7 +20,7 @@   CloudFrontDistributionGeoRestriction   { _cloudFrontDistributionGeoRestrictionLocations :: Maybe [Val Text]   , _cloudFrontDistributionGeoRestrictionRestrictionType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionGeoRestriction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 37, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLogging.hs view
@@ -21,7 +21,7 @@   { _cloudFrontDistributionLoggingBucket :: Val Text   , _cloudFrontDistributionLoggingIncludeCookies :: Maybe (Val Bool')   , _cloudFrontDistributionLoggingPrefix :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionLogging where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOrigin.hs view
@@ -26,7 +26,7 @@   , _cloudFrontDistributionOriginOriginCustomHeaders :: Maybe [CloudFrontDistributionOriginCustomHeader]   , _cloudFrontDistributionOriginOriginPath :: Maybe (Val Text)   , _cloudFrontDistributionOriginS3OriginConfig :: Maybe CloudFrontDistributionS3OriginConfig-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionOrigin where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginCustomHeader.hs view
@@ -21,7 +21,7 @@   CloudFrontDistributionOriginCustomHeader   { _cloudFrontDistributionOriginCustomHeaderHeaderName :: Val Text   , _cloudFrontDistributionOriginCustomHeaderHeaderValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionOriginCustomHeader where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 41, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionRestrictions.hs view
@@ -19,7 +19,7 @@ data CloudFrontDistributionRestrictions =   CloudFrontDistributionRestrictions   { _cloudFrontDistributionRestrictionsGeoRestriction :: CloudFrontDistributionGeoRestriction-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionRestrictions where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 35, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionS3OriginConfig.hs view
@@ -19,7 +19,7 @@ data CloudFrontDistributionS3OriginConfig =   CloudFrontDistributionS3OriginConfig   { _cloudFrontDistributionS3OriginConfigOriginAccessIdentity :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionS3OriginConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 37, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionViewerCertificate.hs view
@@ -24,7 +24,7 @@   , _cloudFrontDistributionViewerCertificateIamCertificateId :: Maybe (Val Text)   , _cloudFrontDistributionViewerCertificateMinimumProtocolVersion :: Maybe (Val Text)   , _cloudFrontDistributionViewerCertificateSslSupportMethod :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistributionViewerCertificate where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 40, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmDimension.hs view
@@ -20,7 +20,7 @@   CloudWatchAlarmDimension   { _cloudWatchAlarmDimensionName :: Val Text   , _cloudWatchAlarmDimensionValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudWatchAlarmDimension where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 25, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodeBuildProjectArtifacts.hs view
@@ -24,7 +24,7 @@   , _codeBuildProjectArtifactsPackaging :: Maybe (Val Text)   , _codeBuildProjectArtifactsPath :: Maybe (Val Text)   , _codeBuildProjectArtifactsType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeBuildProjectArtifacts where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 26, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironment.hs view
@@ -22,7 +22,7 @@   , _codeBuildProjectEnvironmentEnvironmentVariables :: Maybe [CodeBuildProjectEnvironmentVariable]   , _codeBuildProjectEnvironmentImage :: Maybe (Val Text)   , _codeBuildProjectEnvironmentType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeBuildProjectEnvironment where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironmentVariable.hs view
@@ -20,7 +20,7 @@   CodeBuildProjectEnvironmentVariable   { _codeBuildProjectEnvironmentVariableName :: Maybe (Val Text)   , _codeBuildProjectEnvironmentVariableValue :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeBuildProjectEnvironmentVariable where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSource.hs view
@@ -22,7 +22,7 @@   , _codeBuildProjectSourceBuildSpec :: Maybe (Val Text)   , _codeBuildProjectSourceLocation :: Maybe (Val Text)   , _codeBuildProjectSourceType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeBuildProjectSource where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSourceAuth.hs view
@@ -20,7 +20,7 @@   CodeBuildProjectSourceAuth   { _codeBuildProjectSourceAuthResource :: Maybe (Val Text)   , _codeBuildProjectSourceAuthType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeBuildProjectSourceAuth where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryRepositoryTrigger.hs view
@@ -24,7 +24,7 @@   , _codeCommitRepositoryRepositoryTriggerDestinationArn :: Maybe (Val Text)   , _codeCommitRepositoryRepositoryTriggerEvents :: Maybe [Val Text]   , _codeCommitRepositoryRepositoryTriggerName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeCommitRepositoryRepositoryTrigger where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 38, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentConfigMinimumHealthyHosts.hs view
@@ -22,7 +22,7 @@   CodeDeployDeploymentConfigMinimumHealthyHosts   { _codeDeployDeploymentConfigMinimumHealthyHostsType :: Maybe (Val Text)   , _codeDeployDeploymentConfigMinimumHealthyHostsValue :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeDeployDeploymentConfigMinimumHealthyHosts where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 46, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeployment.hs view
@@ -21,7 +21,7 @@   { _codeDeployDeploymentGroupDeploymentDescription :: Maybe (Val Text)   , _codeDeployDeploymentGroupDeploymentIgnoreApplicationStopFailures :: Maybe (Val Bool')   , _codeDeployDeploymentGroupDeploymentRevision :: CodeDeployDeploymentGroupRevision-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeDeployDeploymentGroupDeployment where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEc2TagFilter.hs view
@@ -22,7 +22,7 @@   { _codeDeployDeploymentGroupEc2TagFilterKey :: Maybe (Val Text)   , _codeDeployDeploymentGroupEc2TagFilterType :: Val Text   , _codeDeployDeploymentGroupEc2TagFilterValue :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeDeployDeploymentGroupEc2TagFilter where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 38, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupGitHubLocation.hs view
@@ -21,7 +21,7 @@   CodeDeployDeploymentGroupGitHubLocation   { _codeDeployDeploymentGroupGitHubLocationCommitId :: Val Text   , _codeDeployDeploymentGroupGitHubLocationRepository :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeDeployDeploymentGroupGitHubLocation where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 40, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesInstanceTagFilter.hs view
@@ -23,7 +23,7 @@   { _codeDeployDeploymentGroupOnPremisesInstanceTagFilterKey :: Maybe (Val Text)   , _codeDeployDeploymentGroupOnPremisesInstanceTagFilterType :: Maybe (Val Text)   , _codeDeployDeploymentGroupOnPremisesInstanceTagFilterValue :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeDeployDeploymentGroupOnPremisesInstanceTagFilter where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 53, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupRevision.hs view
@@ -22,7 +22,7 @@   { _codeDeployDeploymentGroupRevisionGitHubLocation :: Maybe CodeDeployDeploymentGroupGitHubLocation   , _codeDeployDeploymentGroupRevisionRevisionType :: Maybe (Val Text)   , _codeDeployDeploymentGroupRevisionS3Location :: Maybe CodeDeployDeploymentGroupS3Location-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeDeployDeploymentGroupRevision where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupS3Location.hs view
@@ -23,7 +23,7 @@   , _codeDeployDeploymentGroupS3LocationETag :: Maybe (Val Text)   , _codeDeployDeploymentGroupS3LocationKey :: Val Text   , _codeDeployDeploymentGroupS3LocationVersion :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeDeployDeploymentGroupS3Location where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeArtifactDetails.hs view
@@ -22,7 +22,7 @@   CodePipelineCustomActionTypeArtifactDetails   { _codePipelineCustomActionTypeArtifactDetailsMaximumCount :: Val Integer'   , _codePipelineCustomActionTypeArtifactDetailsMinimumCount :: Val Integer'-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelineCustomActionTypeArtifactDetails where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 44, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeConfigurationProperties.hs view
@@ -27,7 +27,7 @@   , _codePipelineCustomActionTypeConfigurationPropertiesRequired :: Val Bool'   , _codePipelineCustomActionTypeConfigurationPropertiesSecret :: Val Bool'   , _codePipelineCustomActionTypeConfigurationPropertiesType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelineCustomActionTypeConfigurationProperties where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 52, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeSettings.hs view
@@ -22,7 +22,7 @@   , _codePipelineCustomActionTypeSettingsExecutionUrlTemplate :: Maybe (Val Text)   , _codePipelineCustomActionTypeSettingsRevisionUrlTemplate :: Maybe (Val Text)   , _codePipelineCustomActionTypeSettingsThirdPartyConfigurationUrl :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelineCustomActionTypeSettings where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 37, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionDeclaration.hs view
@@ -28,7 +28,7 @@   , _codePipelinePipelineActionDeclarationOutputArtifacts :: Maybe [CodePipelinePipelineOutputArtifact]   , _codePipelinePipelineActionDeclarationRoleArn :: Maybe (Val Text)   , _codePipelinePipelineActionDeclarationRunOrder :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelinePipelineActionDeclaration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 38, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionTypeId.hs view
@@ -22,7 +22,7 @@   , _codePipelinePipelineActionTypeIdOwner :: Val Text   , _codePipelinePipelineActionTypeIdProvider :: Val Text   , _codePipelinePipelineActionTypeIdVersion :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelinePipelineActionTypeId where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStore.hs view
@@ -21,7 +21,7 @@   { _codePipelinePipelineArtifactStoreEncryptionKey :: Maybe CodePipelinePipelineEncryptionKey   , _codePipelinePipelineArtifactStoreLocation :: Val Text   , _codePipelinePipelineArtifactStoreType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelinePipelineArtifactStore where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineBlockerDeclaration.hs view
@@ -21,7 +21,7 @@   CodePipelinePipelineBlockerDeclaration   { _codePipelinePipelineBlockerDeclarationName :: Val Text   , _codePipelinePipelineBlockerDeclarationType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelinePipelineBlockerDeclaration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 39, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineEncryptionKey.hs view
@@ -20,7 +20,7 @@   CodePipelinePipelineEncryptionKey   { _codePipelinePipelineEncryptionKeyId :: Val Text   , _codePipelinePipelineEncryptionKeyType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelinePipelineEncryptionKey where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineInputArtifact.hs view
@@ -19,7 +19,7 @@ data CodePipelinePipelineInputArtifact =   CodePipelinePipelineInputArtifact   { _codePipelinePipelineInputArtifactName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelinePipelineInputArtifact where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineOutputArtifact.hs view
@@ -19,7 +19,7 @@ data CodePipelinePipelineOutputArtifact =   CodePipelinePipelineOutputArtifact   { _codePipelinePipelineOutputArtifactName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelinePipelineOutputArtifact where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 35, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageDeclaration.hs view
@@ -22,7 +22,7 @@   { _codePipelinePipelineStageDeclarationActions :: [CodePipelinePipelineActionDeclaration]   , _codePipelinePipelineStageDeclarationBlockers :: Maybe [CodePipelinePipelineBlockerDeclaration]   , _codePipelinePipelineStageDeclarationName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelinePipelineStageDeclaration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 37, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageTransition.hs view
@@ -20,7 +20,7 @@   CodePipelinePipelineStageTransition   { _codePipelinePipelineStageTransitionReason :: Val Text   , _codePipelinePipelineStageTransitionStageName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelinePipelineStageTransition where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleScope.hs view
@@ -22,7 +22,7 @@   , _configConfigRuleScopeComplianceResourceTypes :: Maybe [Val Text]   , _configConfigRuleScopeTagKey :: Maybe (Val Text)   , _configConfigRuleScopeTagValue :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ConfigConfigRuleScope where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 22, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSource.hs view
@@ -21,7 +21,7 @@   { _configConfigRuleSourceOwner :: Val Text   , _configConfigRuleSourceSourceDetails :: Maybe [ConfigConfigRuleSourceDetail]   , _configConfigRuleSourceSourceIdentifier :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ConfigConfigRuleSource where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSourceDetail.hs view
@@ -20,7 +20,7 @@   ConfigConfigRuleSourceDetail   { _configConfigRuleSourceDetailEventSource :: Val Text   , _configConfigRuleSourceDetailMessageType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ConfigConfigRuleSourceDetail where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ConfigConfigurationRecorderRecordingGroup.hs view
@@ -22,7 +22,7 @@   { _configConfigurationRecorderRecordingGroupAllSupported :: Maybe (Val Bool')   , _configConfigurationRecorderRecordingGroupIncludeGlobalResourceTypes :: Maybe (Val Bool')   , _configConfigurationRecorderRecordingGroupResourceTypes :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ConfigConfigurationRecorderRecordingGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 42, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ConfigDeliveryChannelConfigSnapshotDeliveryProperties.hs view
@@ -21,7 +21,7 @@ data ConfigDeliveryChannelConfigSnapshotDeliveryProperties =   ConfigDeliveryChannelConfigSnapshotDeliveryProperties   { _configDeliveryChannelConfigSnapshotDeliveryPropertiesDeliveryFrequency :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ConfigDeliveryChannelConfigSnapshotDeliveryProperties where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 54, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineField.hs view
@@ -21,7 +21,7 @@   { _dataPipelinePipelineFieldKey :: Val Text   , _dataPipelinePipelineFieldRefValue :: Maybe (Val Text)   , _dataPipelinePipelineFieldStringValue :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DataPipelinePipelineField where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 26, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterAttribute.hs view
@@ -21,7 +21,7 @@   DataPipelinePipelineParameterAttribute   { _dataPipelinePipelineParameterAttributeKey :: Val Text   , _dataPipelinePipelineParameterAttributeStringValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DataPipelinePipelineParameterAttribute where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 39, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterObject.hs view
@@ -20,7 +20,7 @@   DataPipelinePipelineParameterObject   { _dataPipelinePipelineParameterObjectAttributes :: [DataPipelinePipelineParameterAttribute]   , _dataPipelinePipelineParameterObjectId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DataPipelinePipelineParameterObject where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterValue.hs view
@@ -20,7 +20,7 @@   DataPipelinePipelineParameterValue   { _dataPipelinePipelineParameterValueId :: Val Text   , _dataPipelinePipelineParameterValueStringValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DataPipelinePipelineParameterValue where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 35, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineObject.hs view
@@ -21,7 +21,7 @@   { _dataPipelinePipelinePipelineObjectFields :: [DataPipelinePipelineField]   , _dataPipelinePipelinePipelineObjectId :: Val Text   , _dataPipelinePipelinePipelineObjectName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DataPipelinePipelinePipelineObject where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 35, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineTag.hs view
@@ -20,7 +20,7 @@   DataPipelinePipelinePipelineTag   { _dataPipelinePipelinePipelineTagKey :: Val Text   , _dataPipelinePipelinePipelineTagValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DataPipelinePipelinePipelineTag where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 32, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DirectoryServiceMicrosoftADVpcSettings.hs view
@@ -21,7 +21,7 @@   DirectoryServiceMicrosoftADVpcSettings   { _directoryServiceMicrosoftADVpcSettingsSubnetIds :: [Val Text]   , _directoryServiceMicrosoftADVpcSettingsVpcId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DirectoryServiceMicrosoftADVpcSettings where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 39, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DirectoryServiceSimpleADVpcSettings.hs view
@@ -20,7 +20,7 @@   DirectoryServiceSimpleADVpcSettings   { _directoryServiceSimpleADVpcSettingsSubnetIds :: [Val Text]   , _directoryServiceSimpleADVpcSettingsVpcId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DirectoryServiceSimpleADVpcSettings where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DynamoDBTableAttributeDefinition.hs view
@@ -20,7 +20,7 @@   DynamoDBTableAttributeDefinition   { _dynamoDBTableAttributeDefinitionAttributeName :: Val Text   , _dynamoDBTableAttributeDefinitionAttributeType :: Val AttributeType-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DynamoDBTableAttributeDefinition where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DynamoDBTableGlobalSecondaryIndex.hs view
@@ -24,7 +24,7 @@   , _dynamoDBTableGlobalSecondaryIndexKeySchema :: [DynamoDBTableKeySchema]   , _dynamoDBTableGlobalSecondaryIndexProjection :: DynamoDBTableProjection   , _dynamoDBTableGlobalSecondaryIndexProvisionedThroughput :: DynamoDBTableProvisionedThroughput-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DynamoDBTableGlobalSecondaryIndex where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DynamoDBTableKeySchema.hs view
@@ -20,7 +20,7 @@   DynamoDBTableKeySchema   { _dynamoDBTableKeySchemaAttributeName :: Val Text   , _dynamoDBTableKeySchemaKeyType :: Val KeyType-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DynamoDBTableKeySchema where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DynamoDBTableLocalSecondaryIndex.hs view
@@ -22,7 +22,7 @@   { _dynamoDBTableLocalSecondaryIndexIndexName :: Val Text   , _dynamoDBTableLocalSecondaryIndexKeySchema :: [DynamoDBTableKeySchema]   , _dynamoDBTableLocalSecondaryIndexProjection :: DynamoDBTableProjection-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DynamoDBTableLocalSecondaryIndex where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DynamoDBTableProjection.hs view
@@ -20,7 +20,7 @@   DynamoDBTableProjection   { _dynamoDBTableProjectionNonKeyAttributes :: Maybe [Val Text]   , _dynamoDBTableProjectionProjectionType :: Maybe (Val ProjectionType)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DynamoDBTableProjection where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DynamoDBTableProvisionedThroughput.hs view
@@ -20,7 +20,7 @@   DynamoDBTableProvisionedThroughput   { _dynamoDBTableProvisionedThroughputReadCapacityUnits :: Val Integer'   , _dynamoDBTableProvisionedThroughputWriteCapacityUnits :: Val Integer'-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DynamoDBTableProvisionedThroughput where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 35, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/DynamoDBTableStreamSpecification.hs view
@@ -19,7 +19,7 @@ data DynamoDBTableStreamSpecification =   DynamoDBTableStreamSpecification   { _dynamoDBTableStreamSpecificationStreamViewType :: Val StreamViewType-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DynamoDBTableStreamSpecification where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2InstanceAssociationParameter.hs view
@@ -20,7 +20,7 @@   EC2InstanceAssociationParameter   { _eC2InstanceAssociationParameterKey :: Val Text   , _eC2InstanceAssociationParameterValue :: [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2InstanceAssociationParameter where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 32, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2InstanceBlockDeviceMapping.hs view
@@ -23,7 +23,7 @@   , _eC2InstanceBlockDeviceMappingEbs :: Maybe EC2InstanceEbs   , _eC2InstanceBlockDeviceMappingNoDevice :: Maybe EC2InstanceNoDevice   , _eC2InstanceBlockDeviceMappingVirtualName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2InstanceBlockDeviceMapping where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2InstanceEbs.hs view
@@ -24,7 +24,7 @@   , _eC2InstanceEbsSnapshotId :: Maybe (Val Text)   , _eC2InstanceEbsVolumeSize :: Maybe (Val Integer')   , _eC2InstanceEbsVolumeType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2InstanceEbs where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2InstanceInstanceIpv6Address.hs view
@@ -19,7 +19,7 @@ data EC2InstanceInstanceIpv6Address =   EC2InstanceInstanceIpv6Address   { _eC2InstanceInstanceIpv6AddressIpv6Address :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2InstanceInstanceIpv6Address where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2InstanceNetworkInterface.hs view
@@ -31,7 +31,7 @@   , _eC2InstanceNetworkInterfacePrivateIpAddresses :: Maybe [EC2InstancePrivateIpAddressSpecification]   , _eC2InstanceNetworkInterfaceSecondaryPrivateIpAddressCount :: Maybe (Val Integer')   , _eC2InstanceNetworkInterfaceSubnetId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2InstanceNetworkInterface where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2InstanceNoDevice.hs view
@@ -19,7 +19,7 @@ data EC2InstanceNoDevice =   EC2InstanceNoDevice   { -  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2InstanceNoDevice where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 20, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2InstancePrivateIpAddressSpecification.hs view
@@ -21,7 +21,7 @@   EC2InstancePrivateIpAddressSpecification   { _eC2InstancePrivateIpAddressSpecificationPrimary :: Val Bool'   , _eC2InstancePrivateIpAddressSpecificationPrivateIpAddress :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2InstancePrivateIpAddressSpecification where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 41, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2InstanceSsmAssociation.hs view
@@ -20,7 +20,7 @@   EC2InstanceSsmAssociation   { _eC2InstanceSsmAssociationAssociationParameters :: Maybe [EC2InstanceAssociationParameter]   , _eC2InstanceSsmAssociationDocumentName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2InstanceSsmAssociation where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 26, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2InstanceVolume.hs view
@@ -20,7 +20,7 @@   EC2InstanceVolume   { _eC2InstanceVolumeDevice :: Val Text   , _eC2InstanceVolumeVolumeId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2InstanceVolume where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 18, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryIcmp.hs view
@@ -20,7 +20,7 @@   EC2NetworkAclEntryIcmp   { _eC2NetworkAclEntryIcmpCode :: Maybe (Val Integer')   , _eC2NetworkAclEntryIcmpType :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2NetworkAclEntryIcmp where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryPortRange.hs view
@@ -20,7 +20,7 @@   EC2NetworkAclEntryPortRange   { _eC2NetworkAclEntryPortRangeFrom :: Maybe (Val Integer')   , _eC2NetworkAclEntryPortRangeTo :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2NetworkAclEntryPortRange where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfaceInstanceIpv6Address.hs view
@@ -20,7 +20,7 @@ data EC2NetworkInterfaceInstanceIpv6Address =   EC2NetworkInterfaceInstanceIpv6Address   { _eC2NetworkInterfaceInstanceIpv6AddressIpv6Address :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2NetworkInterfaceInstanceIpv6Address where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 39, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfacePrivateIpAddressSpecification.hs view
@@ -22,7 +22,7 @@   EC2NetworkInterfacePrivateIpAddressSpecification   { _eC2NetworkInterfacePrivateIpAddressSpecificationPrimary :: Val Bool'   , _eC2NetworkInterfacePrivateIpAddressSpecificationPrivateIpAddress :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2NetworkInterfacePrivateIpAddressSpecification where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 49, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupRule.hs view
@@ -25,7 +25,7 @@   , _eC2SecurityGroupRuleSourceSecurityGroupName :: Maybe (Val Text)   , _eC2SecurityGroupRuleSourceSecurityGroupOwnerId :: Maybe (Val Text)   , _eC2SecurityGroupRuleToPort :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SecurityGroupRule where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2SpotFleetBlockDeviceMappings.hs view
@@ -22,7 +22,7 @@   , _eC2SpotFleetBlockDeviceMappingsEbs :: Maybe EC2SpotFleetEbs   , _eC2SpotFleetBlockDeviceMappingsNoDevice :: Maybe (Val Bool')   , _eC2SpotFleetBlockDeviceMappingsVirtualName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SpotFleetBlockDeviceMappings where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 32, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2SpotFleetEbs.hs view
@@ -24,7 +24,7 @@   , _eC2SpotFleetEbsSnapshotId :: Maybe (Val Text)   , _eC2SpotFleetEbsVolumeSize :: Maybe (Val Integer')   , _eC2SpotFleetEbsVolumeType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SpotFleetEbs where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 16, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2SpotFleetIamInstanceProfile.hs view
@@ -19,7 +19,7 @@ data EC2SpotFleetIamInstanceProfile =   EC2SpotFleetIamInstanceProfile   { _eC2SpotFleetIamInstanceProfileArn :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SpotFleetIamInstanceProfile where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceIpv6Address.hs view
@@ -19,7 +19,7 @@ data EC2SpotFleetInstanceIpv6Address =   EC2SpotFleetInstanceIpv6Address   { _eC2SpotFleetInstanceIpv6AddressIpv6Address :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SpotFleetInstanceIpv6Address where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 32, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchSpecifications.hs view
@@ -39,7 +39,7 @@   , _eC2SpotFleetLaunchSpecificationsSubnetId :: Maybe (Val Text)   , _eC2SpotFleetLaunchSpecificationsUserData :: Maybe (Val Text)   , _eC2SpotFleetLaunchSpecificationsWeightedCapacity :: Maybe (Val Double')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SpotFleetLaunchSpecifications where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2SpotFleetMonitoring.hs view
@@ -19,7 +19,7 @@ data EC2SpotFleetMonitoring =   EC2SpotFleetMonitoring   { _eC2SpotFleetMonitoringEnabled :: Maybe (Val Bool')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SpotFleetMonitoring where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2SpotFleetNetworkInterfaces.hs view
@@ -30,7 +30,7 @@   , _eC2SpotFleetNetworkInterfacesPrivateIpAddresses :: Maybe [EC2SpotFleetPrivateIpAddresses]   , _eC2SpotFleetNetworkInterfacesSecondaryPrivateIpAddressCount :: Maybe (Val Integer')   , _eC2SpotFleetNetworkInterfacesSubnetId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SpotFleetNetworkInterfaces where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPlacement.hs view
@@ -20,7 +20,7 @@   EC2SpotFleetPlacement   { _eC2SpotFleetPlacementAvailabilityZone :: Maybe (Val Text)   , _eC2SpotFleetPlacementGroupName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SpotFleetPlacement where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 22, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPrivateIpAddresses.hs view
@@ -20,7 +20,7 @@   EC2SpotFleetPrivateIpAddresses   { _eC2SpotFleetPrivateIpAddressesPrimary :: Maybe (Val Bool')   , _eC2SpotFleetPrivateIpAddressesPrivateIpAddress :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SpotFleetPrivateIpAddresses where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSecurityGroups.hs view
@@ -19,7 +19,7 @@ data EC2SpotFleetSecurityGroups =   EC2SpotFleetSecurityGroups   { _eC2SpotFleetSecurityGroupsGroupId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SpotFleetSecurityGroups where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetRequestConfigData.hs view
@@ -28,7 +28,7 @@   , _eC2SpotFleetSpotFleetRequestConfigDataTerminateInstancesWithExpiration :: Maybe (Val Bool')   , _eC2SpotFleetSpotFleetRequestConfigDataValidFrom :: Maybe (Val Text)   , _eC2SpotFleetSpotFleetRequestConfigDataValidUntil :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SpotFleetSpotFleetRequestConfigData where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 39, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ECSServiceDeploymentConfiguration.hs view
@@ -20,7 +20,7 @@   ECSServiceDeploymentConfiguration   { _eCSServiceDeploymentConfigurationMaximumPercent :: Maybe (Val Integer')   , _eCSServiceDeploymentConfigurationMinimumHealthyPercent :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSServiceDeploymentConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ECSServiceLoadBalancer.hs view
@@ -22,7 +22,7 @@   , _eCSServiceLoadBalancerContainerPort :: Val Integer'   , _eCSServiceLoadBalancerLoadBalancerName :: Maybe (Val Text)   , _eCSServiceLoadBalancerTargetGroupArn :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSServiceLoadBalancer where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDefinition.hs view
@@ -36,13 +36,13 @@   , _eCSTaskDefinitionContainerDefinitionEssential :: Maybe (Val Bool')   , _eCSTaskDefinitionContainerDefinitionExtraHosts :: Maybe [ECSTaskDefinitionHostEntry]   , _eCSTaskDefinitionContainerDefinitionHostname :: Maybe (Val Text)-  , _eCSTaskDefinitionContainerDefinitionImage :: Maybe (Val Text)+  , _eCSTaskDefinitionContainerDefinitionImage :: Val Text   , _eCSTaskDefinitionContainerDefinitionLinks :: Maybe [Val Text]   , _eCSTaskDefinitionContainerDefinitionLogConfiguration :: Maybe ECSTaskDefinitionLogConfiguration   , _eCSTaskDefinitionContainerDefinitionMemory :: Maybe (Val Integer')   , _eCSTaskDefinitionContainerDefinitionMemoryReservation :: Maybe (Val Integer')   , _eCSTaskDefinitionContainerDefinitionMountPoints :: Maybe [ECSTaskDefinitionMountPoint]-  , _eCSTaskDefinitionContainerDefinitionName :: Maybe (Val Text)+  , _eCSTaskDefinitionContainerDefinitionName :: Val Text   , _eCSTaskDefinitionContainerDefinitionPortMappings :: Maybe [ECSTaskDefinitionPortMapping]   , _eCSTaskDefinitionContainerDefinitionPrivileged :: Maybe (Val Bool')   , _eCSTaskDefinitionContainerDefinitionReadonlyRootFilesystem :: Maybe (Val Bool')@@ -50,7 +50,7 @@   , _eCSTaskDefinitionContainerDefinitionUser :: Maybe (Val Text)   , _eCSTaskDefinitionContainerDefinitionVolumesFrom :: Maybe [ECSTaskDefinitionVolumeFrom]   , _eCSTaskDefinitionContainerDefinitionWorkingDirectory :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSTaskDefinitionContainerDefinition where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 37, omitNothingFields = True }@@ -61,8 +61,10 @@ -- | Constructor for 'ECSTaskDefinitionContainerDefinition' containing -- | required fields as arguments. ecsTaskDefinitionContainerDefinition-  :: ECSTaskDefinitionContainerDefinition-ecsTaskDefinitionContainerDefinition  =+  :: Val Text -- ^ 'ecstdcdImage'+  -> Val Text -- ^ 'ecstdcdName'+  -> ECSTaskDefinitionContainerDefinition+ecsTaskDefinitionContainerDefinition imagearg namearg =   ECSTaskDefinitionContainerDefinition   { _eCSTaskDefinitionContainerDefinitionCommand = Nothing   , _eCSTaskDefinitionContainerDefinitionCpu = Nothing@@ -76,13 +78,13 @@   , _eCSTaskDefinitionContainerDefinitionEssential = Nothing   , _eCSTaskDefinitionContainerDefinitionExtraHosts = Nothing   , _eCSTaskDefinitionContainerDefinitionHostname = Nothing-  , _eCSTaskDefinitionContainerDefinitionImage = Nothing+  , _eCSTaskDefinitionContainerDefinitionImage = imagearg   , _eCSTaskDefinitionContainerDefinitionLinks = Nothing   , _eCSTaskDefinitionContainerDefinitionLogConfiguration = Nothing   , _eCSTaskDefinitionContainerDefinitionMemory = Nothing   , _eCSTaskDefinitionContainerDefinitionMemoryReservation = Nothing   , _eCSTaskDefinitionContainerDefinitionMountPoints = Nothing-  , _eCSTaskDefinitionContainerDefinitionName = Nothing+  , _eCSTaskDefinitionContainerDefinitionName = namearg   , _eCSTaskDefinitionContainerDefinitionPortMappings = Nothing   , _eCSTaskDefinitionContainerDefinitionPrivileged = Nothing   , _eCSTaskDefinitionContainerDefinitionReadonlyRootFilesystem = Nothing@@ -141,7 +143,7 @@ ecstdcdHostname = lens _eCSTaskDefinitionContainerDefinitionHostname (\s a -> s { _eCSTaskDefinitionContainerDefinitionHostname = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdefinitions.html#cfn-ecs-taskdefinition-containerdefinition-image-ecstdcdImage :: Lens' ECSTaskDefinitionContainerDefinition (Maybe (Val Text))+ecstdcdImage :: Lens' ECSTaskDefinitionContainerDefinition (Val Text) ecstdcdImage = lens _eCSTaskDefinitionContainerDefinitionImage (\s a -> s { _eCSTaskDefinitionContainerDefinitionImage = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdefinitions.html#cfn-ecs-taskdefinition-containerdefinition-links@@ -165,7 +167,7 @@ ecstdcdMountPoints = lens _eCSTaskDefinitionContainerDefinitionMountPoints (\s a -> s { _eCSTaskDefinitionContainerDefinitionMountPoints = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdefinitions.html#cfn-ecs-taskdefinition-containerdefinition-name-ecstdcdName :: Lens' ECSTaskDefinitionContainerDefinition (Maybe (Val Text))+ecstdcdName :: Lens' ECSTaskDefinitionContainerDefinition (Val Text) ecstdcdName = lens _eCSTaskDefinitionContainerDefinitionName (\s a -> s { _eCSTaskDefinitionContainerDefinitionName = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-ecs-taskdefinition-containerdefinitions.html#cfn-ecs-taskdefinition-containerdefinition-portmappings
library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostEntry.hs view
@@ -20,7 +20,7 @@   ECSTaskDefinitionHostEntry   { _eCSTaskDefinitionHostEntryHostname :: Val Text   , _eCSTaskDefinitionHostEntryIpAddress :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSTaskDefinitionHostEntry where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostVolumeProperties.hs view
@@ -20,7 +20,7 @@ data ECSTaskDefinitionHostVolumeProperties =   ECSTaskDefinitionHostVolumeProperties   { _eCSTaskDefinitionHostVolumePropertiesSourcePath :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSTaskDefinitionHostVolumeProperties where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 38, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKeyValuePair.hs view
@@ -20,7 +20,7 @@   ECSTaskDefinitionKeyValuePair   { _eCSTaskDefinitionKeyValuePairName :: Maybe (Val Text)   , _eCSTaskDefinitionKeyValuePairValue :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSTaskDefinitionKeyValuePair where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLogConfiguration.hs view
@@ -20,7 +20,7 @@   ECSTaskDefinitionLogConfiguration   { _eCSTaskDefinitionLogConfigurationLogDriver :: Val Text   , _eCSTaskDefinitionLogConfigurationOptions :: Maybe Object-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSTaskDefinitionLogConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionMountPoint.hs view
@@ -21,7 +21,7 @@   { _eCSTaskDefinitionMountPointContainerPath :: Maybe (Val Text)   , _eCSTaskDefinitionMountPointReadOnly :: Maybe (Val Bool')   , _eCSTaskDefinitionMountPointSourceVolume :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSTaskDefinitionMountPoint where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionPortMapping.hs view
@@ -21,7 +21,7 @@   { _eCSTaskDefinitionPortMappingContainerPort :: Maybe (Val Integer')   , _eCSTaskDefinitionPortMappingHostPort :: Maybe (Val Integer')   , _eCSTaskDefinitionPortMappingProtocol :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSTaskDefinitionPortMapping where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionUlimit.hs view
@@ -21,7 +21,7 @@   { _eCSTaskDefinitionUlimitHardLimit :: Val Integer'   , _eCSTaskDefinitionUlimitName :: Val Text   , _eCSTaskDefinitionUlimitSoftLimit :: Val Integer'-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSTaskDefinitionUlimit where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolume.hs view
@@ -20,7 +20,7 @@   ECSTaskDefinitionVolume   { _eCSTaskDefinitionVolumeHost :: Maybe ECSTaskDefinitionHostVolumeProperties   , _eCSTaskDefinitionVolumeName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSTaskDefinitionVolume where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolumeFrom.hs view
@@ -20,7 +20,7 @@   ECSTaskDefinitionVolumeFrom   { _eCSTaskDefinitionVolumeFromReadOnly :: Maybe (Val Bool')   , _eCSTaskDefinitionVolumeFromSourceContainer :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSTaskDefinitionVolumeFrom where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EFSFileSystemElasticFileSystemTag.hs view
@@ -20,7 +20,7 @@   EFSFileSystemElasticFileSystemTag   { _eFSFileSystemElasticFileSystemTagKey :: Val Text   , _eFSFileSystemElasticFileSystemTagValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EFSFileSystemElasticFileSystemTag where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRClusterApplication.hs view
@@ -22,7 +22,7 @@   , _eMRClusterApplicationArgs :: Maybe [Val Text]   , _eMRClusterApplicationName :: Maybe (Val Text)   , _eMRClusterApplicationVersion :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRClusterApplication where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 22, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRClusterBootstrapActionConfig.hs view
@@ -20,7 +20,7 @@   EMRClusterBootstrapActionConfig   { _eMRClusterBootstrapActionConfigName :: Val Text   , _eMRClusterBootstrapActionConfigScriptBootstrapAction :: EMRClusterScriptBootstrapActionConfig-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRClusterBootstrapActionConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 32, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRClusterConfiguration.hs view
@@ -21,7 +21,7 @@   { _eMRClusterConfigurationClassification :: Maybe (Val Text)   , _eMRClusterConfigurationConfigurationProperties :: Maybe Object   , _eMRClusterConfigurationConfigurations :: Maybe [EMRClusterConfiguration]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRClusterConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRClusterEbsBlockDeviceConfig.hs view
@@ -20,7 +20,7 @@   EMRClusterEbsBlockDeviceConfig   { _eMRClusterEbsBlockDeviceConfigVolumeSpecification :: EMRClusterVolumeSpecification   , _eMRClusterEbsBlockDeviceConfigVolumesPerInstance :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRClusterEbsBlockDeviceConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRClusterEbsConfiguration.hs view
@@ -20,7 +20,7 @@   EMRClusterEbsConfiguration   { _eMRClusterEbsConfigurationEbsBlockDeviceConfigs :: Maybe [EMRClusterEbsBlockDeviceConfig]   , _eMRClusterEbsConfigurationEbsOptimized :: Maybe (Val Bool')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRClusterEbsConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceGroupConfig.hs view
@@ -26,7 +26,7 @@   , _eMRClusterInstanceGroupConfigInstanceType :: Val Text   , _eMRClusterInstanceGroupConfigMarket :: Maybe (Val Text)   , _eMRClusterInstanceGroupConfigName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRClusterInstanceGroupConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRClusterJobFlowInstancesConfig.hs view
@@ -31,7 +31,7 @@   , _eMRClusterJobFlowInstancesConfigPlacement :: Maybe EMRClusterPlacementType   , _eMRClusterJobFlowInstancesConfigServiceAccessSecurityGroup :: Maybe (Val Text)   , _eMRClusterJobFlowInstancesConfigTerminationProtected :: Maybe (Val Bool')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRClusterJobFlowInstancesConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRClusterPlacementType.hs view
@@ -19,7 +19,7 @@ data EMRClusterPlacementType =   EMRClusterPlacementType   { _eMRClusterPlacementTypeAvailabilityZone :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRClusterPlacementType where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRClusterScriptBootstrapActionConfig.hs view
@@ -21,7 +21,7 @@   EMRClusterScriptBootstrapActionConfig   { _eMRClusterScriptBootstrapActionConfigArgs :: Maybe [Val Text]   , _eMRClusterScriptBootstrapActionConfigPath :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRClusterScriptBootstrapActionConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 38, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRClusterVolumeSpecification.hs view
@@ -21,7 +21,7 @@   { _eMRClusterVolumeSpecificationIops :: Maybe (Val Integer')   , _eMRClusterVolumeSpecificationSizeInGB :: Val Integer'   , _eMRClusterVolumeSpecificationVolumeType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRClusterVolumeSpecification where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigConfiguration.hs view
@@ -21,7 +21,7 @@   { _eMRInstanceGroupConfigConfigurationClassification :: Maybe (Val Text)   , _eMRInstanceGroupConfigConfigurationConfigurationProperties :: Maybe Object   , _eMRInstanceGroupConfigConfigurationConfigurations :: Maybe [EMRInstanceGroupConfigConfiguration]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRInstanceGroupConfigConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsBlockDeviceConfig.hs view
@@ -21,7 +21,7 @@   EMRInstanceGroupConfigEbsBlockDeviceConfig   { _eMRInstanceGroupConfigEbsBlockDeviceConfigVolumeSpecification :: EMRInstanceGroupConfigVolumeSpecification   , _eMRInstanceGroupConfigEbsBlockDeviceConfigVolumesPerInstance :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRInstanceGroupConfigEbsBlockDeviceConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 43, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsConfiguration.hs view
@@ -21,7 +21,7 @@   EMRInstanceGroupConfigEbsConfiguration   { _eMRInstanceGroupConfigEbsConfigurationEbsBlockDeviceConfigs :: Maybe [EMRInstanceGroupConfigEbsBlockDeviceConfig]   , _eMRInstanceGroupConfigEbsConfigurationEbsOptimized :: Maybe (Val Bool')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRInstanceGroupConfigEbsConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 39, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigVolumeSpecification.hs view
@@ -22,7 +22,7 @@   { _eMRInstanceGroupConfigVolumeSpecificationIops :: Maybe (Val Integer')   , _eMRInstanceGroupConfigVolumeSpecificationSizeInGB :: Val Integer'   , _eMRInstanceGroupConfigVolumeSpecificationVolumeType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRInstanceGroupConfigVolumeSpecification where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 42, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRStepHadoopJarStepConfig.hs view
@@ -22,7 +22,7 @@   , _eMRStepHadoopJarStepConfigJar :: Val Text   , _eMRStepHadoopJarStepConfigMainClass :: Maybe (Val Text)   , _eMRStepHadoopJarStepConfigStepProperties :: Maybe [EMRStepKeyValue]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRStepHadoopJarStepConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EMRStepKeyValue.hs view
@@ -20,7 +20,7 @@   EMRStepKeyValue   { _eMRStepKeyValueKey :: Maybe (Val Text)   , _eMRStepKeyValueValue :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRStepKeyValue where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 16, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElastiCacheReplicationGroupNodeGroupConfiguration.hs view
@@ -24,7 +24,7 @@   , _elastiCacheReplicationGroupNodeGroupConfigurationReplicaAvailabilityZones :: Maybe [Val Text]   , _elastiCacheReplicationGroupNodeGroupConfigurationReplicaCount :: Maybe (Val Integer')   , _elastiCacheReplicationGroupNodeGroupConfigurationSlots :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElastiCacheReplicationGroupNodeGroupConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 50, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationVersionSourceBundle.hs view
@@ -22,7 +22,7 @@   ElasticBeanstalkApplicationVersionSourceBundle   { _elasticBeanstalkApplicationVersionSourceBundleS3Bucket :: Val Text   , _elasticBeanstalkApplicationVersionSourceBundleS3Key :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticBeanstalkApplicationVersionSourceBundle where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 47, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting.hs view
@@ -23,7 +23,7 @@   { _elasticBeanstalkConfigurationTemplateConfigurationOptionSettingNamespace :: Val Text   , _elasticBeanstalkConfigurationTemplateConfigurationOptionSettingOptionName :: Val Text   , _elasticBeanstalkConfigurationTemplateConfigurationOptionSettingValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 64, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateSourceConfiguration.hs view
@@ -22,7 +22,7 @@   ElasticBeanstalkConfigurationTemplateSourceConfiguration   { _elasticBeanstalkConfigurationTemplateSourceConfigurationApplicationName :: Val Text   , _elasticBeanstalkConfigurationTemplateSourceConfigurationTemplateName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticBeanstalkConfigurationTemplateSourceConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 57, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentOptionSettings.hs view
@@ -22,7 +22,7 @@   { _elasticBeanstalkEnvironmentOptionSettingsNamespace :: Val Text   , _elasticBeanstalkEnvironmentOptionSettingsOptionName :: Val Text   , _elasticBeanstalkEnvironmentOptionSettingsValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticBeanstalkEnvironmentOptionSettings where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 42, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentTier.hs view
@@ -21,7 +21,7 @@   { _elasticBeanstalkEnvironmentTierName :: Maybe (Val Text)   , _elasticBeanstalkEnvironmentTierType :: Maybe (Val Text)   , _elasticBeanstalkEnvironmentTierVersion :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticBeanstalkEnvironmentTier where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 32, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAccessLoggingPolicy.hs view
@@ -24,7 +24,7 @@   , _elasticLoadBalancingLoadBalancerAccessLoggingPolicyEnabled :: Val Bool'   , _elasticLoadBalancingLoadBalancerAccessLoggingPolicyS3BucketName :: Val Text   , _elasticLoadBalancingLoadBalancerAccessLoggingPolicyS3BucketPrefix :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingLoadBalancerAccessLoggingPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 52, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy.hs view
@@ -22,7 +22,7 @@   ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy   { _elasticLoadBalancingLoadBalancerAppCookieStickinessPolicyCookieName :: Val Text   , _elasticLoadBalancingLoadBalancerAppCookieStickinessPolicyPolicyName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 58, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy.hs view
@@ -22,7 +22,7 @@   ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy   { _elasticLoadBalancingLoadBalancerConnectionDrainingPolicyEnabled :: Val Bool'   , _elasticLoadBalancingLoadBalancerConnectionDrainingPolicyTimeout :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 57, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionSettings.hs view
@@ -21,7 +21,7 @@ data ElasticLoadBalancingLoadBalancerConnectionSettings =   ElasticLoadBalancingLoadBalancerConnectionSettings   { _elasticLoadBalancingLoadBalancerConnectionSettingsIdleTimeout :: Val Integer'-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingLoadBalancerConnectionSettings where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 51, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerHealthCheck.hs view
@@ -25,7 +25,7 @@   , _elasticLoadBalancingLoadBalancerHealthCheckTarget :: Val Text   , _elasticLoadBalancingLoadBalancerHealthCheckTimeout :: Val Text   , _elasticLoadBalancingLoadBalancerHealthCheckUnhealthyThreshold :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingLoadBalancerHealthCheck where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 44, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy.hs view
@@ -22,7 +22,7 @@   ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy   { _elasticLoadBalancingLoadBalancerLBCookieStickinessPolicyCookieExpirationPeriod :: Maybe (Val Text)   , _elasticLoadBalancingLoadBalancerLBCookieStickinessPolicyPolicyName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 57, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerListeners.hs view
@@ -25,7 +25,7 @@   , _elasticLoadBalancingLoadBalancerListenersPolicyNames :: Maybe [Val Text]   , _elasticLoadBalancingLoadBalancerListenersProtocol :: Val Text   , _elasticLoadBalancingLoadBalancerListenersSSLCertificateId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingLoadBalancerListeners where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 42, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerPolicies.hs view
@@ -24,7 +24,7 @@   , _elasticLoadBalancingLoadBalancerPoliciesLoadBalancerPorts :: Maybe [Val Text]   , _elasticLoadBalancingLoadBalancerPoliciesPolicyName :: Val Text   , _elasticLoadBalancingLoadBalancerPoliciesPolicyType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingLoadBalancerPolicies where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 41, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAction.hs view
@@ -20,7 +20,7 @@   ElasticLoadBalancingV2ListenerAction   { _elasticLoadBalancingV2ListenerActionTargetGroupArn :: Val Text   , _elasticLoadBalancingV2ListenerActionType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingV2ListenerAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 37, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificate.hs view
@@ -20,7 +20,7 @@ data ElasticLoadBalancingV2ListenerCertificate =   ElasticLoadBalancingV2ListenerCertificate   { _elasticLoadBalancingV2ListenerCertificateCertificateArn :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingV2ListenerCertificate where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 42, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAction.hs view
@@ -21,7 +21,7 @@   ElasticLoadBalancingV2ListenerRuleAction   { _elasticLoadBalancingV2ListenerRuleActionTargetGroupArn :: Val Text   , _elasticLoadBalancingV2ListenerRuleActionType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingV2ListenerRuleAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 41, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRuleCondition.hs view
@@ -22,7 +22,7 @@   ElasticLoadBalancingV2ListenerRuleRuleCondition   { _elasticLoadBalancingV2ListenerRuleRuleConditionField :: Maybe (Val Text)   , _elasticLoadBalancingV2ListenerRuleRuleConditionValues :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingV2ListenerRuleRuleCondition where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 48, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute.hs view
@@ -22,7 +22,7 @@   ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute   { _elasticLoadBalancingV2LoadBalancerLoadBalancerAttributeKey :: Maybe (Val Text)   , _elasticLoadBalancingV2LoadBalancerLoadBalancerAttributeValue :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 56, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupMatcher.hs view
@@ -20,7 +20,7 @@ data ElasticLoadBalancingV2TargetGroupMatcher =   ElasticLoadBalancingV2TargetGroupMatcher   { _elasticLoadBalancingV2TargetGroupMatcherHttpCode :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingV2TargetGroupMatcher where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 41, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetDescription.hs view
@@ -22,7 +22,7 @@   ElasticLoadBalancingV2TargetGroupTargetDescription   { _elasticLoadBalancingV2TargetGroupTargetDescriptionId :: Val Text   , _elasticLoadBalancingV2TargetGroupTargetDescriptionPort :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingV2TargetGroupTargetDescription where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 51, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetGroupAttribute.hs view
@@ -22,7 +22,7 @@   ElasticLoadBalancingV2TargetGroupTargetGroupAttribute   { _elasticLoadBalancingV2TargetGroupTargetGroupAttributeKey :: Maybe (Val Text)   , _elasticLoadBalancingV2TargetGroupTargetGroupAttributeValue :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingV2TargetGroupTargetGroupAttribute where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 54, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEBSOptions.hs view
@@ -22,7 +22,7 @@   , _elasticsearchDomainEBSOptionsIops :: Maybe (Val Integer')   , _elasticsearchDomainEBSOptionsVolumeSize :: Maybe (Val Integer')   , _elasticsearchDomainEBSOptionsVolumeType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticsearchDomainEBSOptions where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainElasticsearchClusterConfig.hs view
@@ -26,7 +26,7 @@   , _elasticsearchDomainElasticsearchClusterConfigInstanceCount :: Maybe (Val Integer')   , _elasticsearchDomainElasticsearchClusterConfigInstanceType :: Maybe (Val Text)   , _elasticsearchDomainElasticsearchClusterConfigZoneAwarenessEnabled :: Maybe (Val Bool')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticsearchDomainElasticsearchClusterConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 46, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainSnapshotOptions.hs view
@@ -19,7 +19,7 @@ data ElasticsearchDomainSnapshotOptions =   ElasticsearchDomainSnapshotOptions   { _elasticsearchDomainSnapshotOptionsAutomatedSnapshotStartHour :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticsearchDomainSnapshotOptions where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 35, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/EventsRuleTarget.hs view
@@ -22,7 +22,7 @@   , _eventsRuleTargetId :: Val Text   , _eventsRuleTargetInput :: Maybe (Val Text)   , _eventsRuleTargetInputPath :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EventsRuleTarget where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/GameLiftAliasRoutingStrategy.hs view
@@ -21,7 +21,7 @@   { _gameLiftAliasRoutingStrategyFleetId :: Maybe (Val Text)   , _gameLiftAliasRoutingStrategyMessage :: Maybe (Val Text)   , _gameLiftAliasRoutingStrategyType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON GameLiftAliasRoutingStrategy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/GameLiftBuildS3Location.hs view
@@ -21,7 +21,7 @@   { _gameLiftBuildS3LocationBucket :: Val Text   , _gameLiftBuildS3LocationKey :: Val Text   , _gameLiftBuildS3LocationRoleArn :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON GameLiftBuildS3Location where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/GameLiftFleetIpPermission.hs view
@@ -22,7 +22,7 @@   , _gameLiftFleetIpPermissionIpRange :: Val Text   , _gameLiftFleetIpPermissionProtocol :: Val Text   , _gameLiftFleetIpPermissionToPort :: Val Integer'-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON GameLiftFleetIpPermission where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 26, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IAMGroupPolicy.hs view
@@ -20,7 +20,7 @@   IAMGroupPolicy   { _iAMGroupPolicyPolicyDocument :: Object   , _iAMGroupPolicyPolicyName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IAMGroupPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IAMRolePolicy.hs view
@@ -20,7 +20,7 @@   IAMRolePolicy   { _iAMRolePolicyPolicyDocument :: Object   , _iAMRolePolicyPolicyName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IAMRolePolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IAMUserLoginProfile.hs view
@@ -20,7 +20,7 @@   IAMUserLoginProfile   { _iAMUserLoginProfilePassword :: Val Text   , _iAMUserLoginProfilePasswordResetRequired :: Maybe (Val Bool')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IAMUserLoginProfile where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 20, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IAMUserPolicy.hs view
@@ -20,7 +20,7 @@   IAMUserPolicy   { _iAMUserPolicyPolicyDocument :: Object   , _iAMUserPolicyPolicyName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IAMUserPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTThingAttributePayload.hs view
@@ -19,7 +19,7 @@ data IoTThingAttributePayload =   IoTThingAttributePayload   { _ioTThingAttributePayloadAttributes :: Maybe Object-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTThingAttributePayload where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 25, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTTopicRuleAction.hs view
@@ -39,7 +39,7 @@   , _ioTTopicRuleActionS3 :: Maybe IoTTopicRuleS3Action   , _ioTTopicRuleActionSns :: Maybe IoTTopicRuleSnsAction   , _ioTTopicRuleActionSqs :: Maybe IoTTopicRuleSqsAction-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRuleAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 19, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchAlarmAction.hs view
@@ -22,7 +22,7 @@   , _ioTTopicRuleCloudwatchAlarmActionRoleArn :: Val Text   , _ioTTopicRuleCloudwatchAlarmActionStateReason :: Val Text   , _ioTTopicRuleCloudwatchAlarmActionStateValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRuleCloudwatchAlarmAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchMetricAction.hs view
@@ -24,7 +24,7 @@   , _ioTTopicRuleCloudwatchMetricActionMetricUnit :: Val Text   , _ioTTopicRuleCloudwatchMetricActionMetricValue :: Val Text   , _ioTTopicRuleCloudwatchMetricActionRoleArn :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRuleCloudwatchMetricAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 35, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBAction.hs view
@@ -25,7 +25,7 @@   , _ioTTopicRuleDynamoDBActionRangeKeyValue :: Val Text   , _ioTTopicRuleDynamoDBActionRoleArn :: Val Text   , _ioTTopicRuleDynamoDBActionTableName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRuleDynamoDBAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTTopicRuleElasticsearchAction.hs view
@@ -23,7 +23,7 @@   , _ioTTopicRuleElasticsearchActionIndex :: Val Text   , _ioTTopicRuleElasticsearchActionRoleArn :: Val Text   , _ioTTopicRuleElasticsearchActionType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRuleElasticsearchAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 32, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTTopicRuleFirehoseAction.hs view
@@ -21,7 +21,7 @@   { _ioTTopicRuleFirehoseActionDeliveryStreamName :: Val Text   , _ioTTopicRuleFirehoseActionRoleArn :: Val Text   , _ioTTopicRuleFirehoseActionSeparator :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRuleFirehoseAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTTopicRuleKinesisAction.hs view
@@ -21,7 +21,7 @@   { _ioTTopicRuleKinesisActionPartitionKey :: Maybe (Val Text)   , _ioTTopicRuleKinesisActionRoleArn :: Val Text   , _ioTTopicRuleKinesisActionStreamName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRuleKinesisAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 26, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTTopicRuleLambdaAction.hs view
@@ -19,7 +19,7 @@ data IoTTopicRuleLambdaAction =   IoTTopicRuleLambdaAction   { _ioTTopicRuleLambdaActionFunctionArn :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRuleLambdaAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 25, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTTopicRuleRepublishAction.hs view
@@ -20,7 +20,7 @@   IoTTopicRuleRepublishAction   { _ioTTopicRuleRepublishActionRoleArn :: Val Text   , _ioTTopicRuleRepublishActionTopic :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRuleRepublishAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTTopicRuleS3Action.hs view
@@ -21,7 +21,7 @@   { _ioTTopicRuleS3ActionBucketName :: Val Text   , _ioTTopicRuleS3ActionKey :: Val Text   , _ioTTopicRuleS3ActionRoleArn :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRuleS3Action where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSnsAction.hs view
@@ -21,7 +21,7 @@   { _ioTTopicRuleSnsActionMessageFormat :: Maybe (Val Text)   , _ioTTopicRuleSnsActionRoleArn :: Val Text   , _ioTTopicRuleSnsActionTargetArn :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRuleSnsAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 22, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSqsAction.hs view
@@ -21,7 +21,7 @@   { _ioTTopicRuleSqsActionQueueUrl :: Val Text   , _ioTTopicRuleSqsActionRoleArn :: Val Text   , _ioTTopicRuleSqsActionUseBase64 :: Maybe (Val Bool')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRuleSqsAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 22, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/IoTTopicRuleTopicRulePayload.hs view
@@ -23,7 +23,7 @@   , _ioTTopicRuleTopicRulePayloadDescription :: Maybe (Val Text)   , _ioTTopicRuleTopicRulePayloadRuleDisabled :: Val Bool'   , _ioTTopicRuleTopicRulePayloadSql :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRuleTopicRulePayload where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamBufferingHints.hs view
@@ -22,7 +22,7 @@   KinesisFirehoseDeliveryStreamBufferingHints   { _kinesisFirehoseDeliveryStreamBufferingHintsIntervalInSeconds :: Val Integer'   , _kinesisFirehoseDeliveryStreamBufferingHintsSizeInMBs :: Val Integer'-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KinesisFirehoseDeliveryStreamBufferingHints where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 44, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions.hs view
@@ -23,7 +23,7 @@   { _kinesisFirehoseDeliveryStreamCloudWatchLoggingOptionsEnabled :: Maybe (Val Bool')   , _kinesisFirehoseDeliveryStreamCloudWatchLoggingOptionsLogGroupName :: Maybe (Val Text)   , _kinesisFirehoseDeliveryStreamCloudWatchLoggingOptionsLogStreamName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 54, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCopyCommand.hs view
@@ -22,7 +22,7 @@   { _kinesisFirehoseDeliveryStreamCopyCommandCopyOptions :: Maybe (Val Text)   , _kinesisFirehoseDeliveryStreamCopyCommandDataTableColumns :: Maybe (Val Text)   , _kinesisFirehoseDeliveryStreamCopyCommandDataTableName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KinesisFirehoseDeliveryStreamCopyCommand where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 41, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchBufferingHints.hs view
@@ -22,7 +22,7 @@   KinesisFirehoseDeliveryStreamElasticsearchBufferingHints   { _kinesisFirehoseDeliveryStreamElasticsearchBufferingHintsIntervalInSeconds :: Val Integer'   , _kinesisFirehoseDeliveryStreamElasticsearchBufferingHintsSizeInMBs :: Val Integer'-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KinesisFirehoseDeliveryStreamElasticsearchBufferingHints where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 57, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration.hs view
@@ -34,7 +34,7 @@   , _kinesisFirehoseDeliveryStreamElasticsearchDestinationConfigurationS3BackupMode :: Val KinesisFirehoseElasticsearchS3BackupMode   , _kinesisFirehoseDeliveryStreamElasticsearchDestinationConfigurationS3Configuration :: KinesisFirehoseDeliveryStreamS3DestinationConfiguration   , _kinesisFirehoseDeliveryStreamElasticsearchDestinationConfigurationTypeName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 67, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchRetryOptions.hs view
@@ -21,7 +21,7 @@ data KinesisFirehoseDeliveryStreamElasticsearchRetryOptions =   KinesisFirehoseDeliveryStreamElasticsearchRetryOptions   { _kinesisFirehoseDeliveryStreamElasticsearchRetryOptionsDurationInSeconds :: Val Integer'-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KinesisFirehoseDeliveryStreamElasticsearchRetryOptions where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 55, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamEncryptionConfiguration.hs view
@@ -23,7 +23,7 @@   KinesisFirehoseDeliveryStreamEncryptionConfiguration   { _kinesisFirehoseDeliveryStreamEncryptionConfigurationKMSEncryptionConfig :: Maybe KinesisFirehoseDeliveryStreamKMSEncryptionConfig   , _kinesisFirehoseDeliveryStreamEncryptionConfigurationNoEncryptionConfig :: Maybe (Val KinesisFirehoseNoEncryptionConfig)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KinesisFirehoseDeliveryStreamEncryptionConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 53, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKMSEncryptionConfig.hs view
@@ -21,7 +21,7 @@ data KinesisFirehoseDeliveryStreamKMSEncryptionConfig =   KinesisFirehoseDeliveryStreamKMSEncryptionConfig   { _kinesisFirehoseDeliveryStreamKMSEncryptionConfigAWSKMSKeyARN :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KinesisFirehoseDeliveryStreamKMSEncryptionConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 49, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration.hs view
@@ -29,7 +29,7 @@   , _kinesisFirehoseDeliveryStreamRedshiftDestinationConfigurationRoleARN :: Val Text   , _kinesisFirehoseDeliveryStreamRedshiftDestinationConfigurationS3Configuration :: KinesisFirehoseDeliveryStreamS3DestinationConfiguration   , _kinesisFirehoseDeliveryStreamRedshiftDestinationConfigurationUsername :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 62, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamS3DestinationConfiguration.hs view
@@ -30,7 +30,7 @@   , _kinesisFirehoseDeliveryStreamS3DestinationConfigurationEncryptionConfiguration :: Maybe KinesisFirehoseDeliveryStreamEncryptionConfiguration   , _kinesisFirehoseDeliveryStreamS3DestinationConfigurationPrefix :: Val Text   , _kinesisFirehoseDeliveryStreamS3DestinationConfigurationRoleARN :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KinesisFirehoseDeliveryStreamS3DestinationConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 56, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/LambdaFunctionCode.hs view
@@ -22,7 +22,7 @@   , _lambdaFunctionCodeS3Key :: Maybe (Val Text)   , _lambdaFunctionCodeS3ObjectVersion :: Maybe (Val Text)   , _lambdaFunctionCodeZipFile :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LambdaFunctionCode where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 19, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/LambdaFunctionEnvironment.hs view
@@ -19,7 +19,7 @@ data LambdaFunctionEnvironment =   LambdaFunctionEnvironment   { _lambdaFunctionEnvironmentVariables :: Maybe Object-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LambdaFunctionEnvironment where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 26, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/LambdaFunctionVpcConfig.hs view
@@ -20,7 +20,7 @@   LambdaFunctionVpcConfig   { _lambdaFunctionVpcConfigSecurityGroupIds :: [Val Text]   , _lambdaFunctionVpcConfigSubnetIds :: [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LambdaFunctionVpcConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/LogsMetricFilterMetricTransformation.hs view
@@ -21,7 +21,7 @@   { _logsMetricFilterMetricTransformationMetricName :: Val Text   , _logsMetricFilterMetricTransformationMetricNamespace :: Val Text   , _logsMetricFilterMetricTransformationMetricValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LogsMetricFilterMetricTransformation where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 37, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksAppDataSource.hs view
@@ -21,7 +21,7 @@   { _opsWorksAppDataSourceArn :: Maybe (Val Text)   , _opsWorksAppDataSourceDatabaseName :: Maybe (Val Text)   , _opsWorksAppDataSourceType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksAppDataSource where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 22, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksAppEnvironmentVariable.hs view
@@ -21,7 +21,7 @@   { _opsWorksAppEnvironmentVariableKey :: Val Text   , _opsWorksAppEnvironmentVariableSecure :: Maybe (Val Bool')   , _opsWorksAppEnvironmentVariableValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksAppEnvironmentVariable where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksAppSource.hs view
@@ -24,7 +24,7 @@   , _opsWorksAppSourceType :: Maybe (Val Text)   , _opsWorksAppSourceUrl :: Maybe (Val Text)   , _opsWorksAppSourceUsername :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksAppSource where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 18, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksAppSslConfiguration.hs view
@@ -21,7 +21,7 @@   { _opsWorksAppSslConfigurationCertificate :: Maybe (Val Text)   , _opsWorksAppSslConfigurationChain :: Maybe (Val Text)   , _opsWorksAppSslConfigurationPrivateKey :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksAppSslConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceBlockDeviceMapping.hs view
@@ -22,7 +22,7 @@   , _opsWorksInstanceBlockDeviceMappingEbs :: Maybe OpsWorksInstanceEbsBlockDevice   , _opsWorksInstanceBlockDeviceMappingNoDevice :: Maybe (Val Text)   , _opsWorksInstanceBlockDeviceMappingVirtualName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksInstanceBlockDeviceMapping where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 35, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceEbsBlockDevice.hs view
@@ -23,7 +23,7 @@   , _opsWorksInstanceEbsBlockDeviceSnapshotId :: Maybe (Val Text)   , _opsWorksInstanceEbsBlockDeviceVolumeSize :: Maybe (Val Integer')   , _opsWorksInstanceEbsBlockDeviceVolumeType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksInstanceEbsBlockDevice where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceTimeBasedAutoScaling.hs view
@@ -25,7 +25,7 @@   , _opsWorksInstanceTimeBasedAutoScalingThursday :: Maybe Object   , _opsWorksInstanceTimeBasedAutoScalingTuesday :: Maybe Object   , _opsWorksInstanceTimeBasedAutoScalingWednesday :: Maybe Object-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksInstanceTimeBasedAutoScaling where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 37, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksLayerAutoScalingThresholds.hs view
@@ -24,7 +24,7 @@   , _opsWorksLayerAutoScalingThresholdsLoadThreshold :: Maybe (Val Double')   , _opsWorksLayerAutoScalingThresholdsMemoryThreshold :: Maybe (Val Double')   , _opsWorksLayerAutoScalingThresholdsThresholdsWaitTime :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksLayerAutoScalingThresholds where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 35, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLifecycleEventConfiguration.hs view
@@ -20,7 +20,7 @@ data OpsWorksLayerLifecycleEventConfiguration =   OpsWorksLayerLifecycleEventConfiguration   { _opsWorksLayerLifecycleEventConfigurationShutdownEventConfiguration :: Maybe OpsWorksLayerShutdownEventConfiguration-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksLayerLifecycleEventConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 41, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLoadBasedAutoScaling.hs view
@@ -21,7 +21,7 @@   { _opsWorksLayerLoadBasedAutoScalingDownScaling :: Maybe OpsWorksLayerAutoScalingThresholds   , _opsWorksLayerLoadBasedAutoScalingEnable :: Maybe (Val Bool')   , _opsWorksLayerLoadBasedAutoScalingUpScaling :: Maybe OpsWorksLayerAutoScalingThresholds-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksLayerLoadBasedAutoScaling where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksLayerRecipes.hs view
@@ -23,7 +23,7 @@   , _opsWorksLayerRecipesSetup :: Maybe [Val Text]   , _opsWorksLayerRecipesShutdown :: Maybe [Val Text]   , _opsWorksLayerRecipesUndeploy :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksLayerRecipes where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksLayerShutdownEventConfiguration.hs view
@@ -21,7 +21,7 @@   OpsWorksLayerShutdownEventConfiguration   { _opsWorksLayerShutdownEventConfigurationDelayUntilElbConnectionsDrained :: Maybe (Val Bool')   , _opsWorksLayerShutdownEventConfigurationExecutionTimeout :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksLayerShutdownEventConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 40, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksLayerVolumeConfiguration.hs view
@@ -24,7 +24,7 @@   , _opsWorksLayerVolumeConfigurationRaidLevel :: Maybe (Val Integer')   , _opsWorksLayerVolumeConfigurationSize :: Maybe (Val Integer')   , _opsWorksLayerVolumeConfigurationVolumeType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksLayerVolumeConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksStackChefConfiguration.hs view
@@ -20,7 +20,7 @@   OpsWorksStackChefConfiguration   { _opsWorksStackChefConfigurationBerkshelfVersion :: Maybe (Val Text)   , _opsWorksStackChefConfigurationManageBerkshelf :: Maybe (Val Bool')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksStackChefConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksStackElasticIp.hs view
@@ -20,7 +20,7 @@   OpsWorksStackElasticIp   { _opsWorksStackElasticIpIp :: Val Text   , _opsWorksStackElasticIpName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksStackElasticIp where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksStackRdsDbInstance.hs view
@@ -21,7 +21,7 @@   { _opsWorksStackRdsDbInstanceDbPassword :: Val Text   , _opsWorksStackRdsDbInstanceDbUser :: Val Text   , _opsWorksStackRdsDbInstanceRdsDbInstanceArn :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksStackRdsDbInstance where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksStackSource.hs view
@@ -24,7 +24,7 @@   , _opsWorksStackSourceType :: Maybe (Val Text)   , _opsWorksStackSourceUrl :: Maybe (Val Text)   , _opsWorksStackSourceUsername :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksStackSource where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 20, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/OpsWorksStackStackConfigurationManager.hs view
@@ -21,7 +21,7 @@   OpsWorksStackStackConfigurationManager   { _opsWorksStackStackConfigurationManagerName :: Maybe (Val Text)   , _opsWorksStackStackConfigurationManagerVersion :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksStackStackConfigurationManager where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 39, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/RDSDBSecurityGroupIngressProperty.hs view
@@ -22,7 +22,7 @@   , _rDSDBSecurityGroupIngressPropertyEC2SecurityGroupId :: Maybe (Val Text)   , _rDSDBSecurityGroupIngressPropertyEC2SecurityGroupName :: Maybe (Val Text)   , _rDSDBSecurityGroupIngressPropertyEC2SecurityGroupOwnerId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RDSDBSecurityGroupIngressProperty where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionConfiguration.hs view
@@ -23,7 +23,7 @@   , _rDSOptionGroupOptionConfigurationOptionSettings :: Maybe RDSOptionGroupOptionSetting   , _rDSOptionGroupOptionConfigurationPort :: Maybe (Val Integer')   , _rDSOptionGroupOptionConfigurationVpcSecurityGroupMemberships :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RDSOptionGroupOptionConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionSetting.hs view
@@ -20,7 +20,7 @@   RDSOptionGroupOptionSetting   { _rDSOptionGroupOptionSettingName :: Maybe (Val Text)   , _rDSOptionGroupOptionSettingValue :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RDSOptionGroupOptionSetting where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/RedshiftClusterParameterGroupParameter.hs view
@@ -21,7 +21,7 @@   RedshiftClusterParameterGroupParameter   { _redshiftClusterParameterGroupParameterParameterName :: Val Text   , _redshiftClusterParameterGroupParameterParameterValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RedshiftClusterParameterGroupParameter where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 39, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckConfig.hs view
@@ -26,7 +26,7 @@   , _route53HealthCheckHealthCheckConfigResourcePath :: Maybe (Val Text)   , _route53HealthCheckHealthCheckConfigSearchString :: Maybe (Val Text)   , _route53HealthCheckHealthCheckConfigType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53HealthCheckHealthCheckConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckTag.hs view
@@ -20,7 +20,7 @@   Route53HealthCheckHealthCheckTag   { _route53HealthCheckHealthCheckTagKey :: Val Text   , _route53HealthCheckHealthCheckTagValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53HealthCheckHealthCheckTag where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneConfig.hs view
@@ -19,7 +19,7 @@ data Route53HostedZoneHostedZoneConfig =   Route53HostedZoneHostedZoneConfig   { _route53HostedZoneHostedZoneConfigComment :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53HostedZoneHostedZoneConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneTag.hs view
@@ -20,7 +20,7 @@   Route53HostedZoneHostedZoneTag   { _route53HostedZoneHostedZoneTagKey :: Val Text   , _route53HostedZoneHostedZoneTagValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53HostedZoneHostedZoneTag where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/Route53HostedZoneVPC.hs view
@@ -20,7 +20,7 @@   Route53HostedZoneVPC   { _route53HostedZoneVPCVPCId :: Val Text   , _route53HostedZoneVPCVPCRegion :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53HostedZoneVPC where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/Route53RecordSetAliasTarget.hs view
@@ -21,7 +21,7 @@   { _route53RecordSetAliasTargetDNSName :: Val Text   , _route53RecordSetAliasTargetEvaluateTargetHealth :: Maybe (Val Bool')   , _route53RecordSetAliasTargetHostedZoneId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53RecordSetAliasTarget where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/Route53RecordSetGeoLocation.hs view
@@ -21,7 +21,7 @@   { _route53RecordSetGeoLocationContinentCode :: Maybe (Val Text)   , _route53RecordSetGeoLocationCountryCode :: Maybe (Val Text)   , _route53RecordSetGeoLocationSubdivisionCode :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53RecordSetGeoLocation where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupAliasTarget.hs view
@@ -21,7 +21,7 @@   { _route53RecordSetGroupAliasTargetDNSName :: Val Text   , _route53RecordSetGroupAliasTargetEvaluateTargetHealth :: Maybe (Val Bool')   , _route53RecordSetGroupAliasTargetHostedZoneId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53RecordSetGroupAliasTarget where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupGeoLocation.hs view
@@ -21,7 +21,7 @@   { _route53RecordSetGroupGeoLocationContinentCode :: Maybe (Val Text)   , _route53RecordSetGroupGeoLocationCountryCode :: Maybe (Val Text)   , _route53RecordSetGroupGeoLocationSubdivisionCode :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53RecordSetGroupGeoLocation where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupRecordSet.hs view
@@ -33,7 +33,7 @@   , _route53RecordSetGroupRecordSetTTL :: Maybe (Val Text)   , _route53RecordSetGroupRecordSetType :: Val Text   , _route53RecordSetGroupRecordSetWeight :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53RecordSetGroupRecordSet where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketCorsConfiguration.hs view
@@ -19,7 +19,7 @@ data S3BucketCorsConfiguration =   S3BucketCorsConfiguration   { _s3BucketCorsConfigurationCorsRules :: [S3BucketCorsRule]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketCorsConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 26, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketCorsRule.hs view
@@ -24,7 +24,7 @@   , _s3BucketCorsRuleExposedHeaders :: Maybe [Val Text]   , _s3BucketCorsRuleId :: Maybe (Val Text)   , _s3BucketCorsRuleMaxAge :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketCorsRule where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketFilterRule.hs view
@@ -20,7 +20,7 @@   S3BucketFilterRule   { _s3BucketFilterRuleName :: Val Text   , _s3BucketFilterRuleValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketFilterRule where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 19, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketLambdaConfiguration.hs view
@@ -21,7 +21,7 @@   { _s3BucketLambdaConfigurationEvent :: Val Text   , _s3BucketLambdaConfigurationFilter :: Maybe S3BucketNotificationFilter   , _s3BucketLambdaConfigurationFunction :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketLambdaConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketLifecycleConfiguration.hs view
@@ -19,7 +19,7 @@ data S3BucketLifecycleConfiguration =   S3BucketLifecycleConfiguration   { _s3BucketLifecycleConfigurationRules :: [S3BucketRule]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketLifecycleConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketLoggingConfiguration.hs view
@@ -20,7 +20,7 @@   S3BucketLoggingConfiguration   { _s3BucketLoggingConfigurationDestinationBucketName :: Maybe (Val Text)   , _s3BucketLoggingConfigurationLogFilePrefix :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketLoggingConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketNoncurrentVersionTransition.hs view
@@ -20,7 +20,7 @@   S3BucketNoncurrentVersionTransition   { _s3BucketNoncurrentVersionTransitionStorageClass :: Val Text   , _s3BucketNoncurrentVersionTransitionTransitionInDays :: Val Integer'-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketNoncurrentVersionTransition where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketNotificationConfiguration.hs view
@@ -23,7 +23,7 @@   { _s3BucketNotificationConfigurationLambdaConfigurations :: Maybe [S3BucketLambdaConfiguration]   , _s3BucketNotificationConfigurationQueueConfigurations :: Maybe [S3BucketQueueConfiguration]   , _s3BucketNotificationConfigurationTopicConfigurations :: Maybe [S3BucketTopicConfiguration]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketNotificationConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketNotificationFilter.hs view
@@ -19,7 +19,7 @@ data S3BucketNotificationFilter =   S3BucketNotificationFilter   { _s3BucketNotificationFilterS3Key :: S3BucketS3KeyFilter-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketNotificationFilter where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketQueueConfiguration.hs view
@@ -21,7 +21,7 @@   { _s3BucketQueueConfigurationEvent :: Val Text   , _s3BucketQueueConfigurationFilter :: Maybe S3BucketNotificationFilter   , _s3BucketQueueConfigurationQueue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketQueueConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketRedirectAllRequestsTo.hs view
@@ -20,7 +20,7 @@   S3BucketRedirectAllRequestsTo   { _s3BucketRedirectAllRequestsToHostName :: Val Text   , _s3BucketRedirectAllRequestsToProtocol :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketRedirectAllRequestsTo where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketRedirectRule.hs view
@@ -23,7 +23,7 @@   , _s3BucketRedirectRuleProtocol :: Maybe (Val Text)   , _s3BucketRedirectRuleReplaceKeyPrefixWith :: Maybe (Val Text)   , _s3BucketRedirectRuleReplaceKeyWith :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketRedirectRule where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketReplicationConfiguration.hs view
@@ -20,7 +20,7 @@   S3BucketReplicationConfiguration   { _s3BucketReplicationConfigurationRole :: Val Text   , _s3BucketReplicationConfigurationRules :: [S3BucketReplicationRule]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketReplicationConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketReplicationDestination.hs view
@@ -20,7 +20,7 @@   S3BucketReplicationDestination   { _s3BucketReplicationDestinationBucket :: Val Text   , _s3BucketReplicationDestinationStorageClass :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketReplicationDestination where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketReplicationRule.hs view
@@ -22,7 +22,7 @@   , _s3BucketReplicationRuleId :: Maybe (Val Text)   , _s3BucketReplicationRulePrefix :: Val Text   , _s3BucketReplicationRuleStatus :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketReplicationRule where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRule.hs view
@@ -21,7 +21,7 @@   S3BucketRoutingRule   { _s3BucketRoutingRuleRedirectRule :: S3BucketRedirectRule   , _s3BucketRoutingRuleRoutingRuleCondition :: Maybe S3BucketRoutingRuleCondition-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketRoutingRule where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 20, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRuleCondition.hs view
@@ -20,7 +20,7 @@   S3BucketRoutingRuleCondition   { _s3BucketRoutingRuleConditionHttpErrorCodeReturnedEquals :: Maybe (Val Text)   , _s3BucketRoutingRuleConditionKeyPrefixEquals :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketRoutingRuleCondition where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketRule.hs view
@@ -29,7 +29,7 @@   , _s3BucketRuleStatus :: Val Text   , _s3BucketRuleTransition :: Maybe S3BucketTransition   , _s3BucketRuleTransitions :: Maybe S3BucketTransition-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketRule where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 13, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketS3KeyFilter.hs view
@@ -19,7 +19,7 @@ data S3BucketS3KeyFilter =   S3BucketS3KeyFilter   { _s3BucketS3KeyFilterRules :: [S3BucketFilterRule]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketS3KeyFilter where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 20, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketTopicConfiguration.hs view
@@ -21,7 +21,7 @@   { _s3BucketTopicConfigurationEvent :: Val Text   , _s3BucketTopicConfigurationFilter :: Maybe S3BucketNotificationFilter   , _s3BucketTopicConfigurationTopic :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketTopicConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketTransition.hs view
@@ -21,7 +21,7 @@   { _s3BucketTransitionStorageClass :: Val Text   , _s3BucketTransitionTransitionDate :: Maybe (Val Text)   , _s3BucketTransitionTransitionInDays :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketTransition where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 19, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketVersioningConfiguration.hs view
@@ -19,7 +19,7 @@ data S3BucketVersioningConfiguration =   S3BucketVersioningConfiguration   { _s3BucketVersioningConfigurationStatus :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketVersioningConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 32, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/S3BucketWebsiteConfiguration.hs view
@@ -23,7 +23,7 @@   , _s3BucketWebsiteConfigurationIndexDocument :: Maybe (Val Text)   , _s3BucketWebsiteConfigurationRedirectAllRequestsTo :: Maybe S3BucketRedirectAllRequestsTo   , _s3BucketWebsiteConfigurationRoutingRules :: Maybe [S3BucketRoutingRule]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketWebsiteConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/SNSTopicSubscription.hs view
@@ -20,7 +20,7 @@   SNSTopicSubscription   { _sNSTopicSubscriptionEndpoint :: Val Text   , _sNSTopicSubscriptionProtocol :: Val SNSProtocol-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON SNSTopicSubscription where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/SSMAssociationParameterValues.hs view
@@ -19,7 +19,7 @@ data SSMAssociationParameterValues =   SSMAssociationParameterValues   { _sSMAssociationParameterValuesParameterValues :: [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON SSMAssociationParameterValues where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/SSMAssociationTarget.hs view
@@ -20,7 +20,7 @@   SSMAssociationTarget   { _sSMAssociationTargetKey :: Val Text   , _sSMAssociationTargetValues :: [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON SSMAssociationTarget where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/Tag.hs view
@@ -20,7 +20,7 @@   Tag   { _tagKey :: Val Text   , _tagValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Tag where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 4, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetByteMatchTuple.hs view
@@ -23,7 +23,7 @@   , _wAFByteMatchSetByteMatchTupleTargetString :: Maybe (Val Text)   , _wAFByteMatchSetByteMatchTupleTargetStringBase64 :: Maybe (Val Text)   , _wAFByteMatchSetByteMatchTupleTextTransformation :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFByteMatchSetByteMatchTuple where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetFieldToMatch.hs view
@@ -20,7 +20,7 @@   WAFByteMatchSetFieldToMatch   { _wAFByteMatchSetFieldToMatchData :: Maybe (Val Text)   , _wAFByteMatchSetFieldToMatchType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFByteMatchSetFieldToMatch where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/WAFIPSetIPSetDescriptor.hs view
@@ -20,7 +20,7 @@   WAFIPSetIPSetDescriptor   { _wAFIPSetIPSetDescriptorType :: Val Text   , _wAFIPSetIPSetDescriptorValue :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFIPSetIPSetDescriptor where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/WAFRulePredicate.hs view
@@ -21,7 +21,7 @@   { _wAFRulePredicateDataId :: Val Text   , _wAFRulePredicateNegated :: Val Bool'   , _wAFRulePredicateType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFRulePredicate where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetFieldToMatch.hs view
@@ -20,7 +20,7 @@   WAFSizeConstraintSetFieldToMatch   { _wAFSizeConstraintSetFieldToMatchData :: Maybe (Val Text)   , _wAFSizeConstraintSetFieldToMatchType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFSizeConstraintSetFieldToMatch where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetSizeConstraint.hs view
@@ -22,7 +22,7 @@   , _wAFSizeConstraintSetSizeConstraintFieldToMatch :: WAFSizeConstraintSetFieldToMatch   , _wAFSizeConstraintSetSizeConstraintSize :: Val Integer'   , _wAFSizeConstraintSetSizeConstraintTextTransformation :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFSizeConstraintSetSizeConstraint where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 35, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetFieldToMatch.hs view
@@ -20,7 +20,7 @@   WAFSqlInjectionMatchSetFieldToMatch   { _wAFSqlInjectionMatchSetFieldToMatchData :: Maybe (Val Text)   , _wAFSqlInjectionMatchSetFieldToMatchType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFSqlInjectionMatchSetFieldToMatch where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetSqlInjectionMatchTuple.hs view
@@ -22,7 +22,7 @@   WAFSqlInjectionMatchSetSqlInjectionMatchTuple   { _wAFSqlInjectionMatchSetSqlInjectionMatchTupleFieldToMatch :: WAFSqlInjectionMatchSetFieldToMatch   , _wAFSqlInjectionMatchSetSqlInjectionMatchTupleTextTransformation :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFSqlInjectionMatchSetSqlInjectionMatchTuple where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 46, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/WAFWebACLActivatedRule.hs view
@@ -21,7 +21,7 @@   { _wAFWebACLActivatedRuleAction :: WAFWebACLWafAction   , _wAFWebACLActivatedRulePriority :: Val Integer'   , _wAFWebACLActivatedRuleRuleId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFWebACLActivatedRule where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/WAFWebACLWafAction.hs view
@@ -19,7 +19,7 @@ data WAFWebACLWafAction =   WAFWebACLWafAction   { _wAFWebACLWafActionType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFWebACLWafAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 19, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetFieldToMatch.hs view
@@ -20,7 +20,7 @@   WAFXssMatchSetFieldToMatch   { _wAFXssMatchSetFieldToMatchData :: Maybe (Val Text)   , _wAFXssMatchSetFieldToMatchType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFXssMatchSetFieldToMatch where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetXssMatchTuple.hs view
@@ -20,7 +20,7 @@   WAFXssMatchSetXssMatchTuple   { _wAFXssMatchSetXssMatchTupleFieldToMatch :: WAFXssMatchSetFieldToMatch   , _wAFXssMatchSetXssMatchTupleTextTransformation :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFXssMatchSetXssMatchTuple where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/Resources.hs view
@@ -677,13 +677,13 @@   | WAFXssMatchSetProperties WAFXssMatchSet   | WorkSpacesWorkspaceProperties WorkSpacesWorkspace -  deriving (Show)+  deriving (Show, Eq)  data DeletionPolicy   = Delete   | Retain   | Snapshot-  deriving (Show, Generic)+  deriving (Show, Eq, Generic)  instance ToJSON DeletionPolicy where instance FromJSON DeletionPolicy where@@ -696,7 +696,7 @@   , resourceResCreationPolicy :: Maybe CreationPolicy   , resourceResUpdatePolicy :: Maybe UpdatePolicy   , resourceDependsOn :: Maybe [T.Text]-  } deriving (Show)+  } deriving (Show, Eq)  instance ToRef Resource b where   toRef r = Ref (resourceResName r)@@ -1276,7 +1276,7 @@ -- | Wrapper around a list of 'Resources's to we can modify the aeson -- instances. newtype Resources = Resources { unResources :: [Resource] }-                  deriving (Show, Monoid)+  deriving (Show, Eq, Monoid)  instance IsList Resources where   type Item Resources = Resource
library-gen/Stratosphere/Resources/ApiGatewayAccount.hs view
@@ -19,7 +19,7 @@ data ApiGatewayAccount =   ApiGatewayAccount   { _apiGatewayAccountCloudWatchRoleArn :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayAccount where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 18, omitNothingFields = True }
library-gen/Stratosphere/Resources/ApiGatewayApiKey.hs view
@@ -22,7 +22,7 @@   , _apiGatewayApiKeyEnabled :: Maybe (Val Bool')   , _apiGatewayApiKeyName :: Maybe (Val Text)   , _apiGatewayApiKeyStageKeys :: Maybe [ApiGatewayApiKeyStageKey]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayApiKey where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/Resources/ApiGatewayAuthorizer.hs view
@@ -12,7 +12,7 @@ import GHC.Generics  import Stratosphere.Values-+import Stratosphere.Types  -- | Full data type definition for ApiGatewayAuthorizer. See -- | 'apiGatewayAuthorizer' for a more convenient constructor.@@ -26,8 +26,8 @@   , _apiGatewayAuthorizerName :: Maybe (Val Text)   , _apiGatewayAuthorizerProviderARNs :: Maybe [Val Text]   , _apiGatewayAuthorizerRestApiId :: Maybe (Val Text)-  , _apiGatewayAuthorizerType :: Maybe (Val Text)-  } deriving (Show, Generic)+  , _apiGatewayAuthorizerType :: Maybe (Val AuthorizerType)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayAuthorizer where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }@@ -85,5 +85,5 @@ agaRestApiId = lens _apiGatewayAuthorizerRestApiId (\s a -> s { _apiGatewayAuthorizerRestApiId = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigateway-authorizer.html#cfn-apigateway-authorizer-type-agaType :: Lens' ApiGatewayAuthorizer (Maybe (Val Text))+agaType :: Lens' ApiGatewayAuthorizer (Maybe (Val AuthorizerType)) agaType = lens _apiGatewayAuthorizerType (\s a -> s { _apiGatewayAuthorizerType = a })
library-gen/Stratosphere/Resources/ApiGatewayBasePathMapping.hs view
@@ -22,7 +22,7 @@   , _apiGatewayBasePathMappingDomainName :: Maybe (Val Text)   , _apiGatewayBasePathMappingRestApiId :: Maybe (Val Text)   , _apiGatewayBasePathMappingStage :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayBasePathMapping where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 26, omitNothingFields = True }
library-gen/Stratosphere/Resources/ApiGatewayClientCertificate.hs view
@@ -19,7 +19,7 @@ data ApiGatewayClientCertificate =   ApiGatewayClientCertificate   { _apiGatewayClientCertificateDescription :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayClientCertificate where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/Resources/ApiGatewayDeployment.hs view
@@ -22,7 +22,7 @@   , _apiGatewayDeploymentRestApiId :: Val Text   , _apiGatewayDeploymentStageDescription :: Maybe ApiGatewayDeploymentStageDescription   , _apiGatewayDeploymentStageName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayDeployment where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }
library-gen/Stratosphere/Resources/ApiGatewayMethod.hs view
@@ -30,7 +30,7 @@   , _apiGatewayMethodRequestParameters :: Maybe Object   , _apiGatewayMethodResourceId :: Maybe (Val Text)   , _apiGatewayMethodRestApiId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayMethod where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/Resources/ApiGatewayModel.hs view
@@ -23,7 +23,7 @@   , _apiGatewayModelName :: Maybe (Val Text)   , _apiGatewayModelRestApiId :: Val Text   , _apiGatewayModelSchema :: Maybe Object-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayModel where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 16, omitNothingFields = True }
library-gen/Stratosphere/Resources/ApiGatewayResource.hs view
@@ -21,7 +21,7 @@   { _apiGatewayResourceParentId :: Val Text   , _apiGatewayResourcePathPart :: Val Text   , _apiGatewayResourceRestApiId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayResource where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 19, omitNothingFields = True }
library-gen/Stratosphere/Resources/ApiGatewayRestApi.hs view
@@ -26,7 +26,7 @@   , _apiGatewayRestApiMode :: Maybe (Val Text)   , _apiGatewayRestApiName :: Maybe (Val Text)   , _apiGatewayRestApiParameters :: Maybe Object-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayRestApi where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 18, omitNothingFields = True }
library-gen/Stratosphere/Resources/ApiGatewayStage.hs view
@@ -27,7 +27,7 @@   , _apiGatewayStageRestApiId :: Maybe (Val Text)   , _apiGatewayStageStageName :: Maybe (Val Text)   , _apiGatewayStageVariables :: Maybe Object-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayStage where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 16, omitNothingFields = True }
library-gen/Stratosphere/Resources/ApiGatewayUsagePlan.hs view
@@ -25,7 +25,7 @@   , _apiGatewayUsagePlanQuota :: Maybe ApiGatewayUsagePlanQuotaSettings   , _apiGatewayUsagePlanThrottle :: Maybe ApiGatewayUsagePlanThrottleSettings   , _apiGatewayUsagePlanUsagePlanName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApiGatewayUsagePlan where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 20, omitNothingFields = True }
library-gen/Stratosphere/Resources/ApplicationAutoScalingScalableTarget.hs view
@@ -24,7 +24,7 @@   , _applicationAutoScalingScalableTargetRoleARN :: Val Text   , _applicationAutoScalingScalableTargetScalableDimension :: Val Text   , _applicationAutoScalingScalableTargetServiceNamespace :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApplicationAutoScalingScalableTarget where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 37, omitNothingFields = True }
library-gen/Stratosphere/Resources/ApplicationAutoScalingScalingPolicy.hs view
@@ -25,7 +25,7 @@   , _applicationAutoScalingScalingPolicyScalingTargetId :: Maybe (Val Text)   , _applicationAutoScalingScalingPolicyServiceNamespace :: Maybe (Val Text)   , _applicationAutoScalingScalingPolicyStepScalingPolicyConfiguration :: Maybe ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ApplicationAutoScalingScalingPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/Resources/AutoScalingAutoScalingGroup.hs view
@@ -12,16 +12,15 @@ import GHC.Generics  import Stratosphere.Values-import Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupTagProperty import Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupMetricsCollection import Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupNotificationConfigurations+import Stratosphere.ResourceProperties.AutoScalingAutoScalingGroupTagProperty  -- | Full data type definition for AutoScalingAutoScalingGroup. See -- | 'autoScalingAutoScalingGroup' for a more convenient constructor. data AutoScalingAutoScalingGroup =   AutoScalingAutoScalingGroup-  { _autoScalingAutoScalingGroupAsTags :: Maybe [AutoScalingAutoScalingGroupTagProperty]-  , _autoScalingAutoScalingGroupAvailabilityZones :: Maybe [Val Text]+  { _autoScalingAutoScalingGroupAvailabilityZones :: Maybe [Val Text]   , _autoScalingAutoScalingGroupCooldown :: Maybe (Val Text)   , _autoScalingAutoScalingGroupDesiredCapacity :: Maybe (Val Text)   , _autoScalingAutoScalingGroupHealthCheckGracePeriod :: Maybe (Val Integer')@@ -34,10 +33,11 @@   , _autoScalingAutoScalingGroupMinSize :: Val Text   , _autoScalingAutoScalingGroupNotificationConfigurations :: Maybe AutoScalingAutoScalingGroupNotificationConfigurations   , _autoScalingAutoScalingGroupPlacementGroup :: Maybe (Val Text)+  , _autoScalingAutoScalingGroupTags :: Maybe [AutoScalingAutoScalingGroupTagProperty]   , _autoScalingAutoScalingGroupTargetGroupARNs :: Maybe [Val Text]   , _autoScalingAutoScalingGroupTerminationPolicies :: Maybe [Val Text]   , _autoScalingAutoScalingGroupVPCZoneIdentifier :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingAutoScalingGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }@@ -53,8 +53,7 @@   -> AutoScalingAutoScalingGroup autoScalingAutoScalingGroup maxSizearg minSizearg =   AutoScalingAutoScalingGroup-  { _autoScalingAutoScalingGroupAsTags = Nothing-  , _autoScalingAutoScalingGroupAvailabilityZones = Nothing+  { _autoScalingAutoScalingGroupAvailabilityZones = Nothing   , _autoScalingAutoScalingGroupCooldown = Nothing   , _autoScalingAutoScalingGroupDesiredCapacity = Nothing   , _autoScalingAutoScalingGroupHealthCheckGracePeriod = Nothing@@ -67,15 +66,12 @@   , _autoScalingAutoScalingGroupMinSize = minSizearg   , _autoScalingAutoScalingGroupNotificationConfigurations = Nothing   , _autoScalingAutoScalingGroupPlacementGroup = Nothing+  , _autoScalingAutoScalingGroupTags = Nothing   , _autoScalingAutoScalingGroupTargetGroupARNs = Nothing   , _autoScalingAutoScalingGroupTerminationPolicies = Nothing   , _autoScalingAutoScalingGroupVPCZoneIdentifier = Nothing   } --- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-group.html#cfn-as-group-tags-asasgAsTags :: Lens' AutoScalingAutoScalingGroup (Maybe [AutoScalingAutoScalingGroupTagProperty])-asasgAsTags = lens _autoScalingAutoScalingGroupAsTags (\s a -> s { _autoScalingAutoScalingGroupAsTags = a })- -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-group.html#cfn-as-group-availabilityzones asasgAvailabilityZones :: Lens' AutoScalingAutoScalingGroup (Maybe [Val Text]) asasgAvailabilityZones = lens _autoScalingAutoScalingGroupAvailabilityZones (\s a -> s { _autoScalingAutoScalingGroupAvailabilityZones = a })@@ -127,6 +123,10 @@ -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-group.html#cfn-as-group-placementgroup asasgPlacementGroup :: Lens' AutoScalingAutoScalingGroup (Maybe (Val Text)) asasgPlacementGroup = lens _autoScalingAutoScalingGroupPlacementGroup (\s a -> s { _autoScalingAutoScalingGroupPlacementGroup = a })++-- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-group.html#cfn-as-group-tags+asasgTags :: Lens' AutoScalingAutoScalingGroup (Maybe [AutoScalingAutoScalingGroupTagProperty])+asasgTags = lens _autoScalingAutoScalingGroupTags (\s a -> s { _autoScalingAutoScalingGroupTags = a })  -- | http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-as-group.html#cfn-as-group-targetgrouparns asasgTargetGroupARNs :: Lens' AutoScalingAutoScalingGroup (Maybe [Val Text])
library-gen/Stratosphere/Resources/AutoScalingLaunchConfiguration.hs view
@@ -35,7 +35,7 @@   , _autoScalingLaunchConfigurationSecurityGroups :: Maybe [Val Text]   , _autoScalingLaunchConfigurationSpotPrice :: Maybe (Val Text)   , _autoScalingLaunchConfigurationUserData :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingLaunchConfiguration where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/Resources/AutoScalingLifecycleHook.hs view
@@ -25,7 +25,7 @@   , _autoScalingLifecycleHookNotificationMetadata :: Maybe (Val Text)   , _autoScalingLifecycleHookNotificationTargetARN :: Val Text   , _autoScalingLifecycleHookRoleARN :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingLifecycleHook where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 25, omitNothingFields = True }
library-gen/Stratosphere/Resources/AutoScalingScalingPolicy.hs view
@@ -27,7 +27,7 @@   , _autoScalingScalingPolicyPolicyType :: Maybe (Val Text)   , _autoScalingScalingPolicyScalingAdjustment :: Maybe (Val Integer')   , _autoScalingScalingPolicyStepAdjustments :: Maybe [AutoScalingScalingPolicyStepAdjustment]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingScalingPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 25, omitNothingFields = True }
library-gen/Stratosphere/Resources/AutoScalingScheduledAction.hs view
@@ -25,7 +25,7 @@   , _autoScalingScheduledActionMinSize :: Maybe (Val Integer')   , _autoScalingScheduledActionRecurrence :: Maybe (Val Text)   , _autoScalingScheduledActionStartTime :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingScheduledAction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/Resources/CertificateManagerCertificate.hs view
@@ -23,7 +23,7 @@   , _certificateManagerCertificateDomainValidationOptions :: Maybe [CertificateManagerCertificateDomainValidationOption]   , _certificateManagerCertificateSubjectAlternativeNames :: Maybe [Val Text]   , _certificateManagerCertificateTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CertificateManagerCertificate where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/Resources/CloudFormationCustomResource.hs view
@@ -19,7 +19,7 @@ data CloudFormationCustomResource =   CloudFormationCustomResource   { _cloudFormationCustomResourceServiceToken :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFormationCustomResource where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/Resources/CloudFormationStack.hs view
@@ -23,7 +23,7 @@   , _cloudFormationStackTags :: Maybe [Tag]   , _cloudFormationStackTemplateURL :: Val Text   , _cloudFormationStackTimeoutInMinutes :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFormationStack where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 20, omitNothingFields = True }
library-gen/Stratosphere/Resources/CloudFormationWaitCondition.hs view
@@ -21,7 +21,7 @@   { _cloudFormationWaitConditionCount :: Maybe (Val Integer')   , _cloudFormationWaitConditionHandle :: Val Text   , _cloudFormationWaitConditionTimeout :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFormationWaitCondition where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/Resources/CloudFormationWaitConditionHandle.hs view
@@ -19,7 +19,7 @@ data CloudFormationWaitConditionHandle =   CloudFormationWaitConditionHandle   { -  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFormationWaitConditionHandle where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/Resources/CloudFrontDistribution.hs view
@@ -19,7 +19,7 @@ data CloudFrontDistribution =   CloudFrontDistribution   { _cloudFrontDistributionDistributionConfig :: CloudFrontDistributionDistributionConfig-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudFrontDistribution where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/Resources/CloudTrailTrail.hs view
@@ -28,7 +28,7 @@   , _cloudTrailTrailS3BucketName :: Val Text   , _cloudTrailTrailS3KeyPrefix :: Maybe (Val Text)   , _cloudTrailTrailSnsTopicName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudTrailTrail where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 16, omitNothingFields = True }
library-gen/Stratosphere/Resources/CloudWatchAlarm.hs view
@@ -33,7 +33,7 @@   , _cloudWatchAlarmStatistic :: Val Text   , _cloudWatchAlarmThreshold :: Val Double'   , _cloudWatchAlarmUnit :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CloudWatchAlarm where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 16, omitNothingFields = True }
library-gen/Stratosphere/Resources/CodeBuildProject.hs view
@@ -30,7 +30,7 @@   , _codeBuildProjectSource :: Maybe CodeBuildProjectSource   , _codeBuildProjectTags :: Maybe [Tag]   , _codeBuildProjectTimeoutInMinutes :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeBuildProject where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/Resources/CodeCommitRepository.hs view
@@ -21,7 +21,7 @@   { _codeCommitRepositoryRepositoryDescription :: Maybe (Val Text)   , _codeCommitRepositoryRepositoryName :: Val Text   , _codeCommitRepositoryTriggers :: Maybe [CodeCommitRepositoryRepositoryTrigger]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeCommitRepository where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }
library-gen/Stratosphere/Resources/CodeDeployApplication.hs view
@@ -19,7 +19,7 @@ data CodeDeployApplication =   CodeDeployApplication   { _codeDeployApplicationApplicationName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeDeployApplication where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 22, omitNothingFields = True }
library-gen/Stratosphere/Resources/CodeDeployDeploymentConfig.hs view
@@ -20,7 +20,7 @@   CodeDeployDeploymentConfig   { _codeDeployDeploymentConfigDeploymentConfigName :: Maybe (Val Text)   , _codeDeployDeploymentConfigMinimumHealthyHosts :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeDeployDeploymentConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/Resources/CodeDeployDeploymentGroup.hs view
@@ -28,7 +28,7 @@   , _codeDeployDeploymentGroupEc2TagFilters :: Maybe [CodeDeployDeploymentGroupEc2TagFilter]   , _codeDeployDeploymentGroupOnPremisesInstanceTagFilters :: Maybe [CodeDeployDeploymentGroupOnPremisesInstanceTagFilter]   , _codeDeployDeploymentGroupServiceRoleArn :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodeDeployDeploymentGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 26, omitNothingFields = True }
library-gen/Stratosphere/Resources/CodePipelineCustomActionType.hs view
@@ -27,7 +27,7 @@   , _codePipelineCustomActionTypeProvider :: Val Text   , _codePipelineCustomActionTypeSettings :: Maybe CodePipelineCustomActionTypeSettings   , _codePipelineCustomActionTypeVersion :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelineCustomActionType where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/Resources/CodePipelinePipeline.hs view
@@ -26,7 +26,7 @@   , _codePipelinePipelineRestartExecutionOnUpdate :: Maybe (Val Bool')   , _codePipelinePipelineRoleArn :: Val Text   , _codePipelinePipelineStages :: [CodePipelinePipelineStageDeclaration]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CodePipelinePipeline where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }
library-gen/Stratosphere/Resources/ConfigConfigRule.hs view
@@ -25,7 +25,7 @@   , _configConfigRuleMaximumExecutionFrequency :: Maybe (Val Text)   , _configConfigRuleScope :: Maybe ConfigConfigRuleScope   , _configConfigRuleSource :: ConfigConfigRuleSource-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ConfigConfigRule where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/Resources/ConfigConfigurationRecorder.hs view
@@ -21,7 +21,7 @@   { _configConfigurationRecorderName :: Maybe (Val Text)   , _configConfigurationRecorderRecordingGroup :: Maybe ConfigConfigurationRecorderRecordingGroup   , _configConfigurationRecorderRoleArn :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ConfigConfigurationRecorder where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/Resources/ConfigDeliveryChannel.hs view
@@ -23,7 +23,7 @@   , _configDeliveryChannelS3BucketName :: Val Text   , _configDeliveryChannelS3KeyPrefix :: Maybe (Val Text)   , _configDeliveryChannelSnsTopicARN :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ConfigDeliveryChannel where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 22, omitNothingFields = True }
library-gen/Stratosphere/Resources/DataPipelinePipeline.hs view
@@ -28,7 +28,7 @@   , _dataPipelinePipelineParameterValues :: Maybe [DataPipelinePipelineParameterValue]   , _dataPipelinePipelinePipelineObjects :: Maybe [DataPipelinePipelinePipelineObject]   , _dataPipelinePipelinePipelineTags :: Maybe [DataPipelinePipelinePipelineTag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DataPipelinePipeline where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }
library-gen/Stratosphere/Resources/DirectoryServiceMicrosoftAD.hs view
@@ -24,7 +24,7 @@   , _directoryServiceMicrosoftADPassword :: Val Text   , _directoryServiceMicrosoftADShortName :: Maybe (Val Text)   , _directoryServiceMicrosoftADVpcSettings :: DirectoryServiceMicrosoftADVpcSettings-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DirectoryServiceMicrosoftAD where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/Resources/DirectoryServiceSimpleAD.hs view
@@ -26,7 +26,7 @@   , _directoryServiceSimpleADShortName :: Maybe (Val Text)   , _directoryServiceSimpleADSize :: Val Text   , _directoryServiceSimpleADVpcSettings :: DirectoryServiceSimpleADVpcSettings-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DirectoryServiceSimpleAD where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 25, omitNothingFields = True }
library-gen/Stratosphere/Resources/DynamoDBTable.hs view
@@ -30,7 +30,7 @@   , _dynamoDBTableProvisionedThroughput :: DynamoDBTableProvisionedThroughput   , _dynamoDBTableStreamSpecification :: Maybe DynamoDBTableStreamSpecification   , _dynamoDBTableTableName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON DynamoDBTable where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2CustomerGateway.hs view
@@ -22,7 +22,7 @@   , _eC2CustomerGatewayIpAddress :: Val Text   , _eC2CustomerGatewayTags :: Maybe [Tag]   , _eC2CustomerGatewayType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2CustomerGateway where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 19, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2DHCPOptions.hs view
@@ -24,7 +24,7 @@   , _eC2DHCPOptionsNetbiosNodeType :: Maybe (Val Integer')   , _eC2DHCPOptionsNtpServers :: Maybe (Val Text)   , _eC2DHCPOptionsTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2DHCPOptions where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2EIP.hs view
@@ -20,7 +20,7 @@   EC2EIP   { _eC2EIPDomain :: Maybe (Val Text)   , _eC2EIPInstanceId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2EIP where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 7, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2EIPAssociation.hs view
@@ -23,7 +23,7 @@   , _eC2EIPAssociationInstanceId :: Maybe (Val Text)   , _eC2EIPAssociationNetworkInterfaceId :: Maybe (Val Text)   , _eC2EIPAssociationPrivateIpAddress :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2EIPAssociation where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 18, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2FlowLog.hs view
@@ -23,7 +23,7 @@   , _eC2FlowLogResourceId :: Val Text   , _eC2FlowLogResourceType :: Val Text   , _eC2FlowLogTrafficType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2FlowLog where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 11, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2Host.hs view
@@ -21,7 +21,7 @@   { _eC2HostAutoPlacement :: Maybe (Val Text)   , _eC2HostAvailabilityZone :: Val Text   , _eC2HostInstanceType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2Host where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 8, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2Instance.hs view
@@ -52,7 +52,7 @@   , _eC2InstanceTenancy :: Maybe (Val Text)   , _eC2InstanceUserData :: Maybe (Val Text)   , _eC2InstanceVolumes :: Maybe [EC2InstanceVolume]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2Instance where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 12, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2InternetGateway.hs view
@@ -19,7 +19,7 @@ data EC2InternetGateway =   EC2InternetGateway   { _eC2InternetGatewayTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2InternetGateway where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 19, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2NatGateway.hs view
@@ -20,7 +20,7 @@   EC2NatGateway   { _eC2NatGatewayAllocationId :: Val Text   , _eC2NatGatewaySubnetId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2NatGateway where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2NetworkAcl.hs view
@@ -20,7 +20,7 @@   EC2NetworkAcl   { _eC2NetworkAclTags :: Maybe [Tag]   , _eC2NetworkAclVpcId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2NetworkAcl where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2NetworkAclEntry.hs view
@@ -28,7 +28,7 @@   , _eC2NetworkAclEntryProtocol :: Val Integer'   , _eC2NetworkAclEntryRuleAction :: Val Text   , _eC2NetworkAclEntryRuleNumber :: Val Integer'-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2NetworkAclEntry where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 19, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2NetworkInterface.hs view
@@ -30,7 +30,7 @@   , _eC2NetworkInterfaceSourceDestCheck :: Maybe (Val Bool')   , _eC2NetworkInterfaceSubnetId :: Val Text   , _eC2NetworkInterfaceTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2NetworkInterface where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 20, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2NetworkInterfaceAttachment.hs view
@@ -22,7 +22,7 @@   , _eC2NetworkInterfaceAttachmentDeviceIndex :: Val Text   , _eC2NetworkInterfaceAttachmentInstanceId :: Val Text   , _eC2NetworkInterfaceAttachmentNetworkInterfaceId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2NetworkInterfaceAttachment where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2PlacementGroup.hs view
@@ -19,7 +19,7 @@ data EC2PlacementGroup =   EC2PlacementGroup   { _eC2PlacementGroupStrategy :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2PlacementGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 18, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2Route.hs view
@@ -26,7 +26,7 @@   , _eC2RouteNetworkInterfaceId :: Maybe (Val Text)   , _eC2RouteRouteTableId :: Val Text   , _eC2RouteVpcPeeringConnectionId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2Route where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 9, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2RouteTable.hs view
@@ -20,7 +20,7 @@   EC2RouteTable   { _eC2RouteTableTags :: Maybe [Tag]   , _eC2RouteTableVpcId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2RouteTable where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2SecurityGroup.hs view
@@ -24,7 +24,7 @@   , _eC2SecurityGroupSecurityGroupIngress :: Maybe [EC2SecurityGroupRule]   , _eC2SecurityGroupTags :: Maybe [Tag]   , _eC2SecurityGroupVpcId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SecurityGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2SecurityGroupEgress.hs view
@@ -26,7 +26,7 @@   , _eC2SecurityGroupEgressGroupId :: Val Text   , _eC2SecurityGroupEgressIpProtocol :: Val Text   , _eC2SecurityGroupEgressToPort :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SecurityGroupEgress where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2SecurityGroupIngress.hs view
@@ -28,7 +28,7 @@   , _eC2SecurityGroupIngressSourceSecurityGroupName :: Maybe (Val Text)   , _eC2SecurityGroupIngressSourceSecurityGroupOwnerId :: Maybe (Val Text)   , _eC2SecurityGroupIngressToPort :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SecurityGroupIngress where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2SpotFleet.hs view
@@ -19,7 +19,7 @@ data EC2SpotFleet =   EC2SpotFleet   { _eC2SpotFleetSpotFleetRequestConfigData :: EC2SpotFleetSpotFleetRequestConfigData-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SpotFleet where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 13, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2Subnet.hs view
@@ -23,7 +23,7 @@   , _eC2SubnetMapPublicIpOnLaunch :: Maybe (Val Bool')   , _eC2SubnetTags :: Maybe [Tag]   , _eC2SubnetVpcId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2Subnet where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 10, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2SubnetCidrBlock.hs view
@@ -20,7 +20,7 @@   EC2SubnetCidrBlock   { _eC2SubnetCidrBlockIpv6CidrBlock :: Val Text   , _eC2SubnetCidrBlockSubnetId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SubnetCidrBlock where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 19, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2SubnetNetworkAclAssociation.hs view
@@ -20,7 +20,7 @@   EC2SubnetNetworkAclAssociation   { _eC2SubnetNetworkAclAssociationNetworkAclId :: Val Text   , _eC2SubnetNetworkAclAssociationSubnetId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SubnetNetworkAclAssociation where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2SubnetRouteTableAssociation.hs view
@@ -20,7 +20,7 @@   EC2SubnetRouteTableAssociation   { _eC2SubnetRouteTableAssociationRouteTableId :: Val Text   , _eC2SubnetRouteTableAssociationSubnetId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2SubnetRouteTableAssociation where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2VPC.hs view
@@ -23,7 +23,7 @@   , _eC2VPCEnableDnsSupport :: Maybe (Val Bool')   , _eC2VPCInstanceTenancy :: Maybe (Val Text)   , _eC2VPCTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2VPC where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 7, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2VPCCidrBlock.hs view
@@ -20,7 +20,7 @@   EC2VPCCidrBlock   { _eC2VPCCidrBlockAmazonProvidedIpv6CidrBlock :: Maybe (Val Bool')   , _eC2VPCCidrBlockVpcId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2VPCCidrBlock where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 16, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2VPCDHCPOptionsAssociation.hs view
@@ -20,7 +20,7 @@   EC2VPCDHCPOptionsAssociation   { _eC2VPCDHCPOptionsAssociationDhcpOptionsId :: Val Text   , _eC2VPCDHCPOptionsAssociationVpcId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2VPCDHCPOptionsAssociation where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2VPCEndpoint.hs view
@@ -22,7 +22,7 @@   , _eC2VPCEndpointRouteTableIds :: Maybe [Val Text]   , _eC2VPCEndpointServiceName :: Val Text   , _eC2VPCEndpointVpcId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2VPCEndpoint where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2VPCGatewayAttachment.hs view
@@ -21,7 +21,7 @@   { _eC2VPCGatewayAttachmentInternetGatewayId :: Maybe (Val Text)   , _eC2VPCGatewayAttachmentVpcId :: Val Text   , _eC2VPCGatewayAttachmentVpnGatewayId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2VPCGatewayAttachment where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2VPCPeeringConnection.hs view
@@ -21,7 +21,7 @@   { _eC2VPCPeeringConnectionPeerVpcId :: Val Text   , _eC2VPCPeeringConnectionTags :: Maybe [Tag]   , _eC2VPCPeeringConnectionVpcId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2VPCPeeringConnection where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2VPNConnection.hs view
@@ -23,7 +23,7 @@   , _eC2VPNConnectionTags :: Maybe [Tag]   , _eC2VPNConnectionType :: Val Text   , _eC2VPNConnectionVpnGatewayId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2VPNConnection where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2VPNConnectionRoute.hs view
@@ -20,7 +20,7 @@   EC2VPNConnectionRoute   { _eC2VPNConnectionRouteDestinationCidrBlock :: Val Text   , _eC2VPNConnectionRouteVpnConnectionId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2VPNConnectionRoute where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 22, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2VPNGateway.hs view
@@ -20,7 +20,7 @@   EC2VPNGateway   { _eC2VPNGatewayTags :: Maybe [Tag]   , _eC2VPNGatewayType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2VPNGateway where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2VPNGatewayRoutePropagation.hs view
@@ -20,7 +20,7 @@   EC2VPNGatewayRoutePropagation   { _eC2VPNGatewayRoutePropagationRouteTableIds :: [Val Text]   , _eC2VPNGatewayRoutePropagationVpnGatewayId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2VPNGatewayRoutePropagation where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2Volume.hs view
@@ -27,7 +27,7 @@   , _eC2VolumeSnapshotId :: Maybe (Val Text)   , _eC2VolumeTags :: Maybe [Tag]   , _eC2VolumeVolumeType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2Volume where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 10, omitNothingFields = True }
library-gen/Stratosphere/Resources/EC2VolumeAttachment.hs view
@@ -21,7 +21,7 @@   { _eC2VolumeAttachmentDevice :: Val Text   , _eC2VolumeAttachmentInstanceId :: Val Text   , _eC2VolumeAttachmentVolumeId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EC2VolumeAttachment where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 20, omitNothingFields = True }
library-gen/Stratosphere/Resources/ECRRepository.hs view
@@ -20,7 +20,7 @@   ECRRepository   { _eCRRepositoryRepositoryName :: Maybe (Val Text)   , _eCRRepositoryRepositoryPolicyText :: Maybe Object-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECRRepository where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/ECSCluster.hs view
@@ -19,7 +19,7 @@ data ECSCluster =   ECSCluster   { _eCSClusterClusterName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSCluster where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 11, omitNothingFields = True }
library-gen/Stratosphere/Resources/ECSService.hs view
@@ -25,7 +25,7 @@   , _eCSServiceLoadBalancers :: Maybe [ECSServiceLoadBalancer]   , _eCSServiceRole :: Maybe (Val Text)   , _eCSServiceTaskDefinition :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSService where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 11, omitNothingFields = True }
library-gen/Stratosphere/Resources/ECSTaskDefinition.hs view
@@ -24,7 +24,7 @@   , _eCSTaskDefinitionNetworkMode :: Maybe (Val Text)   , _eCSTaskDefinitionTaskRoleArn :: Maybe (Val Text)   , _eCSTaskDefinitionVolumes :: Maybe [ECSTaskDefinitionVolume]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ECSTaskDefinition where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 18, omitNothingFields = True }
library-gen/Stratosphere/Resources/EFSFileSystem.hs view
@@ -20,7 +20,7 @@   EFSFileSystem   { _eFSFileSystemFileSystemTags :: Maybe [EFSFileSystemElasticFileSystemTag]   , _eFSFileSystemPerformanceMode :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EFSFileSystem where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/EFSMountTarget.hs view
@@ -22,7 +22,7 @@   , _eFSMountTargetIpAddress :: Maybe (Val Text)   , _eFSMountTargetSecurityGroups :: [Val Text]   , _eFSMountTargetSubnetId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EFSMountTarget where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/Resources/EMRCluster.hs view
@@ -34,7 +34,7 @@   , _eMRClusterServiceRole :: Val Text   , _eMRClusterTags :: Maybe [Tag]   , _eMRClusterVisibleToAllUsers :: Maybe (Val Bool')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRCluster where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 11, omitNothingFields = True }
library-gen/Stratosphere/Resources/EMRInstanceGroupConfig.hs view
@@ -28,7 +28,7 @@   , _eMRInstanceGroupConfigJobFlowId :: Val Text   , _eMRInstanceGroupConfigMarket :: Maybe (Val Text)   , _eMRInstanceGroupConfigName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRInstanceGroupConfig where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/Resources/EMRStep.hs view
@@ -22,7 +22,7 @@   , _eMRStepHadoopJarStep :: EMRStepHadoopJarStepConfig   , _eMRStepJobFlowId :: Val Text   , _eMRStepName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EMRStep where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 8, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElastiCacheCacheCluster.hs view
@@ -39,7 +39,7 @@   , _elastiCacheCacheClusterSnapshotWindow :: Maybe (Val Text)   , _elastiCacheCacheClusterTags :: Maybe [Tag]   , _elastiCacheCacheClusterVpcSecurityGroupIds :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElastiCacheCacheCluster where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElastiCacheParameterGroup.hs view
@@ -21,7 +21,7 @@   { _elastiCacheParameterGroupCacheParameterGroupFamily :: Val Text   , _elastiCacheParameterGroupDescription :: Val Text   , _elastiCacheParameterGroupProperties :: Maybe Object-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElastiCacheParameterGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 26, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElastiCacheReplicationGroup.hs view
@@ -45,7 +45,7 @@   , _elastiCacheReplicationGroupSnapshotWindow :: Maybe (Val Text)   , _elastiCacheReplicationGroupSnapshottingClusterId :: Maybe (Val Text)   , _elastiCacheReplicationGroupTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElastiCacheReplicationGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElastiCacheSecurityGroup.hs view
@@ -19,7 +19,7 @@ data ElastiCacheSecurityGroup =   ElastiCacheSecurityGroup   { _elastiCacheSecurityGroupDescription :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElastiCacheSecurityGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 25, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElastiCacheSecurityGroupIngress.hs view
@@ -21,7 +21,7 @@   { _elastiCacheSecurityGroupIngressCacheSecurityGroupName :: Val Text   , _elastiCacheSecurityGroupIngressEC2SecurityGroupName :: Val Text   , _elastiCacheSecurityGroupIngressEC2SecurityGroupOwnerId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElastiCacheSecurityGroupIngress where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 32, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElastiCacheSubnetGroup.hs view
@@ -21,7 +21,7 @@   { _elastiCacheSubnetGroupCacheSubnetGroupName :: Maybe (Val Text)   , _elastiCacheSubnetGroupDescription :: Val Text   , _elastiCacheSubnetGroupSubnetIds :: [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElastiCacheSubnetGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElasticBeanstalkApplication.hs view
@@ -20,7 +20,7 @@   ElasticBeanstalkApplication   { _elasticBeanstalkApplicationApplicationName :: Maybe (Val Text)   , _elasticBeanstalkApplicationDescription :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticBeanstalkApplication where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElasticBeanstalkApplicationVersion.hs view
@@ -21,7 +21,7 @@   { _elasticBeanstalkApplicationVersionApplicationName :: Val Text   , _elasticBeanstalkApplicationVersionDescription :: Maybe (Val Text)   , _elasticBeanstalkApplicationVersionSourceBundle :: ElasticBeanstalkApplicationVersionSourceBundle-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticBeanstalkApplicationVersion where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 35, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElasticBeanstalkConfigurationTemplate.hs view
@@ -26,7 +26,7 @@   , _elasticBeanstalkConfigurationTemplateOptionSettings :: Maybe [ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting]   , _elasticBeanstalkConfigurationTemplateSolutionStackName :: Maybe (Val Text)   , _elasticBeanstalkConfigurationTemplateSourceConfiguration :: Maybe ElasticBeanstalkConfigurationTemplateSourceConfiguration-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticBeanstalkConfigurationTemplate where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 38, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElasticBeanstalkEnvironment.hs view
@@ -28,7 +28,7 @@   , _elasticBeanstalkEnvironmentTemplateName :: Maybe (Val Text)   , _elasticBeanstalkEnvironmentTier :: Maybe ElasticBeanstalkEnvironmentTier   , _elasticBeanstalkEnvironmentVersionLabel :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticBeanstalkEnvironment where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElasticLoadBalancingLoadBalancer.hs view
@@ -42,7 +42,7 @@   , _elasticLoadBalancingLoadBalancerSecurityGroups :: Maybe [Val Text]   , _elasticLoadBalancingLoadBalancerSubnets :: Maybe [Val Text]   , _elasticLoadBalancingLoadBalancerTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingLoadBalancer where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElasticLoadBalancingV2Listener.hs view
@@ -25,7 +25,7 @@   , _elasticLoadBalancingV2ListenerPort :: Val Integer'   , _elasticLoadBalancingV2ListenerProtocol :: Val Text   , _elasticLoadBalancingV2ListenerSslPolicy :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingV2Listener where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerRule.hs view
@@ -23,7 +23,7 @@   , _elasticLoadBalancingV2ListenerRuleConditions :: [ElasticLoadBalancingV2ListenerRuleRuleCondition]   , _elasticLoadBalancingV2ListenerRuleListenerArn :: Val Text   , _elasticLoadBalancingV2ListenerRulePriority :: Val Integer'-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingV2ListenerRule where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 35, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElasticLoadBalancingV2LoadBalancer.hs view
@@ -26,7 +26,7 @@   , _elasticLoadBalancingV2LoadBalancerSecurityGroups :: Maybe [Val Text]   , _elasticLoadBalancingV2LoadBalancerSubnets :: Maybe [Val Text]   , _elasticLoadBalancingV2LoadBalancerTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingV2LoadBalancer where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 35, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElasticLoadBalancingV2TargetGroup.hs view
@@ -36,7 +36,7 @@   , _elasticLoadBalancingV2TargetGroupTargets :: Maybe [ElasticLoadBalancingV2TargetGroupTargetDescription]   , _elasticLoadBalancingV2TargetGroupUnhealthyThresholdCount :: Maybe (Val Integer')   , _elasticLoadBalancingV2TargetGroupVpcId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticLoadBalancingV2TargetGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 34, omitNothingFields = True }
library-gen/Stratosphere/Resources/ElasticsearchDomain.hs view
@@ -29,7 +29,7 @@   , _elasticsearchDomainElasticsearchVersion :: Maybe (Val Text)   , _elasticsearchDomainSnapshotOptions :: Maybe ElasticsearchDomainSnapshotOptions   , _elasticsearchDomainTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ElasticsearchDomain where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 20, omitNothingFields = True }
library-gen/Stratosphere/Resources/EventsRule.hs view
@@ -26,7 +26,7 @@   , _eventsRuleScheduleExpression :: Maybe (Val Text)   , _eventsRuleState :: Maybe (Val EnabledState)   , _eventsRuleTargets :: Maybe [EventsRuleTarget]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON EventsRule where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 11, omitNothingFields = True }
library-gen/Stratosphere/Resources/GameLiftAlias.hs view
@@ -21,7 +21,7 @@   { _gameLiftAliasDescription :: Maybe (Val Text)   , _gameLiftAliasName :: Val Text   , _gameLiftAliasRoutingStrategy :: GameLiftAliasRoutingStrategy-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON GameLiftAlias where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/GameLiftBuild.hs view
@@ -21,7 +21,7 @@   { _gameLiftBuildName :: Maybe (Val Text)   , _gameLiftBuildStorageLocation :: Maybe GameLiftBuildS3Location   , _gameLiftBuildVersion :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON GameLiftBuild where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/GameLiftFleet.hs view
@@ -29,7 +29,7 @@   , _gameLiftFleetName :: Val Text   , _gameLiftFleetServerLaunchParameters :: Maybe (Val Text)   , _gameLiftFleetServerLaunchPath :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON GameLiftFleet where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/IAMAccessKey.hs view
@@ -21,7 +21,7 @@   { _iAMAccessKeySerial :: Maybe (Val Integer')   , _iAMAccessKeyStatus :: Maybe (Val Text)   , _iAMAccessKeyUserName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IAMAccessKey where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 13, omitNothingFields = True }
library-gen/Stratosphere/Resources/IAMGroup.hs view
@@ -22,7 +22,7 @@   , _iAMGroupManagedPolicyArns :: Maybe [Val Text]   , _iAMGroupPath :: Maybe (Val Text)   , _iAMGroupPolicies :: Maybe [IAMGroupPolicy]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IAMGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 9, omitNothingFields = True }
library-gen/Stratosphere/Resources/IAMInstanceProfile.hs view
@@ -20,7 +20,7 @@   IAMInstanceProfile   { _iAMInstanceProfilePath :: Val Text   , _iAMInstanceProfileRoles :: [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IAMInstanceProfile where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 19, omitNothingFields = True }
library-gen/Stratosphere/Resources/IAMManagedPolicy.hs view
@@ -24,7 +24,7 @@   , _iAMManagedPolicyPolicyDocument :: Maybe Object   , _iAMManagedPolicyRoles :: Maybe [Val Text]   , _iAMManagedPolicyUsers :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IAMManagedPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/Resources/IAMPolicy.hs view
@@ -23,7 +23,7 @@   , _iAMPolicyPolicyName :: Val Text   , _iAMPolicyRoles :: Maybe [Val Text]   , _iAMPolicyUsers :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IAMPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 10, omitNothingFields = True }
library-gen/Stratosphere/Resources/IAMRole.hs view
@@ -23,7 +23,7 @@   , _iAMRolePath :: Maybe (Val Text)   , _iAMRolePolicies :: Maybe [IAMRolePolicy]   , _iAMRoleRoleName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IAMRole where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 8, omitNothingFields = True }
library-gen/Stratosphere/Resources/IAMUser.hs view
@@ -25,7 +25,7 @@   , _iAMUserPath :: Maybe (Val Text)   , _iAMUserPolicies :: Maybe [IAMUserPolicy]   , _iAMUserUserName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IAMUser where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 8, omitNothingFields = True }
library-gen/Stratosphere/Resources/IAMUserToGroupAddition.hs view
@@ -20,7 +20,7 @@   IAMUserToGroupAddition   { _iAMUserToGroupAdditionGroupName :: Val Text   , _iAMUserToGroupAdditionUsers :: [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IAMUserToGroupAddition where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/Resources/IoTCertificate.hs view
@@ -20,7 +20,7 @@   IoTCertificate   { _ioTCertificateCertificateSigningRequest :: Val Text   , _ioTCertificateStatus :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTCertificate where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/Resources/IoTPolicy.hs view
@@ -20,7 +20,7 @@   IoTPolicy   { _ioTPolicyPolicyDocument :: Object   , _ioTPolicyPolicyName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 10, omitNothingFields = True }
library-gen/Stratosphere/Resources/IoTPolicyPrincipalAttachment.hs view
@@ -20,7 +20,7 @@   IoTPolicyPrincipalAttachment   { _ioTPolicyPrincipalAttachmentPolicyName :: Val Text   , _ioTPolicyPrincipalAttachmentPrincipal :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTPolicyPrincipalAttachment where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/Resources/IoTThing.hs view
@@ -20,7 +20,7 @@   IoTThing   { _ioTThingAttributePayload :: Maybe IoTThingAttributePayload   , _ioTThingThingName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTThing where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 9, omitNothingFields = True }
library-gen/Stratosphere/Resources/IoTThingPrincipalAttachment.hs view
@@ -20,7 +20,7 @@   IoTThingPrincipalAttachment   { _ioTThingPrincipalAttachmentPrincipal :: Val Text   , _ioTThingPrincipalAttachmentThingName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTThingPrincipalAttachment where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 28, omitNothingFields = True }
library-gen/Stratosphere/Resources/IoTTopicRule.hs view
@@ -20,7 +20,7 @@   IoTTopicRule   { _ioTTopicRuleRuleName :: Maybe (Val Text)   , _ioTTopicRuleTopicRulePayload :: IoTTopicRuleTopicRulePayload-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON IoTTopicRule where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 13, omitNothingFields = True }
library-gen/Stratosphere/Resources/KMSAlias.hs view
@@ -20,7 +20,7 @@   KMSAlias   { _kMSAliasAliasName :: Val Text   , _kMSAliasTargetKeyId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KMSAlias where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 9, omitNothingFields = True }
library-gen/Stratosphere/Resources/KMSKey.hs view
@@ -23,7 +23,7 @@   , _kMSKeyEnabled :: Maybe (Val Bool')   , _kMSKeyKeyPolicy :: Object   , _kMSKeyKeyUsage :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KMSKey where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 7, omitNothingFields = True }
library-gen/Stratosphere/Resources/KinesisFirehoseDeliveryStream.hs view
@@ -24,7 +24,7 @@   , _kinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration :: Maybe KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration   , _kinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration :: Maybe KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration   , _kinesisFirehoseDeliveryStreamS3DestinationConfiguration :: Maybe KinesisFirehoseDeliveryStreamS3DestinationConfiguration-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KinesisFirehoseDeliveryStream where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/Resources/KinesisStream.hs view
@@ -21,7 +21,7 @@   { _kinesisStreamName :: Maybe (Val Text)   , _kinesisStreamShardCount :: Val Integer'   , _kinesisStreamTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON KinesisStream where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/LambdaAlias.hs view
@@ -22,7 +22,7 @@   , _lambdaAliasFunctionName :: Val Text   , _lambdaAliasFunctionVersion :: Val Text   , _lambdaAliasName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LambdaAlias where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 12, omitNothingFields = True }
library-gen/Stratosphere/Resources/LambdaEventSourceMapping.hs view
@@ -23,7 +23,7 @@   , _lambdaEventSourceMappingEventSourceArn :: Val Text   , _lambdaEventSourceMappingFunctionName :: Val Text   , _lambdaEventSourceMappingStartingPosition :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LambdaEventSourceMapping where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 25, omitNothingFields = True }
library-gen/Stratosphere/Resources/LambdaFunction.hs view
@@ -32,7 +32,7 @@   , _lambdaFunctionRuntime :: Val Runtime   , _lambdaFunctionTimeout :: Maybe (Val Integer')   , _lambdaFunctionVpcConfig :: Maybe LambdaFunctionVpcConfig-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LambdaFunction where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/Resources/LambdaPermission.hs view
@@ -23,7 +23,7 @@   , _lambdaPermissionPrincipal :: Val Text   , _lambdaPermissionSourceAccount :: Maybe (Val Text)   , _lambdaPermissionSourceArn :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LambdaPermission where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/Resources/LambdaVersion.hs view
@@ -21,7 +21,7 @@   { _lambdaVersionCodeSha256 :: Maybe (Val Text)   , _lambdaVersionDescription :: Maybe (Val Text)   , _lambdaVersionFunctionName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LambdaVersion where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/LogsDestination.hs view
@@ -22,7 +22,7 @@   , _logsDestinationDestinationPolicy :: Val Text   , _logsDestinationRoleArn :: Val Text   , _logsDestinationTargetArn :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LogsDestination where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 16, omitNothingFields = True }
library-gen/Stratosphere/Resources/LogsLogGroup.hs view
@@ -20,7 +20,7 @@   LogsLogGroup   { _logsLogGroupLogGroupName :: Maybe (Val Text)   , _logsLogGroupRetentionInDays :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LogsLogGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 13, omitNothingFields = True }
library-gen/Stratosphere/Resources/LogsLogStream.hs view
@@ -20,7 +20,7 @@   LogsLogStream   { _logsLogStreamLogGroupName :: Val Text   , _logsLogStreamLogStreamName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LogsLogStream where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/LogsMetricFilter.hs view
@@ -21,7 +21,7 @@   { _logsMetricFilterFilterPattern :: Val Text   , _logsMetricFilterLogGroupName :: Val Text   , _logsMetricFilterMetricTransformations :: [LogsMetricFilterMetricTransformation]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LogsMetricFilter where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/Resources/LogsSubscriptionFilter.hs view
@@ -22,7 +22,7 @@   , _logsSubscriptionFilterFilterPattern :: Val Text   , _logsSubscriptionFilterLogGroupName :: Val Text   , _logsSubscriptionFilterRoleArn :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON LogsSubscriptionFilter where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 23, omitNothingFields = True }
library-gen/Stratosphere/Resources/OpsWorksApp.hs view
@@ -33,7 +33,7 @@   , _opsWorksAppSslConfiguration :: Maybe OpsWorksAppSslConfiguration   , _opsWorksAppStackId :: Val Text   , _opsWorksAppType :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksApp where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 12, omitNothingFields = True }
library-gen/Stratosphere/Resources/OpsWorksElasticLoadBalancerAttachment.hs view
@@ -21,7 +21,7 @@   OpsWorksElasticLoadBalancerAttachment   { _opsWorksElasticLoadBalancerAttachmentElasticLoadBalancerName :: Val Text   , _opsWorksElasticLoadBalancerAttachmentLayerId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksElasticLoadBalancerAttachment where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 38, omitNothingFields = True }
library-gen/Stratosphere/Resources/OpsWorksInstance.hs view
@@ -40,7 +40,7 @@   , _opsWorksInstanceTimeBasedAutoScaling :: Maybe OpsWorksInstanceTimeBasedAutoScaling   , _opsWorksInstanceVirtualizationType :: Maybe (Val Text)   , _opsWorksInstanceVolumes :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksInstance where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/Resources/OpsWorksLayer.hs view
@@ -39,7 +39,7 @@   , _opsWorksLayerType :: Val Text   , _opsWorksLayerUseEbsOptimizedInstances :: Maybe (Val Bool')   , _opsWorksLayerVolumeConfigurations :: Maybe [OpsWorksLayerVolumeConfiguration]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksLayer where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/OpsWorksStack.hs view
@@ -46,7 +46,7 @@   , _opsWorksStackUseCustomCookbooks :: Maybe (Val Bool')   , _opsWorksStackUseOpsworksSecurityGroups :: Maybe (Val Bool')   , _opsWorksStackVpcId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksStack where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/OpsWorksUserProfile.hs view
@@ -21,7 +21,7 @@   { _opsWorksUserProfileAllowSelfManagement :: Maybe (Val Bool')   , _opsWorksUserProfileIamUserArn :: Val Text   , _opsWorksUserProfileSshPublicKey :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksUserProfile where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 20, omitNothingFields = True }
library-gen/Stratosphere/Resources/OpsWorksVolume.hs view
@@ -22,7 +22,7 @@   , _opsWorksVolumeMountPoint :: Maybe (Val Text)   , _opsWorksVolumeName :: Maybe (Val Text)   , _opsWorksVolumeStackId :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON OpsWorksVolume where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/Resources/RDSDBCluster.hs view
@@ -35,7 +35,7 @@   , _rDSDBClusterStorageEncrypted :: Maybe (Val Bool')   , _rDSDBClusterTags :: Maybe [Tag]   , _rDSDBClusterVpcSecurityGroupIds :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RDSDBCluster where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 13, omitNothingFields = True }
library-gen/Stratosphere/Resources/RDSDBClusterParameterGroup.hs view
@@ -22,7 +22,7 @@   , _rDSDBClusterParameterGroupFamily :: Val Text   , _rDSDBClusterParameterGroupParameters :: Object   , _rDSDBClusterParameterGroupTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RDSDBClusterParameterGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/Resources/RDSDBInstance.hs view
@@ -55,7 +55,7 @@   , _rDSDBInstanceTags :: Maybe [Tag]   , _rDSDBInstanceTimezone :: Maybe (Val Text)   , _rDSDBInstanceVPCSecurityGroups :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RDSDBInstance where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 14, omitNothingFields = True }
library-gen/Stratosphere/Resources/RDSDBParameterGroup.hs view
@@ -22,7 +22,7 @@   , _rDSDBParameterGroupFamily :: Val Text   , _rDSDBParameterGroupParameters :: Maybe Object   , _rDSDBParameterGroupTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RDSDBParameterGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 20, omitNothingFields = True }
library-gen/Stratosphere/Resources/RDSDBSecurityGroup.hs view
@@ -23,7 +23,7 @@   , _rDSDBSecurityGroupEC2VpcId :: Maybe (Val Text)   , _rDSDBSecurityGroupGroupDescription :: Val Text   , _rDSDBSecurityGroupTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RDSDBSecurityGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 19, omitNothingFields = True }
library-gen/Stratosphere/Resources/RDSDBSecurityGroupIngress.hs view
@@ -23,7 +23,7 @@   , _rDSDBSecurityGroupIngressEC2SecurityGroupId :: Maybe (Val Text)   , _rDSDBSecurityGroupIngressEC2SecurityGroupName :: Maybe (Val Text)   , _rDSDBSecurityGroupIngressEC2SecurityGroupOwnerId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RDSDBSecurityGroupIngress where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 26, omitNothingFields = True }
library-gen/Stratosphere/Resources/RDSDBSubnetGroup.hs view
@@ -21,7 +21,7 @@   { _rDSDBSubnetGroupDBSubnetGroupDescription :: Val Text   , _rDSDBSubnetGroupSubnetIds :: [Val Text]   , _rDSDBSubnetGroupTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RDSDBSubnetGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/Resources/RDSEventSubscription.hs view
@@ -23,7 +23,7 @@   , _rDSEventSubscriptionSnsTopicArn :: Val Text   , _rDSEventSubscriptionSourceIds :: Maybe [Val Text]   , _rDSEventSubscriptionSourceType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RDSEventSubscription where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }
library-gen/Stratosphere/Resources/RDSOptionGroup.hs view
@@ -24,7 +24,7 @@   , _rDSOptionGroupOptionConfigurations :: [RDSOptionGroupOptionConfiguration]   , _rDSOptionGroupOptionGroupDescription :: Val Text   , _rDSOptionGroupTags :: Maybe [Tag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RDSOptionGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/Resources/RedshiftCluster.hs view
@@ -42,7 +42,7 @@   , _redshiftClusterSnapshotClusterIdentifier :: Maybe (Val Text)   , _redshiftClusterSnapshotIdentifier :: Maybe (Val Text)   , _redshiftClusterVpcSecurityGroupIds :: Maybe [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RedshiftCluster where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 16, omitNothingFields = True }
library-gen/Stratosphere/Resources/RedshiftClusterParameterGroup.hs view
@@ -21,7 +21,7 @@   { _redshiftClusterParameterGroupDescription :: Val Text   , _redshiftClusterParameterGroupParameterGroupFamily :: Val Text   , _redshiftClusterParameterGroupParameters :: Maybe [RedshiftClusterParameterGroupParameter]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RedshiftClusterParameterGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 30, omitNothingFields = True }
library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroup.hs view
@@ -19,7 +19,7 @@ data RedshiftClusterSecurityGroup =   RedshiftClusterSecurityGroup   { _redshiftClusterSecurityGroupDescription :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RedshiftClusterSecurityGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 29, omitNothingFields = True }
library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroupIngress.hs view
@@ -22,7 +22,7 @@   , _redshiftClusterSecurityGroupIngressClusterSecurityGroupName :: Val Text   , _redshiftClusterSecurityGroupIngressEC2SecurityGroupName :: Maybe (Val Text)   , _redshiftClusterSecurityGroupIngressEC2SecurityGroupOwnerId :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RedshiftClusterSecurityGroupIngress where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 36, omitNothingFields = True }
library-gen/Stratosphere/Resources/RedshiftClusterSubnetGroup.hs view
@@ -20,7 +20,7 @@   RedshiftClusterSubnetGroup   { _redshiftClusterSubnetGroupDescription :: Val Text   , _redshiftClusterSubnetGroupSubnetIds :: [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON RedshiftClusterSubnetGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }
library-gen/Stratosphere/Resources/Route53HealthCheck.hs view
@@ -21,7 +21,7 @@   Route53HealthCheck   { _route53HealthCheckHealthCheckConfig :: Route53HealthCheckHealthCheckConfig   , _route53HealthCheckHealthCheckTags :: Maybe [Route53HealthCheckHealthCheckTag]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53HealthCheck where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 19, omitNothingFields = True }
library-gen/Stratosphere/Resources/Route53HostedZone.hs view
@@ -24,7 +24,7 @@   , _route53HostedZoneHostedZoneTags :: Maybe [Route53HostedZoneHostedZoneTag]   , _route53HostedZoneName :: Val Text   , _route53HostedZoneVPCs :: Maybe [Route53HostedZoneVPC]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53HostedZone where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 18, omitNothingFields = True }
library-gen/Stratosphere/Resources/Route53RecordSet.hs view
@@ -33,7 +33,7 @@   , _route53RecordSetTTL :: Maybe (Val Text)   , _route53RecordSetType :: Val Text   , _route53RecordSetWeight :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53RecordSet where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 17, omitNothingFields = True }
library-gen/Stratosphere/Resources/Route53RecordSetGroup.hs view
@@ -22,7 +22,7 @@   , _route53RecordSetGroupHostedZoneId :: Maybe (Val Text)   , _route53RecordSetGroupHostedZoneName :: Maybe (Val Text)   , _route53RecordSetGroupRecordSets :: Maybe [Route53RecordSetGroupRecordSet]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON Route53RecordSetGroup where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 22, omitNothingFields = True }
library-gen/Stratosphere/Resources/S3Bucket.hs view
@@ -36,7 +36,7 @@   , _s3BucketTags :: Maybe [Tag]   , _s3BucketVersioningConfiguration :: Maybe S3BucketVersioningConfiguration   , _s3BucketWebsiteConfiguration :: Maybe S3BucketWebsiteConfiguration-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3Bucket where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 9, omitNothingFields = True }
library-gen/Stratosphere/Resources/S3BucketPolicy.hs view
@@ -20,7 +20,7 @@   S3BucketPolicy   { _s3BucketPolicyBucket :: Val Text   , _s3BucketPolicyPolicyDocument :: Object-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON S3BucketPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/Resources/SDBDomain.hs view
@@ -19,7 +19,7 @@ data SDBDomain =   SDBDomain   { _sDBDomainDescription :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON SDBDomain where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 10, omitNothingFields = True }
library-gen/Stratosphere/Resources/SNSSubscription.hs view
@@ -21,7 +21,7 @@   { _sNSSubscriptionEndpoint :: Maybe (Val Text)   , _sNSSubscriptionProtocol :: Maybe (Val SNSProtocol)   , _sNSSubscriptionTopicArn :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON SNSSubscription where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 16, omitNothingFields = True }
library-gen/Stratosphere/Resources/SNSTopic.hs view
@@ -21,7 +21,7 @@   { _sNSTopicDisplayName :: Maybe (Val Text)   , _sNSTopicSubscription :: Maybe [SNSTopicSubscription]   , _sNSTopicTopicName :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON SNSTopic where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 9, omitNothingFields = True }
library-gen/Stratosphere/Resources/SNSTopicPolicy.hs view
@@ -20,7 +20,7 @@   SNSTopicPolicy   { _sNSTopicPolicyPolicyDocument :: Object   , _sNSTopicPolicyTopics :: [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON SNSTopicPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/Resources/SQSQueue.hs view
@@ -25,7 +25,7 @@   , _sQSQueueReceiveMessageWaitTimeSeconds :: Maybe (Val Integer')   , _sQSQueueRedrivePolicy :: Maybe Object   , _sQSQueueVisibilityTimeout :: Maybe (Val Integer')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON SQSQueue where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 9, omitNothingFields = True }
library-gen/Stratosphere/Resources/SQSQueuePolicy.hs view
@@ -20,7 +20,7 @@   SQSQueuePolicy   { _sQSQueuePolicyPolicyDocument :: Object   , _sQSQueuePolicyQueues :: [Val Text]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON SQSQueuePolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/Resources/SSMAssociation.hs view
@@ -25,7 +25,7 @@   , _sSMAssociationParameters :: Maybe Object   , _sSMAssociationScheduleExpression :: Maybe (Val Text)   , _sSMAssociationTargets :: Maybe [SSMAssociationTarget]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON SSMAssociation where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/Resources/SSMDocument.hs view
@@ -20,7 +20,7 @@   SSMDocument   { _sSMDocumentContent :: Object   , _sSMDocumentDocumentType :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON SSMDocument where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 12, omitNothingFields = True }
library-gen/Stratosphere/Resources/WAFByteMatchSet.hs view
@@ -20,7 +20,7 @@   WAFByteMatchSet   { _wAFByteMatchSetByteMatchTuples :: Maybe [WAFByteMatchSetByteMatchTuple]   , _wAFByteMatchSetName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFByteMatchSet where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 16, omitNothingFields = True }
library-gen/Stratosphere/Resources/WAFIPSet.hs view
@@ -20,7 +20,7 @@   WAFIPSet   { _wAFIPSetIPSetDescriptors :: Maybe [WAFIPSetIPSetDescriptor]   , _wAFIPSetName :: Val Text-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFIPSet where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 9, omitNothingFields = True }
library-gen/Stratosphere/Resources/WAFRule.hs view
@@ -21,7 +21,7 @@   { _wAFRuleMetricName :: Val Text   , _wAFRuleName :: Val Text   , _wAFRulePredicates :: Maybe [WAFRulePredicate]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFRule where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 8, omitNothingFields = True }
library-gen/Stratosphere/Resources/WAFSizeConstraintSet.hs view
@@ -20,7 +20,7 @@   WAFSizeConstraintSet   { _wAFSizeConstraintSetName :: Val Text   , _wAFSizeConstraintSetSizeConstraints :: [WAFSizeConstraintSetSizeConstraint]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFSizeConstraintSet where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 21, omitNothingFields = True }
library-gen/Stratosphere/Resources/WAFSqlInjectionMatchSet.hs view
@@ -20,7 +20,7 @@   WAFSqlInjectionMatchSet   { _wAFSqlInjectionMatchSetName :: Val Text   , _wAFSqlInjectionMatchSetSqlInjectionMatchTuples :: Maybe [WAFSqlInjectionMatchSetSqlInjectionMatchTuple]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFSqlInjectionMatchSet where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 24, omitNothingFields = True }
library-gen/Stratosphere/Resources/WAFWebACL.hs view
@@ -23,7 +23,7 @@   , _wAFWebACLMetricName :: Val Text   , _wAFWebACLName :: Val Text   , _wAFWebACLRules :: Maybe [WAFWebACLActivatedRule]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFWebACL where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 10, omitNothingFields = True }
library-gen/Stratosphere/Resources/WAFXssMatchSet.hs view
@@ -20,7 +20,7 @@   WAFXssMatchSet   { _wAFXssMatchSetName :: Val Text   , _wAFXssMatchSetXssMatchTuples :: [WAFXssMatchSetXssMatchTuple]-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WAFXssMatchSet where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library-gen/Stratosphere/Resources/WorkSpacesWorkspace.hs view
@@ -24,7 +24,7 @@   , _workSpacesWorkspaceUserName :: Val Text   , _workSpacesWorkspaceUserVolumeEncryptionEnabled :: Maybe (Val Bool')   , _workSpacesWorkspaceVolumeEncryptionKey :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON WorkSpacesWorkspace where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 20, omitNothingFields = True }
library/Stratosphere/Outputs.hs view
@@ -50,7 +50,7 @@     -- describe-stacks command. The value of an output can be literals,     -- parameter references, pseudo parameters, a mapping value, and intrinsic     -- functions.-  } deriving (Show)+  } deriving (Show, Eq)  $(makeFields ''Output) @@ -84,7 +84,7 @@  -- | Wrapper around a list of 'Output's to we can modify the aeson instances. newtype Outputs = Outputs { unOutputs :: [Output] }-                deriving (Show, Monoid)+  deriving (Show, Eq, Monoid)  instance IsList Outputs where   type Item Outputs = Output
library/Stratosphere/Parameters.hs view
@@ -127,7 +127,7 @@ -- | Wrapper around a list of 'Parameters's to we can modify the aeson -- instances. newtype Parameters = Parameters { unParameters :: [Parameter] }-                   deriving (Show, Eq, Monoid)+  deriving (Show, Eq, Monoid)  instance IsList Parameters where   type Item Parameters = Parameter
library/Stratosphere/ResourceAttributes/AutoScalingReplacingUpdatePolicy.hs view
@@ -20,13 +20,13 @@ data AutoScalingReplacingUpdatePolicy =   AutoScalingReplacingUpdatePolicy   { _autoScalingReplacingUpdatePolicyWillReplace :: Maybe (Val Bool')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingReplacingUpdatePolicy where-  toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }+  toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }  instance FromJSON AutoScalingReplacingUpdatePolicy where-  parseJSON = genericParseJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }+  parseJSON = genericParseJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }  -- | Constructor for 'AutoScalingReplacingUpdatePolicy' containing required fields -- as arguments.
library/Stratosphere/ResourceAttributes/AutoScalingRollingUpdatePolicy.hs view
@@ -25,13 +25,13 @@   , _autoScalingRollingUpdatePolicyPauseTime :: Maybe (Val Text)   , _autoScalingRollingUpdatePolicySuspendProcess :: Maybe [Val Text]   , _autoScalingRollingUpdatePolicyWaitOnResourceSignals :: Maybe (Val Bool')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingRollingUpdatePolicy where-  toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 25, omitNothingFields = True }+  toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }  instance FromJSON AutoScalingRollingUpdatePolicy where-  parseJSON = genericParseJSON defaultOptions { fieldLabelModifier = Prelude.drop 25, omitNothingFields = True }+  parseJSON = genericParseJSON defaultOptions { fieldLabelModifier = Prelude.drop 31, omitNothingFields = True }  -- | Constructor for 'AutoScalingRollingUpdatePolicy' containing required fields as -- arguments.
library/Stratosphere/ResourceAttributes/AutoScalingScheduledActionPolicy.hs view
@@ -33,13 +33,13 @@ data AutoScalingScheduledActionPolicy =   AutoScalingScheduledActionPolicy   { _autoScalingScheduledActionPolicyIgnoreUnmodifiedGroupSizeProperties :: Maybe (Val Bool')-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON AutoScalingScheduledActionPolicy where-  toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }+  toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }  instance FromJSON AutoScalingScheduledActionPolicy where-  parseJSON = genericParseJSON defaultOptions { fieldLabelModifier = Prelude.drop 27, omitNothingFields = True }+  parseJSON = genericParseJSON defaultOptions { fieldLabelModifier = Prelude.drop 33, omitNothingFields = True }  -- | Constructor for 'AutoScalingScheduledActionPolicy' containing required fields -- as arguments.
library/Stratosphere/ResourceAttributes/CreationPolicy.hs view
@@ -36,7 +36,7 @@ data CreationPolicy =   CreationPolicy   { _creationPolicyResourceSignal :: ResourceSignal-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON CreationPolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library/Stratosphere/ResourceAttributes/ResourceSignal.hs view
@@ -20,7 +20,7 @@   ResourceSignal   { _resourceSignalCount :: Maybe (Val Integer')   , _resourceSignalTimeout :: Maybe (Val Text)-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON ResourceSignal where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
library/Stratosphere/ResourceAttributes/UpdatePolicy.hs view
@@ -27,7 +27,7 @@   { _updatePolicyAutoScalingReplacingUpdate :: Maybe AutoScalingReplacingUpdatePolicy   , _updatePolicyAutoScalingRollingUpdate :: Maybe AutoScalingRollingUpdatePolicy   , _updatePolicyAutoScalingScheduledAction :: Maybe AutoScalingScheduledActionPolicy-  } deriving (Show, Generic)+  } deriving (Show, Eq, Generic)  instance ToJSON UpdatePolicy where   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 13, omitNothingFields = True }
library/Stratosphere/Template.hs view
@@ -79,7 +79,7 @@     -- properties. For example, you can declare an output for an Amazon S3     -- bucket name and then call the aws cloudformation describe-stacks AWS CLI     -- command to view the name.-  } deriving (Show)+  } deriving (Show, Eq)   $(deriveJSON defaultOptions { fieldLabelModifier = modTemplateJSONField
library/Stratosphere/Types.hs view
@@ -6,6 +6,7 @@  module Stratosphere.Types   ( EnabledState (..)+  , AuthorizerType (..)   , AuthorizationType (..)   , HttpMethod (..)   , LoggingLevel (..)@@ -34,10 +35,29 @@   | DISABLED   deriving (Show, Read, Eq, Generic, FromJSON, ToJSON) +-- https://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigateway-authorizer.html#cfn-apigateway-authorizer-type+data AuthorizerType+  = TOKEN_AUTH+  | COGNITO_USER_POOLS_AUTH+  deriving (Show, Read, Eq)++instance FromJSON AuthorizerType where+  parseJSON = withText "AuthorizerType" parse+    where+      parse "TOKEN"               = pure TOKEN_AUTH+      parse "COGNITO_USER_POOLS"  = pure COGNITO_USER_POOLS_AUTH+      parse authorizerType = fail ("Unexpected authorizer type " ++ unpack authorizerType)++instance ToJSON AuthorizerType where+  toJSON TOKEN_AUTH               = String "TOKEN"+  toJSON COGNITO_USER_POOLS_AUTH  = String "COGNITO_USER_POOLS"++ data AuthorizationType   = NONE   | AWS_IAM   | CUSTOM+  | COGNITO_USER_POOLS   deriving (Show, Read, Eq, Generic, FromJSON, ToJSON)  data HttpMethod
library/Stratosphere/Values.hs view
@@ -41,12 +41,14 @@  | GetAtt T.Text T.Text  | Base64 (Val a)  | Join T.Text [Val a]+ | Split T.Text T.Text  | Select Integer' (Val a)  | GetAZs (Val a)  | FindInMap (Val a) (Val a) (Val a) -- ^ Map name, top level key, and second level key  | ImportValue T.Text -- ^ The account-and-region-unique exported name of the value to import  deriving instance (Show a) => Show (Val a)+deriving instance (Eq a) => Eq (Val a)  instance (IsString a) => IsString (Val a) where   fromString s = Literal (fromString s)@@ -61,6 +63,7 @@   toJSON (GetAtt x y) = mkFunc "Fn::GetAtt" [toJSON x, toJSON y]   toJSON (Base64 v) = object [("Fn::Base64", toJSON v)]   toJSON (Join d vs) = mkFunc "Fn::Join" [toJSON d, toJSON vs]+  toJSON (Split d s) = mkFunc "Fn::Split" [toJSON d, toJSON s]   toJSON (Select i vs) = mkFunc "Fn::Select" [toJSON i, toJSON vs]   toJSON (GetAZs r) = object [("Fn::GetAZs", toJSON r)]   toJSON (FindInMap mapName topKey secondKey) =@@ -82,6 +85,7 @@       [("Fn::GetAtt", o')] -> uncurry GetAtt <$> parseJSON o'       [("Fn::Base64", o')] -> Base64 <$> parseJSON o'       [("Fn::Join", o')] -> uncurry Join <$> parseJSON o'+      [("Fn::Split", o')] -> uncurry Split <$> parseJSON o'       [("Fn::Select", o')] -> uncurry Select <$> parseJSON o'       [("Fn::GetAZs", o')] -> GetAZs <$> parseJSON o'       [("Fn::FindInMap", o')] -> do@@ -97,7 +101,7 @@ -- is necessary because CloudFront made the silly decision to represent numbers -- as JSON strings. newtype Integer' = Integer' { unInteger' :: Integer }-                 deriving (Show, Eq, Num)+  deriving (Show, Eq, Num)  instance ToJSON Integer' where   toJSON (Integer' i) = toJSON $ show i@@ -133,7 +137,7 @@  -- | We need to wrap Doubles for the same reason we need to wrap Ints. newtype Double' = Double' { unDouble' :: Double }-                deriving (Show, Eq, Num)+  deriving (Show, Eq, Num)  instance ToJSON Double' where   toJSON (Double' i) = toJSON $ show i
stratosphere.cabal view
@@ -3,7 +3,7 @@ -- see: https://github.com/sol/hpack  name:           stratosphere-version:        0.3.1+version:        0.4.0 synopsis:       EDSL for AWS CloudFormation description:    EDSL for AWS CloudFormation category:       AWS, Cloud