diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,5 +1,12 @@
 # Change Log
 
+## 0.32.0
+
+* **BREAKING CHANGE**: We removed all `FromJSON` instances to reduce compile
+  time and memory, and also to allow us to make other improvements that
+  `FromJSON` was blocking. See
+  https://github.com/frontrowed/stratosphere/issues/117
+
 ## 0.31.0
 
 * Update resource specification document to version 2.25.0
diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -140,7 +140,3 @@
   are limits on the size of CloudFormation templates, and we want readable
   output without hitting the limits. Also, we have some newtypes that just
   exist to override aeson instances, and we could get rid of those.
-* Use a custom JSON decoder with useful error messages. Although we don't use
-  them, we have implemented FromJSON instances for everything. Theoretically,
-  stratosphere could be used as a checker/linter for existing JSON
-  CloudFormation templates.
diff --git a/library-gen/Stratosphere/ResourceProperties/ASKSkillAuthenticationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ASKSkillAuthenticationConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/ASKSkillAuthenticationConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ASKSkillAuthenticationConfiguration.hs
@@ -27,14 +27,6 @@
     , (Just . ("RefreshToken",) . toJSON) _aSKSkillAuthenticationConfigurationRefreshToken
     ]
 
-instance FromJSON ASKSkillAuthenticationConfiguration where
-  parseJSON (Object obj) =
-    ASKSkillAuthenticationConfiguration <$>
-      (obj .: "ClientId") <*>
-      (obj .: "ClientSecret") <*>
-      (obj .: "RefreshToken")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ASKSkillAuthenticationConfiguration' containing required
 -- fields as arguments.
 askSkillAuthenticationConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/ASKSkillOverrides.hs b/library-gen/Stratosphere/ResourceProperties/ASKSkillOverrides.hs
--- a/library-gen/Stratosphere/ResourceProperties/ASKSkillOverrides.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ASKSkillOverrides.hs
@@ -23,12 +23,6 @@
     [ fmap (("Manifest",) . toJSON) _aSKSkillOverridesManifest
     ]
 
-instance FromJSON ASKSkillOverrides where
-  parseJSON (Object obj) =
-    ASKSkillOverrides <$>
-      (obj .:? "Manifest")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ASKSkillOverrides' containing required fields as
 -- arguments.
 askSkillOverrides
diff --git a/library-gen/Stratosphere/ResourceProperties/ASKSkillSkillPackage.hs b/library-gen/Stratosphere/ResourceProperties/ASKSkillSkillPackage.hs
--- a/library-gen/Stratosphere/ResourceProperties/ASKSkillSkillPackage.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ASKSkillSkillPackage.hs
@@ -31,16 +31,6 @@
     , fmap (("S3ObjectVersion",) . toJSON) _aSKSkillSkillPackageS3ObjectVersion
     ]
 
-instance FromJSON ASKSkillSkillPackage where
-  parseJSON (Object obj) =
-    ASKSkillSkillPackage <$>
-      (obj .:? "Overrides") <*>
-      (obj .: "S3Bucket") <*>
-      (obj .:? "S3BucketRole") <*>
-      (obj .: "S3Key") <*>
-      (obj .:? "S3ObjectVersion")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ASKSkillSkillPackage' containing required fields as
 -- arguments.
 askSkillSkillPackage
diff --git a/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerConfigurationId.hs b/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerConfigurationId.hs
--- a/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerConfigurationId.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerConfigurationId.hs
@@ -25,13 +25,6 @@
     , (Just . ("Revision",) . toJSON . fmap Integer') _amazonMQBrokerConfigurationIdRevision
     ]
 
-instance FromJSON AmazonMQBrokerConfigurationId where
-  parseJSON (Object obj) =
-    AmazonMQBrokerConfigurationId <$>
-      (obj .: "Id") <*>
-      fmap (fmap unInteger') (obj .: "Revision")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AmazonMQBrokerConfigurationId' containing required
 -- fields as arguments.
 amazonMQBrokerConfigurationId
diff --git a/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerLogList.hs b/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerLogList.hs
--- a/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerLogList.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerLogList.hs
@@ -25,13 +25,6 @@
     , fmap (("General",) . toJSON . fmap Bool') _amazonMQBrokerLogListGeneral
     ]
 
-instance FromJSON AmazonMQBrokerLogList where
-  parseJSON (Object obj) =
-    AmazonMQBrokerLogList <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Audit") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "General")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AmazonMQBrokerLogList' containing required fields as
 -- arguments.
 amazonMQBrokerLogList
diff --git a/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerMaintenanceWindow.hs b/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerMaintenanceWindow.hs
--- a/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerMaintenanceWindow.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerMaintenanceWindow.hs
@@ -27,14 +27,6 @@
     , (Just . ("TimeZone",) . toJSON) _amazonMQBrokerMaintenanceWindowTimeZone
     ]
 
-instance FromJSON AmazonMQBrokerMaintenanceWindow where
-  parseJSON (Object obj) =
-    AmazonMQBrokerMaintenanceWindow <$>
-      (obj .: "DayOfWeek") <*>
-      (obj .: "TimeOfDay") <*>
-      (obj .: "TimeZone")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AmazonMQBrokerMaintenanceWindow' containing required
 -- fields as arguments.
 amazonMQBrokerMaintenanceWindow
diff --git a/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerTagsEntry.hs b/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerTagsEntry.hs
--- a/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerTagsEntry.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerTagsEntry.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _amazonMQBrokerTagsEntryValue
     ]
 
-instance FromJSON AmazonMQBrokerTagsEntry where
-  parseJSON (Object obj) =
-    AmazonMQBrokerTagsEntry <$>
-      (obj .: "Key") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AmazonMQBrokerTagsEntry' containing required fields as
 -- arguments.
 amazonMQBrokerTagsEntry
diff --git a/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerUser.hs b/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerUser.hs
--- a/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerUser.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AmazonMQBrokerUser.hs
@@ -29,15 +29,6 @@
     , (Just . ("Username",) . toJSON) _amazonMQBrokerUserUsername
     ]
 
-instance FromJSON AmazonMQBrokerUser where
-  parseJSON (Object obj) =
-    AmazonMQBrokerUser <$>
-      fmap (fmap (fmap unBool')) (obj .:? "ConsoleAccess") <*>
-      (obj .:? "Groups") <*>
-      (obj .: "Password") <*>
-      (obj .: "Username")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AmazonMQBrokerUser' containing required fields as
 -- arguments.
 amazonMQBrokerUser
diff --git a/library-gen/Stratosphere/ResourceProperties/AmazonMQConfigurationAssociationConfigurationId.hs b/library-gen/Stratosphere/ResourceProperties/AmazonMQConfigurationAssociationConfigurationId.hs
--- a/library-gen/Stratosphere/ResourceProperties/AmazonMQConfigurationAssociationConfigurationId.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AmazonMQConfigurationAssociationConfigurationId.hs
@@ -27,13 +27,6 @@
     , (Just . ("Revision",) . toJSON . fmap Integer') _amazonMQConfigurationAssociationConfigurationIdRevision
     ]
 
-instance FromJSON AmazonMQConfigurationAssociationConfigurationId where
-  parseJSON (Object obj) =
-    AmazonMQConfigurationAssociationConfigurationId <$>
-      (obj .: "Id") <*>
-      fmap (fmap unInteger') (obj .: "Revision")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AmazonMQConfigurationAssociationConfigurationId'
 -- containing required fields as arguments.
 amazonMQConfigurationAssociationConfigurationId
diff --git a/library-gen/Stratosphere/ResourceProperties/AmazonMQConfigurationTagsEntry.hs b/library-gen/Stratosphere/ResourceProperties/AmazonMQConfigurationTagsEntry.hs
--- a/library-gen/Stratosphere/ResourceProperties/AmazonMQConfigurationTagsEntry.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AmazonMQConfigurationTagsEntry.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _amazonMQConfigurationTagsEntryValue
     ]
 
-instance FromJSON AmazonMQConfigurationTagsEntry where
-  parseJSON (Object obj) =
-    AmazonMQConfigurationTagsEntry <$>
-      (obj .: "Key") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AmazonMQConfigurationTagsEntry' containing required
 -- fields as arguments.
 amazonMQConfigurationTagsEntry
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayApiKeyStageKey.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayApiKeyStageKey.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayApiKeyStageKey.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayApiKeyStageKey.hs
@@ -25,13 +25,6 @@
     , fmap (("StageName",) . toJSON) _apiGatewayApiKeyStageKeyStageName
     ]
 
-instance FromJSON ApiGatewayApiKeyStageKey where
-  parseJSON (Object obj) =
-    ApiGatewayApiKeyStageKey <$>
-      (obj .:? "RestApiId") <*>
-      (obj .:? "StageName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayApiKeyStageKey' containing required fields as
 -- arguments.
 apiGatewayApiKeyStageKey
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentAccessLogSetting.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentAccessLogSetting.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentAccessLogSetting.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentAccessLogSetting.hs
@@ -25,13 +25,6 @@
     , fmap (("Format",) . toJSON) _apiGatewayDeploymentAccessLogSettingFormat
     ]
 
-instance FromJSON ApiGatewayDeploymentAccessLogSetting where
-  parseJSON (Object obj) =
-    ApiGatewayDeploymentAccessLogSetting <$>
-      (obj .:? "DestinationArn") <*>
-      (obj .:? "Format")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayDeploymentAccessLogSetting' containing
 -- required fields as arguments.
 apiGatewayDeploymentAccessLogSetting
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentCanarySetting.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentCanarySetting.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentCanarySetting.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentCanarySetting.hs
@@ -27,14 +27,6 @@
     , fmap (("UseStageCache",) . toJSON . fmap Bool') _apiGatewayDeploymentCanarySettingUseStageCache
     ]
 
-instance FromJSON ApiGatewayDeploymentCanarySetting where
-  parseJSON (Object obj) =
-    ApiGatewayDeploymentCanarySetting <$>
-      fmap (fmap (fmap unDouble')) (obj .:? "PercentTraffic") <*>
-      (obj .:? "StageVariableOverrides") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "UseStageCache")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayDeploymentCanarySetting' containing required
 -- fields as arguments.
 apiGatewayDeploymentCanarySetting
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentDeploymentCanarySettings.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentDeploymentCanarySettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentDeploymentCanarySettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentDeploymentCanarySettings.hs
@@ -29,14 +29,6 @@
     , fmap (("UseStageCache",) . toJSON . fmap Bool') _apiGatewayDeploymentDeploymentCanarySettingsUseStageCache
     ]
 
-instance FromJSON ApiGatewayDeploymentDeploymentCanarySettings where
-  parseJSON (Object obj) =
-    ApiGatewayDeploymentDeploymentCanarySettings <$>
-      fmap (fmap (fmap unDouble')) (obj .:? "PercentTraffic") <*>
-      (obj .:? "StageVariableOverrides") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "UseStageCache")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayDeploymentDeploymentCanarySettings' containing
 -- required fields as arguments.
 apiGatewayDeploymentDeploymentCanarySettings
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentMethodSetting.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentMethodSetting.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentMethodSetting.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentMethodSetting.hs
@@ -41,21 +41,6 @@
     , fmap (("ThrottlingRateLimit",) . toJSON . fmap Double') _apiGatewayDeploymentMethodSettingThrottlingRateLimit
     ]
 
-instance FromJSON ApiGatewayDeploymentMethodSetting where
-  parseJSON (Object obj) =
-    ApiGatewayDeploymentMethodSetting <$>
-      fmap (fmap (fmap unBool')) (obj .:? "CacheDataEncrypted") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "CacheTtlInSeconds") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "CachingEnabled") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DataTraceEnabled") <*>
-      (obj .:? "HttpMethod") <*>
-      (obj .:? "LoggingLevel") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "MetricsEnabled") <*>
-      (obj .:? "ResourcePath") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ThrottlingBurstLimit") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "ThrottlingRateLimit")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayDeploymentMethodSetting' containing required
 -- fields as arguments.
 apiGatewayDeploymentMethodSetting
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentStageDescription.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentStageDescription.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentStageDescription.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDeploymentStageDescription.hs
@@ -63,30 +63,6 @@
     , fmap (("Variables",) . toJSON) _apiGatewayDeploymentStageDescriptionVariables
     ]
 
-instance FromJSON ApiGatewayDeploymentStageDescription where
-  parseJSON (Object obj) =
-    ApiGatewayDeploymentStageDescription <$>
-      (obj .:? "AccessLogSetting") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "CacheClusterEnabled") <*>
-      (obj .:? "CacheClusterSize") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "CacheDataEncrypted") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "CacheTtlInSeconds") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "CachingEnabled") <*>
-      (obj .:? "CanarySetting") <*>
-      (obj .:? "ClientCertificateId") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DataTraceEnabled") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "DocumentationVersion") <*>
-      (obj .:? "LoggingLevel") <*>
-      (obj .:? "MethodSettings") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "MetricsEnabled") <*>
-      (obj .:? "Tags") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ThrottlingBurstLimit") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "ThrottlingRateLimit") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "TracingEnabled") <*>
-      (obj .:? "Variables")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayDeploymentStageDescription' containing
 -- required fields as arguments.
 apiGatewayDeploymentStageDescription
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDocumentationPartLocation.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDocumentationPartLocation.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDocumentationPartLocation.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDocumentationPartLocation.hs
@@ -31,16 +31,6 @@
     , fmap (("Type",) . toJSON) _apiGatewayDocumentationPartLocationType
     ]
 
-instance FromJSON ApiGatewayDocumentationPartLocation where
-  parseJSON (Object obj) =
-    ApiGatewayDocumentationPartLocation <$>
-      (obj .:? "Method") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Path") <*>
-      (obj .:? "StatusCode") <*>
-      (obj .:? "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayDocumentationPartLocation' containing required
 -- fields as arguments.
 apiGatewayDocumentationPartLocation
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDomainNameEndpointConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDomainNameEndpointConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayDomainNameEndpointConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayDomainNameEndpointConfiguration.hs
@@ -24,12 +24,6 @@
     [ fmap (("Types",) . toJSON) _apiGatewayDomainNameEndpointConfigurationTypes
     ]
 
-instance FromJSON ApiGatewayDomainNameEndpointConfiguration where
-  parseJSON (Object obj) =
-    ApiGatewayDomainNameEndpointConfiguration <$>
-      (obj .:? "Types")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayDomainNameEndpointConfiguration' containing
 -- required fields as arguments.
 apiGatewayDomainNameEndpointConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegration.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegration.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegration.hs
@@ -50,25 +50,6 @@
     , fmap (("Uri",) . toJSON) _apiGatewayMethodIntegrationUri
     ]
 
-instance FromJSON ApiGatewayMethodIntegration where
-  parseJSON (Object obj) =
-    ApiGatewayMethodIntegration <$>
-      (obj .:? "CacheKeyParameters") <*>
-      (obj .:? "CacheNamespace") <*>
-      (obj .:? "ConnectionId") <*>
-      (obj .:? "ConnectionType") <*>
-      (obj .:? "ContentHandling") <*>
-      (obj .:? "Credentials") <*>
-      (obj .:? "IntegrationHttpMethod") <*>
-      (obj .:? "IntegrationResponses") <*>
-      (obj .:? "PassthroughBehavior") <*>
-      (obj .:? "RequestParameters") <*>
-      (obj .:? "RequestTemplates") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "TimeoutInMillis") <*>
-      (obj .:? "Type") <*>
-      (obj .:? "Uri")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayMethodIntegration' containing required fields
 -- as arguments.
 apiGatewayMethodIntegration
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegrationResponse.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegrationResponse.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegrationResponse.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodIntegrationResponse.hs
@@ -31,16 +31,6 @@
     , (Just . ("StatusCode",) . toJSON) _apiGatewayMethodIntegrationResponseStatusCode
     ]
 
-instance FromJSON ApiGatewayMethodIntegrationResponse where
-  parseJSON (Object obj) =
-    ApiGatewayMethodIntegrationResponse <$>
-      (obj .:? "ContentHandling") <*>
-      (obj .:? "ResponseParameters") <*>
-      (obj .:? "ResponseTemplates") <*>
-      (obj .:? "SelectionPattern") <*>
-      (obj .: "StatusCode")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayMethodIntegrationResponse' containing required
 -- fields as arguments.
 apiGatewayMethodIntegrationResponse
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodMethodResponse.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodMethodResponse.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodMethodResponse.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayMethodMethodResponse.hs
@@ -27,14 +27,6 @@
     , (Just . ("StatusCode",) . toJSON) _apiGatewayMethodMethodResponseStatusCode
     ]
 
-instance FromJSON ApiGatewayMethodMethodResponse where
-  parseJSON (Object obj) =
-    ApiGatewayMethodMethodResponse <$>
-      (obj .:? "ResponseModels") <*>
-      (obj .:? "ResponseParameters") <*>
-      (obj .: "StatusCode")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayMethodMethodResponse' containing required
 -- fields as arguments.
 apiGatewayMethodMethodResponse
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiEndpointConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiEndpointConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiEndpointConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiEndpointConfiguration.hs
@@ -24,12 +24,6 @@
     [ fmap (("Types",) . toJSON) _apiGatewayRestApiEndpointConfigurationTypes
     ]
 
-instance FromJSON ApiGatewayRestApiEndpointConfiguration where
-  parseJSON (Object obj) =
-    ApiGatewayRestApiEndpointConfiguration <$>
-      (obj .:? "Types")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayRestApiEndpointConfiguration' containing
 -- required fields as arguments.
 apiGatewayRestApiEndpointConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiS3Location.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiS3Location.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiS3Location.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayRestApiS3Location.hs
@@ -29,15 +29,6 @@
     , fmap (("Version",) . toJSON) _apiGatewayRestApiS3LocationVersion
     ]
 
-instance FromJSON ApiGatewayRestApiS3Location where
-  parseJSON (Object obj) =
-    ApiGatewayRestApiS3Location <$>
-      (obj .:? "Bucket") <*>
-      (obj .:? "ETag") <*>
-      (obj .:? "Key") <*>
-      (obj .:? "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayRestApiS3Location' containing required fields
 -- as arguments.
 apiGatewayRestApiS3Location
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageAccessLogSetting.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageAccessLogSetting.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageAccessLogSetting.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageAccessLogSetting.hs
@@ -25,13 +25,6 @@
     , fmap (("Format",) . toJSON) _apiGatewayStageAccessLogSettingFormat
     ]
 
-instance FromJSON ApiGatewayStageAccessLogSetting where
-  parseJSON (Object obj) =
-    ApiGatewayStageAccessLogSetting <$>
-      (obj .:? "DestinationArn") <*>
-      (obj .:? "Format")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayStageAccessLogSetting' containing required
 -- fields as arguments.
 apiGatewayStageAccessLogSetting
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageCanarySetting.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageCanarySetting.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageCanarySetting.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageCanarySetting.hs
@@ -29,15 +29,6 @@
     , fmap (("UseStageCache",) . toJSON . fmap Bool') _apiGatewayStageCanarySettingUseStageCache
     ]
 
-instance FromJSON ApiGatewayStageCanarySetting where
-  parseJSON (Object obj) =
-    ApiGatewayStageCanarySetting <$>
-      (obj .:? "DeploymentId") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "PercentTraffic") <*>
-      (obj .:? "StageVariableOverrides") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "UseStageCache")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayStageCanarySetting' containing required fields
 -- as arguments.
 apiGatewayStageCanarySetting
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageMethodSetting.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageMethodSetting.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageMethodSetting.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayStageMethodSetting.hs
@@ -41,21 +41,6 @@
     , fmap (("ThrottlingRateLimit",) . toJSON . fmap Double') _apiGatewayStageMethodSettingThrottlingRateLimit
     ]
 
-instance FromJSON ApiGatewayStageMethodSetting where
-  parseJSON (Object obj) =
-    ApiGatewayStageMethodSetting <$>
-      fmap (fmap (fmap unBool')) (obj .:? "CacheDataEncrypted") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "CacheTtlInSeconds") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "CachingEnabled") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DataTraceEnabled") <*>
-      (obj .:? "HttpMethod") <*>
-      (obj .:? "LoggingLevel") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "MetricsEnabled") <*>
-      (obj .:? "ResourcePath") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ThrottlingBurstLimit") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "ThrottlingRateLimit")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayStageMethodSetting' containing required fields
 -- as arguments.
 apiGatewayStageMethodSetting
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanApiStage.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanApiStage.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanApiStage.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanApiStage.hs
@@ -27,14 +27,6 @@
     , fmap (("Throttle",) . toJSON) _apiGatewayUsagePlanApiStageThrottle
     ]
 
-instance FromJSON ApiGatewayUsagePlanApiStage where
-  parseJSON (Object obj) =
-    ApiGatewayUsagePlanApiStage <$>
-      (obj .:? "ApiId") <*>
-      (obj .:? "Stage") <*>
-      (obj .:? "Throttle")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayUsagePlanApiStage' containing required fields
 -- as arguments.
 apiGatewayUsagePlanApiStage
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanQuotaSettings.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanQuotaSettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanQuotaSettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanQuotaSettings.hs
@@ -27,14 +27,6 @@
     , fmap (("Period",) . toJSON) _apiGatewayUsagePlanQuotaSettingsPeriod
     ]
 
-instance FromJSON ApiGatewayUsagePlanQuotaSettings where
-  parseJSON (Object obj) =
-    ApiGatewayUsagePlanQuotaSettings <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "Limit") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Offset") <*>
-      (obj .:? "Period")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayUsagePlanQuotaSettings' containing required
 -- fields as arguments.
 apiGatewayUsagePlanQuotaSettings
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanThrottleSettings.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanThrottleSettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanThrottleSettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayUsagePlanThrottleSettings.hs
@@ -25,13 +25,6 @@
     , fmap (("RateLimit",) . toJSON . fmap Double') _apiGatewayUsagePlanThrottleSettingsRateLimit
     ]
 
-instance FromJSON ApiGatewayUsagePlanThrottleSettings where
-  parseJSON (Object obj) =
-    ApiGatewayUsagePlanThrottleSettings <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "BurstLimit") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "RateLimit")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayUsagePlanThrottleSettings' containing required
 -- fields as arguments.
 apiGatewayUsagePlanThrottleSettings
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2RouteParameterConstraints.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2RouteParameterConstraints.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2RouteParameterConstraints.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2RouteParameterConstraints.hs
@@ -24,12 +24,6 @@
     [ (Just . ("Required",) . toJSON . fmap Bool') _apiGatewayV2RouteParameterConstraintsRequired
     ]
 
-instance FromJSON ApiGatewayV2RouteParameterConstraints where
-  parseJSON (Object obj) =
-    ApiGatewayV2RouteParameterConstraints <$>
-      fmap (fmap unBool') (obj .: "Required")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayV2RouteParameterConstraints' containing
 -- required fields as arguments.
 apiGatewayV2RouteParameterConstraints
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2RouteResponseParameterConstraints.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2RouteResponseParameterConstraints.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2RouteResponseParameterConstraints.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2RouteResponseParameterConstraints.hs
@@ -25,12 +25,6 @@
     [ (Just . ("Required",) . toJSON . fmap Bool') _apiGatewayV2RouteResponseParameterConstraintsRequired
     ]
 
-instance FromJSON ApiGatewayV2RouteResponseParameterConstraints where
-  parseJSON (Object obj) =
-    ApiGatewayV2RouteResponseParameterConstraints <$>
-      fmap (fmap unBool') (obj .: "Required")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayV2RouteResponseParameterConstraints'
 -- containing required fields as arguments.
 apiGatewayV2RouteResponseParameterConstraints
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2StageAccessLogSettings.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2StageAccessLogSettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2StageAccessLogSettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2StageAccessLogSettings.hs
@@ -25,13 +25,6 @@
     , fmap (("Format",) . toJSON) _apiGatewayV2StageAccessLogSettingsFormat
     ]
 
-instance FromJSON ApiGatewayV2StageAccessLogSettings where
-  parseJSON (Object obj) =
-    ApiGatewayV2StageAccessLogSettings <$>
-      (obj .:? "DestinationArn") <*>
-      (obj .:? "Format")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayV2StageAccessLogSettings' containing required
 -- fields as arguments.
 apiGatewayV2StageAccessLogSettings
diff --git a/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2StageRouteSettings.hs b/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2StageRouteSettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2StageRouteSettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApiGatewayV2StageRouteSettings.hs
@@ -31,16 +31,6 @@
     , fmap (("ThrottlingRateLimit",) . toJSON . fmap Double') _apiGatewayV2StageRouteSettingsThrottlingRateLimit
     ]
 
-instance FromJSON ApiGatewayV2StageRouteSettings where
-  parseJSON (Object obj) =
-    ApiGatewayV2StageRouteSettings <$>
-      fmap (fmap (fmap unBool')) (obj .:? "DataTraceEnabled") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DetailedMetricsEnabled") <*>
-      (obj .:? "LoggingLevel") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ThrottlingBurstLimit") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "ThrottlingRateLimit")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayV2StageRouteSettings' containing required
 -- fields as arguments.
 apiGatewayV2StageRouteSettings
diff --git a/library-gen/Stratosphere/ResourceProperties/AppStreamDirectoryConfigServiceAccountCredentials.hs b/library-gen/Stratosphere/ResourceProperties/AppStreamDirectoryConfigServiceAccountCredentials.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppStreamDirectoryConfigServiceAccountCredentials.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppStreamDirectoryConfigServiceAccountCredentials.hs
@@ -27,13 +27,6 @@
     , (Just . ("AccountPassword",) . toJSON) _appStreamDirectoryConfigServiceAccountCredentialsAccountPassword
     ]
 
-instance FromJSON AppStreamDirectoryConfigServiceAccountCredentials where
-  parseJSON (Object obj) =
-    AppStreamDirectoryConfigServiceAccountCredentials <$>
-      (obj .: "AccountName") <*>
-      (obj .: "AccountPassword")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamDirectoryConfigServiceAccountCredentials'
 -- containing required fields as arguments.
 appStreamDirectoryConfigServiceAccountCredentials
diff --git a/library-gen/Stratosphere/ResourceProperties/AppStreamFleetComputeCapacity.hs b/library-gen/Stratosphere/ResourceProperties/AppStreamFleetComputeCapacity.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppStreamFleetComputeCapacity.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppStreamFleetComputeCapacity.hs
@@ -23,12 +23,6 @@
     [ (Just . ("DesiredInstances",) . toJSON . fmap Integer') _appStreamFleetComputeCapacityDesiredInstances
     ]
 
-instance FromJSON AppStreamFleetComputeCapacity where
-  parseJSON (Object obj) =
-    AppStreamFleetComputeCapacity <$>
-      fmap (fmap unInteger') (obj .: "DesiredInstances")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamFleetComputeCapacity' containing required
 -- fields as arguments.
 appStreamFleetComputeCapacity
diff --git a/library-gen/Stratosphere/ResourceProperties/AppStreamFleetDomainJoinInfo.hs b/library-gen/Stratosphere/ResourceProperties/AppStreamFleetDomainJoinInfo.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppStreamFleetDomainJoinInfo.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppStreamFleetDomainJoinInfo.hs
@@ -25,13 +25,6 @@
     , fmap (("OrganizationalUnitDistinguishedName",) . toJSON) _appStreamFleetDomainJoinInfoOrganizationalUnitDistinguishedName
     ]
 
-instance FromJSON AppStreamFleetDomainJoinInfo where
-  parseJSON (Object obj) =
-    AppStreamFleetDomainJoinInfo <$>
-      (obj .:? "DirectoryName") <*>
-      (obj .:? "OrganizationalUnitDistinguishedName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamFleetDomainJoinInfo' containing required fields
 -- as arguments.
 appStreamFleetDomainJoinInfo
diff --git a/library-gen/Stratosphere/ResourceProperties/AppStreamFleetVpcConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppStreamFleetVpcConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppStreamFleetVpcConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppStreamFleetVpcConfig.hs
@@ -25,13 +25,6 @@
     , fmap (("SubnetIds",) . toJSON) _appStreamFleetVpcConfigSubnetIds
     ]
 
-instance FromJSON AppStreamFleetVpcConfig where
-  parseJSON (Object obj) =
-    AppStreamFleetVpcConfig <$>
-      (obj .:? "SecurityGroupIds") <*>
-      (obj .:? "SubnetIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamFleetVpcConfig' containing required fields as
 -- arguments.
 appStreamFleetVpcConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/AppStreamImageBuilderDomainJoinInfo.hs b/library-gen/Stratosphere/ResourceProperties/AppStreamImageBuilderDomainJoinInfo.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppStreamImageBuilderDomainJoinInfo.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppStreamImageBuilderDomainJoinInfo.hs
@@ -25,13 +25,6 @@
     , fmap (("OrganizationalUnitDistinguishedName",) . toJSON) _appStreamImageBuilderDomainJoinInfoOrganizationalUnitDistinguishedName
     ]
 
-instance FromJSON AppStreamImageBuilderDomainJoinInfo where
-  parseJSON (Object obj) =
-    AppStreamImageBuilderDomainJoinInfo <$>
-      (obj .:? "DirectoryName") <*>
-      (obj .:? "OrganizationalUnitDistinguishedName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamImageBuilderDomainJoinInfo' containing required
 -- fields as arguments.
 appStreamImageBuilderDomainJoinInfo
diff --git a/library-gen/Stratosphere/ResourceProperties/AppStreamImageBuilderVpcConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppStreamImageBuilderVpcConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppStreamImageBuilderVpcConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppStreamImageBuilderVpcConfig.hs
@@ -25,13 +25,6 @@
     , fmap (("SubnetIds",) . toJSON) _appStreamImageBuilderVpcConfigSubnetIds
     ]
 
-instance FromJSON AppStreamImageBuilderVpcConfig where
-  parseJSON (Object obj) =
-    AppStreamImageBuilderVpcConfig <$>
-      (obj .:? "SecurityGroupIds") <*>
-      (obj .:? "SubnetIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamImageBuilderVpcConfig' containing required
 -- fields as arguments.
 appStreamImageBuilderVpcConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/AppStreamStackApplicationSettings.hs b/library-gen/Stratosphere/ResourceProperties/AppStreamStackApplicationSettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppStreamStackApplicationSettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppStreamStackApplicationSettings.hs
@@ -25,13 +25,6 @@
     , fmap (("SettingsGroup",) . toJSON) _appStreamStackApplicationSettingsSettingsGroup
     ]
 
-instance FromJSON AppStreamStackApplicationSettings where
-  parseJSON (Object obj) =
-    AppStreamStackApplicationSettings <$>
-      fmap (fmap unBool') (obj .: "Enabled") <*>
-      (obj .:? "SettingsGroup")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamStackApplicationSettings' containing required
 -- fields as arguments.
 appStreamStackApplicationSettings
diff --git a/library-gen/Stratosphere/ResourceProperties/AppStreamStackStorageConnector.hs b/library-gen/Stratosphere/ResourceProperties/AppStreamStackStorageConnector.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppStreamStackStorageConnector.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppStreamStackStorageConnector.hs
@@ -27,14 +27,6 @@
     , fmap (("ResourceIdentifier",) . toJSON) _appStreamStackStorageConnectorResourceIdentifier
     ]
 
-instance FromJSON AppStreamStackStorageConnector where
-  parseJSON (Object obj) =
-    AppStreamStackStorageConnector <$>
-      (obj .: "ConnectorType") <*>
-      (obj .:? "Domains") <*>
-      (obj .:? "ResourceIdentifier")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamStackStorageConnector' containing required
 -- fields as arguments.
 appStreamStackStorageConnector
diff --git a/library-gen/Stratosphere/ResourceProperties/AppStreamStackUserSetting.hs b/library-gen/Stratosphere/ResourceProperties/AppStreamStackUserSetting.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppStreamStackUserSetting.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppStreamStackUserSetting.hs
@@ -25,13 +25,6 @@
     , (Just . ("Permission",) . toJSON) _appStreamStackUserSettingPermission
     ]
 
-instance FromJSON AppStreamStackUserSetting where
-  parseJSON (Object obj) =
-    AppStreamStackUserSetting <$>
-      (obj .: "Action") <*>
-      (obj .: "Permission")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamStackUserSetting' containing required fields as
 -- arguments.
 appStreamStackUserSetting
diff --git a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceAuthorizationConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceAuthorizationConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceAuthorizationConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceAuthorizationConfig.hs
@@ -25,13 +25,6 @@
     , fmap (("AwsIamConfig",) . toJSON) _appSyncDataSourceAuthorizationConfigAwsIamConfig
     ]
 
-instance FromJSON AppSyncDataSourceAuthorizationConfig where
-  parseJSON (Object obj) =
-    AppSyncDataSourceAuthorizationConfig <$>
-      (obj .: "AuthorizationType") <*>
-      (obj .:? "AwsIamConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncDataSourceAuthorizationConfig' containing
 -- required fields as arguments.
 appSyncDataSourceAuthorizationConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceAwsIamConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceAwsIamConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceAwsIamConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceAwsIamConfig.hs
@@ -25,13 +25,6 @@
     , fmap (("SigningServiceName",) . toJSON) _appSyncDataSourceAwsIamConfigSigningServiceName
     ]
 
-instance FromJSON AppSyncDataSourceAwsIamConfig where
-  parseJSON (Object obj) =
-    AppSyncDataSourceAwsIamConfig <$>
-      (obj .:? "SigningRegion") <*>
-      (obj .:? "SigningServiceName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncDataSourceAwsIamConfig' containing required
 -- fields as arguments.
 appSyncDataSourceAwsIamConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceDynamoDBConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceDynamoDBConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceDynamoDBConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceDynamoDBConfig.hs
@@ -27,14 +27,6 @@
     , fmap (("UseCallerCredentials",) . toJSON . fmap Bool') _appSyncDataSourceDynamoDBConfigUseCallerCredentials
     ]
 
-instance FromJSON AppSyncDataSourceDynamoDBConfig where
-  parseJSON (Object obj) =
-    AppSyncDataSourceDynamoDBConfig <$>
-      (obj .: "AwsRegion") <*>
-      (obj .: "TableName") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "UseCallerCredentials")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncDataSourceDynamoDBConfig' containing required
 -- fields as arguments.
 appSyncDataSourceDynamoDBConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceElasticsearchConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceElasticsearchConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceElasticsearchConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceElasticsearchConfig.hs
@@ -25,13 +25,6 @@
     , (Just . ("Endpoint",) . toJSON) _appSyncDataSourceElasticsearchConfigEndpoint
     ]
 
-instance FromJSON AppSyncDataSourceElasticsearchConfig where
-  parseJSON (Object obj) =
-    AppSyncDataSourceElasticsearchConfig <$>
-      (obj .: "AwsRegion") <*>
-      (obj .: "Endpoint")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncDataSourceElasticsearchConfig' containing
 -- required fields as arguments.
 appSyncDataSourceElasticsearchConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceHttpConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceHttpConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceHttpConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceHttpConfig.hs
@@ -25,13 +25,6 @@
     , (Just . ("Endpoint",) . toJSON) _appSyncDataSourceHttpConfigEndpoint
     ]
 
-instance FromJSON AppSyncDataSourceHttpConfig where
-  parseJSON (Object obj) =
-    AppSyncDataSourceHttpConfig <$>
-      (obj .:? "AuthorizationConfig") <*>
-      (obj .: "Endpoint")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncDataSourceHttpConfig' containing required fields
 -- as arguments.
 appSyncDataSourceHttpConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceLambdaConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceLambdaConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceLambdaConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceLambdaConfig.hs
@@ -23,12 +23,6 @@
     [ (Just . ("LambdaFunctionArn",) . toJSON) _appSyncDataSourceLambdaConfigLambdaFunctionArn
     ]
 
-instance FromJSON AppSyncDataSourceLambdaConfig where
-  parseJSON (Object obj) =
-    AppSyncDataSourceLambdaConfig <$>
-      (obj .: "LambdaFunctionArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncDataSourceLambdaConfig' containing required
 -- fields as arguments.
 appSyncDataSourceLambdaConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceRdsHttpEndpointConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceRdsHttpEndpointConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceRdsHttpEndpointConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceRdsHttpEndpointConfig.hs
@@ -32,16 +32,6 @@
     , fmap (("Schema",) . toJSON) _appSyncDataSourceRdsHttpEndpointConfigSchema
     ]
 
-instance FromJSON AppSyncDataSourceRdsHttpEndpointConfig where
-  parseJSON (Object obj) =
-    AppSyncDataSourceRdsHttpEndpointConfig <$>
-      (obj .: "AwsRegion") <*>
-      (obj .: "AwsSecretStoreArn") <*>
-      (obj .:? "DatabaseName") <*>
-      (obj .: "DbClusterIdentifier") <*>
-      (obj .:? "Schema")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncDataSourceRdsHttpEndpointConfig' containing
 -- required fields as arguments.
 appSyncDataSourceRdsHttpEndpointConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceRelationalDatabaseConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceRelationalDatabaseConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceRelationalDatabaseConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppSyncDataSourceRelationalDatabaseConfig.hs
@@ -26,13 +26,6 @@
     , (Just . ("RelationalDatabaseSourceType",) . toJSON) _appSyncDataSourceRelationalDatabaseConfigRelationalDatabaseSourceType
     ]
 
-instance FromJSON AppSyncDataSourceRelationalDatabaseConfig where
-  parseJSON (Object obj) =
-    AppSyncDataSourceRelationalDatabaseConfig <$>
-      (obj .:? "RdsHttpEndpointConfig") <*>
-      (obj .: "RelationalDatabaseSourceType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncDataSourceRelationalDatabaseConfig' containing
 -- required fields as arguments.
 appSyncDataSourceRelationalDatabaseConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiLogConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiLogConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiLogConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiLogConfig.hs
@@ -25,13 +25,6 @@
     , fmap (("FieldLogLevel",) . toJSON) _appSyncGraphQLApiLogConfigFieldLogLevel
     ]
 
-instance FromJSON AppSyncGraphQLApiLogConfig where
-  parseJSON (Object obj) =
-    AppSyncGraphQLApiLogConfig <$>
-      (obj .:? "CloudWatchLogsRoleArn") <*>
-      (obj .:? "FieldLogLevel")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncGraphQLApiLogConfig' containing required fields
 -- as arguments.
 appSyncGraphQLApiLogConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiOpenIDConnectConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiOpenIDConnectConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiOpenIDConnectConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiOpenIDConnectConfig.hs
@@ -29,15 +29,6 @@
     , fmap (("Issuer",) . toJSON) _appSyncGraphQLApiOpenIDConnectConfigIssuer
     ]
 
-instance FromJSON AppSyncGraphQLApiOpenIDConnectConfig where
-  parseJSON (Object obj) =
-    AppSyncGraphQLApiOpenIDConnectConfig <$>
-      fmap (fmap (fmap unDouble')) (obj .:? "AuthTTL") <*>
-      (obj .:? "ClientId") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "IatTTL") <*>
-      (obj .:? "Issuer")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncGraphQLApiOpenIDConnectConfig' containing
 -- required fields as arguments.
 appSyncGraphQLApiOpenIDConnectConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiUserPoolConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiUserPoolConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiUserPoolConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppSyncGraphQLApiUserPoolConfig.hs
@@ -29,15 +29,6 @@
     , fmap (("UserPoolId",) . toJSON) _appSyncGraphQLApiUserPoolConfigUserPoolId
     ]
 
-instance FromJSON AppSyncGraphQLApiUserPoolConfig where
-  parseJSON (Object obj) =
-    AppSyncGraphQLApiUserPoolConfig <$>
-      (obj .:? "AppIdClientRegex") <*>
-      (obj .:? "AwsRegion") <*>
-      (obj .:? "DefaultAction") <*>
-      (obj .:? "UserPoolId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncGraphQLApiUserPoolConfig' containing required
 -- fields as arguments.
 appSyncGraphQLApiUserPoolConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/AppSyncResolverPipelineConfig.hs b/library-gen/Stratosphere/ResourceProperties/AppSyncResolverPipelineConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/AppSyncResolverPipelineConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AppSyncResolverPipelineConfig.hs
@@ -23,12 +23,6 @@
     [ fmap (("Functions",) . toJSON) _appSyncResolverPipelineConfigFunctions
     ]
 
-instance FromJSON AppSyncResolverPipelineConfig where
-  parseJSON (Object obj) =
-    AppSyncResolverPipelineConfig <$>
-      (obj .:? "Functions")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncResolverPipelineConfig' containing required
 -- fields as arguments.
 appSyncResolverPipelineConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalableTargetScalableTargetAction.hs b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalableTargetScalableTargetAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalableTargetScalableTargetAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalableTargetScalableTargetAction.hs
@@ -27,13 +27,6 @@
     , fmap (("MinCapacity",) . toJSON . fmap Integer') _applicationAutoScalingScalableTargetScalableTargetActionMinCapacity
     ]
 
-instance FromJSON ApplicationAutoScalingScalableTargetScalableTargetAction where
-  parseJSON (Object obj) =
-    ApplicationAutoScalingScalableTargetScalableTargetAction <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "MaxCapacity") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MinCapacity")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ApplicationAutoScalingScalableTargetScalableTargetAction' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalableTargetScheduledAction.hs b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalableTargetScheduledAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalableTargetScheduledAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalableTargetScheduledAction.hs
@@ -33,16 +33,6 @@
     , fmap (("StartTime",) . toJSON) _applicationAutoScalingScalableTargetScheduledActionStartTime
     ]
 
-instance FromJSON ApplicationAutoScalingScalableTargetScheduledAction where
-  parseJSON (Object obj) =
-    ApplicationAutoScalingScalableTargetScheduledAction <$>
-      (obj .:? "EndTime") <*>
-      (obj .:? "ScalableTargetAction") <*>
-      (obj .: "Schedule") <*>
-      (obj .: "ScheduledActionName") <*>
-      (obj .:? "StartTime")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApplicationAutoScalingScalableTargetScheduledAction'
 -- containing required fields as arguments.
 applicationAutoScalingScalableTargetScheduledAction
diff --git a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification.hs b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification.hs
@@ -33,16 +33,6 @@
     , fmap (("Unit",) . toJSON) _applicationAutoScalingScalingPolicyCustomizedMetricSpecificationUnit
     ]
 
-instance FromJSON ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification where
-  parseJSON (Object obj) =
-    ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification <$>
-      (obj .:? "Dimensions") <*>
-      (obj .: "MetricName") <*>
-      (obj .: "Namespace") <*>
-      (obj .: "Statistic") <*>
-      (obj .:? "Unit")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ApplicationAutoScalingScalingPolicyCustomizedMetricSpecification'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyMetricDimension.hs b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyMetricDimension.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyMetricDimension.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyMetricDimension.hs
@@ -27,13 +27,6 @@
     , (Just . ("Value",) . toJSON) _applicationAutoScalingScalingPolicyMetricDimensionValue
     ]
 
-instance FromJSON ApplicationAutoScalingScalingPolicyMetricDimension where
-  parseJSON (Object obj) =
-    ApplicationAutoScalingScalingPolicyMetricDimension <$>
-      (obj .: "Name") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApplicationAutoScalingScalingPolicyMetricDimension'
 -- containing required fields as arguments.
 applicationAutoScalingScalingPolicyMetricDimension
diff --git a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification.hs b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification.hs
@@ -27,13 +27,6 @@
     , fmap (("ResourceLabel",) . toJSON) _applicationAutoScalingScalingPolicyPredefinedMetricSpecificationResourceLabel
     ]
 
-instance FromJSON ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification where
-  parseJSON (Object obj) =
-    ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification <$>
-      (obj .: "PredefinedMetricType") <*>
-      (obj .:? "ResourceLabel")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ApplicationAutoScalingScalingPolicyPredefinedMetricSpecification'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepAdjustment.hs b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepAdjustment.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepAdjustment.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepAdjustment.hs
@@ -29,14 +29,6 @@
     , (Just . ("ScalingAdjustment",) . toJSON . fmap Integer') _applicationAutoScalingScalingPolicyStepAdjustmentScalingAdjustment
     ]
 
-instance FromJSON ApplicationAutoScalingScalingPolicyStepAdjustment where
-  parseJSON (Object obj) =
-    ApplicationAutoScalingScalingPolicyStepAdjustment <$>
-      fmap (fmap (fmap unDouble')) (obj .:? "MetricIntervalLowerBound") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "MetricIntervalUpperBound") <*>
-      fmap (fmap unInteger') (obj .: "ScalingAdjustment")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApplicationAutoScalingScalingPolicyStepAdjustment'
 -- containing required fields as arguments.
 applicationAutoScalingScalingPolicyStepAdjustment
diff --git a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration.hs
@@ -33,16 +33,6 @@
     , fmap (("StepAdjustments",) . toJSON) _applicationAutoScalingScalingPolicyStepScalingPolicyConfigurationStepAdjustments
     ]
 
-instance FromJSON ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration where
-  parseJSON (Object obj) =
-    ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration <$>
-      (obj .:? "AdjustmentType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Cooldown") <*>
-      (obj .:? "MetricAggregationType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MinAdjustmentMagnitude") <*>
-      (obj .:? "StepAdjustments")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ApplicationAutoScalingScalingPolicyStepScalingPolicyConfiguration'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration.hs
@@ -37,17 +37,6 @@
     , (Just . ("TargetValue",) . toJSON . fmap Double') _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfigurationTargetValue
     ]
 
-instance FromJSON ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration where
-  parseJSON (Object obj) =
-    ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration <$>
-      (obj .:? "CustomizedMetricSpecification") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DisableScaleIn") <*>
-      (obj .:? "PredefinedMetricSpecification") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ScaleInCooldown") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ScaleOutCooldown") <*>
-      fmap (fmap unDouble') (obj .: "TargetValue")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ApplicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupInstancesDistribution.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupInstancesDistribution.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupInstancesDistribution.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupInstancesDistribution.hs
@@ -35,17 +35,6 @@
     , fmap (("SpotMaxPrice",) . toJSON) _autoScalingAutoScalingGroupInstancesDistributionSpotMaxPrice
     ]
 
-instance FromJSON AutoScalingAutoScalingGroupInstancesDistribution where
-  parseJSON (Object obj) =
-    AutoScalingAutoScalingGroupInstancesDistribution <$>
-      (obj .:? "OnDemandAllocationStrategy") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "OnDemandBaseCapacity") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "OnDemandPercentageAboveBaseCapacity") <*>
-      (obj .:? "SpotAllocationStrategy") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SpotInstancePools") <*>
-      (obj .:? "SpotMaxPrice")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingAutoScalingGroupInstancesDistribution'
 -- containing required fields as arguments.
 autoScalingAutoScalingGroupInstancesDistribution
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplate.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplate.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplate.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplate.hs
@@ -27,13 +27,6 @@
     , fmap (("Overrides",) . toJSON) _autoScalingAutoScalingGroupLaunchTemplateOverrides
     ]
 
-instance FromJSON AutoScalingAutoScalingGroupLaunchTemplate where
-  parseJSON (Object obj) =
-    AutoScalingAutoScalingGroupLaunchTemplate <$>
-      (obj .: "LaunchTemplateSpecification") <*>
-      (obj .:? "Overrides")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingAutoScalingGroupLaunchTemplate' containing
 -- required fields as arguments.
 autoScalingAutoScalingGroupLaunchTemplate
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplateOverrides.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplateOverrides.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplateOverrides.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplateOverrides.hs
@@ -25,12 +25,6 @@
     [ fmap (("InstanceType",) . toJSON) _autoScalingAutoScalingGroupLaunchTemplateOverridesInstanceType
     ]
 
-instance FromJSON AutoScalingAutoScalingGroupLaunchTemplateOverrides where
-  parseJSON (Object obj) =
-    AutoScalingAutoScalingGroupLaunchTemplateOverrides <$>
-      (obj .:? "InstanceType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingAutoScalingGroupLaunchTemplateOverrides'
 -- containing required fields as arguments.
 autoScalingAutoScalingGroupLaunchTemplateOverrides
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplateSpecification.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplateSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplateSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLaunchTemplateSpecification.hs
@@ -29,14 +29,6 @@
     , (Just . ("Version",) . toJSON) _autoScalingAutoScalingGroupLaunchTemplateSpecificationVersion
     ]
 
-instance FromJSON AutoScalingAutoScalingGroupLaunchTemplateSpecification where
-  parseJSON (Object obj) =
-    AutoScalingAutoScalingGroupLaunchTemplateSpecification <$>
-      (obj .:? "LaunchTemplateId") <*>
-      (obj .:? "LaunchTemplateName") <*>
-      (obj .: "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingAutoScalingGroupLaunchTemplateSpecification'
 -- containing required fields as arguments.
 autoScalingAutoScalingGroupLaunchTemplateSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLifecycleHookSpecification.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLifecycleHookSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLifecycleHookSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupLifecycleHookSpecification.hs
@@ -37,18 +37,6 @@
     , fmap (("RoleARN",) . toJSON) _autoScalingAutoScalingGroupLifecycleHookSpecificationRoleARN
     ]
 
-instance FromJSON AutoScalingAutoScalingGroupLifecycleHookSpecification where
-  parseJSON (Object obj) =
-    AutoScalingAutoScalingGroupLifecycleHookSpecification <$>
-      (obj .:? "DefaultResult") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "HeartbeatTimeout") <*>
-      (obj .: "LifecycleHookName") <*>
-      (obj .: "LifecycleTransition") <*>
-      (obj .:? "NotificationMetadata") <*>
-      (obj .:? "NotificationTargetARN") <*>
-      (obj .:? "RoleARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingAutoScalingGroupLifecycleHookSpecification'
 -- containing required fields as arguments.
 autoScalingAutoScalingGroupLifecycleHookSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMetricsCollection.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMetricsCollection.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMetricsCollection.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMetricsCollection.hs
@@ -27,13 +27,6 @@
     , fmap (("Metrics",) . toJSON) _autoScalingAutoScalingGroupMetricsCollectionMetrics
     ]
 
-instance FromJSON AutoScalingAutoScalingGroupMetricsCollection where
-  parseJSON (Object obj) =
-    AutoScalingAutoScalingGroupMetricsCollection <$>
-      (obj .: "Granularity") <*>
-      (obj .:? "Metrics")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingAutoScalingGroupMetricsCollection' containing
 -- required fields as arguments.
 autoScalingAutoScalingGroupMetricsCollection
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMixedInstancesPolicy.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMixedInstancesPolicy.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMixedInstancesPolicy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupMixedInstancesPolicy.hs
@@ -28,13 +28,6 @@
     , (Just . ("LaunchTemplate",) . toJSON) _autoScalingAutoScalingGroupMixedInstancesPolicyLaunchTemplate
     ]
 
-instance FromJSON AutoScalingAutoScalingGroupMixedInstancesPolicy where
-  parseJSON (Object obj) =
-    AutoScalingAutoScalingGroupMixedInstancesPolicy <$>
-      (obj .:? "InstancesDistribution") <*>
-      (obj .: "LaunchTemplate")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingAutoScalingGroupMixedInstancesPolicy'
 -- containing required fields as arguments.
 autoScalingAutoScalingGroupMixedInstancesPolicy
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupNotificationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupNotificationConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupNotificationConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupNotificationConfiguration.hs
@@ -27,13 +27,6 @@
     , (Just . ("TopicARN",) . toJSON) _autoScalingAutoScalingGroupNotificationConfigurationTopicARN
     ]
 
-instance FromJSON AutoScalingAutoScalingGroupNotificationConfiguration where
-  parseJSON (Object obj) =
-    AutoScalingAutoScalingGroupNotificationConfiguration <$>
-      (obj .:? "NotificationTypes") <*>
-      (obj .: "TopicARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingAutoScalingGroupNotificationConfiguration'
 -- containing required fields as arguments.
 autoScalingAutoScalingGroupNotificationConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupTagProperty.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupTagProperty.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupTagProperty.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingAutoScalingGroupTagProperty.hs
@@ -28,14 +28,6 @@
     , (Just . ("Value",) . toJSON) _autoScalingAutoScalingGroupTagPropertyValue
     ]
 
-instance FromJSON AutoScalingAutoScalingGroupTagProperty where
-  parseJSON (Object obj) =
-    AutoScalingAutoScalingGroupTagProperty <$>
-      (obj .: "Key") <*>
-      fmap (fmap unBool') (obj .: "PropagateAtLaunch") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingAutoScalingGroupTagProperty' containing
 -- required fields as arguments.
 autoScalingAutoScalingGroupTagProperty
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDevice.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDevice.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDevice.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDevice.hs
@@ -34,17 +34,6 @@
     , fmap (("VolumeType",) . toJSON) _autoScalingLaunchConfigurationBlockDeviceVolumeType
     ]
 
-instance FromJSON AutoScalingLaunchConfigurationBlockDevice where
-  parseJSON (Object obj) =
-    AutoScalingLaunchConfigurationBlockDevice <$>
-      fmap (fmap (fmap unBool')) (obj .:? "DeleteOnTermination") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Encrypted") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Iops") <*>
-      (obj .:? "SnapshotId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "VolumeSize") <*>
-      (obj .:? "VolumeType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingLaunchConfigurationBlockDevice' containing
 -- required fields as arguments.
 autoScalingLaunchConfigurationBlockDevice
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDeviceMapping.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDeviceMapping.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDeviceMapping.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingLaunchConfigurationBlockDeviceMapping.hs
@@ -31,15 +31,6 @@
     , fmap (("VirtualName",) . toJSON) _autoScalingLaunchConfigurationBlockDeviceMappingVirtualName
     ]
 
-instance FromJSON AutoScalingLaunchConfigurationBlockDeviceMapping where
-  parseJSON (Object obj) =
-    AutoScalingLaunchConfigurationBlockDeviceMapping <$>
-      (obj .: "DeviceName") <*>
-      (obj .:? "Ebs") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "NoDevice") <*>
-      (obj .:? "VirtualName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingLaunchConfigurationBlockDeviceMapping'
 -- containing required fields as arguments.
 autoScalingLaunchConfigurationBlockDeviceMapping
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanApplicationSource.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanApplicationSource.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanApplicationSource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanApplicationSource.hs
@@ -27,13 +27,6 @@
     , fmap (("TagFilters",) . toJSON) _autoScalingPlansScalingPlanApplicationSourceTagFilters
     ]
 
-instance FromJSON AutoScalingPlansScalingPlanApplicationSource where
-  parseJSON (Object obj) =
-    AutoScalingPlansScalingPlanApplicationSource <$>
-      (obj .:? "CloudFormationStackARN") <*>
-      (obj .:? "TagFilters")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingPlansScalingPlanApplicationSource' containing
 -- required fields as arguments.
 autoScalingPlansScalingPlanApplicationSource
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification.hs
@@ -33,16 +33,6 @@
     , fmap (("Unit",) . toJSON) _autoScalingPlansScalingPlanCustomizedLoadMetricSpecificationUnit
     ]
 
-instance FromJSON AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification where
-  parseJSON (Object obj) =
-    AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification <$>
-      (obj .:? "Dimensions") <*>
-      (obj .: "MetricName") <*>
-      (obj .: "Namespace") <*>
-      (obj .: "Statistic") <*>
-      (obj .:? "Unit")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'AutoScalingPlansScalingPlanCustomizedLoadMetricSpecification' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification.hs
@@ -33,16 +33,6 @@
     , fmap (("Unit",) . toJSON) _autoScalingPlansScalingPlanCustomizedScalingMetricSpecificationUnit
     ]
 
-instance FromJSON AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification where
-  parseJSON (Object obj) =
-    AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification <$>
-      (obj .:? "Dimensions") <*>
-      (obj .: "MetricName") <*>
-      (obj .: "Namespace") <*>
-      (obj .: "Statistic") <*>
-      (obj .:? "Unit")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'AutoScalingPlansScalingPlanCustomizedScalingMetricSpecification'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanMetricDimension.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanMetricDimension.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanMetricDimension.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanMetricDimension.hs
@@ -26,13 +26,6 @@
     , (Just . ("Value",) . toJSON) _autoScalingPlansScalingPlanMetricDimensionValue
     ]
 
-instance FromJSON AutoScalingPlansScalingPlanMetricDimension where
-  parseJSON (Object obj) =
-    AutoScalingPlansScalingPlanMetricDimension <$>
-      (obj .: "Name") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingPlansScalingPlanMetricDimension' containing
 -- required fields as arguments.
 autoScalingPlansScalingPlanMetricDimension
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification.hs
@@ -27,13 +27,6 @@
     , fmap (("ResourceLabel",) . toJSON) _autoScalingPlansScalingPlanPredefinedLoadMetricSpecificationResourceLabel
     ]
 
-instance FromJSON AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification where
-  parseJSON (Object obj) =
-    AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification <$>
-      (obj .: "PredefinedLoadMetricType") <*>
-      (obj .:? "ResourceLabel")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'AutoScalingPlansScalingPlanPredefinedLoadMetricSpecification' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification.hs
@@ -27,13 +27,6 @@
     , fmap (("ResourceLabel",) . toJSON) _autoScalingPlansScalingPlanPredefinedScalingMetricSpecificationResourceLabel
     ]
 
-instance FromJSON AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification where
-  parseJSON (Object obj) =
-    AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification <$>
-      (obj .: "PredefinedScalingMetricType") <*>
-      (obj .:? "ResourceLabel")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'AutoScalingPlansScalingPlanPredefinedScalingMetricSpecification'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanScalingInstruction.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanScalingInstruction.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanScalingInstruction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanScalingInstruction.hs
@@ -53,25 +53,6 @@
     , (Just . ("TargetTrackingConfigurations",) . toJSON) _autoScalingPlansScalingPlanScalingInstructionTargetTrackingConfigurations
     ]
 
-instance FromJSON AutoScalingPlansScalingPlanScalingInstruction where
-  parseJSON (Object obj) =
-    AutoScalingPlansScalingPlanScalingInstruction <$>
-      (obj .:? "CustomizedLoadMetricSpecification") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DisableDynamicScaling") <*>
-      fmap (fmap unInteger') (obj .: "MaxCapacity") <*>
-      fmap (fmap unInteger') (obj .: "MinCapacity") <*>
-      (obj .:? "PredefinedLoadMetricSpecification") <*>
-      (obj .:? "PredictiveScalingMaxCapacityBehavior") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "PredictiveScalingMaxCapacityBuffer") <*>
-      (obj .:? "PredictiveScalingMode") <*>
-      (obj .: "ResourceId") <*>
-      (obj .: "ScalableDimension") <*>
-      (obj .:? "ScalingPolicyUpdateBehavior") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ScheduledActionBufferTime") <*>
-      (obj .: "ServiceNamespace") <*>
-      (obj .: "TargetTrackingConfigurations")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingPlansScalingPlanScalingInstruction'
 -- containing required fields as arguments.
 autoScalingPlansScalingPlanScalingInstruction
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanTagFilter.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanTagFilter.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanTagFilter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanTagFilter.hs
@@ -25,13 +25,6 @@
     , fmap (("Values",) . toJSON) _autoScalingPlansScalingPlanTagFilterValues
     ]
 
-instance FromJSON AutoScalingPlansScalingPlanTagFilter where
-  parseJSON (Object obj) =
-    AutoScalingPlansScalingPlanTagFilter <$>
-      (obj .: "Key") <*>
-      (obj .:? "Values")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingPlansScalingPlanTagFilter' containing
 -- required fields as arguments.
 autoScalingPlansScalingPlanTagFilter
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanTargetTrackingConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanTargetTrackingConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanTargetTrackingConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingPlansScalingPlanTargetTrackingConfiguration.hs
@@ -38,18 +38,6 @@
     , (Just . ("TargetValue",) . toJSON . fmap Double') _autoScalingPlansScalingPlanTargetTrackingConfigurationTargetValue
     ]
 
-instance FromJSON AutoScalingPlansScalingPlanTargetTrackingConfiguration where
-  parseJSON (Object obj) =
-    AutoScalingPlansScalingPlanTargetTrackingConfiguration <$>
-      (obj .:? "CustomizedScalingMetricSpecification") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DisableScaleIn") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "EstimatedInstanceWarmup") <*>
-      (obj .:? "PredefinedScalingMetricSpecification") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ScaleInCooldown") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ScaleOutCooldown") <*>
-      fmap (fmap unDouble') (obj .: "TargetValue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingPlansScalingPlanTargetTrackingConfiguration'
 -- containing required fields as arguments.
 autoScalingPlansScalingPlanTargetTrackingConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyCustomizedMetricSpecification.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyCustomizedMetricSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyCustomizedMetricSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyCustomizedMetricSpecification.hs
@@ -33,16 +33,6 @@
     , fmap (("Unit",) . toJSON) _autoScalingScalingPolicyCustomizedMetricSpecificationUnit
     ]
 
-instance FromJSON AutoScalingScalingPolicyCustomizedMetricSpecification where
-  parseJSON (Object obj) =
-    AutoScalingScalingPolicyCustomizedMetricSpecification <$>
-      (obj .:? "Dimensions") <*>
-      (obj .: "MetricName") <*>
-      (obj .: "Namespace") <*>
-      (obj .: "Statistic") <*>
-      (obj .:? "Unit")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingScalingPolicyCustomizedMetricSpecification'
 -- containing required fields as arguments.
 autoScalingScalingPolicyCustomizedMetricSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyMetricDimension.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyMetricDimension.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyMetricDimension.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyMetricDimension.hs
@@ -26,13 +26,6 @@
     , (Just . ("Value",) . toJSON) _autoScalingScalingPolicyMetricDimensionValue
     ]
 
-instance FromJSON AutoScalingScalingPolicyMetricDimension where
-  parseJSON (Object obj) =
-    AutoScalingScalingPolicyMetricDimension <$>
-      (obj .: "Name") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingScalingPolicyMetricDimension' containing
 -- required fields as arguments.
 autoScalingScalingPolicyMetricDimension
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyPredefinedMetricSpecification.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyPredefinedMetricSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyPredefinedMetricSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyPredefinedMetricSpecification.hs
@@ -27,13 +27,6 @@
     , fmap (("ResourceLabel",) . toJSON) _autoScalingScalingPolicyPredefinedMetricSpecificationResourceLabel
     ]
 
-instance FromJSON AutoScalingScalingPolicyPredefinedMetricSpecification where
-  parseJSON (Object obj) =
-    AutoScalingScalingPolicyPredefinedMetricSpecification <$>
-      (obj .: "PredefinedMetricType") <*>
-      (obj .:? "ResourceLabel")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingScalingPolicyPredefinedMetricSpecification'
 -- containing required fields as arguments.
 autoScalingScalingPolicyPredefinedMetricSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyStepAdjustment.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyStepAdjustment.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyStepAdjustment.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyStepAdjustment.hs
@@ -28,14 +28,6 @@
     , (Just . ("ScalingAdjustment",) . toJSON . fmap Integer') _autoScalingScalingPolicyStepAdjustmentScalingAdjustment
     ]
 
-instance FromJSON AutoScalingScalingPolicyStepAdjustment where
-  parseJSON (Object obj) =
-    AutoScalingScalingPolicyStepAdjustment <$>
-      fmap (fmap (fmap unDouble')) (obj .:? "MetricIntervalLowerBound") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "MetricIntervalUpperBound") <*>
-      fmap (fmap unInteger') (obj .: "ScalingAdjustment")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingScalingPolicyStepAdjustment' containing
 -- required fields as arguments.
 autoScalingScalingPolicyStepAdjustment
diff --git a/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyTargetTrackingConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyTargetTrackingConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyTargetTrackingConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/AutoScalingScalingPolicyTargetTrackingConfiguration.hs
@@ -32,15 +32,6 @@
     , (Just . ("TargetValue",) . toJSON . fmap Double') _autoScalingScalingPolicyTargetTrackingConfigurationTargetValue
     ]
 
-instance FromJSON AutoScalingScalingPolicyTargetTrackingConfiguration where
-  parseJSON (Object obj) =
-    AutoScalingScalingPolicyTargetTrackingConfiguration <$>
-      (obj .:? "CustomizedMetricSpecification") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DisableScaleIn") <*>
-      (obj .:? "PredefinedMetricSpecification") <*>
-      fmap (fmap unDouble') (obj .: "TargetValue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingScalingPolicyTargetTrackingConfiguration'
 -- containing required fields as arguments.
 autoScalingScalingPolicyTargetTrackingConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/BatchComputeEnvironmentComputeResources.hs b/library-gen/Stratosphere/ResourceProperties/BatchComputeEnvironmentComputeResources.hs
--- a/library-gen/Stratosphere/ResourceProperties/BatchComputeEnvironmentComputeResources.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BatchComputeEnvironmentComputeResources.hs
@@ -52,26 +52,6 @@
     , (Just . ("Type",) . toJSON) _batchComputeEnvironmentComputeResourcesType
     ]
 
-instance FromJSON BatchComputeEnvironmentComputeResources where
-  parseJSON (Object obj) =
-    BatchComputeEnvironmentComputeResources <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "BidPercentage") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "DesiredvCpus") <*>
-      (obj .:? "Ec2KeyPair") <*>
-      (obj .:? "ImageId") <*>
-      (obj .: "InstanceRole") <*>
-      (obj .: "InstanceTypes") <*>
-      (obj .:? "LaunchTemplate") <*>
-      fmap (fmap unInteger') (obj .: "MaxvCpus") <*>
-      fmap (fmap unInteger') (obj .: "MinvCpus") <*>
-      (obj .:? "PlacementGroup") <*>
-      (obj .: "SecurityGroupIds") <*>
-      (obj .:? "SpotIamFleetRole") <*>
-      (obj .: "Subnets") <*>
-      (obj .:? "Tags") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchComputeEnvironmentComputeResources' containing
 -- required fields as arguments.
 batchComputeEnvironmentComputeResources
diff --git a/library-gen/Stratosphere/ResourceProperties/BatchComputeEnvironmentLaunchTemplateSpecification.hs b/library-gen/Stratosphere/ResourceProperties/BatchComputeEnvironmentLaunchTemplateSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/BatchComputeEnvironmentLaunchTemplateSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BatchComputeEnvironmentLaunchTemplateSpecification.hs
@@ -29,14 +29,6 @@
     , fmap (("Version",) . toJSON) _batchComputeEnvironmentLaunchTemplateSpecificationVersion
     ]
 
-instance FromJSON BatchComputeEnvironmentLaunchTemplateSpecification where
-  parseJSON (Object obj) =
-    BatchComputeEnvironmentLaunchTemplateSpecification <$>
-      (obj .:? "LaunchTemplateId") <*>
-      (obj .:? "LaunchTemplateName") <*>
-      (obj .:? "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchComputeEnvironmentLaunchTemplateSpecification'
 -- containing required fields as arguments.
 batchComputeEnvironmentLaunchTemplateSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionContainerProperties.hs b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionContainerProperties.hs
--- a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionContainerProperties.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionContainerProperties.hs
@@ -51,24 +51,6 @@
     , fmap (("Volumes",) . toJSON) _batchJobDefinitionContainerPropertiesVolumes
     ]
 
-instance FromJSON BatchJobDefinitionContainerProperties where
-  parseJSON (Object obj) =
-    BatchJobDefinitionContainerProperties <$>
-      (obj .:? "Command") <*>
-      (obj .:? "Environment") <*>
-      (obj .: "Image") <*>
-      (obj .:? "InstanceType") <*>
-      (obj .:? "JobRoleArn") <*>
-      fmap (fmap unInteger') (obj .: "Memory") <*>
-      (obj .:? "MountPoints") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Privileged") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ReadonlyRootFilesystem") <*>
-      (obj .:? "Ulimits") <*>
-      (obj .:? "User") <*>
-      fmap (fmap unInteger') (obj .: "Vcpus") <*>
-      (obj .:? "Volumes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchJobDefinitionContainerProperties' containing
 -- required fields as arguments.
 batchJobDefinitionContainerProperties
diff --git a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionEnvironment.hs b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionEnvironment.hs
--- a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionEnvironment.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionEnvironment.hs
@@ -25,13 +25,6 @@
     , fmap (("Value",) . toJSON) _batchJobDefinitionEnvironmentValue
     ]
 
-instance FromJSON BatchJobDefinitionEnvironment where
-  parseJSON (Object obj) =
-    BatchJobDefinitionEnvironment <$>
-      (obj .:? "Name") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchJobDefinitionEnvironment' containing required
 -- fields as arguments.
 batchJobDefinitionEnvironment
diff --git a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionMountPoints.hs b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionMountPoints.hs
--- a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionMountPoints.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionMountPoints.hs
@@ -27,14 +27,6 @@
     , fmap (("SourceVolume",) . toJSON) _batchJobDefinitionMountPointsSourceVolume
     ]
 
-instance FromJSON BatchJobDefinitionMountPoints where
-  parseJSON (Object obj) =
-    BatchJobDefinitionMountPoints <$>
-      (obj .:? "ContainerPath") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ReadOnly") <*>
-      (obj .:? "SourceVolume")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchJobDefinitionMountPoints' containing required
 -- fields as arguments.
 batchJobDefinitionMountPoints
diff --git a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionNodeProperties.hs b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionNodeProperties.hs
--- a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionNodeProperties.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionNodeProperties.hs
@@ -27,14 +27,6 @@
     , (Just . ("NumNodes",) . toJSON . fmap Integer') _batchJobDefinitionNodePropertiesNumNodes
     ]
 
-instance FromJSON BatchJobDefinitionNodeProperties where
-  parseJSON (Object obj) =
-    BatchJobDefinitionNodeProperties <$>
-      fmap (fmap unInteger') (obj .: "MainNode") <*>
-      (obj .: "NodeRangeProperties") <*>
-      fmap (fmap unInteger') (obj .: "NumNodes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchJobDefinitionNodeProperties' containing required
 -- fields as arguments.
 batchJobDefinitionNodeProperties
diff --git a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionNodeRangeProperty.hs b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionNodeRangeProperty.hs
--- a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionNodeRangeProperty.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionNodeRangeProperty.hs
@@ -25,13 +25,6 @@
     , (Just . ("TargetNodes",) . toJSON) _batchJobDefinitionNodeRangePropertyTargetNodes
     ]
 
-instance FromJSON BatchJobDefinitionNodeRangeProperty where
-  parseJSON (Object obj) =
-    BatchJobDefinitionNodeRangeProperty <$>
-      (obj .:? "Container") <*>
-      (obj .: "TargetNodes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchJobDefinitionNodeRangeProperty' containing required
 -- fields as arguments.
 batchJobDefinitionNodeRangeProperty
diff --git a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionRetryStrategy.hs b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionRetryStrategy.hs
--- a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionRetryStrategy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionRetryStrategy.hs
@@ -23,12 +23,6 @@
     [ fmap (("Attempts",) . toJSON . fmap Integer') _batchJobDefinitionRetryStrategyAttempts
     ]
 
-instance FromJSON BatchJobDefinitionRetryStrategy where
-  parseJSON (Object obj) =
-    BatchJobDefinitionRetryStrategy <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "Attempts")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchJobDefinitionRetryStrategy' containing required
 -- fields as arguments.
 batchJobDefinitionRetryStrategy
diff --git a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionTimeout.hs b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionTimeout.hs
--- a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionTimeout.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionTimeout.hs
@@ -23,12 +23,6 @@
     [ fmap (("AttemptDurationSeconds",) . toJSON . fmap Integer') _batchJobDefinitionTimeoutAttemptDurationSeconds
     ]
 
-instance FromJSON BatchJobDefinitionTimeout where
-  parseJSON (Object obj) =
-    BatchJobDefinitionTimeout <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "AttemptDurationSeconds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchJobDefinitionTimeout' containing required fields as
 -- arguments.
 batchJobDefinitionTimeout
diff --git a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionUlimit.hs b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionUlimit.hs
--- a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionUlimit.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionUlimit.hs
@@ -27,14 +27,6 @@
     , (Just . ("SoftLimit",) . toJSON . fmap Integer') _batchJobDefinitionUlimitSoftLimit
     ]
 
-instance FromJSON BatchJobDefinitionUlimit where
-  parseJSON (Object obj) =
-    BatchJobDefinitionUlimit <$>
-      fmap (fmap unInteger') (obj .: "HardLimit") <*>
-      (obj .: "Name") <*>
-      fmap (fmap unInteger') (obj .: "SoftLimit")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchJobDefinitionUlimit' containing required fields as
 -- arguments.
 batchJobDefinitionUlimit
diff --git a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionVolumes.hs b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionVolumes.hs
--- a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionVolumes.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionVolumes.hs
@@ -25,13 +25,6 @@
     , fmap (("Name",) . toJSON) _batchJobDefinitionVolumesName
     ]
 
-instance FromJSON BatchJobDefinitionVolumes where
-  parseJSON (Object obj) =
-    BatchJobDefinitionVolumes <$>
-      (obj .:? "Host") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchJobDefinitionVolumes' containing required fields as
 -- arguments.
 batchJobDefinitionVolumes
diff --git a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionVolumesHost.hs b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionVolumesHost.hs
--- a/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionVolumesHost.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BatchJobDefinitionVolumesHost.hs
@@ -23,12 +23,6 @@
     [ fmap (("SourcePath",) . toJSON) _batchJobDefinitionVolumesHostSourcePath
     ]
 
-instance FromJSON BatchJobDefinitionVolumesHost where
-  parseJSON (Object obj) =
-    BatchJobDefinitionVolumesHost <$>
-      (obj .:? "SourcePath")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchJobDefinitionVolumesHost' containing required
 -- fields as arguments.
 batchJobDefinitionVolumesHost
diff --git a/library-gen/Stratosphere/ResourceProperties/BatchJobQueueComputeEnvironmentOrder.hs b/library-gen/Stratosphere/ResourceProperties/BatchJobQueueComputeEnvironmentOrder.hs
--- a/library-gen/Stratosphere/ResourceProperties/BatchJobQueueComputeEnvironmentOrder.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BatchJobQueueComputeEnvironmentOrder.hs
@@ -25,13 +25,6 @@
     , (Just . ("Order",) . toJSON . fmap Integer') _batchJobQueueComputeEnvironmentOrderOrder
     ]
 
-instance FromJSON BatchJobQueueComputeEnvironmentOrder where
-  parseJSON (Object obj) =
-    BatchJobQueueComputeEnvironmentOrder <$>
-      (obj .: "ComputeEnvironment") <*>
-      fmap (fmap unInteger') (obj .: "Order")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchJobQueueComputeEnvironmentOrder' containing
 -- required fields as arguments.
 batchJobQueueComputeEnvironmentOrder
diff --git a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetBudgetData.hs b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetBudgetData.hs
--- a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetBudgetData.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetBudgetData.hs
@@ -37,18 +37,6 @@
     , (Just . ("TimeUnit",) . toJSON) _budgetsBudgetBudgetDataTimeUnit
     ]
 
-instance FromJSON BudgetsBudgetBudgetData where
-  parseJSON (Object obj) =
-    BudgetsBudgetBudgetData <$>
-      (obj .:? "BudgetLimit") <*>
-      (obj .:? "BudgetName") <*>
-      (obj .: "BudgetType") <*>
-      (obj .:? "CostFilters") <*>
-      (obj .:? "CostTypes") <*>
-      (obj .:? "TimePeriod") <*>
-      (obj .: "TimeUnit")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BudgetsBudgetBudgetData' containing required fields as
 -- arguments.
 budgetsBudgetBudgetData
diff --git a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetCostTypes.hs b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetCostTypes.hs
--- a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetCostTypes.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetCostTypes.hs
@@ -43,22 +43,6 @@
     , fmap (("UseBlended",) . toJSON . fmap Bool') _budgetsBudgetCostTypesUseBlended
     ]
 
-instance FromJSON BudgetsBudgetCostTypes where
-  parseJSON (Object obj) =
-    BudgetsBudgetCostTypes <$>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeCredit") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeDiscount") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeOtherSubscription") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeRecurring") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeRefund") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeSubscription") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeSupport") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeTax") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeUpfront") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "UseAmortized") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "UseBlended")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BudgetsBudgetCostTypes' containing required fields as
 -- arguments.
 budgetsBudgetCostTypes
diff --git a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetNotification.hs b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetNotification.hs
--- a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetNotification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetNotification.hs
@@ -29,15 +29,6 @@
     , fmap (("ThresholdType",) . toJSON) _budgetsBudgetNotificationThresholdType
     ]
 
-instance FromJSON BudgetsBudgetNotification where
-  parseJSON (Object obj) =
-    BudgetsBudgetNotification <$>
-      (obj .: "ComparisonOperator") <*>
-      (obj .: "NotificationType") <*>
-      fmap (fmap unDouble') (obj .: "Threshold") <*>
-      (obj .:? "ThresholdType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BudgetsBudgetNotification' containing required fields as
 -- arguments.
 budgetsBudgetNotification
diff --git a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetNotificationWithSubscribers.hs b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetNotificationWithSubscribers.hs
--- a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetNotificationWithSubscribers.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetNotificationWithSubscribers.hs
@@ -27,13 +27,6 @@
     , (Just . ("Subscribers",) . toJSON) _budgetsBudgetNotificationWithSubscribersSubscribers
     ]
 
-instance FromJSON BudgetsBudgetNotificationWithSubscribers where
-  parseJSON (Object obj) =
-    BudgetsBudgetNotificationWithSubscribers <$>
-      (obj .: "Notification") <*>
-      (obj .: "Subscribers")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BudgetsBudgetNotificationWithSubscribers' containing
 -- required fields as arguments.
 budgetsBudgetNotificationWithSubscribers
diff --git a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetSpend.hs b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetSpend.hs
--- a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetSpend.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetSpend.hs
@@ -25,13 +25,6 @@
     , (Just . ("Unit",) . toJSON) _budgetsBudgetSpendUnit
     ]
 
-instance FromJSON BudgetsBudgetSpend where
-  parseJSON (Object obj) =
-    BudgetsBudgetSpend <$>
-      fmap (fmap unDouble') (obj .: "Amount") <*>
-      (obj .: "Unit")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BudgetsBudgetSpend' containing required fields as
 -- arguments.
 budgetsBudgetSpend
diff --git a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetSubscriber.hs b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetSubscriber.hs
--- a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetSubscriber.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetSubscriber.hs
@@ -25,13 +25,6 @@
     , (Just . ("SubscriptionType",) . toJSON) _budgetsBudgetSubscriberSubscriptionType
     ]
 
-instance FromJSON BudgetsBudgetSubscriber where
-  parseJSON (Object obj) =
-    BudgetsBudgetSubscriber <$>
-      (obj .: "Address") <*>
-      (obj .: "SubscriptionType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BudgetsBudgetSubscriber' containing required fields as
 -- arguments.
 budgetsBudgetSubscriber
diff --git a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetTimePeriod.hs b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetTimePeriod.hs
--- a/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetTimePeriod.hs
+++ b/library-gen/Stratosphere/ResourceProperties/BudgetsBudgetTimePeriod.hs
@@ -25,13 +25,6 @@
     , fmap (("Start",) . toJSON) _budgetsBudgetTimePeriodStart
     ]
 
-instance FromJSON BudgetsBudgetTimePeriod where
-  parseJSON (Object obj) =
-    BudgetsBudgetTimePeriod <$>
-      (obj .:? "End") <*>
-      (obj .:? "Start")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BudgetsBudgetTimePeriod' containing required fields as
 -- arguments.
 budgetsBudgetTimePeriod
diff --git a/library-gen/Stratosphere/ResourceProperties/CertificateManagerCertificateDomainValidationOption.hs b/library-gen/Stratosphere/ResourceProperties/CertificateManagerCertificateDomainValidationOption.hs
--- a/library-gen/Stratosphere/ResourceProperties/CertificateManagerCertificateDomainValidationOption.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CertificateManagerCertificateDomainValidationOption.hs
@@ -27,13 +27,6 @@
     , (Just . ("ValidationDomain",) . toJSON) _certificateManagerCertificateDomainValidationOptionValidationDomain
     ]
 
-instance FromJSON CertificateManagerCertificateDomainValidationOption where
-  parseJSON (Object obj) =
-    CertificateManagerCertificateDomainValidationOption <$>
-      (obj .: "DomainName") <*>
-      (obj .: "ValidationDomain")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CertificateManagerCertificateDomainValidationOption'
 -- containing required fields as arguments.
 certificateManagerCertificateDomainValidationOption
diff --git a/library-gen/Stratosphere/ResourceProperties/Cloud9EnvironmentEC2Repository.hs b/library-gen/Stratosphere/ResourceProperties/Cloud9EnvironmentEC2Repository.hs
--- a/library-gen/Stratosphere/ResourceProperties/Cloud9EnvironmentEC2Repository.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Cloud9EnvironmentEC2Repository.hs
@@ -25,13 +25,6 @@
     , (Just . ("RepositoryUrl",) . toJSON) _cloud9EnvironmentEC2RepositoryRepositoryUrl
     ]
 
-instance FromJSON Cloud9EnvironmentEC2Repository where
-  parseJSON (Object obj) =
-    Cloud9EnvironmentEC2Repository <$>
-      (obj .: "PathComponent") <*>
-      (obj .: "RepositoryUrl")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Cloud9EnvironmentEC2Repository' containing required
 -- fields as arguments.
 cloud9EnvironmentEC2Repository
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig.hs
@@ -26,12 +26,6 @@
     [ (Just . ("Comment",) . toJSON) _cloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfigComment
     ]
 
-instance FromJSON CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig where
-  parseJSON (Object obj) =
-    CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig <$>
-      (obj .: "Comment")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'CloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCacheBehavior.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCacheBehavior.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCacheBehavior.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCacheBehavior.hs
@@ -50,25 +50,6 @@
     , (Just . ("ViewerProtocolPolicy",) . toJSON) _cloudFrontDistributionCacheBehaviorViewerProtocolPolicy
     ]
 
-instance FromJSON CloudFrontDistributionCacheBehavior where
-  parseJSON (Object obj) =
-    CloudFrontDistributionCacheBehavior <$>
-      (obj .:? "AllowedMethods") <*>
-      (obj .:? "CachedMethods") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Compress") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "DefaultTTL") <*>
-      (obj .:? "FieldLevelEncryptionId") <*>
-      (obj .: "ForwardedValues") <*>
-      (obj .:? "LambdaFunctionAssociations") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "MaxTTL") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "MinTTL") <*>
-      (obj .: "PathPattern") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "SmoothStreaming") <*>
-      (obj .: "TargetOriginId") <*>
-      (obj .:? "TrustedSigners") <*>
-      (obj .: "ViewerProtocolPolicy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionCacheBehavior' containing required
 -- fields as arguments.
 cloudFrontDistributionCacheBehavior
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCookies.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCookies.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCookies.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCookies.hs
@@ -25,13 +25,6 @@
     , fmap (("WhitelistedNames",) . toJSON) _cloudFrontDistributionCookiesWhitelistedNames
     ]
 
-instance FromJSON CloudFrontDistributionCookies where
-  parseJSON (Object obj) =
-    CloudFrontDistributionCookies <$>
-      (obj .: "Forward") <*>
-      (obj .:? "WhitelistedNames")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionCookies' containing required
 -- fields as arguments.
 cloudFrontDistributionCookies
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomErrorResponse.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomErrorResponse.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomErrorResponse.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomErrorResponse.hs
@@ -30,15 +30,6 @@
     , fmap (("ResponsePagePath",) . toJSON) _cloudFrontDistributionCustomErrorResponseResponsePagePath
     ]
 
-instance FromJSON CloudFrontDistributionCustomErrorResponse where
-  parseJSON (Object obj) =
-    CloudFrontDistributionCustomErrorResponse <$>
-      fmap (fmap (fmap unDouble')) (obj .:? "ErrorCachingMinTTL") <*>
-      fmap (fmap unInteger') (obj .: "ErrorCode") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ResponseCode") <*>
-      (obj .:? "ResponsePagePath")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionCustomErrorResponse' containing
 -- required fields as arguments.
 cloudFrontDistributionCustomErrorResponse
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomOriginConfig.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomOriginConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomOriginConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionCustomOriginConfig.hs
@@ -34,17 +34,6 @@
     , fmap (("OriginSSLProtocols",) . toJSON) _cloudFrontDistributionCustomOriginConfigOriginSSLProtocols
     ]
 
-instance FromJSON CloudFrontDistributionCustomOriginConfig where
-  parseJSON (Object obj) =
-    CloudFrontDistributionCustomOriginConfig <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "HTTPPort") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "HTTPSPort") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "OriginKeepaliveTimeout") <*>
-      (obj .: "OriginProtocolPolicy") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "OriginReadTimeout") <*>
-      (obj .:? "OriginSSLProtocols")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionCustomOriginConfig' containing
 -- required fields as arguments.
 cloudFrontDistributionCustomOriginConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDefaultCacheBehavior.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDefaultCacheBehavior.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDefaultCacheBehavior.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDefaultCacheBehavior.hs
@@ -49,24 +49,6 @@
     , (Just . ("ViewerProtocolPolicy",) . toJSON) _cloudFrontDistributionDefaultCacheBehaviorViewerProtocolPolicy
     ]
 
-instance FromJSON CloudFrontDistributionDefaultCacheBehavior where
-  parseJSON (Object obj) =
-    CloudFrontDistributionDefaultCacheBehavior <$>
-      (obj .:? "AllowedMethods") <*>
-      (obj .:? "CachedMethods") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Compress") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "DefaultTTL") <*>
-      (obj .:? "FieldLevelEncryptionId") <*>
-      (obj .: "ForwardedValues") <*>
-      (obj .:? "LambdaFunctionAssociations") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "MaxTTL") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "MinTTL") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "SmoothStreaming") <*>
-      (obj .: "TargetOriginId") <*>
-      (obj .:? "TrustedSigners") <*>
-      (obj .: "ViewerProtocolPolicy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionDefaultCacheBehavior' containing
 -- required fields as arguments.
 cloudFrontDistributionDefaultCacheBehavior
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDistributionConfig.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDistributionConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDistributionConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionDistributionConfig.hs
@@ -58,26 +58,6 @@
     , fmap (("WebACLId",) . toJSON) _cloudFrontDistributionDistributionConfigWebACLId
     ]
 
-instance FromJSON CloudFrontDistributionDistributionConfig where
-  parseJSON (Object obj) =
-    CloudFrontDistributionDistributionConfig <$>
-      (obj .:? "Aliases") <*>
-      (obj .:? "CacheBehaviors") <*>
-      (obj .:? "Comment") <*>
-      (obj .:? "CustomErrorResponses") <*>
-      (obj .:? "DefaultCacheBehavior") <*>
-      (obj .:? "DefaultRootObject") <*>
-      fmap (fmap unBool') (obj .: "Enabled") <*>
-      (obj .:? "HttpVersion") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IPV6Enabled") <*>
-      (obj .:? "Logging") <*>
-      (obj .:? "Origins") <*>
-      (obj .:? "PriceClass") <*>
-      (obj .:? "Restrictions") <*>
-      (obj .:? "ViewerCertificate") <*>
-      (obj .:? "WebACLId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionDistributionConfig' containing
 -- required fields as arguments.
 cloudFrontDistributionDistributionConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionForwardedValues.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionForwardedValues.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionForwardedValues.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionForwardedValues.hs
@@ -30,15 +30,6 @@
     , fmap (("QueryStringCacheKeys",) . toJSON) _cloudFrontDistributionForwardedValuesQueryStringCacheKeys
     ]
 
-instance FromJSON CloudFrontDistributionForwardedValues where
-  parseJSON (Object obj) =
-    CloudFrontDistributionForwardedValues <$>
-      (obj .:? "Cookies") <*>
-      (obj .:? "Headers") <*>
-      fmap (fmap unBool') (obj .: "QueryString") <*>
-      (obj .:? "QueryStringCacheKeys")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionForwardedValues' containing
 -- required fields as arguments.
 cloudFrontDistributionForwardedValues
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionGeoRestriction.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionGeoRestriction.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionGeoRestriction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionGeoRestriction.hs
@@ -25,13 +25,6 @@
     , (Just . ("RestrictionType",) . toJSON) _cloudFrontDistributionGeoRestrictionRestrictionType
     ]
 
-instance FromJSON CloudFrontDistributionGeoRestriction where
-  parseJSON (Object obj) =
-    CloudFrontDistributionGeoRestriction <$>
-      (obj .:? "Locations") <*>
-      (obj .: "RestrictionType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionGeoRestriction' containing
 -- required fields as arguments.
 cloudFrontDistributionGeoRestriction
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLambdaFunctionAssociation.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLambdaFunctionAssociation.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLambdaFunctionAssociation.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLambdaFunctionAssociation.hs
@@ -27,13 +27,6 @@
     , fmap (("LambdaFunctionARN",) . toJSON) _cloudFrontDistributionLambdaFunctionAssociationLambdaFunctionARN
     ]
 
-instance FromJSON CloudFrontDistributionLambdaFunctionAssociation where
-  parseJSON (Object obj) =
-    CloudFrontDistributionLambdaFunctionAssociation <$>
-      (obj .:? "EventType") <*>
-      (obj .:? "LambdaFunctionARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionLambdaFunctionAssociation'
 -- containing required fields as arguments.
 cloudFrontDistributionLambdaFunctionAssociation
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLogging.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLogging.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLogging.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionLogging.hs
@@ -27,14 +27,6 @@
     , fmap (("Prefix",) . toJSON) _cloudFrontDistributionLoggingPrefix
     ]
 
-instance FromJSON CloudFrontDistributionLogging where
-  parseJSON (Object obj) =
-    CloudFrontDistributionLogging <$>
-      (obj .: "Bucket") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeCookies") <*>
-      (obj .:? "Prefix")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionLogging' containing required
 -- fields as arguments.
 cloudFrontDistributionLogging
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOrigin.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOrigin.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOrigin.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOrigin.hs
@@ -35,17 +35,6 @@
     , fmap (("S3OriginConfig",) . toJSON) _cloudFrontDistributionOriginS3OriginConfig
     ]
 
-instance FromJSON CloudFrontDistributionOrigin where
-  parseJSON (Object obj) =
-    CloudFrontDistributionOrigin <$>
-      (obj .:? "CustomOriginConfig") <*>
-      (obj .: "DomainName") <*>
-      (obj .: "Id") <*>
-      (obj .:? "OriginCustomHeaders") <*>
-      (obj .:? "OriginPath") <*>
-      (obj .:? "S3OriginConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionOrigin' containing required fields
 -- as arguments.
 cloudFrontDistributionOrigin
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginCustomHeader.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginCustomHeader.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginCustomHeader.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionOriginCustomHeader.hs
@@ -26,13 +26,6 @@
     , (Just . ("HeaderValue",) . toJSON) _cloudFrontDistributionOriginCustomHeaderHeaderValue
     ]
 
-instance FromJSON CloudFrontDistributionOriginCustomHeader where
-  parseJSON (Object obj) =
-    CloudFrontDistributionOriginCustomHeader <$>
-      (obj .: "HeaderName") <*>
-      (obj .: "HeaderValue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionOriginCustomHeader' containing
 -- required fields as arguments.
 cloudFrontDistributionOriginCustomHeader
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionRestrictions.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionRestrictions.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionRestrictions.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionRestrictions.hs
@@ -23,12 +23,6 @@
     [ (Just . ("GeoRestriction",) . toJSON) _cloudFrontDistributionRestrictionsGeoRestriction
     ]
 
-instance FromJSON CloudFrontDistributionRestrictions where
-  parseJSON (Object obj) =
-    CloudFrontDistributionRestrictions <$>
-      (obj .: "GeoRestriction")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionRestrictions' containing required
 -- fields as arguments.
 cloudFrontDistributionRestrictions
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionS3OriginConfig.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionS3OriginConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionS3OriginConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionS3OriginConfig.hs
@@ -23,12 +23,6 @@
     [ fmap (("OriginAccessIdentity",) . toJSON) _cloudFrontDistributionS3OriginConfigOriginAccessIdentity
     ]
 
-instance FromJSON CloudFrontDistributionS3OriginConfig where
-  parseJSON (Object obj) =
-    CloudFrontDistributionS3OriginConfig <$>
-      (obj .:? "OriginAccessIdentity")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionS3OriginConfig' containing
 -- required fields as arguments.
 cloudFrontDistributionS3OriginConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionViewerCertificate.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionViewerCertificate.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionViewerCertificate.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontDistributionViewerCertificate.hs
@@ -32,16 +32,6 @@
     , fmap (("SslSupportMethod",) . toJSON) _cloudFrontDistributionViewerCertificateSslSupportMethod
     ]
 
-instance FromJSON CloudFrontDistributionViewerCertificate where
-  parseJSON (Object obj) =
-    CloudFrontDistributionViewerCertificate <$>
-      (obj .:? "AcmCertificateArn") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "CloudFrontDefaultCertificate") <*>
-      (obj .:? "IamCertificateId") <*>
-      (obj .:? "MinimumProtocolVersion") <*>
-      (obj .:? "SslSupportMethod")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistributionViewerCertificate' containing
 -- required fields as arguments.
 cloudFrontDistributionViewerCertificate
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionLogging.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionLogging.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionLogging.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionLogging.hs
@@ -28,14 +28,6 @@
     , (Just . ("Prefix",) . toJSON) _cloudFrontStreamingDistributionLoggingPrefix
     ]
 
-instance FromJSON CloudFrontStreamingDistributionLogging where
-  parseJSON (Object obj) =
-    CloudFrontStreamingDistributionLogging <$>
-      (obj .: "Bucket") <*>
-      fmap (fmap unBool') (obj .: "Enabled") <*>
-      (obj .: "Prefix")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontStreamingDistributionLogging' containing
 -- required fields as arguments.
 cloudFrontStreamingDistributionLogging
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionS3Origin.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionS3Origin.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionS3Origin.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionS3Origin.hs
@@ -26,13 +26,6 @@
     , (Just . ("OriginAccessIdentity",) . toJSON) _cloudFrontStreamingDistributionS3OriginOriginAccessIdentity
     ]
 
-instance FromJSON CloudFrontStreamingDistributionS3Origin where
-  parseJSON (Object obj) =
-    CloudFrontStreamingDistributionS3Origin <$>
-      (obj .: "DomainName") <*>
-      (obj .: "OriginAccessIdentity")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontStreamingDistributionS3Origin' containing
 -- required fields as arguments.
 cloudFrontStreamingDistributionS3Origin
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionStreamingDistributionConfig.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionStreamingDistributionConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionStreamingDistributionConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionStreamingDistributionConfig.hs
@@ -39,18 +39,6 @@
     , (Just . ("TrustedSigners",) . toJSON) _cloudFrontStreamingDistributionStreamingDistributionConfigTrustedSigners
     ]
 
-instance FromJSON CloudFrontStreamingDistributionStreamingDistributionConfig where
-  parseJSON (Object obj) =
-    CloudFrontStreamingDistributionStreamingDistributionConfig <$>
-      (obj .:? "Aliases") <*>
-      (obj .: "Comment") <*>
-      fmap (fmap unBool') (obj .: "Enabled") <*>
-      (obj .:? "Logging") <*>
-      (obj .:? "PriceClass") <*>
-      (obj .: "S3Origin") <*>
-      (obj .: "TrustedSigners")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'CloudFrontStreamingDistributionStreamingDistributionConfig' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionTrustedSigners.hs b/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionTrustedSigners.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionTrustedSigners.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudFrontStreamingDistributionTrustedSigners.hs
@@ -27,13 +27,6 @@
     , (Just . ("Enabled",) . toJSON . fmap Bool') _cloudFrontStreamingDistributionTrustedSignersEnabled
     ]
 
-instance FromJSON CloudFrontStreamingDistributionTrustedSigners where
-  parseJSON (Object obj) =
-    CloudFrontStreamingDistributionTrustedSigners <$>
-      (obj .:? "AwsAccountNumbers") <*>
-      fmap (fmap unBool') (obj .: "Enabled")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontStreamingDistributionTrustedSigners'
 -- containing required fields as arguments.
 cloudFrontStreamingDistributionTrustedSigners
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudTrailTrailDataResource.hs b/library-gen/Stratosphere/ResourceProperties/CloudTrailTrailDataResource.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudTrailTrailDataResource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudTrailTrailDataResource.hs
@@ -25,13 +25,6 @@
     , fmap (("Values",) . toJSON) _cloudTrailTrailDataResourceValues
     ]
 
-instance FromJSON CloudTrailTrailDataResource where
-  parseJSON (Object obj) =
-    CloudTrailTrailDataResource <$>
-      (obj .: "Type") <*>
-      (obj .:? "Values")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudTrailTrailDataResource' containing required fields
 -- as arguments.
 cloudTrailTrailDataResource
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudTrailTrailEventSelector.hs b/library-gen/Stratosphere/ResourceProperties/CloudTrailTrailEventSelector.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudTrailTrailEventSelector.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudTrailTrailEventSelector.hs
@@ -27,14 +27,6 @@
     , fmap (("ReadWriteType",) . toJSON) _cloudTrailTrailEventSelectorReadWriteType
     ]
 
-instance FromJSON CloudTrailTrailEventSelector where
-  parseJSON (Object obj) =
-    CloudTrailTrailEventSelector <$>
-      (obj .:? "DataResources") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeManagementEvents") <*>
-      (obj .:? "ReadWriteType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudTrailTrailEventSelector' containing required fields
 -- as arguments.
 cloudTrailTrailEventSelector
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmDimension.hs b/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmDimension.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmDimension.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmDimension.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _cloudWatchAlarmDimensionValue
     ]
 
-instance FromJSON CloudWatchAlarmDimension where
-  parseJSON (Object obj) =
-    CloudWatchAlarmDimension <$>
-      (obj .: "Name") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudWatchAlarmDimension' containing required fields as
 -- arguments.
 cloudWatchAlarmDimension
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetric.hs b/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetric.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetric.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetric.hs
@@ -27,14 +27,6 @@
     , fmap (("Namespace",) . toJSON) _cloudWatchAlarmMetricNamespace
     ]
 
-instance FromJSON CloudWatchAlarmMetric where
-  parseJSON (Object obj) =
-    CloudWatchAlarmMetric <$>
-      (obj .:? "Dimensions") <*>
-      (obj .:? "MetricName") <*>
-      (obj .:? "Namespace")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudWatchAlarmMetric' containing required fields as
 -- arguments.
 cloudWatchAlarmMetric
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetricDataQuery.hs b/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetricDataQuery.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetricDataQuery.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetricDataQuery.hs
@@ -31,16 +31,6 @@
     , fmap (("ReturnData",) . toJSON . fmap Bool') _cloudWatchAlarmMetricDataQueryReturnData
     ]
 
-instance FromJSON CloudWatchAlarmMetricDataQuery where
-  parseJSON (Object obj) =
-    CloudWatchAlarmMetricDataQuery <$>
-      (obj .:? "Expression") <*>
-      (obj .: "Id") <*>
-      (obj .:? "Label") <*>
-      (obj .:? "MetricStat") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ReturnData")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudWatchAlarmMetricDataQuery' containing required
 -- fields as arguments.
 cloudWatchAlarmMetricDataQuery
diff --git a/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetricStat.hs b/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetricStat.hs
--- a/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetricStat.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CloudWatchAlarmMetricStat.hs
@@ -29,15 +29,6 @@
     , fmap (("Unit",) . toJSON) _cloudWatchAlarmMetricStatUnit
     ]
 
-instance FromJSON CloudWatchAlarmMetricStat where
-  parseJSON (Object obj) =
-    CloudWatchAlarmMetricStat <$>
-      (obj .: "Metric") <*>
-      fmap (fmap unInteger') (obj .: "Period") <*>
-      (obj .: "Stat") <*>
-      (obj .:? "Unit")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudWatchAlarmMetricStat' containing required fields as
 -- arguments.
 cloudWatchAlarmMetricStat
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectArtifacts.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectArtifacts.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectArtifacts.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectArtifacts.hs
@@ -39,20 +39,6 @@
     , (Just . ("Type",) . toJSON) _codeBuildProjectArtifactsType
     ]
 
-instance FromJSON CodeBuildProjectArtifacts where
-  parseJSON (Object obj) =
-    CodeBuildProjectArtifacts <$>
-      (obj .:? "ArtifactIdentifier") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EncryptionDisabled") <*>
-      (obj .:? "Location") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "NamespaceType") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "OverrideArtifactName") <*>
-      (obj .:? "Packaging") <*>
-      (obj .:? "Path") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProjectArtifacts' containing required fields as
 -- arguments.
 codeBuildProjectArtifacts
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectCloudWatchLogsConfig.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectCloudWatchLogsConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectCloudWatchLogsConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectCloudWatchLogsConfig.hs
@@ -27,14 +27,6 @@
     , fmap (("StreamName",) . toJSON) _codeBuildProjectCloudWatchLogsConfigStreamName
     ]
 
-instance FromJSON CodeBuildProjectCloudWatchLogsConfig where
-  parseJSON (Object obj) =
-    CodeBuildProjectCloudWatchLogsConfig <$>
-      (obj .:? "GroupName") <*>
-      (obj .: "Status") <*>
-      (obj .:? "StreamName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProjectCloudWatchLogsConfig' containing
 -- required fields as arguments.
 codeBuildProjectCloudWatchLogsConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironment.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironment.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironment.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironment.hs
@@ -38,19 +38,6 @@
     , (Just . ("Type",) . toJSON) _codeBuildProjectEnvironmentType
     ]
 
-instance FromJSON CodeBuildProjectEnvironment where
-  parseJSON (Object obj) =
-    CodeBuildProjectEnvironment <$>
-      (obj .:? "Certificate") <*>
-      (obj .: "ComputeType") <*>
-      (obj .:? "EnvironmentVariables") <*>
-      (obj .: "Image") <*>
-      (obj .:? "ImagePullCredentialsType") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "PrivilegedMode") <*>
-      (obj .:? "RegistryCredential") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProjectEnvironment' containing required fields
 -- as arguments.
 codeBuildProjectEnvironment
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironmentVariable.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironmentVariable.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironmentVariable.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectEnvironmentVariable.hs
@@ -27,14 +27,6 @@
     , (Just . ("Value",) . toJSON) _codeBuildProjectEnvironmentVariableValue
     ]
 
-instance FromJSON CodeBuildProjectEnvironmentVariable where
-  parseJSON (Object obj) =
-    CodeBuildProjectEnvironmentVariable <$>
-      (obj .: "Name") <*>
-      (obj .:? "Type") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProjectEnvironmentVariable' containing required
 -- fields as arguments.
 codeBuildProjectEnvironmentVariable
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectLogsConfig.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectLogsConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectLogsConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectLogsConfig.hs
@@ -26,13 +26,6 @@
     , fmap (("S3Logs",) . toJSON) _codeBuildProjectLogsConfigS3Logs
     ]
 
-instance FromJSON CodeBuildProjectLogsConfig where
-  parseJSON (Object obj) =
-    CodeBuildProjectLogsConfig <$>
-      (obj .:? "CloudWatchLogs") <*>
-      (obj .:? "S3Logs")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProjectLogsConfig' containing required fields
 -- as arguments.
 codeBuildProjectLogsConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectCache.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectCache.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectCache.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectCache.hs
@@ -27,14 +27,6 @@
     , (Just . ("Type",) . toJSON) _codeBuildProjectProjectCacheType
     ]
 
-instance FromJSON CodeBuildProjectProjectCache where
-  parseJSON (Object obj) =
-    CodeBuildProjectProjectCache <$>
-      (obj .:? "Location") <*>
-      (obj .:? "Modes") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProjectProjectCache' containing required fields
 -- as arguments.
 codeBuildProjectProjectCache
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectTriggers.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectTriggers.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectTriggers.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectProjectTriggers.hs
@@ -23,12 +23,6 @@
     [ fmap (("Webhook",) . toJSON . fmap Bool') _codeBuildProjectProjectTriggersWebhook
     ]
 
-instance FromJSON CodeBuildProjectProjectTriggers where
-  parseJSON (Object obj) =
-    CodeBuildProjectProjectTriggers <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Webhook")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProjectProjectTriggers' containing required
 -- fields as arguments.
 codeBuildProjectProjectTriggers
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectRegistryCredential.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectRegistryCredential.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectRegistryCredential.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectRegistryCredential.hs
@@ -25,13 +25,6 @@
     , (Just . ("CredentialProvider",) . toJSON) _codeBuildProjectRegistryCredentialCredentialProvider
     ]
 
-instance FromJSON CodeBuildProjectRegistryCredential where
-  parseJSON (Object obj) =
-    CodeBuildProjectRegistryCredential <$>
-      (obj .: "Credential") <*>
-      (obj .: "CredentialProvider")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProjectRegistryCredential' containing required
 -- fields as arguments.
 codeBuildProjectRegistryCredential
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectS3LogsConfig.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectS3LogsConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectS3LogsConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectS3LogsConfig.hs
@@ -25,13 +25,6 @@
     , (Just . ("Status",) . toJSON) _codeBuildProjectS3LogsConfigStatus
     ]
 
-instance FromJSON CodeBuildProjectS3LogsConfig where
-  parseJSON (Object obj) =
-    CodeBuildProjectS3LogsConfig <$>
-      (obj .:? "Location") <*>
-      (obj .: "Status")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProjectS3LogsConfig' containing required fields
 -- as arguments.
 codeBuildProjectS3LogsConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSource.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSource.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSource.hs
@@ -37,19 +37,6 @@
     , (Just . ("Type",) . toJSON) _codeBuildProjectSourceType
     ]
 
-instance FromJSON CodeBuildProjectSource where
-  parseJSON (Object obj) =
-    CodeBuildProjectSource <$>
-      (obj .:? "Auth") <*>
-      (obj .:? "BuildSpec") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "GitCloneDepth") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "InsecureSsl") <*>
-      (obj .:? "Location") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ReportBuildStatus") <*>
-      (obj .:? "SourceIdentifier") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProjectSource' containing required fields as
 -- arguments.
 codeBuildProjectSource
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSourceAuth.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSourceAuth.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSourceAuth.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectSourceAuth.hs
@@ -25,13 +25,6 @@
     , (Just . ("Type",) . toJSON) _codeBuildProjectSourceAuthType
     ]
 
-instance FromJSON CodeBuildProjectSourceAuth where
-  parseJSON (Object obj) =
-    CodeBuildProjectSourceAuth <$>
-      (obj .:? "Resource") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProjectSourceAuth' containing required fields
 -- as arguments.
 codeBuildProjectSourceAuth
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectVpcConfig.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectVpcConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectVpcConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectVpcConfig.hs
@@ -27,14 +27,6 @@
     , fmap (("VpcId",) . toJSON) _codeBuildProjectVpcConfigVpcId
     ]
 
-instance FromJSON CodeBuildProjectVpcConfig where
-  parseJSON (Object obj) =
-    CodeBuildProjectVpcConfig <$>
-      (obj .:? "SecurityGroupIds") <*>
-      (obj .:? "Subnets") <*>
-      (obj .:? "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProjectVpcConfig' containing required fields as
 -- arguments.
 codeBuildProjectVpcConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectWebhookFilter.hs b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectWebhookFilter.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectWebhookFilter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeBuildProjectWebhookFilter.hs
@@ -27,14 +27,6 @@
     , (Just . ("Type",) . toJSON) _codeBuildProjectWebhookFilterType
     ]
 
-instance FromJSON CodeBuildProjectWebhookFilter where
-  parseJSON (Object obj) =
-    CodeBuildProjectWebhookFilter <$>
-      fmap (fmap (fmap unBool')) (obj .:? "ExcludeMatchedPattern") <*>
-      (obj .: "Pattern") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProjectWebhookFilter' containing required
 -- fields as arguments.
 codeBuildProjectWebhookFilter
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryRepositoryTrigger.hs b/library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryRepositoryTrigger.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryRepositoryTrigger.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeCommitRepositoryRepositoryTrigger.hs
@@ -32,16 +32,6 @@
     , fmap (("Name",) . toJSON) _codeCommitRepositoryRepositoryTriggerName
     ]
 
-instance FromJSON CodeCommitRepositoryRepositoryTrigger where
-  parseJSON (Object obj) =
-    CodeCommitRepositoryRepositoryTrigger <$>
-      (obj .:? "Branches") <*>
-      (obj .:? "CustomData") <*>
-      (obj .:? "DestinationArn") <*>
-      (obj .:? "Events") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeCommitRepositoryRepositoryTrigger' containing
 -- required fields as arguments.
 codeCommitRepositoryRepositoryTrigger
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentConfigMinimumHealthyHosts.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentConfigMinimumHealthyHosts.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentConfigMinimumHealthyHosts.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentConfigMinimumHealthyHosts.hs
@@ -27,13 +27,6 @@
     , (Just . ("Value",) . toJSON . fmap Integer') _codeDeployDeploymentConfigMinimumHealthyHostsValue
     ]
 
-instance FromJSON CodeDeployDeploymentConfigMinimumHealthyHosts where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentConfigMinimumHealthyHosts <$>
-      (obj .: "Type") <*>
-      fmap (fmap unInteger') (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentConfigMinimumHealthyHosts'
 -- containing required fields as arguments.
 codeDeployDeploymentConfigMinimumHealthyHosts
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAlarm.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAlarm.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAlarm.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAlarm.hs
@@ -23,12 +23,6 @@
     [ fmap (("Name",) . toJSON) _codeDeployDeploymentGroupAlarmName
     ]
 
-instance FromJSON CodeDeployDeploymentGroupAlarm where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupAlarm <$>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupAlarm' containing required
 -- fields as arguments.
 codeDeployDeploymentGroupAlarm
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAlarmConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAlarmConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAlarmConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAlarmConfiguration.hs
@@ -29,14 +29,6 @@
     , fmap (("IgnorePollAlarmFailure",) . toJSON . fmap Bool') _codeDeployDeploymentGroupAlarmConfigurationIgnorePollAlarmFailure
     ]
 
-instance FromJSON CodeDeployDeploymentGroupAlarmConfiguration where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupAlarmConfiguration <$>
-      (obj .:? "Alarms") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IgnorePollAlarmFailure")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupAlarmConfiguration' containing
 -- required fields as arguments.
 codeDeployDeploymentGroupAlarmConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAutoRollbackConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAutoRollbackConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAutoRollbackConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupAutoRollbackConfiguration.hs
@@ -27,13 +27,6 @@
     , fmap (("Events",) . toJSON) _codeDeployDeploymentGroupAutoRollbackConfigurationEvents
     ]
 
-instance FromJSON CodeDeployDeploymentGroupAutoRollbackConfiguration where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupAutoRollbackConfiguration <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      (obj .:? "Events")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupAutoRollbackConfiguration'
 -- containing required fields as arguments.
 codeDeployDeploymentGroupAutoRollbackConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeployment.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeployment.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeployment.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeployment.hs
@@ -27,14 +27,6 @@
     , (Just . ("Revision",) . toJSON) _codeDeployDeploymentGroupDeploymentRevision
     ]
 
-instance FromJSON CodeDeployDeploymentGroupDeployment where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupDeployment <$>
-      (obj .:? "Description") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IgnoreApplicationStopFailures") <*>
-      (obj .: "Revision")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupDeployment' containing required
 -- fields as arguments.
 codeDeployDeploymentGroupDeployment
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeploymentStyle.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeploymentStyle.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeploymentStyle.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupDeploymentStyle.hs
@@ -26,13 +26,6 @@
     , fmap (("DeploymentType",) . toJSON) _codeDeployDeploymentGroupDeploymentStyleDeploymentType
     ]
 
-instance FromJSON CodeDeployDeploymentGroupDeploymentStyle where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupDeploymentStyle <$>
-      (obj .:? "DeploymentOption") <*>
-      (obj .:? "DeploymentType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupDeploymentStyle' containing
 -- required fields as arguments.
 codeDeployDeploymentGroupDeploymentStyle
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagFilter.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagFilter.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagFilter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagFilter.hs
@@ -28,14 +28,6 @@
     , fmap (("Value",) . toJSON) _codeDeployDeploymentGroupEC2TagFilterValue
     ]
 
-instance FromJSON CodeDeployDeploymentGroupEC2TagFilter where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupEC2TagFilter <$>
-      (obj .:? "Key") <*>
-      (obj .:? "Type") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupEC2TagFilter' containing
 -- required fields as arguments.
 codeDeployDeploymentGroupEC2TagFilter
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagSet.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagSet.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagSet.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagSet.hs
@@ -23,12 +23,6 @@
     [ fmap (("Ec2TagSetList",) . toJSON) _codeDeployDeploymentGroupEC2TagSetEc2TagSetList
     ]
 
-instance FromJSON CodeDeployDeploymentGroupEC2TagSet where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupEC2TagSet <$>
-      (obj .:? "Ec2TagSetList")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupEC2TagSet' containing required
 -- fields as arguments.
 codeDeployDeploymentGroupEC2TagSet
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagSetListObject.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagSetListObject.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagSetListObject.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupEC2TagSetListObject.hs
@@ -25,12 +25,6 @@
     [ fmap (("Ec2TagGroup",) . toJSON) _codeDeployDeploymentGroupEC2TagSetListObjectEc2TagGroup
     ]
 
-instance FromJSON CodeDeployDeploymentGroupEC2TagSetListObject where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupEC2TagSetListObject <$>
-      (obj .:? "Ec2TagGroup")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupEC2TagSetListObject' containing
 -- required fields as arguments.
 codeDeployDeploymentGroupEC2TagSetListObject
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupELBInfo.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupELBInfo.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupELBInfo.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupELBInfo.hs
@@ -23,12 +23,6 @@
     [ fmap (("Name",) . toJSON) _codeDeployDeploymentGroupELBInfoName
     ]
 
-instance FromJSON CodeDeployDeploymentGroupELBInfo where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupELBInfo <$>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupELBInfo' containing required
 -- fields as arguments.
 codeDeployDeploymentGroupELBInfo
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupGitHubLocation.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupGitHubLocation.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupGitHubLocation.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupGitHubLocation.hs
@@ -26,13 +26,6 @@
     , (Just . ("Repository",) . toJSON) _codeDeployDeploymentGroupGitHubLocationRepository
     ]
 
-instance FromJSON CodeDeployDeploymentGroupGitHubLocation where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupGitHubLocation <$>
-      (obj .: "CommitId") <*>
-      (obj .: "Repository")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupGitHubLocation' containing
 -- required fields as arguments.
 codeDeployDeploymentGroupGitHubLocation
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupLoadBalancerInfo.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupLoadBalancerInfo.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupLoadBalancerInfo.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupLoadBalancerInfo.hs
@@ -27,13 +27,6 @@
     , fmap (("TargetGroupInfoList",) . toJSON) _codeDeployDeploymentGroupLoadBalancerInfoTargetGroupInfoList
     ]
 
-instance FromJSON CodeDeployDeploymentGroupLoadBalancerInfo where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupLoadBalancerInfo <$>
-      (obj .:? "ElbInfoList") <*>
-      (obj .:? "TargetGroupInfoList")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupLoadBalancerInfo' containing
 -- required fields as arguments.
 codeDeployDeploymentGroupLoadBalancerInfo
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesTagSet.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesTagSet.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesTagSet.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesTagSet.hs
@@ -24,12 +24,6 @@
     [ fmap (("OnPremisesTagSetList",) . toJSON) _codeDeployDeploymentGroupOnPremisesTagSetOnPremisesTagSetList
     ]
 
-instance FromJSON CodeDeployDeploymentGroupOnPremisesTagSet where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupOnPremisesTagSet <$>
-      (obj .:? "OnPremisesTagSetList")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupOnPremisesTagSet' containing
 -- required fields as arguments.
 codeDeployDeploymentGroupOnPremisesTagSet
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesTagSetListObject.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesTagSetListObject.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesTagSetListObject.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupOnPremisesTagSetListObject.hs
@@ -25,12 +25,6 @@
     [ fmap (("OnPremisesTagGroup",) . toJSON) _codeDeployDeploymentGroupOnPremisesTagSetListObjectOnPremisesTagGroup
     ]
 
-instance FromJSON CodeDeployDeploymentGroupOnPremisesTagSetListObject where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupOnPremisesTagSetListObject <$>
-      (obj .:? "OnPremisesTagGroup")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupOnPremisesTagSetListObject'
 -- containing required fields as arguments.
 codeDeployDeploymentGroupOnPremisesTagSetListObject
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupRevisionLocation.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupRevisionLocation.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupRevisionLocation.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupRevisionLocation.hs
@@ -29,14 +29,6 @@
     , fmap (("S3Location",) . toJSON) _codeDeployDeploymentGroupRevisionLocationS3Location
     ]
 
-instance FromJSON CodeDeployDeploymentGroupRevisionLocation where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupRevisionLocation <$>
-      (obj .:? "GitHubLocation") <*>
-      (obj .:? "RevisionType") <*>
-      (obj .:? "S3Location")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupRevisionLocation' containing
 -- required fields as arguments.
 codeDeployDeploymentGroupRevisionLocation
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupS3Location.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupS3Location.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupS3Location.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupS3Location.hs
@@ -31,16 +31,6 @@
     , fmap (("Version",) . toJSON) _codeDeployDeploymentGroupS3LocationVersion
     ]
 
-instance FromJSON CodeDeployDeploymentGroupS3Location where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupS3Location <$>
-      (obj .: "Bucket") <*>
-      (obj .:? "BundleType") <*>
-      (obj .:? "ETag") <*>
-      (obj .: "Key") <*>
-      (obj .:? "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupS3Location' containing required
 -- fields as arguments.
 codeDeployDeploymentGroupS3Location
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTagFilter.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTagFilter.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTagFilter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTagFilter.hs
@@ -27,14 +27,6 @@
     , fmap (("Value",) . toJSON) _codeDeployDeploymentGroupTagFilterValue
     ]
 
-instance FromJSON CodeDeployDeploymentGroupTagFilter where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupTagFilter <$>
-      (obj .:? "Key") <*>
-      (obj .:? "Type") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupTagFilter' containing required
 -- fields as arguments.
 codeDeployDeploymentGroupTagFilter
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTargetGroupInfo.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTargetGroupInfo.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTargetGroupInfo.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTargetGroupInfo.hs
@@ -24,12 +24,6 @@
     [ fmap (("Name",) . toJSON) _codeDeployDeploymentGroupTargetGroupInfoName
     ]
 
-instance FromJSON CodeDeployDeploymentGroupTargetGroupInfo where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupTargetGroupInfo <$>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupTargetGroupInfo' containing
 -- required fields as arguments.
 codeDeployDeploymentGroupTargetGroupInfo
diff --git a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTriggerConfig.hs b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTriggerConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTriggerConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodeDeployDeploymentGroupTriggerConfig.hs
@@ -28,14 +28,6 @@
     , fmap (("TriggerTargetArn",) . toJSON) _codeDeployDeploymentGroupTriggerConfigTriggerTargetArn
     ]
 
-instance FromJSON CodeDeployDeploymentGroupTriggerConfig where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroupTriggerConfig <$>
-      (obj .:? "TriggerEvents") <*>
-      (obj .:? "TriggerName") <*>
-      (obj .:? "TriggerTargetArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroupTriggerConfig' containing
 -- required fields as arguments.
 codeDeployDeploymentGroupTriggerConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeArtifactDetails.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeArtifactDetails.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeArtifactDetails.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeArtifactDetails.hs
@@ -27,13 +27,6 @@
     , (Just . ("MinimumCount",) . toJSON . fmap Integer') _codePipelineCustomActionTypeArtifactDetailsMinimumCount
     ]
 
-instance FromJSON CodePipelineCustomActionTypeArtifactDetails where
-  parseJSON (Object obj) =
-    CodePipelineCustomActionTypeArtifactDetails <$>
-      fmap (fmap unInteger') (obj .: "MaximumCount") <*>
-      fmap (fmap unInteger') (obj .: "MinimumCount")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelineCustomActionTypeArtifactDetails' containing
 -- required fields as arguments.
 codePipelineCustomActionTypeArtifactDetails
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeConfigurationProperties.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeConfigurationProperties.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeConfigurationProperties.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeConfigurationProperties.hs
@@ -37,18 +37,6 @@
     , fmap (("Type",) . toJSON) _codePipelineCustomActionTypeConfigurationPropertiesType
     ]
 
-instance FromJSON CodePipelineCustomActionTypeConfigurationProperties where
-  parseJSON (Object obj) =
-    CodePipelineCustomActionTypeConfigurationProperties <$>
-      (obj .:? "Description") <*>
-      fmap (fmap unBool') (obj .: "Key") <*>
-      (obj .: "Name") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Queryable") <*>
-      fmap (fmap unBool') (obj .: "Required") <*>
-      fmap (fmap unBool') (obj .: "Secret") <*>
-      (obj .:? "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelineCustomActionTypeConfigurationProperties'
 -- containing required fields as arguments.
 codePipelineCustomActionTypeConfigurationProperties
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeSettings.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeSettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeSettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelineCustomActionTypeSettings.hs
@@ -29,15 +29,6 @@
     , fmap (("ThirdPartyConfigurationUrl",) . toJSON) _codePipelineCustomActionTypeSettingsThirdPartyConfigurationUrl
     ]
 
-instance FromJSON CodePipelineCustomActionTypeSettings where
-  parseJSON (Object obj) =
-    CodePipelineCustomActionTypeSettings <$>
-      (obj .:? "EntityUrlTemplate") <*>
-      (obj .:? "ExecutionUrlTemplate") <*>
-      (obj .:? "RevisionUrlTemplate") <*>
-      (obj .:? "ThirdPartyConfigurationUrl")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelineCustomActionTypeSettings' containing
 -- required fields as arguments.
 codePipelineCustomActionTypeSettings
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionDeclaration.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionDeclaration.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionDeclaration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionDeclaration.hs
@@ -40,19 +40,6 @@
     , fmap (("RunOrder",) . toJSON . fmap Integer') _codePipelinePipelineActionDeclarationRunOrder
     ]
 
-instance FromJSON CodePipelinePipelineActionDeclaration where
-  parseJSON (Object obj) =
-    CodePipelinePipelineActionDeclaration <$>
-      (obj .: "ActionTypeId") <*>
-      (obj .:? "Configuration") <*>
-      (obj .:? "InputArtifacts") <*>
-      (obj .: "Name") <*>
-      (obj .:? "OutputArtifacts") <*>
-      (obj .:? "Region") <*>
-      (obj .:? "RoleArn") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "RunOrder")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelinePipelineActionDeclaration' containing
 -- required fields as arguments.
 codePipelinePipelineActionDeclaration
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionTypeId.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionTypeId.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionTypeId.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineActionTypeId.hs
@@ -29,15 +29,6 @@
     , (Just . ("Version",) . toJSON) _codePipelinePipelineActionTypeIdVersion
     ]
 
-instance FromJSON CodePipelinePipelineActionTypeId where
-  parseJSON (Object obj) =
-    CodePipelinePipelineActionTypeId <$>
-      (obj .: "Category") <*>
-      (obj .: "Owner") <*>
-      (obj .: "Provider") <*>
-      (obj .: "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelinePipelineActionTypeId' containing required
 -- fields as arguments.
 codePipelinePipelineActionTypeId
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStore.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStore.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStore.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStore.hs
@@ -27,14 +27,6 @@
     , (Just . ("Type",) . toJSON) _codePipelinePipelineArtifactStoreType
     ]
 
-instance FromJSON CodePipelinePipelineArtifactStore where
-  parseJSON (Object obj) =
-    CodePipelinePipelineArtifactStore <$>
-      (obj .:? "EncryptionKey") <*>
-      (obj .: "Location") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelinePipelineArtifactStore' containing required
 -- fields as arguments.
 codePipelinePipelineArtifactStore
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStoreMap.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStoreMap.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStoreMap.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineArtifactStoreMap.hs
@@ -25,13 +25,6 @@
     , (Just . ("Region",) . toJSON) _codePipelinePipelineArtifactStoreMapRegion
     ]
 
-instance FromJSON CodePipelinePipelineArtifactStoreMap where
-  parseJSON (Object obj) =
-    CodePipelinePipelineArtifactStoreMap <$>
-      (obj .: "ArtifactStore") <*>
-      (obj .: "Region")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelinePipelineArtifactStoreMap' containing
 -- required fields as arguments.
 codePipelinePipelineArtifactStoreMap
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineBlockerDeclaration.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineBlockerDeclaration.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineBlockerDeclaration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineBlockerDeclaration.hs
@@ -26,13 +26,6 @@
     , (Just . ("Type",) . toJSON) _codePipelinePipelineBlockerDeclarationType
     ]
 
-instance FromJSON CodePipelinePipelineBlockerDeclaration where
-  parseJSON (Object obj) =
-    CodePipelinePipelineBlockerDeclaration <$>
-      (obj .: "Name") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelinePipelineBlockerDeclaration' containing
 -- required fields as arguments.
 codePipelinePipelineBlockerDeclaration
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineEncryptionKey.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineEncryptionKey.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineEncryptionKey.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineEncryptionKey.hs
@@ -25,13 +25,6 @@
     , (Just . ("Type",) . toJSON) _codePipelinePipelineEncryptionKeyType
     ]
 
-instance FromJSON CodePipelinePipelineEncryptionKey where
-  parseJSON (Object obj) =
-    CodePipelinePipelineEncryptionKey <$>
-      (obj .: "Id") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelinePipelineEncryptionKey' containing required
 -- fields as arguments.
 codePipelinePipelineEncryptionKey
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineInputArtifact.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineInputArtifact.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineInputArtifact.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineInputArtifact.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Name",) . toJSON) _codePipelinePipelineInputArtifactName
     ]
 
-instance FromJSON CodePipelinePipelineInputArtifact where
-  parseJSON (Object obj) =
-    CodePipelinePipelineInputArtifact <$>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelinePipelineInputArtifact' containing required
 -- fields as arguments.
 codePipelinePipelineInputArtifact
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineOutputArtifact.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineOutputArtifact.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineOutputArtifact.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineOutputArtifact.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Name",) . toJSON) _codePipelinePipelineOutputArtifactName
     ]
 
-instance FromJSON CodePipelinePipelineOutputArtifact where
-  parseJSON (Object obj) =
-    CodePipelinePipelineOutputArtifact <$>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelinePipelineOutputArtifact' containing required
 -- fields as arguments.
 codePipelinePipelineOutputArtifact
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageDeclaration.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageDeclaration.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageDeclaration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageDeclaration.hs
@@ -28,14 +28,6 @@
     , (Just . ("Name",) . toJSON) _codePipelinePipelineStageDeclarationName
     ]
 
-instance FromJSON CodePipelinePipelineStageDeclaration where
-  parseJSON (Object obj) =
-    CodePipelinePipelineStageDeclaration <$>
-      (obj .: "Actions") <*>
-      (obj .:? "Blockers") <*>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelinePipelineStageDeclaration' containing
 -- required fields as arguments.
 codePipelinePipelineStageDeclaration
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageTransition.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageTransition.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageTransition.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelinePipelineStageTransition.hs
@@ -25,13 +25,6 @@
     , (Just . ("StageName",) . toJSON) _codePipelinePipelineStageTransitionStageName
     ]
 
-instance FromJSON CodePipelinePipelineStageTransition where
-  parseJSON (Object obj) =
-    CodePipelinePipelineStageTransition <$>
-      (obj .: "Reason") <*>
-      (obj .: "StageName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelinePipelineStageTransition' containing required
 -- fields as arguments.
 codePipelinePipelineStageTransition
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelineWebhookWebhookAuthConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelineWebhookWebhookAuthConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelineWebhookWebhookAuthConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelineWebhookWebhookAuthConfiguration.hs
@@ -27,13 +27,6 @@
     , fmap (("SecretToken",) . toJSON) _codePipelineWebhookWebhookAuthConfigurationSecretToken
     ]
 
-instance FromJSON CodePipelineWebhookWebhookAuthConfiguration where
-  parseJSON (Object obj) =
-    CodePipelineWebhookWebhookAuthConfiguration <$>
-      (obj .:? "AllowedIPRange") <*>
-      (obj .:? "SecretToken")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelineWebhookWebhookAuthConfiguration' containing
 -- required fields as arguments.
 codePipelineWebhookWebhookAuthConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/CodePipelineWebhookWebhookFilterRule.hs b/library-gen/Stratosphere/ResourceProperties/CodePipelineWebhookWebhookFilterRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/CodePipelineWebhookWebhookFilterRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CodePipelineWebhookWebhookFilterRule.hs
@@ -25,13 +25,6 @@
     , fmap (("MatchEquals",) . toJSON) _codePipelineWebhookWebhookFilterRuleMatchEquals
     ]
 
-instance FromJSON CodePipelineWebhookWebhookFilterRule where
-  parseJSON (Object obj) =
-    CodePipelineWebhookWebhookFilterRule <$>
-      (obj .: "JsonPath") <*>
-      (obj .:? "MatchEquals")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelineWebhookWebhookFilterRule' containing
 -- required fields as arguments.
 codePipelineWebhookWebhookFilterRule
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolCognitoIdentityProvider.hs b/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolCognitoIdentityProvider.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolCognitoIdentityProvider.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolCognitoIdentityProvider.hs
@@ -28,14 +28,6 @@
     , fmap (("ServerSideTokenCheck",) . toJSON . fmap Bool') _cognitoIdentityPoolCognitoIdentityProviderServerSideTokenCheck
     ]
 
-instance FromJSON CognitoIdentityPoolCognitoIdentityProvider where
-  parseJSON (Object obj) =
-    CognitoIdentityPoolCognitoIdentityProvider <$>
-      (obj .:? "ClientId") <*>
-      (obj .:? "ProviderName") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ServerSideTokenCheck")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoIdentityPoolCognitoIdentityProvider' containing
 -- required fields as arguments.
 cognitoIdentityPoolCognitoIdentityProvider
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolCognitoStreams.hs b/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolCognitoStreams.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolCognitoStreams.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolCognitoStreams.hs
@@ -27,14 +27,6 @@
     , fmap (("StreamingStatus",) . toJSON) _cognitoIdentityPoolCognitoStreamsStreamingStatus
     ]
 
-instance FromJSON CognitoIdentityPoolCognitoStreams where
-  parseJSON (Object obj) =
-    CognitoIdentityPoolCognitoStreams <$>
-      (obj .:? "RoleArn") <*>
-      (obj .:? "StreamName") <*>
-      (obj .:? "StreamingStatus")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoIdentityPoolCognitoStreams' containing required
 -- fields as arguments.
 cognitoIdentityPoolCognitoStreams
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolPushSync.hs b/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolPushSync.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolPushSync.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolPushSync.hs
@@ -25,13 +25,6 @@
     , fmap (("RoleArn",) . toJSON) _cognitoIdentityPoolPushSyncRoleArn
     ]
 
-instance FromJSON CognitoIdentityPoolPushSync where
-  parseJSON (Object obj) =
-    CognitoIdentityPoolPushSync <$>
-      (obj .:? "ApplicationArns") <*>
-      (obj .:? "RoleArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoIdentityPoolPushSync' containing required fields
 -- as arguments.
 cognitoIdentityPoolPushSync
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentMappingRule.hs b/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentMappingRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentMappingRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentMappingRule.hs
@@ -31,15 +31,6 @@
     , (Just . ("Value",) . toJSON) _cognitoIdentityPoolRoleAttachmentMappingRuleValue
     ]
 
-instance FromJSON CognitoIdentityPoolRoleAttachmentMappingRule where
-  parseJSON (Object obj) =
-    CognitoIdentityPoolRoleAttachmentMappingRule <$>
-      (obj .: "Claim") <*>
-      (obj .: "MatchType") <*>
-      (obj .: "RoleARN") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoIdentityPoolRoleAttachmentMappingRule' containing
 -- required fields as arguments.
 cognitoIdentityPoolRoleAttachmentMappingRule
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentRoleMapping.hs b/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentRoleMapping.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentRoleMapping.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentRoleMapping.hs
@@ -29,14 +29,6 @@
     , (Just . ("Type",) . toJSON) _cognitoIdentityPoolRoleAttachmentRoleMappingType
     ]
 
-instance FromJSON CognitoIdentityPoolRoleAttachmentRoleMapping where
-  parseJSON (Object obj) =
-    CognitoIdentityPoolRoleAttachmentRoleMapping <$>
-      (obj .:? "AmbiguousRoleResolution") <*>
-      (obj .:? "RulesConfiguration") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoIdentityPoolRoleAttachmentRoleMapping' containing
 -- required fields as arguments.
 cognitoIdentityPoolRoleAttachmentRoleMapping
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentRulesConfigurationType.hs b/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentRulesConfigurationType.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentRulesConfigurationType.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoIdentityPoolRoleAttachmentRulesConfigurationType.hs
@@ -25,12 +25,6 @@
     [ (Just . ("Rules",) . toJSON) _cognitoIdentityPoolRoleAttachmentRulesConfigurationTypeRules
     ]
 
-instance FromJSON CognitoIdentityPoolRoleAttachmentRulesConfigurationType where
-  parseJSON (Object obj) =
-    CognitoIdentityPoolRoleAttachmentRulesConfigurationType <$>
-      (obj .: "Rules")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoIdentityPoolRoleAttachmentRulesConfigurationType'
 -- containing required fields as arguments.
 cognitoIdentityPoolRoleAttachmentRulesConfigurationType
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolAdminCreateUserConfig.hs b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolAdminCreateUserConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolAdminCreateUserConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolAdminCreateUserConfig.hs
@@ -27,14 +27,6 @@
     , fmap (("UnusedAccountValidityDays",) . toJSON . fmap Double') _cognitoUserPoolAdminCreateUserConfigUnusedAccountValidityDays
     ]
 
-instance FromJSON CognitoUserPoolAdminCreateUserConfig where
-  parseJSON (Object obj) =
-    CognitoUserPoolAdminCreateUserConfig <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AllowAdminCreateUserOnly") <*>
-      (obj .:? "InviteMessageTemplate") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "UnusedAccountValidityDays")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolAdminCreateUserConfig' containing
 -- required fields as arguments.
 cognitoUserPoolAdminCreateUserConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolDeviceConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolDeviceConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolDeviceConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolDeviceConfiguration.hs
@@ -25,13 +25,6 @@
     , fmap (("DeviceOnlyRememberedOnUserPrompt",) . toJSON . fmap Bool') _cognitoUserPoolDeviceConfigurationDeviceOnlyRememberedOnUserPrompt
     ]
 
-instance FromJSON CognitoUserPoolDeviceConfiguration where
-  parseJSON (Object obj) =
-    CognitoUserPoolDeviceConfiguration <$>
-      fmap (fmap (fmap unBool')) (obj .:? "ChallengeRequiredOnNewDevice") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DeviceOnlyRememberedOnUserPrompt")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolDeviceConfiguration' containing required
 -- fields as arguments.
 cognitoUserPoolDeviceConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolEmailConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolEmailConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolEmailConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolEmailConfiguration.hs
@@ -25,13 +25,6 @@
     , fmap (("SourceArn",) . toJSON) _cognitoUserPoolEmailConfigurationSourceArn
     ]
 
-instance FromJSON CognitoUserPoolEmailConfiguration where
-  parseJSON (Object obj) =
-    CognitoUserPoolEmailConfiguration <$>
-      (obj .:? "ReplyToEmailAddress") <*>
-      (obj .:? "SourceArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolEmailConfiguration' containing required
 -- fields as arguments.
 cognitoUserPoolEmailConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolInviteMessageTemplate.hs b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolInviteMessageTemplate.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolInviteMessageTemplate.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolInviteMessageTemplate.hs
@@ -27,14 +27,6 @@
     , fmap (("SMSMessage",) . toJSON) _cognitoUserPoolInviteMessageTemplateSMSMessage
     ]
 
-instance FromJSON CognitoUserPoolInviteMessageTemplate where
-  parseJSON (Object obj) =
-    CognitoUserPoolInviteMessageTemplate <$>
-      (obj .:? "EmailMessage") <*>
-      (obj .:? "EmailSubject") <*>
-      (obj .:? "SMSMessage")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolInviteMessageTemplate' containing
 -- required fields as arguments.
 cognitoUserPoolInviteMessageTemplate
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolLambdaConfig.hs b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolLambdaConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolLambdaConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolLambdaConfig.hs
@@ -37,19 +37,6 @@
     , fmap (("VerifyAuthChallengeResponse",) . toJSON) _cognitoUserPoolLambdaConfigVerifyAuthChallengeResponse
     ]
 
-instance FromJSON CognitoUserPoolLambdaConfig where
-  parseJSON (Object obj) =
-    CognitoUserPoolLambdaConfig <$>
-      (obj .:? "CreateAuthChallenge") <*>
-      (obj .:? "CustomMessage") <*>
-      (obj .:? "DefineAuthChallenge") <*>
-      (obj .:? "PostAuthentication") <*>
-      (obj .:? "PostConfirmation") <*>
-      (obj .:? "PreAuthentication") <*>
-      (obj .:? "PreSignUp") <*>
-      (obj .:? "VerifyAuthChallengeResponse")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolLambdaConfig' containing required fields
 -- as arguments.
 cognitoUserPoolLambdaConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolNumberAttributeConstraints.hs b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolNumberAttributeConstraints.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolNumberAttributeConstraints.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolNumberAttributeConstraints.hs
@@ -26,13 +26,6 @@
     , fmap (("MinValue",) . toJSON) _cognitoUserPoolNumberAttributeConstraintsMinValue
     ]
 
-instance FromJSON CognitoUserPoolNumberAttributeConstraints where
-  parseJSON (Object obj) =
-    CognitoUserPoolNumberAttributeConstraints <$>
-      (obj .:? "MaxValue") <*>
-      (obj .:? "MinValue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolNumberAttributeConstraints' containing
 -- required fields as arguments.
 cognitoUserPoolNumberAttributeConstraints
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolPasswordPolicy.hs b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolPasswordPolicy.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolPasswordPolicy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolPasswordPolicy.hs
@@ -31,16 +31,6 @@
     , fmap (("RequireUppercase",) . toJSON . fmap Bool') _cognitoUserPoolPasswordPolicyRequireUppercase
     ]
 
-instance FromJSON CognitoUserPoolPasswordPolicy where
-  parseJSON (Object obj) =
-    CognitoUserPoolPasswordPolicy <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "MinimumLength") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "RequireLowercase") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "RequireNumbers") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "RequireSymbols") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "RequireUppercase")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolPasswordPolicy' containing required
 -- fields as arguments.
 cognitoUserPoolPasswordPolicy
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolPolicies.hs b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolPolicies.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolPolicies.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolPolicies.hs
@@ -23,12 +23,6 @@
     [ fmap (("PasswordPolicy",) . toJSON) _cognitoUserPoolPoliciesPasswordPolicy
     ]
 
-instance FromJSON CognitoUserPoolPolicies where
-  parseJSON (Object obj) =
-    CognitoUserPoolPolicies <$>
-      (obj .:? "PasswordPolicy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolPolicies' containing required fields as
 -- arguments.
 cognitoUserPoolPolicies
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolSchemaAttribute.hs b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolSchemaAttribute.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolSchemaAttribute.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolSchemaAttribute.hs
@@ -36,18 +36,6 @@
     , fmap (("StringAttributeConstraints",) . toJSON) _cognitoUserPoolSchemaAttributeStringAttributeConstraints
     ]
 
-instance FromJSON CognitoUserPoolSchemaAttribute where
-  parseJSON (Object obj) =
-    CognitoUserPoolSchemaAttribute <$>
-      (obj .:? "AttributeDataType") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DeveloperOnlyAttribute") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Mutable") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "NumberAttributeConstraints") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Required") <*>
-      (obj .:? "StringAttributeConstraints")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolSchemaAttribute' containing required
 -- fields as arguments.
 cognitoUserPoolSchemaAttribute
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolSmsConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolSmsConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolSmsConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolSmsConfiguration.hs
@@ -25,13 +25,6 @@
     , fmap (("SnsCallerArn",) . toJSON) _cognitoUserPoolSmsConfigurationSnsCallerArn
     ]
 
-instance FromJSON CognitoUserPoolSmsConfiguration where
-  parseJSON (Object obj) =
-    CognitoUserPoolSmsConfiguration <$>
-      (obj .:? "ExternalId") <*>
-      (obj .:? "SnsCallerArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolSmsConfiguration' containing required
 -- fields as arguments.
 cognitoUserPoolSmsConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolStringAttributeConstraints.hs b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolStringAttributeConstraints.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolStringAttributeConstraints.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolStringAttributeConstraints.hs
@@ -26,13 +26,6 @@
     , fmap (("MinLength",) . toJSON) _cognitoUserPoolStringAttributeConstraintsMinLength
     ]
 
-instance FromJSON CognitoUserPoolStringAttributeConstraints where
-  parseJSON (Object obj) =
-    CognitoUserPoolStringAttributeConstraints <$>
-      (obj .:? "MaxLength") <*>
-      (obj .:? "MinLength")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolStringAttributeConstraints' containing
 -- required fields as arguments.
 cognitoUserPoolStringAttributeConstraints
diff --git a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolUserAttributeType.hs b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolUserAttributeType.hs
--- a/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolUserAttributeType.hs
+++ b/library-gen/Stratosphere/ResourceProperties/CognitoUserPoolUserAttributeType.hs
@@ -25,13 +25,6 @@
     , fmap (("Value",) . toJSON) _cognitoUserPoolUserAttributeTypeValue
     ]
 
-instance FromJSON CognitoUserPoolUserAttributeType where
-  parseJSON (Object obj) =
-    CognitoUserPoolUserAttributeType <$>
-      (obj .:? "Name") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolUserAttributeType' containing required
 -- fields as arguments.
 cognitoUserPoolUserAttributeType
diff --git a/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleScope.hs b/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleScope.hs
--- a/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleScope.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleScope.hs
@@ -29,15 +29,6 @@
     , fmap (("TagValue",) . toJSON) _configConfigRuleScopeTagValue
     ]
 
-instance FromJSON ConfigConfigRuleScope where
-  parseJSON (Object obj) =
-    ConfigConfigRuleScope <$>
-      (obj .:? "ComplianceResourceId") <*>
-      (obj .:? "ComplianceResourceTypes") <*>
-      (obj .:? "TagKey") <*>
-      (obj .:? "TagValue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ConfigConfigRuleScope' containing required fields as
 -- arguments.
 configConfigRuleScope
diff --git a/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSource.hs b/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSource.hs
--- a/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSource.hs
@@ -27,14 +27,6 @@
     , (Just . ("SourceIdentifier",) . toJSON) _configConfigRuleSourceSourceIdentifier
     ]
 
-instance FromJSON ConfigConfigRuleSource where
-  parseJSON (Object obj) =
-    ConfigConfigRuleSource <$>
-      (obj .: "Owner") <*>
-      (obj .:? "SourceDetails") <*>
-      (obj .: "SourceIdentifier")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ConfigConfigRuleSource' containing required fields as
 -- arguments.
 configConfigRuleSource
diff --git a/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSourceDetail.hs b/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSourceDetail.hs
--- a/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSourceDetail.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ConfigConfigRuleSourceDetail.hs
@@ -27,14 +27,6 @@
     , (Just . ("MessageType",) . toJSON) _configConfigRuleSourceDetailMessageType
     ]
 
-instance FromJSON ConfigConfigRuleSourceDetail where
-  parseJSON (Object obj) =
-    ConfigConfigRuleSourceDetail <$>
-      (obj .: "EventSource") <*>
-      (obj .:? "MaximumExecutionFrequency") <*>
-      (obj .: "MessageType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ConfigConfigRuleSourceDetail' containing required fields
 -- as arguments.
 configConfigRuleSourceDetail
diff --git a/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationAggregatorAccountAggregationSource.hs b/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationAggregatorAccountAggregationSource.hs
--- a/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationAggregatorAccountAggregationSource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationAggregatorAccountAggregationSource.hs
@@ -29,14 +29,6 @@
     , fmap (("AwsRegions",) . toJSON) _configConfigurationAggregatorAccountAggregationSourceAwsRegions
     ]
 
-instance FromJSON ConfigConfigurationAggregatorAccountAggregationSource where
-  parseJSON (Object obj) =
-    ConfigConfigurationAggregatorAccountAggregationSource <$>
-      (obj .: "AccountIds") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "AllAwsRegions") <*>
-      (obj .:? "AwsRegions")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ConfigConfigurationAggregatorAccountAggregationSource'
 -- containing required fields as arguments.
 configConfigurationAggregatorAccountAggregationSource
diff --git a/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationAggregatorOrganizationAggregationSource.hs b/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationAggregatorOrganizationAggregationSource.hs
--- a/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationAggregatorOrganizationAggregationSource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationAggregatorOrganizationAggregationSource.hs
@@ -29,14 +29,6 @@
     , (Just . ("RoleArn",) . toJSON) _configConfigurationAggregatorOrganizationAggregationSourceRoleArn
     ]
 
-instance FromJSON ConfigConfigurationAggregatorOrganizationAggregationSource where
-  parseJSON (Object obj) =
-    ConfigConfigurationAggregatorOrganizationAggregationSource <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AllAwsRegions") <*>
-      (obj .:? "AwsRegions") <*>
-      (obj .: "RoleArn")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ConfigConfigurationAggregatorOrganizationAggregationSource' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationRecorderRecordingGroup.hs b/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationRecorderRecordingGroup.hs
--- a/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationRecorderRecordingGroup.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ConfigConfigurationRecorderRecordingGroup.hs
@@ -28,14 +28,6 @@
     , fmap (("ResourceTypes",) . toJSON) _configConfigurationRecorderRecordingGroupResourceTypes
     ]
 
-instance FromJSON ConfigConfigurationRecorderRecordingGroup where
-  parseJSON (Object obj) =
-    ConfigConfigurationRecorderRecordingGroup <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AllSupported") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeGlobalResourceTypes") <*>
-      (obj .:? "ResourceTypes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ConfigConfigurationRecorderRecordingGroup' containing
 -- required fields as arguments.
 configConfigurationRecorderRecordingGroup
diff --git a/library-gen/Stratosphere/ResourceProperties/ConfigDeliveryChannelConfigSnapshotDeliveryProperties.hs b/library-gen/Stratosphere/ResourceProperties/ConfigDeliveryChannelConfigSnapshotDeliveryProperties.hs
--- a/library-gen/Stratosphere/ResourceProperties/ConfigDeliveryChannelConfigSnapshotDeliveryProperties.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ConfigDeliveryChannelConfigSnapshotDeliveryProperties.hs
@@ -25,12 +25,6 @@
     [ fmap (("DeliveryFrequency",) . toJSON) _configDeliveryChannelConfigSnapshotDeliveryPropertiesDeliveryFrequency
     ]
 
-instance FromJSON ConfigDeliveryChannelConfigSnapshotDeliveryProperties where
-  parseJSON (Object obj) =
-    ConfigDeliveryChannelConfigSnapshotDeliveryProperties <$>
-      (obj .:? "DeliveryFrequency")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ConfigDeliveryChannelConfigSnapshotDeliveryProperties'
 -- containing required fields as arguments.
 configDeliveryChannelConfigSnapshotDeliveryProperties
diff --git a/library-gen/Stratosphere/ResourceProperties/DAXClusterSSESpecification.hs b/library-gen/Stratosphere/ResourceProperties/DAXClusterSSESpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/DAXClusterSSESpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DAXClusterSSESpecification.hs
@@ -23,12 +23,6 @@
     [ fmap (("SSEEnabled",) . toJSON . fmap Bool') _dAXClusterSSESpecificationSSEEnabled
     ]
 
-instance FromJSON DAXClusterSSESpecification where
-  parseJSON (Object obj) =
-    DAXClusterSSESpecification <$>
-      fmap (fmap (fmap unBool')) (obj .:? "SSEEnabled")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DAXClusterSSESpecification' containing required fields
 -- as arguments.
 daxClusterSSESpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyCreateRule.hs b/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyCreateRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyCreateRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyCreateRule.hs
@@ -27,14 +27,6 @@
     , fmap (("Times",) . toJSON) _dLMLifecyclePolicyCreateRuleTimes
     ]
 
-instance FromJSON DLMLifecyclePolicyCreateRule where
-  parseJSON (Object obj) =
-    DLMLifecyclePolicyCreateRule <$>
-      fmap (fmap unInteger') (obj .: "Interval") <*>
-      (obj .: "IntervalUnit") <*>
-      (obj .:? "Times")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DLMLifecyclePolicyCreateRule' containing required fields
 -- as arguments.
 dlmLifecyclePolicyCreateRule
diff --git a/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyPolicyDetails.hs b/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyPolicyDetails.hs
--- a/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyPolicyDetails.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyPolicyDetails.hs
@@ -28,14 +28,6 @@
     , fmap (("TargetTags",) . toJSON) _dLMLifecyclePolicyPolicyDetailsTargetTags
     ]
 
-instance FromJSON DLMLifecyclePolicyPolicyDetails where
-  parseJSON (Object obj) =
-    DLMLifecyclePolicyPolicyDetails <$>
-      (obj .:? "ResourceTypes") <*>
-      (obj .:? "Schedules") <*>
-      (obj .:? "TargetTags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DLMLifecyclePolicyPolicyDetails' containing required
 -- fields as arguments.
 dlmLifecyclePolicyPolicyDetails
diff --git a/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyRetainRule.hs b/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyRetainRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyRetainRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicyRetainRule.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Count",) . toJSON . fmap Integer') _dLMLifecyclePolicyRetainRuleCount
     ]
 
-instance FromJSON DLMLifecyclePolicyRetainRule where
-  parseJSON (Object obj) =
-    DLMLifecyclePolicyRetainRule <$>
-      fmap (fmap unInteger') (obj .: "Count")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DLMLifecyclePolicyRetainRule' containing required fields
 -- as arguments.
 dlmLifecyclePolicyRetainRule
diff --git a/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicySchedule.hs b/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicySchedule.hs
--- a/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicySchedule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DLMLifecyclePolicySchedule.hs
@@ -33,16 +33,6 @@
     , fmap (("TagsToAdd",) . toJSON) _dLMLifecyclePolicyScheduleTagsToAdd
     ]
 
-instance FromJSON DLMLifecyclePolicySchedule where
-  parseJSON (Object obj) =
-    DLMLifecyclePolicySchedule <$>
-      fmap (fmap (fmap unBool')) (obj .:? "CopyTags") <*>
-      (obj .:? "CreateRule") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "RetainRule") <*>
-      (obj .:? "TagsToAdd")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DLMLifecyclePolicySchedule' containing required fields
 -- as arguments.
 dlmLifecyclePolicySchedule
diff --git a/library-gen/Stratosphere/ResourceProperties/DMSEndpointDynamoDbSettings.hs b/library-gen/Stratosphere/ResourceProperties/DMSEndpointDynamoDbSettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/DMSEndpointDynamoDbSettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DMSEndpointDynamoDbSettings.hs
@@ -23,12 +23,6 @@
     [ fmap (("ServiceAccessRoleArn",) . toJSON) _dMSEndpointDynamoDbSettingsServiceAccessRoleArn
     ]
 
-instance FromJSON DMSEndpointDynamoDbSettings where
-  parseJSON (Object obj) =
-    DMSEndpointDynamoDbSettings <$>
-      (obj .:? "ServiceAccessRoleArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DMSEndpointDynamoDbSettings' containing required fields
 -- as arguments.
 dmsEndpointDynamoDbSettings
diff --git a/library-gen/Stratosphere/ResourceProperties/DMSEndpointElasticsearchSettings.hs b/library-gen/Stratosphere/ResourceProperties/DMSEndpointElasticsearchSettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/DMSEndpointElasticsearchSettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DMSEndpointElasticsearchSettings.hs
@@ -29,15 +29,6 @@
     , fmap (("ServiceAccessRoleArn",) . toJSON) _dMSEndpointElasticsearchSettingsServiceAccessRoleArn
     ]
 
-instance FromJSON DMSEndpointElasticsearchSettings where
-  parseJSON (Object obj) =
-    DMSEndpointElasticsearchSettings <$>
-      (obj .:? "EndpointUri") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ErrorRetryDuration") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "FullLoadErrorPercentage") <*>
-      (obj .:? "ServiceAccessRoleArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DMSEndpointElasticsearchSettings' containing required
 -- fields as arguments.
 dmsEndpointElasticsearchSettings
diff --git a/library-gen/Stratosphere/ResourceProperties/DMSEndpointKinesisSettings.hs b/library-gen/Stratosphere/ResourceProperties/DMSEndpointKinesisSettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/DMSEndpointKinesisSettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DMSEndpointKinesisSettings.hs
@@ -27,14 +27,6 @@
     , fmap (("StreamArn",) . toJSON) _dMSEndpointKinesisSettingsStreamArn
     ]
 
-instance FromJSON DMSEndpointKinesisSettings where
-  parseJSON (Object obj) =
-    DMSEndpointKinesisSettings <$>
-      (obj .:? "MessageFormat") <*>
-      (obj .:? "ServiceAccessRoleArn") <*>
-      (obj .:? "StreamArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DMSEndpointKinesisSettings' containing required fields
 -- as arguments.
 dmsEndpointKinesisSettings
diff --git a/library-gen/Stratosphere/ResourceProperties/DMSEndpointMongoDbSettings.hs b/library-gen/Stratosphere/ResourceProperties/DMSEndpointMongoDbSettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/DMSEndpointMongoDbSettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DMSEndpointMongoDbSettings.hs
@@ -43,22 +43,6 @@
     , fmap (("Username",) . toJSON) _dMSEndpointMongoDbSettingsUsername
     ]
 
-instance FromJSON DMSEndpointMongoDbSettings where
-  parseJSON (Object obj) =
-    DMSEndpointMongoDbSettings <$>
-      (obj .:? "AuthMechanism") <*>
-      (obj .:? "AuthSource") <*>
-      (obj .:? "AuthType") <*>
-      (obj .:? "DatabaseName") <*>
-      (obj .:? "DocsToInvestigate") <*>
-      (obj .:? "ExtractDocId") <*>
-      (obj .:? "NestingLevel") <*>
-      (obj .:? "Password") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Port") <*>
-      (obj .:? "ServerName") <*>
-      (obj .:? "Username")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DMSEndpointMongoDbSettings' containing required fields
 -- as arguments.
 dmsEndpointMongoDbSettings
diff --git a/library-gen/Stratosphere/ResourceProperties/DMSEndpointS3Settings.hs b/library-gen/Stratosphere/ResourceProperties/DMSEndpointS3Settings.hs
--- a/library-gen/Stratosphere/ResourceProperties/DMSEndpointS3Settings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DMSEndpointS3Settings.hs
@@ -35,18 +35,6 @@
     , fmap (("ServiceAccessRoleArn",) . toJSON) _dMSEndpointS3SettingsServiceAccessRoleArn
     ]
 
-instance FromJSON DMSEndpointS3Settings where
-  parseJSON (Object obj) =
-    DMSEndpointS3Settings <$>
-      (obj .:? "BucketFolder") <*>
-      (obj .:? "BucketName") <*>
-      (obj .:? "CompressionType") <*>
-      (obj .:? "CsvDelimiter") <*>
-      (obj .:? "CsvRowDelimiter") <*>
-      (obj .:? "ExternalTableDefinition") <*>
-      (obj .:? "ServiceAccessRoleArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DMSEndpointS3Settings' containing required fields as
 -- arguments.
 dmsEndpointS3Settings
diff --git a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineField.hs b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineField.hs
--- a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineField.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineField.hs
@@ -27,14 +27,6 @@
     , fmap (("StringValue",) . toJSON) _dataPipelinePipelineFieldStringValue
     ]
 
-instance FromJSON DataPipelinePipelineField where
-  parseJSON (Object obj) =
-    DataPipelinePipelineField <$>
-      (obj .: "Key") <*>
-      (obj .:? "RefValue") <*>
-      (obj .:? "StringValue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DataPipelinePipelineField' containing required fields as
 -- arguments.
 dataPipelinePipelineField
diff --git a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterAttribute.hs b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterAttribute.hs
--- a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterAttribute.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterAttribute.hs
@@ -26,13 +26,6 @@
     , (Just . ("StringValue",) . toJSON) _dataPipelinePipelineParameterAttributeStringValue
     ]
 
-instance FromJSON DataPipelinePipelineParameterAttribute where
-  parseJSON (Object obj) =
-    DataPipelinePipelineParameterAttribute <$>
-      (obj .: "Key") <*>
-      (obj .: "StringValue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DataPipelinePipelineParameterAttribute' containing
 -- required fields as arguments.
 dataPipelinePipelineParameterAttribute
diff --git a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterObject.hs b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterObject.hs
--- a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterObject.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterObject.hs
@@ -25,13 +25,6 @@
     , (Just . ("Id",) . toJSON) _dataPipelinePipelineParameterObjectId
     ]
 
-instance FromJSON DataPipelinePipelineParameterObject where
-  parseJSON (Object obj) =
-    DataPipelinePipelineParameterObject <$>
-      (obj .: "Attributes") <*>
-      (obj .: "Id")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DataPipelinePipelineParameterObject' containing required
 -- fields as arguments.
 dataPipelinePipelineParameterObject
diff --git a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterValue.hs b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterValue.hs
--- a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterValue.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelineParameterValue.hs
@@ -25,13 +25,6 @@
     , (Just . ("StringValue",) . toJSON) _dataPipelinePipelineParameterValueStringValue
     ]
 
-instance FromJSON DataPipelinePipelineParameterValue where
-  parseJSON (Object obj) =
-    DataPipelinePipelineParameterValue <$>
-      (obj .: "Id") <*>
-      (obj .: "StringValue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DataPipelinePipelineParameterValue' containing required
 -- fields as arguments.
 dataPipelinePipelineParameterValue
diff --git a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineObject.hs b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineObject.hs
--- a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineObject.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineObject.hs
@@ -27,14 +27,6 @@
     , (Just . ("Name",) . toJSON) _dataPipelinePipelinePipelineObjectName
     ]
 
-instance FromJSON DataPipelinePipelinePipelineObject where
-  parseJSON (Object obj) =
-    DataPipelinePipelinePipelineObject <$>
-      (obj .: "Fields") <*>
-      (obj .: "Id") <*>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DataPipelinePipelinePipelineObject' containing required
 -- fields as arguments.
 dataPipelinePipelinePipelineObject
diff --git a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineTag.hs b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineTag.hs
--- a/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineTag.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DataPipelinePipelinePipelineTag.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _dataPipelinePipelinePipelineTagValue
     ]
 
-instance FromJSON DataPipelinePipelinePipelineTag where
-  parseJSON (Object obj) =
-    DataPipelinePipelinePipelineTag <$>
-      (obj .: "Key") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DataPipelinePipelinePipelineTag' containing required
 -- fields as arguments.
 dataPipelinePipelinePipelineTag
diff --git a/library-gen/Stratosphere/ResourceProperties/DirectoryServiceMicrosoftADVpcSettings.hs b/library-gen/Stratosphere/ResourceProperties/DirectoryServiceMicrosoftADVpcSettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/DirectoryServiceMicrosoftADVpcSettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DirectoryServiceMicrosoftADVpcSettings.hs
@@ -26,13 +26,6 @@
     , (Just . ("VpcId",) . toJSON) _directoryServiceMicrosoftADVpcSettingsVpcId
     ]
 
-instance FromJSON DirectoryServiceMicrosoftADVpcSettings where
-  parseJSON (Object obj) =
-    DirectoryServiceMicrosoftADVpcSettings <$>
-      (obj .: "SubnetIds") <*>
-      (obj .: "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DirectoryServiceMicrosoftADVpcSettings' containing
 -- required fields as arguments.
 directoryServiceMicrosoftADVpcSettings
diff --git a/library-gen/Stratosphere/ResourceProperties/DirectoryServiceSimpleADVpcSettings.hs b/library-gen/Stratosphere/ResourceProperties/DirectoryServiceSimpleADVpcSettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/DirectoryServiceSimpleADVpcSettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DirectoryServiceSimpleADVpcSettings.hs
@@ -25,13 +25,6 @@
     , (Just . ("VpcId",) . toJSON) _directoryServiceSimpleADVpcSettingsVpcId
     ]
 
-instance FromJSON DirectoryServiceSimpleADVpcSettings where
-  parseJSON (Object obj) =
-    DirectoryServiceSimpleADVpcSettings <$>
-      (obj .: "SubnetIds") <*>
-      (obj .: "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DirectoryServiceSimpleADVpcSettings' containing required
 -- fields as arguments.
 directoryServiceSimpleADVpcSettings
diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableAttributeDefinition.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableAttributeDefinition.hs
--- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableAttributeDefinition.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableAttributeDefinition.hs
@@ -25,13 +25,6 @@
     , (Just . ("AttributeType",) . toJSON) _dynamoDBTableAttributeDefinitionAttributeType
     ]
 
-instance FromJSON DynamoDBTableAttributeDefinition where
-  parseJSON (Object obj) =
-    DynamoDBTableAttributeDefinition <$>
-      (obj .: "AttributeName") <*>
-      (obj .: "AttributeType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DynamoDBTableAttributeDefinition' containing required
 -- fields as arguments.
 dynamoDBTableAttributeDefinition
diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableGlobalSecondaryIndex.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableGlobalSecondaryIndex.hs
--- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableGlobalSecondaryIndex.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableGlobalSecondaryIndex.hs
@@ -31,15 +31,6 @@
     , fmap (("ProvisionedThroughput",) . toJSON) _dynamoDBTableGlobalSecondaryIndexProvisionedThroughput
     ]
 
-instance FromJSON DynamoDBTableGlobalSecondaryIndex where
-  parseJSON (Object obj) =
-    DynamoDBTableGlobalSecondaryIndex <$>
-      (obj .: "IndexName") <*>
-      (obj .: "KeySchema") <*>
-      (obj .: "Projection") <*>
-      (obj .:? "ProvisionedThroughput")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DynamoDBTableGlobalSecondaryIndex' containing required
 -- fields as arguments.
 dynamoDBTableGlobalSecondaryIndex
diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableKeySchema.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableKeySchema.hs
--- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableKeySchema.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableKeySchema.hs
@@ -25,13 +25,6 @@
     , (Just . ("KeyType",) . toJSON) _dynamoDBTableKeySchemaKeyType
     ]
 
-instance FromJSON DynamoDBTableKeySchema where
-  parseJSON (Object obj) =
-    DynamoDBTableKeySchema <$>
-      (obj .: "AttributeName") <*>
-      (obj .: "KeyType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DynamoDBTableKeySchema' containing required fields as
 -- arguments.
 dynamoDBTableKeySchema
diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableLocalSecondaryIndex.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableLocalSecondaryIndex.hs
--- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableLocalSecondaryIndex.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableLocalSecondaryIndex.hs
@@ -28,14 +28,6 @@
     , (Just . ("Projection",) . toJSON) _dynamoDBTableLocalSecondaryIndexProjection
     ]
 
-instance FromJSON DynamoDBTableLocalSecondaryIndex where
-  parseJSON (Object obj) =
-    DynamoDBTableLocalSecondaryIndex <$>
-      (obj .: "IndexName") <*>
-      (obj .: "KeySchema") <*>
-      (obj .: "Projection")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DynamoDBTableLocalSecondaryIndex' containing required
 -- fields as arguments.
 dynamoDBTableLocalSecondaryIndex
diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTablePointInTimeRecoverySpecification.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTablePointInTimeRecoverySpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTablePointInTimeRecoverySpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTablePointInTimeRecoverySpecification.hs
@@ -25,12 +25,6 @@
     [ fmap (("PointInTimeRecoveryEnabled",) . toJSON . fmap Bool') _dynamoDBTablePointInTimeRecoverySpecificationPointInTimeRecoveryEnabled
     ]
 
-instance FromJSON DynamoDBTablePointInTimeRecoverySpecification where
-  parseJSON (Object obj) =
-    DynamoDBTablePointInTimeRecoverySpecification <$>
-      fmap (fmap (fmap unBool')) (obj .:? "PointInTimeRecoveryEnabled")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DynamoDBTablePointInTimeRecoverySpecification'
 -- containing required fields as arguments.
 dynamoDBTablePointInTimeRecoverySpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProjection.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProjection.hs
--- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProjection.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProjection.hs
@@ -25,13 +25,6 @@
     , fmap (("ProjectionType",) . toJSON) _dynamoDBTableProjectionProjectionType
     ]
 
-instance FromJSON DynamoDBTableProjection where
-  parseJSON (Object obj) =
-    DynamoDBTableProjection <$>
-      (obj .:? "NonKeyAttributes") <*>
-      (obj .:? "ProjectionType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DynamoDBTableProjection' containing required fields as
 -- arguments.
 dynamoDBTableProjection
diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProvisionedThroughput.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProvisionedThroughput.hs
--- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProvisionedThroughput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableProvisionedThroughput.hs
@@ -25,13 +25,6 @@
     , (Just . ("WriteCapacityUnits",) . toJSON . fmap Integer') _dynamoDBTableProvisionedThroughputWriteCapacityUnits
     ]
 
-instance FromJSON DynamoDBTableProvisionedThroughput where
-  parseJSON (Object obj) =
-    DynamoDBTableProvisionedThroughput <$>
-      fmap (fmap unInteger') (obj .: "ReadCapacityUnits") <*>
-      fmap (fmap unInteger') (obj .: "WriteCapacityUnits")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DynamoDBTableProvisionedThroughput' containing required
 -- fields as arguments.
 dynamoDBTableProvisionedThroughput
diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableSSESpecification.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableSSESpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableSSESpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableSSESpecification.hs
@@ -23,12 +23,6 @@
     [ (Just . ("SSEEnabled",) . toJSON . fmap Bool') _dynamoDBTableSSESpecificationSSEEnabled
     ]
 
-instance FromJSON DynamoDBTableSSESpecification where
-  parseJSON (Object obj) =
-    DynamoDBTableSSESpecification <$>
-      fmap (fmap unBool') (obj .: "SSEEnabled")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DynamoDBTableSSESpecification' containing required
 -- fields as arguments.
 dynamoDBTableSSESpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableStreamSpecification.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableStreamSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableStreamSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableStreamSpecification.hs
@@ -23,12 +23,6 @@
     [ (Just . ("StreamViewType",) . toJSON) _dynamoDBTableStreamSpecificationStreamViewType
     ]
 
-instance FromJSON DynamoDBTableStreamSpecification where
-  parseJSON (Object obj) =
-    DynamoDBTableStreamSpecification <$>
-      (obj .: "StreamViewType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DynamoDBTableStreamSpecification' containing required
 -- fields as arguments.
 dynamoDBTableStreamSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableTimeToLiveSpecification.hs b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableTimeToLiveSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/DynamoDBTableTimeToLiveSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/DynamoDBTableTimeToLiveSpecification.hs
@@ -25,13 +25,6 @@
     , (Just . ("Enabled",) . toJSON . fmap Bool') _dynamoDBTableTimeToLiveSpecificationEnabled
     ]
 
-instance FromJSON DynamoDBTableTimeToLiveSpecification where
-  parseJSON (Object obj) =
-    DynamoDBTableTimeToLiveSpecification <$>
-      (obj .: "AttributeName") <*>
-      fmap (fmap unBool') (obj .: "Enabled")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DynamoDBTableTimeToLiveSpecification' containing
 -- required fields as arguments.
 dynamoDBTableTimeToLiveSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateConfigRequest.hs b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateConfigRequest.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateConfigRequest.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateConfigRequest.hs
@@ -28,13 +28,6 @@
     , fmap (("Overrides",) . toJSON) _eC2EC2FleetFleetLaunchTemplateConfigRequestOverrides
     ]
 
-instance FromJSON EC2EC2FleetFleetLaunchTemplateConfigRequest where
-  parseJSON (Object obj) =
-    EC2EC2FleetFleetLaunchTemplateConfigRequest <$>
-      (obj .:? "LaunchTemplateSpecification") <*>
-      (obj .:? "Overrides")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2EC2FleetFleetLaunchTemplateConfigRequest' containing
 -- required fields as arguments.
 ec2EC2FleetFleetLaunchTemplateConfigRequest
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateOverridesRequest.hs b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateOverridesRequest.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateOverridesRequest.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateOverridesRequest.hs
@@ -35,17 +35,6 @@
     , fmap (("WeightedCapacity",) . toJSON . fmap Double') _eC2EC2FleetFleetLaunchTemplateOverridesRequestWeightedCapacity
     ]
 
-instance FromJSON EC2EC2FleetFleetLaunchTemplateOverridesRequest where
-  parseJSON (Object obj) =
-    EC2EC2FleetFleetLaunchTemplateOverridesRequest <$>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .:? "InstanceType") <*>
-      (obj .:? "MaxPrice") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "Priority") <*>
-      (obj .:? "SubnetId") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "WeightedCapacity")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2EC2FleetFleetLaunchTemplateOverridesRequest'
 -- containing required fields as arguments.
 ec2EC2FleetFleetLaunchTemplateOverridesRequest
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateSpecificationRequest.hs b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateSpecificationRequest.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateSpecificationRequest.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetFleetLaunchTemplateSpecificationRequest.hs
@@ -29,14 +29,6 @@
     , fmap (("Version",) . toJSON) _eC2EC2FleetFleetLaunchTemplateSpecificationRequestVersion
     ]
 
-instance FromJSON EC2EC2FleetFleetLaunchTemplateSpecificationRequest where
-  parseJSON (Object obj) =
-    EC2EC2FleetFleetLaunchTemplateSpecificationRequest <$>
-      (obj .:? "LaunchTemplateId") <*>
-      (obj .:? "LaunchTemplateName") <*>
-      (obj .:? "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2EC2FleetFleetLaunchTemplateSpecificationRequest'
 -- containing required fields as arguments.
 ec2EC2FleetFleetLaunchTemplateSpecificationRequest
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetOnDemandOptionsRequest.hs b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetOnDemandOptionsRequest.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetOnDemandOptionsRequest.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetOnDemandOptionsRequest.hs
@@ -23,12 +23,6 @@
     [ fmap (("AllocationStrategy",) . toJSON) _eC2EC2FleetOnDemandOptionsRequestAllocationStrategy
     ]
 
-instance FromJSON EC2EC2FleetOnDemandOptionsRequest where
-  parseJSON (Object obj) =
-    EC2EC2FleetOnDemandOptionsRequest <$>
-      (obj .:? "AllocationStrategy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2EC2FleetOnDemandOptionsRequest' containing required
 -- fields as arguments.
 ec2EC2FleetOnDemandOptionsRequest
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetSpotOptionsRequest.hs b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetSpotOptionsRequest.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetSpotOptionsRequest.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetSpotOptionsRequest.hs
@@ -27,14 +27,6 @@
     , fmap (("InstancePoolsToUseCount",) . toJSON . fmap Integer') _eC2EC2FleetSpotOptionsRequestInstancePoolsToUseCount
     ]
 
-instance FromJSON EC2EC2FleetSpotOptionsRequest where
-  parseJSON (Object obj) =
-    EC2EC2FleetSpotOptionsRequest <$>
-      (obj .:? "AllocationStrategy") <*>
-      (obj .:? "InstanceInterruptionBehavior") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "InstancePoolsToUseCount")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2EC2FleetSpotOptionsRequest' containing required
 -- fields as arguments.
 ec2EC2FleetSpotOptionsRequest
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTagRequest.hs b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTagRequest.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTagRequest.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTagRequest.hs
@@ -25,13 +25,6 @@
     , fmap (("Value",) . toJSON) _eC2EC2FleetTagRequestValue
     ]
 
-instance FromJSON EC2EC2FleetTagRequest where
-  parseJSON (Object obj) =
-    EC2EC2FleetTagRequest <$>
-      (obj .:? "Key") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2EC2FleetTagRequest' containing required fields as
 -- arguments.
 ec2EC2FleetTagRequest
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTagSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTagSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTagSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTagSpecification.hs
@@ -25,13 +25,6 @@
     , fmap (("Tags",) . toJSON) _eC2EC2FleetTagSpecificationTags
     ]
 
-instance FromJSON EC2EC2FleetTagSpecification where
-  parseJSON (Object obj) =
-    EC2EC2FleetTagSpecification <$>
-      (obj .:? "ResourceType") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2EC2FleetTagSpecification' containing required fields
 -- as arguments.
 ec2EC2FleetTagSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTargetCapacitySpecificationRequest.hs b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTargetCapacitySpecificationRequest.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTargetCapacitySpecificationRequest.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2EC2FleetTargetCapacitySpecificationRequest.hs
@@ -31,15 +31,6 @@
     , (Just . ("TotalTargetCapacity",) . toJSON . fmap Integer') _eC2EC2FleetTargetCapacitySpecificationRequestTotalTargetCapacity
     ]
 
-instance FromJSON EC2EC2FleetTargetCapacitySpecificationRequest where
-  parseJSON (Object obj) =
-    EC2EC2FleetTargetCapacitySpecificationRequest <$>
-      (obj .:? "DefaultTargetCapacityType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "OnDemandTargetCapacity") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SpotTargetCapacity") <*>
-      fmap (fmap unInteger') (obj .: "TotalTargetCapacity")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2EC2FleetTargetCapacitySpecificationRequest'
 -- containing required fields as arguments.
 ec2EC2FleetTargetCapacitySpecificationRequest
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceAssociationParameter.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceAssociationParameter.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceAssociationParameter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceAssociationParameter.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _eC2InstanceAssociationParameterValue
     ]
 
-instance FromJSON EC2InstanceAssociationParameter where
-  parseJSON (Object obj) =
-    EC2InstanceAssociationParameter <$>
-      (obj .: "Key") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstanceAssociationParameter' containing required
 -- fields as arguments.
 ec2InstanceAssociationParameter
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceBlockDeviceMapping.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceBlockDeviceMapping.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceBlockDeviceMapping.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceBlockDeviceMapping.hs
@@ -30,15 +30,6 @@
     , fmap (("VirtualName",) . toJSON) _eC2InstanceBlockDeviceMappingVirtualName
     ]
 
-instance FromJSON EC2InstanceBlockDeviceMapping where
-  parseJSON (Object obj) =
-    EC2InstanceBlockDeviceMapping <$>
-      (obj .: "DeviceName") <*>
-      (obj .:? "Ebs") <*>
-      (obj .:? "NoDevice") <*>
-      (obj .:? "VirtualName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstanceBlockDeviceMapping' containing required
 -- fields as arguments.
 ec2InstanceBlockDeviceMapping
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceCreditSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceCreditSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceCreditSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceCreditSpecification.hs
@@ -23,12 +23,6 @@
     [ fmap (("CPUCredits",) . toJSON) _eC2InstanceCreditSpecificationCPUCredits
     ]
 
-instance FromJSON EC2InstanceCreditSpecification where
-  parseJSON (Object obj) =
-    EC2InstanceCreditSpecification <$>
-      (obj .:? "CPUCredits")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstanceCreditSpecification' containing required
 -- fields as arguments.
 ec2InstanceCreditSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceEbs.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceEbs.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceEbs.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceEbs.hs
@@ -33,17 +33,6 @@
     , fmap (("VolumeType",) . toJSON) _eC2InstanceEbsVolumeType
     ]
 
-instance FromJSON EC2InstanceEbs where
-  parseJSON (Object obj) =
-    EC2InstanceEbs <$>
-      fmap (fmap (fmap unBool')) (obj .:? "DeleteOnTermination") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Encrypted") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Iops") <*>
-      (obj .:? "SnapshotId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "VolumeSize") <*>
-      (obj .:? "VolumeType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstanceEbs' containing required fields as arguments.
 ec2InstanceEbs
   :: EC2InstanceEbs
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceElasticGpuSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceElasticGpuSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceElasticGpuSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceElasticGpuSpecification.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Type",) . toJSON) _eC2InstanceElasticGpuSpecificationType
     ]
 
-instance FromJSON EC2InstanceElasticGpuSpecification where
-  parseJSON (Object obj) =
-    EC2InstanceElasticGpuSpecification <$>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstanceElasticGpuSpecification' containing required
 -- fields as arguments.
 ec2InstanceElasticGpuSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceElasticInferenceAccelerator.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceElasticInferenceAccelerator.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceElasticInferenceAccelerator.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceElasticInferenceAccelerator.hs
@@ -24,12 +24,6 @@
     [ (Just . ("Type",) . toJSON) _eC2InstanceElasticInferenceAcceleratorType
     ]
 
-instance FromJSON EC2InstanceElasticInferenceAccelerator where
-  parseJSON (Object obj) =
-    EC2InstanceElasticInferenceAccelerator <$>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstanceElasticInferenceAccelerator' containing
 -- required fields as arguments.
 ec2InstanceElasticInferenceAccelerator
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceInstanceIpv6Address.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceInstanceIpv6Address.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceInstanceIpv6Address.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceInstanceIpv6Address.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Ipv6Address",) . toJSON) _eC2InstanceInstanceIpv6AddressIpv6Address
     ]
 
-instance FromJSON EC2InstanceInstanceIpv6Address where
-  parseJSON (Object obj) =
-    EC2InstanceInstanceIpv6Address <$>
-      (obj .: "Ipv6Address")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstanceInstanceIpv6Address' containing required
 -- fields as arguments.
 ec2InstanceInstanceIpv6Address
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceLaunchTemplateSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceLaunchTemplateSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceLaunchTemplateSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceLaunchTemplateSpecification.hs
@@ -28,14 +28,6 @@
     , (Just . ("Version",) . toJSON) _eC2InstanceLaunchTemplateSpecificationVersion
     ]
 
-instance FromJSON EC2InstanceLaunchTemplateSpecification where
-  parseJSON (Object obj) =
-    EC2InstanceLaunchTemplateSpecification <$>
-      (obj .:? "LaunchTemplateId") <*>
-      (obj .:? "LaunchTemplateName") <*>
-      (obj .: "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstanceLaunchTemplateSpecification' containing
 -- required fields as arguments.
 ec2InstanceLaunchTemplateSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceLicenseSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceLicenseSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceLicenseSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceLicenseSpecification.hs
@@ -23,12 +23,6 @@
     [ (Just . ("LicenseConfigurationArn",) . toJSON) _eC2InstanceLicenseSpecificationLicenseConfigurationArn
     ]
 
-instance FromJSON EC2InstanceLicenseSpecification where
-  parseJSON (Object obj) =
-    EC2InstanceLicenseSpecification <$>
-      (obj .: "LicenseConfigurationArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstanceLicenseSpecification' containing required
 -- fields as arguments.
 ec2InstanceLicenseSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceNetworkInterface.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceNetworkInterface.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceNetworkInterface.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceNetworkInterface.hs
@@ -46,23 +46,6 @@
     , fmap (("SubnetId",) . toJSON) _eC2InstanceNetworkInterfaceSubnetId
     ]
 
-instance FromJSON EC2InstanceNetworkInterface where
-  parseJSON (Object obj) =
-    EC2InstanceNetworkInterface <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AssociatePublicIpAddress") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DeleteOnTermination") <*>
-      (obj .:? "Description") <*>
-      (obj .: "DeviceIndex") <*>
-      (obj .:? "GroupSet") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Ipv6AddressCount") <*>
-      (obj .:? "Ipv6Addresses") <*>
-      (obj .:? "NetworkInterfaceId") <*>
-      (obj .:? "PrivateIpAddress") <*>
-      (obj .:? "PrivateIpAddresses") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SecondaryPrivateIpAddressCount") <*>
-      (obj .:? "SubnetId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstanceNetworkInterface' containing required fields
 -- as arguments.
 ec2InstanceNetworkInterface
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceNoDevice.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceNoDevice.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceNoDevice.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceNoDevice.hs
@@ -19,10 +19,6 @@
 instance ToJSON EC2InstanceNoDevice where
   toJSON _ = toJSON ([] :: [String])
 
-instance FromJSON EC2InstanceNoDevice where
-  parseJSON (Array _) = return EC2InstanceNoDevice
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstanceNoDevice' containing required fields as
 -- arguments.
 ec2InstanceNoDevice
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstancePrivateIpAddressSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstancePrivateIpAddressSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstancePrivateIpAddressSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstancePrivateIpAddressSpecification.hs
@@ -26,13 +26,6 @@
     , (Just . ("PrivateIpAddress",) . toJSON) _eC2InstancePrivateIpAddressSpecificationPrivateIpAddress
     ]
 
-instance FromJSON EC2InstancePrivateIpAddressSpecification where
-  parseJSON (Object obj) =
-    EC2InstancePrivateIpAddressSpecification <$>
-      fmap (fmap unBool') (obj .: "Primary") <*>
-      (obj .: "PrivateIpAddress")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstancePrivateIpAddressSpecification' containing
 -- required fields as arguments.
 ec2InstancePrivateIpAddressSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceSsmAssociation.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceSsmAssociation.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceSsmAssociation.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceSsmAssociation.hs
@@ -25,13 +25,6 @@
     , (Just . ("DocumentName",) . toJSON) _eC2InstanceSsmAssociationDocumentName
     ]
 
-instance FromJSON EC2InstanceSsmAssociation where
-  parseJSON (Object obj) =
-    EC2InstanceSsmAssociation <$>
-      (obj .:? "AssociationParameters") <*>
-      (obj .: "DocumentName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstanceSsmAssociation' containing required fields as
 -- arguments.
 ec2InstanceSsmAssociation
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2InstanceVolume.hs b/library-gen/Stratosphere/ResourceProperties/EC2InstanceVolume.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2InstanceVolume.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2InstanceVolume.hs
@@ -25,13 +25,6 @@
     , (Just . ("VolumeId",) . toJSON) _eC2InstanceVolumeVolumeId
     ]
 
-instance FromJSON EC2InstanceVolume where
-  parseJSON (Object obj) =
-    EC2InstanceVolume <$>
-      (obj .: "Device") <*>
-      (obj .: "VolumeId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InstanceVolume' containing required fields as
 -- arguments.
 ec2InstanceVolume
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateBlockDeviceMapping.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateBlockDeviceMapping.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateBlockDeviceMapping.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateBlockDeviceMapping.hs
@@ -29,15 +29,6 @@
     , fmap (("VirtualName",) . toJSON) _eC2LaunchTemplateBlockDeviceMappingVirtualName
     ]
 
-instance FromJSON EC2LaunchTemplateBlockDeviceMapping where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateBlockDeviceMapping <$>
-      (obj .:? "DeviceName") <*>
-      (obj .:? "Ebs") <*>
-      (obj .:? "NoDevice") <*>
-      (obj .:? "VirtualName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateBlockDeviceMapping' containing required
 -- fields as arguments.
 ec2LaunchTemplateBlockDeviceMapping
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCapacityReservationSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCapacityReservationSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCapacityReservationSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCapacityReservationSpecification.hs
@@ -25,12 +25,6 @@
     [ fmap (("CapacityReservationTarget",) . toJSON) _eC2LaunchTemplateCapacityReservationSpecificationCapacityReservationTarget
     ]
 
-instance FromJSON EC2LaunchTemplateCapacityReservationSpecification where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateCapacityReservationSpecification <$>
-      (obj .:? "CapacityReservationTarget")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateCapacityReservationSpecification'
 -- containing required fields as arguments.
 ec2LaunchTemplateCapacityReservationSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCapacityReservationTarget.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCapacityReservationTarget.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCapacityReservationTarget.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCapacityReservationTarget.hs
@@ -24,12 +24,6 @@
     [ fmap (("CapacityReservationId",) . toJSON) _eC2LaunchTemplateCapacityReservationTargetCapacityReservationId
     ]
 
-instance FromJSON EC2LaunchTemplateCapacityReservationTarget where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateCapacityReservationTarget <$>
-      (obj .:? "CapacityReservationId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateCapacityReservationTarget' containing
 -- required fields as arguments.
 ec2LaunchTemplateCapacityReservationTarget
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCpuOptions.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCpuOptions.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCpuOptions.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCpuOptions.hs
@@ -25,13 +25,6 @@
     , fmap (("ThreadsPerCore",) . toJSON . fmap Integer') _eC2LaunchTemplateCpuOptionsThreadsPerCore
     ]
 
-instance FromJSON EC2LaunchTemplateCpuOptions where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateCpuOptions <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "CoreCount") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ThreadsPerCore")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateCpuOptions' containing required fields
 -- as arguments.
 ec2LaunchTemplateCpuOptions
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCreditSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCreditSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCreditSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateCreditSpecification.hs
@@ -23,12 +23,6 @@
     [ fmap (("CpuCredits",) . toJSON) _eC2LaunchTemplateCreditSpecificationCpuCredits
     ]
 
-instance FromJSON EC2LaunchTemplateCreditSpecification where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateCreditSpecification <$>
-      (obj .:? "CpuCredits")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateCreditSpecification' containing
 -- required fields as arguments.
 ec2LaunchTemplateCreditSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateEbs.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateEbs.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateEbs.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateEbs.hs
@@ -35,18 +35,6 @@
     , fmap (("VolumeType",) . toJSON) _eC2LaunchTemplateEbsVolumeType
     ]
 
-instance FromJSON EC2LaunchTemplateEbs where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateEbs <$>
-      fmap (fmap (fmap unBool')) (obj .:? "DeleteOnTermination") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Encrypted") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Iops") <*>
-      (obj .:? "KmsKeyId") <*>
-      (obj .:? "SnapshotId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "VolumeSize") <*>
-      (obj .:? "VolumeType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateEbs' containing required fields as
 -- arguments.
 ec2LaunchTemplateEbs
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateElasticGpuSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateElasticGpuSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateElasticGpuSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateElasticGpuSpecification.hs
@@ -24,12 +24,6 @@
     [ fmap (("Type",) . toJSON) _eC2LaunchTemplateElasticGpuSpecificationType
     ]
 
-instance FromJSON EC2LaunchTemplateElasticGpuSpecification where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateElasticGpuSpecification <$>
-      (obj .:? "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateElasticGpuSpecification' containing
 -- required fields as arguments.
 ec2LaunchTemplateElasticGpuSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateHibernationOptions.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateHibernationOptions.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateHibernationOptions.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateHibernationOptions.hs
@@ -23,12 +23,6 @@
     [ fmap (("Configured",) . toJSON . fmap Bool') _eC2LaunchTemplateHibernationOptionsConfigured
     ]
 
-instance FromJSON EC2LaunchTemplateHibernationOptions where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateHibernationOptions <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Configured")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateHibernationOptions' containing required
 -- fields as arguments.
 ec2LaunchTemplateHibernationOptions
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateIamInstanceProfile.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateIamInstanceProfile.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateIamInstanceProfile.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateIamInstanceProfile.hs
@@ -25,13 +25,6 @@
     , fmap (("Name",) . toJSON) _eC2LaunchTemplateIamInstanceProfileName
     ]
 
-instance FromJSON EC2LaunchTemplateIamInstanceProfile where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateIamInstanceProfile <$>
-      (obj .:? "Arn") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateIamInstanceProfile' containing required
 -- fields as arguments.
 ec2LaunchTemplateIamInstanceProfile
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateInstanceMarketOptions.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateInstanceMarketOptions.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateInstanceMarketOptions.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateInstanceMarketOptions.hs
@@ -26,13 +26,6 @@
     , fmap (("SpotOptions",) . toJSON) _eC2LaunchTemplateInstanceMarketOptionsSpotOptions
     ]
 
-instance FromJSON EC2LaunchTemplateInstanceMarketOptions where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateInstanceMarketOptions <$>
-      (obj .:? "MarketType") <*>
-      (obj .:? "SpotOptions")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateInstanceMarketOptions' containing
 -- required fields as arguments.
 ec2LaunchTemplateInstanceMarketOptions
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateIpv6Add.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateIpv6Add.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateIpv6Add.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateIpv6Add.hs
@@ -23,12 +23,6 @@
     [ fmap (("Ipv6Address",) . toJSON) _eC2LaunchTemplateIpv6AddIpv6Address
     ]
 
-instance FromJSON EC2LaunchTemplateIpv6Add where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateIpv6Add <$>
-      (obj .:? "Ipv6Address")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateIpv6Add' containing required fields as
 -- arguments.
 ec2LaunchTemplateIpv6Add
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLaunchTemplateData.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLaunchTemplateData.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLaunchTemplateData.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLaunchTemplateData.hs
@@ -84,36 +84,6 @@
     , fmap (("UserData",) . toJSON) _eC2LaunchTemplateLaunchTemplateDataUserData
     ]
 
-instance FromJSON EC2LaunchTemplateLaunchTemplateData where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateLaunchTemplateData <$>
-      (obj .:? "BlockDeviceMappings") <*>
-      (obj .:? "CapacityReservationSpecification") <*>
-      (obj .:? "CpuOptions") <*>
-      (obj .:? "CreditSpecification") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DisableApiTermination") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EbsOptimized") <*>
-      (obj .:? "ElasticGpuSpecifications") <*>
-      (obj .:? "ElasticInferenceAccelerators") <*>
-      (obj .:? "HibernationOptions") <*>
-      (obj .:? "IamInstanceProfile") <*>
-      (obj .:? "ImageId") <*>
-      (obj .:? "InstanceInitiatedShutdownBehavior") <*>
-      (obj .:? "InstanceMarketOptions") <*>
-      (obj .:? "InstanceType") <*>
-      (obj .:? "KernelId") <*>
-      (obj .:? "KeyName") <*>
-      (obj .:? "LicenseSpecifications") <*>
-      (obj .:? "Monitoring") <*>
-      (obj .:? "NetworkInterfaces") <*>
-      (obj .:? "Placement") <*>
-      (obj .:? "RamDiskId") <*>
-      (obj .:? "SecurityGroupIds") <*>
-      (obj .:? "SecurityGroups") <*>
-      (obj .:? "TagSpecifications") <*>
-      (obj .:? "UserData")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateLaunchTemplateData' containing required
 -- fields as arguments.
 ec2LaunchTemplateLaunchTemplateData
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLaunchTemplateElasticInferenceAccelerator.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLaunchTemplateElasticInferenceAccelerator.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLaunchTemplateElasticInferenceAccelerator.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLaunchTemplateElasticInferenceAccelerator.hs
@@ -25,12 +25,6 @@
     [ fmap (("Type",) . toJSON) _eC2LaunchTemplateLaunchTemplateElasticInferenceAcceleratorType
     ]
 
-instance FromJSON EC2LaunchTemplateLaunchTemplateElasticInferenceAccelerator where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateLaunchTemplateElasticInferenceAccelerator <$>
-      (obj .:? "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'EC2LaunchTemplateLaunchTemplateElasticInferenceAccelerator' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLicenseSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLicenseSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLicenseSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateLicenseSpecification.hs
@@ -24,12 +24,6 @@
     [ fmap (("LicenseConfigurationArn",) . toJSON) _eC2LaunchTemplateLicenseSpecificationLicenseConfigurationArn
     ]
 
-instance FromJSON EC2LaunchTemplateLicenseSpecification where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateLicenseSpecification <$>
-      (obj .:? "LicenseConfigurationArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateLicenseSpecification' containing
 -- required fields as arguments.
 ec2LaunchTemplateLicenseSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateMonitoring.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateMonitoring.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateMonitoring.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateMonitoring.hs
@@ -23,12 +23,6 @@
     [ fmap (("Enabled",) . toJSON . fmap Bool') _eC2LaunchTemplateMonitoringEnabled
     ]
 
-instance FromJSON EC2LaunchTemplateMonitoring where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateMonitoring <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateMonitoring' containing required fields
 -- as arguments.
 ec2LaunchTemplateMonitoring
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateNetworkInterface.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateNetworkInterface.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateNetworkInterface.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateNetworkInterface.hs
@@ -46,23 +46,6 @@
     , fmap (("SubnetId",) . toJSON) _eC2LaunchTemplateNetworkInterfaceSubnetId
     ]
 
-instance FromJSON EC2LaunchTemplateNetworkInterface where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateNetworkInterface <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AssociatePublicIpAddress") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DeleteOnTermination") <*>
-      (obj .:? "Description") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "DeviceIndex") <*>
-      (obj .:? "Groups") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Ipv6AddressCount") <*>
-      (obj .:? "Ipv6Addresses") <*>
-      (obj .:? "NetworkInterfaceId") <*>
-      (obj .:? "PrivateIpAddress") <*>
-      (obj .:? "PrivateIpAddresses") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SecondaryPrivateIpAddressCount") <*>
-      (obj .:? "SubnetId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateNetworkInterface' containing required
 -- fields as arguments.
 ec2LaunchTemplateNetworkInterface
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplatePlacement.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplatePlacement.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplatePlacement.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplatePlacement.hs
@@ -31,16 +31,6 @@
     , fmap (("Tenancy",) . toJSON) _eC2LaunchTemplatePlacementTenancy
     ]
 
-instance FromJSON EC2LaunchTemplatePlacement where
-  parseJSON (Object obj) =
-    EC2LaunchTemplatePlacement <$>
-      (obj .:? "Affinity") <*>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .:? "GroupName") <*>
-      (obj .:? "HostId") <*>
-      (obj .:? "Tenancy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplatePlacement' containing required fields
 -- as arguments.
 ec2LaunchTemplatePlacement
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplatePrivateIpAdd.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplatePrivateIpAdd.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplatePrivateIpAdd.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplatePrivateIpAdd.hs
@@ -25,13 +25,6 @@
     , fmap (("PrivateIpAddress",) . toJSON) _eC2LaunchTemplatePrivateIpAddPrivateIpAddress
     ]
 
-instance FromJSON EC2LaunchTemplatePrivateIpAdd where
-  parseJSON (Object obj) =
-    EC2LaunchTemplatePrivateIpAdd <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Primary") <*>
-      (obj .:? "PrivateIpAddress")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplatePrivateIpAdd' containing required
 -- fields as arguments.
 ec2LaunchTemplatePrivateIpAdd
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateSpotOptions.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateSpotOptions.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateSpotOptions.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateSpotOptions.hs
@@ -27,14 +27,6 @@
     , fmap (("SpotInstanceType",) . toJSON) _eC2LaunchTemplateSpotOptionsSpotInstanceType
     ]
 
-instance FromJSON EC2LaunchTemplateSpotOptions where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateSpotOptions <$>
-      (obj .:? "InstanceInterruptionBehavior") <*>
-      (obj .:? "MaxPrice") <*>
-      (obj .:? "SpotInstanceType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateSpotOptions' containing required fields
 -- as arguments.
 ec2LaunchTemplateSpotOptions
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateTagSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateTagSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateTagSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2LaunchTemplateTagSpecification.hs
@@ -25,13 +25,6 @@
     , fmap (("Tags",) . toJSON) _eC2LaunchTemplateTagSpecificationTags
     ]
 
-instance FromJSON EC2LaunchTemplateTagSpecification where
-  parseJSON (Object obj) =
-    EC2LaunchTemplateTagSpecification <$>
-      (obj .:? "ResourceType") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplateTagSpecification' containing required
 -- fields as arguments.
 ec2LaunchTemplateTagSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryIcmp.hs b/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryIcmp.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryIcmp.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryIcmp.hs
@@ -25,13 +25,6 @@
     , fmap (("Type",) . toJSON . fmap Integer') _eC2NetworkAclEntryIcmpType
     ]
 
-instance FromJSON EC2NetworkAclEntryIcmp where
-  parseJSON (Object obj) =
-    EC2NetworkAclEntryIcmp <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "Code") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2NetworkAclEntryIcmp' containing required fields as
 -- arguments.
 ec2NetworkAclEntryIcmp
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryPortRange.hs b/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryPortRange.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryPortRange.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2NetworkAclEntryPortRange.hs
@@ -25,13 +25,6 @@
     , fmap (("To",) . toJSON . fmap Integer') _eC2NetworkAclEntryPortRangeTo
     ]
 
-instance FromJSON EC2NetworkAclEntryPortRange where
-  parseJSON (Object obj) =
-    EC2NetworkAclEntryPortRange <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "From") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "To")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2NetworkAclEntryPortRange' containing required fields
 -- as arguments.
 ec2NetworkAclEntryPortRange
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfaceInstanceIpv6Address.hs b/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfaceInstanceIpv6Address.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfaceInstanceIpv6Address.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfaceInstanceIpv6Address.hs
@@ -24,12 +24,6 @@
     [ (Just . ("Ipv6Address",) . toJSON) _eC2NetworkInterfaceInstanceIpv6AddressIpv6Address
     ]
 
-instance FromJSON EC2NetworkInterfaceInstanceIpv6Address where
-  parseJSON (Object obj) =
-    EC2NetworkInterfaceInstanceIpv6Address <$>
-      (obj .: "Ipv6Address")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2NetworkInterfaceInstanceIpv6Address' containing
 -- required fields as arguments.
 ec2NetworkInterfaceInstanceIpv6Address
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfacePrivateIpAddressSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfacePrivateIpAddressSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfacePrivateIpAddressSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2NetworkInterfacePrivateIpAddressSpecification.hs
@@ -27,13 +27,6 @@
     , (Just . ("PrivateIpAddress",) . toJSON) _eC2NetworkInterfacePrivateIpAddressSpecificationPrivateIpAddress
     ]
 
-instance FromJSON EC2NetworkInterfacePrivateIpAddressSpecification where
-  parseJSON (Object obj) =
-    EC2NetworkInterfacePrivateIpAddressSpecification <$>
-      fmap (fmap unBool') (obj .: "Primary") <*>
-      (obj .: "PrivateIpAddress")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2NetworkInterfacePrivateIpAddressSpecification'
 -- containing required fields as arguments.
 ec2NetworkInterfacePrivateIpAddressSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupEgressProperty.hs b/library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupEgressProperty.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupEgressProperty.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupEgressProperty.hs
@@ -37,19 +37,6 @@
     , fmap (("ToPort",) . toJSON . fmap Integer') _eC2SecurityGroupEgressPropertyToPort
     ]
 
-instance FromJSON EC2SecurityGroupEgressProperty where
-  parseJSON (Object obj) =
-    EC2SecurityGroupEgressProperty <$>
-      (obj .:? "CidrIp") <*>
-      (obj .:? "CidrIpv6") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "DestinationPrefixListId") <*>
-      (obj .:? "DestinationSecurityGroupId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "FromPort") <*>
-      (obj .: "IpProtocol") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ToPort")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SecurityGroupEgressProperty' containing required
 -- fields as arguments.
 ec2SecurityGroupEgressProperty
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupIngressProperty.hs b/library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupIngressProperty.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupIngressProperty.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SecurityGroupIngressProperty.hs
@@ -41,21 +41,6 @@
     , fmap (("ToPort",) . toJSON . fmap Integer') _eC2SecurityGroupIngressPropertyToPort
     ]
 
-instance FromJSON EC2SecurityGroupIngressProperty where
-  parseJSON (Object obj) =
-    EC2SecurityGroupIngressProperty <$>
-      (obj .:? "CidrIp") <*>
-      (obj .:? "CidrIpv6") <*>
-      (obj .:? "Description") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "FromPort") <*>
-      (obj .: "IpProtocol") <*>
-      (obj .:? "SourcePrefixListId") <*>
-      (obj .:? "SourceSecurityGroupId") <*>
-      (obj .:? "SourceSecurityGroupName") <*>
-      (obj .:? "SourceSecurityGroupOwnerId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ToPort")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SecurityGroupIngressProperty' containing required
 -- fields as arguments.
 ec2SecurityGroupIngressProperty
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetBlockDeviceMapping.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetBlockDeviceMapping.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetBlockDeviceMapping.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetBlockDeviceMapping.hs
@@ -29,15 +29,6 @@
     , fmap (("VirtualName",) . toJSON) _eC2SpotFleetBlockDeviceMappingVirtualName
     ]
 
-instance FromJSON EC2SpotFleetBlockDeviceMapping where
-  parseJSON (Object obj) =
-    EC2SpotFleetBlockDeviceMapping <$>
-      (obj .: "DeviceName") <*>
-      (obj .:? "Ebs") <*>
-      (obj .:? "NoDevice") <*>
-      (obj .:? "VirtualName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetBlockDeviceMapping' containing required
 -- fields as arguments.
 ec2SpotFleetBlockDeviceMapping
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetClassicLoadBalancer.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetClassicLoadBalancer.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetClassicLoadBalancer.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetClassicLoadBalancer.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Name",) . toJSON) _eC2SpotFleetClassicLoadBalancerName
     ]
 
-instance FromJSON EC2SpotFleetClassicLoadBalancer where
-  parseJSON (Object obj) =
-    EC2SpotFleetClassicLoadBalancer <$>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetClassicLoadBalancer' containing required
 -- fields as arguments.
 ec2SpotFleetClassicLoadBalancer
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetClassicLoadBalancersConfig.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetClassicLoadBalancersConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetClassicLoadBalancersConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetClassicLoadBalancersConfig.hs
@@ -24,12 +24,6 @@
     [ (Just . ("ClassicLoadBalancers",) . toJSON) _eC2SpotFleetClassicLoadBalancersConfigClassicLoadBalancers
     ]
 
-instance FromJSON EC2SpotFleetClassicLoadBalancersConfig where
-  parseJSON (Object obj) =
-    EC2SpotFleetClassicLoadBalancersConfig <$>
-      (obj .: "ClassicLoadBalancers")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetClassicLoadBalancersConfig' containing
 -- required fields as arguments.
 ec2SpotFleetClassicLoadBalancersConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetEbsBlockDevice.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetEbsBlockDevice.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetEbsBlockDevice.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetEbsBlockDevice.hs
@@ -33,17 +33,6 @@
     , fmap (("VolumeType",) . toJSON) _eC2SpotFleetEbsBlockDeviceVolumeType
     ]
 
-instance FromJSON EC2SpotFleetEbsBlockDevice where
-  parseJSON (Object obj) =
-    EC2SpotFleetEbsBlockDevice <$>
-      fmap (fmap (fmap unBool')) (obj .:? "DeleteOnTermination") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Encrypted") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Iops") <*>
-      (obj .:? "SnapshotId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "VolumeSize") <*>
-      (obj .:? "VolumeType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetEbsBlockDevice' containing required fields
 -- as arguments.
 ec2SpotFleetEbsBlockDevice
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetFleetLaunchTemplateSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetFleetLaunchTemplateSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetFleetLaunchTemplateSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetFleetLaunchTemplateSpecification.hs
@@ -29,14 +29,6 @@
     , (Just . ("Version",) . toJSON) _eC2SpotFleetFleetLaunchTemplateSpecificationVersion
     ]
 
-instance FromJSON EC2SpotFleetFleetLaunchTemplateSpecification where
-  parseJSON (Object obj) =
-    EC2SpotFleetFleetLaunchTemplateSpecification <$>
-      (obj .:? "LaunchTemplateId") <*>
-      (obj .:? "LaunchTemplateName") <*>
-      (obj .: "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetFleetLaunchTemplateSpecification' containing
 -- required fields as arguments.
 ec2SpotFleetFleetLaunchTemplateSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetGroupIdentifier.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetGroupIdentifier.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetGroupIdentifier.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetGroupIdentifier.hs
@@ -23,12 +23,6 @@
     [ (Just . ("GroupId",) . toJSON) _eC2SpotFleetGroupIdentifierGroupId
     ]
 
-instance FromJSON EC2SpotFleetGroupIdentifier where
-  parseJSON (Object obj) =
-    EC2SpotFleetGroupIdentifier <$>
-      (obj .: "GroupId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetGroupIdentifier' containing required fields
 -- as arguments.
 ec2SpotFleetGroupIdentifier
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetIamInstanceProfileSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetIamInstanceProfileSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetIamInstanceProfileSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetIamInstanceProfileSpecification.hs
@@ -25,12 +25,6 @@
     [ fmap (("Arn",) . toJSON) _eC2SpotFleetIamInstanceProfileSpecificationArn
     ]
 
-instance FromJSON EC2SpotFleetIamInstanceProfileSpecification where
-  parseJSON (Object obj) =
-    EC2SpotFleetIamInstanceProfileSpecification <$>
-      (obj .:? "Arn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetIamInstanceProfileSpecification' containing
 -- required fields as arguments.
 ec2SpotFleetIamInstanceProfileSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceIpv6Address.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceIpv6Address.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceIpv6Address.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceIpv6Address.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Ipv6Address",) . toJSON) _eC2SpotFleetInstanceIpv6AddressIpv6Address
     ]
 
-instance FromJSON EC2SpotFleetInstanceIpv6Address where
-  parseJSON (Object obj) =
-    EC2SpotFleetInstanceIpv6Address <$>
-      (obj .: "Ipv6Address")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetInstanceIpv6Address' containing required
 -- fields as arguments.
 ec2SpotFleetInstanceIpv6Address
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceNetworkInterfaceSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceNetworkInterfaceSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceNetworkInterfaceSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetInstanceNetworkInterfaceSpecification.hs
@@ -46,22 +46,6 @@
     , fmap (("SubnetId",) . toJSON) _eC2SpotFleetInstanceNetworkInterfaceSpecificationSubnetId
     ]
 
-instance FromJSON EC2SpotFleetInstanceNetworkInterfaceSpecification where
-  parseJSON (Object obj) =
-    EC2SpotFleetInstanceNetworkInterfaceSpecification <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AssociatePublicIpAddress") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DeleteOnTermination") <*>
-      (obj .:? "Description") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "DeviceIndex") <*>
-      (obj .:? "Groups") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Ipv6AddressCount") <*>
-      (obj .:? "Ipv6Addresses") <*>
-      (obj .:? "NetworkInterfaceId") <*>
-      (obj .:? "PrivateIpAddresses") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SecondaryPrivateIpAddressCount") <*>
-      (obj .:? "SubnetId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetInstanceNetworkInterfaceSpecification'
 -- containing required fields as arguments.
 ec2SpotFleetInstanceNetworkInterfaceSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchTemplateConfig.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchTemplateConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchTemplateConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchTemplateConfig.hs
@@ -26,13 +26,6 @@
     , fmap (("Overrides",) . toJSON) _eC2SpotFleetLaunchTemplateConfigOverrides
     ]
 
-instance FromJSON EC2SpotFleetLaunchTemplateConfig where
-  parseJSON (Object obj) =
-    EC2SpotFleetLaunchTemplateConfig <$>
-      (obj .:? "LaunchTemplateSpecification") <*>
-      (obj .:? "Overrides")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetLaunchTemplateConfig' containing required
 -- fields as arguments.
 ec2SpotFleetLaunchTemplateConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchTemplateOverrides.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchTemplateOverrides.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchTemplateOverrides.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLaunchTemplateOverrides.hs
@@ -31,16 +31,6 @@
     , fmap (("WeightedCapacity",) . toJSON . fmap Double') _eC2SpotFleetLaunchTemplateOverridesWeightedCapacity
     ]
 
-instance FromJSON EC2SpotFleetLaunchTemplateOverrides where
-  parseJSON (Object obj) =
-    EC2SpotFleetLaunchTemplateOverrides <$>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .:? "InstanceType") <*>
-      (obj .:? "SpotPrice") <*>
-      (obj .:? "SubnetId") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "WeightedCapacity")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetLaunchTemplateOverrides' containing required
 -- fields as arguments.
 ec2SpotFleetLaunchTemplateOverrides
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLoadBalancersConfig.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLoadBalancersConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLoadBalancersConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetLoadBalancersConfig.hs
@@ -26,13 +26,6 @@
     , fmap (("TargetGroupsConfig",) . toJSON) _eC2SpotFleetLoadBalancersConfigTargetGroupsConfig
     ]
 
-instance FromJSON EC2SpotFleetLoadBalancersConfig where
-  parseJSON (Object obj) =
-    EC2SpotFleetLoadBalancersConfig <$>
-      (obj .:? "ClassicLoadBalancersConfig") <*>
-      (obj .:? "TargetGroupsConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetLoadBalancersConfig' containing required
 -- fields as arguments.
 ec2SpotFleetLoadBalancersConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPrivateIpAddressSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPrivateIpAddressSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPrivateIpAddressSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetPrivateIpAddressSpecification.hs
@@ -26,13 +26,6 @@
     , (Just . ("PrivateIpAddress",) . toJSON) _eC2SpotFleetPrivateIpAddressSpecificationPrivateIpAddress
     ]
 
-instance FromJSON EC2SpotFleetPrivateIpAddressSpecification where
-  parseJSON (Object obj) =
-    EC2SpotFleetPrivateIpAddressSpecification <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Primary") <*>
-      (obj .: "PrivateIpAddress")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetPrivateIpAddressSpecification' containing
 -- required fields as arguments.
 ec2SpotFleetPrivateIpAddressSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetLaunchSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetLaunchSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetLaunchSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetLaunchSpecification.hs
@@ -62,28 +62,6 @@
     , fmap (("WeightedCapacity",) . toJSON . fmap Double') _eC2SpotFleetSpotFleetLaunchSpecificationWeightedCapacity
     ]
 
-instance FromJSON EC2SpotFleetSpotFleetLaunchSpecification where
-  parseJSON (Object obj) =
-    EC2SpotFleetSpotFleetLaunchSpecification <$>
-      (obj .:? "BlockDeviceMappings") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EbsOptimized") <*>
-      (obj .:? "IamInstanceProfile") <*>
-      (obj .: "ImageId") <*>
-      (obj .: "InstanceType") <*>
-      (obj .:? "KernelId") <*>
-      (obj .:? "KeyName") <*>
-      (obj .:? "Monitoring") <*>
-      (obj .:? "NetworkInterfaces") <*>
-      (obj .:? "Placement") <*>
-      (obj .:? "RamdiskId") <*>
-      (obj .:? "SecurityGroups") <*>
-      (obj .:? "SpotPrice") <*>
-      (obj .:? "SubnetId") <*>
-      (obj .:? "TagSpecifications") <*>
-      (obj .:? "UserData") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "WeightedCapacity")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetSpotFleetLaunchSpecification' containing
 -- required fields as arguments.
 ec2SpotFleetSpotFleetLaunchSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetMonitoring.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetMonitoring.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetMonitoring.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetMonitoring.hs
@@ -23,12 +23,6 @@
     [ fmap (("Enabled",) . toJSON . fmap Bool') _eC2SpotFleetSpotFleetMonitoringEnabled
     ]
 
-instance FromJSON EC2SpotFleetSpotFleetMonitoring where
-  parseJSON (Object obj) =
-    EC2SpotFleetSpotFleetMonitoring <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetSpotFleetMonitoring' containing required
 -- fields as arguments.
 ec2SpotFleetSpotFleetMonitoring
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetRequestConfigData.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetRequestConfigData.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetRequestConfigData.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetRequestConfigData.hs
@@ -52,25 +52,6 @@
     , fmap (("ValidUntil",) . toJSON) _eC2SpotFleetSpotFleetRequestConfigDataValidUntil
     ]
 
-instance FromJSON EC2SpotFleetSpotFleetRequestConfigData where
-  parseJSON (Object obj) =
-    EC2SpotFleetSpotFleetRequestConfigData <$>
-      (obj .:? "AllocationStrategy") <*>
-      (obj .:? "ExcessCapacityTerminationPolicy") <*>
-      (obj .: "IamFleetRole") <*>
-      (obj .:? "InstanceInterruptionBehavior") <*>
-      (obj .:? "LaunchSpecifications") <*>
-      (obj .:? "LaunchTemplateConfigs") <*>
-      (obj .:? "LoadBalancersConfig") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ReplaceUnhealthyInstances") <*>
-      (obj .:? "SpotPrice") <*>
-      fmap (fmap unInteger') (obj .: "TargetCapacity") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "TerminateInstancesWithExpiration") <*>
-      (obj .:? "Type") <*>
-      (obj .:? "ValidFrom") <*>
-      (obj .:? "ValidUntil")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetSpotFleetRequestConfigData' containing
 -- required fields as arguments.
 ec2SpotFleetSpotFleetRequestConfigData
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetTagSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetTagSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetTagSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotFleetTagSpecification.hs
@@ -26,13 +26,6 @@
     , fmap (("Tags",) . toJSON) _eC2SpotFleetSpotFleetTagSpecificationTags
     ]
 
-instance FromJSON EC2SpotFleetSpotFleetTagSpecification where
-  parseJSON (Object obj) =
-    EC2SpotFleetSpotFleetTagSpecification <$>
-      (obj .:? "ResourceType") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetSpotFleetTagSpecification' containing
 -- required fields as arguments.
 ec2SpotFleetSpotFleetTagSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotPlacement.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotPlacement.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotPlacement.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetSpotPlacement.hs
@@ -27,14 +27,6 @@
     , fmap (("Tenancy",) . toJSON) _eC2SpotFleetSpotPlacementTenancy
     ]
 
-instance FromJSON EC2SpotFleetSpotPlacement where
-  parseJSON (Object obj) =
-    EC2SpotFleetSpotPlacement <$>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .:? "GroupName") <*>
-      (obj .:? "Tenancy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetSpotPlacement' containing required fields as
 -- arguments.
 ec2SpotFleetSpotPlacement
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetTargetGroup.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetTargetGroup.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetTargetGroup.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetTargetGroup.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Arn",) . toJSON) _eC2SpotFleetTargetGroupArn
     ]
 
-instance FromJSON EC2SpotFleetTargetGroup where
-  parseJSON (Object obj) =
-    EC2SpotFleetTargetGroup <$>
-      (obj .: "Arn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetTargetGroup' containing required fields as
 -- arguments.
 ec2SpotFleetTargetGroup
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetTargetGroupsConfig.hs b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetTargetGroupsConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetTargetGroupsConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2SpotFleetTargetGroupsConfig.hs
@@ -23,12 +23,6 @@
     [ (Just . ("TargetGroups",) . toJSON) _eC2SpotFleetTargetGroupsConfigTargetGroups
     ]
 
-instance FromJSON EC2SpotFleetTargetGroupsConfig where
-  parseJSON (Object obj) =
-    EC2SpotFleetTargetGroupsConfig <$>
-      (obj .: "TargetGroups")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleetTargetGroupsConfig' containing required
 -- fields as arguments.
 ec2SpotFleetTargetGroupsConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EC2VPNConnectionVpnTunnelOptionsSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EC2VPNConnectionVpnTunnelOptionsSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EC2VPNConnectionVpnTunnelOptionsSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EC2VPNConnectionVpnTunnelOptionsSpecification.hs
@@ -27,13 +27,6 @@
     , fmap (("TunnelInsideCidr",) . toJSON) _eC2VPNConnectionVpnTunnelOptionsSpecificationTunnelInsideCidr
     ]
 
-instance FromJSON EC2VPNConnectionVpnTunnelOptionsSpecification where
-  parseJSON (Object obj) =
-    EC2VPNConnectionVpnTunnelOptionsSpecification <$>
-      (obj .:? "PreSharedKey") <*>
-      (obj .:? "TunnelInsideCidr")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VPNConnectionVpnTunnelOptionsSpecification'
 -- containing required fields as arguments.
 ec2VPNConnectionVpnTunnelOptionsSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/ECRRepositoryLifecyclePolicy.hs b/library-gen/Stratosphere/ResourceProperties/ECRRepositoryLifecyclePolicy.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECRRepositoryLifecyclePolicy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECRRepositoryLifecyclePolicy.hs
@@ -25,13 +25,6 @@
     , fmap (("RegistryId",) . toJSON) _eCRRepositoryLifecyclePolicyRegistryId
     ]
 
-instance FromJSON ECRRepositoryLifecyclePolicy where
-  parseJSON (Object obj) =
-    ECRRepositoryLifecyclePolicy <$>
-      (obj .:? "LifecyclePolicyText") <*>
-      (obj .:? "RegistryId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECRRepositoryLifecyclePolicy' containing required fields
 -- as arguments.
 ecrRepositoryLifecyclePolicy
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSServiceAwsVpcConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ECSServiceAwsVpcConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSServiceAwsVpcConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSServiceAwsVpcConfiguration.hs
@@ -27,14 +27,6 @@
     , (Just . ("Subnets",) . toJSON) _eCSServiceAwsVpcConfigurationSubnets
     ]
 
-instance FromJSON ECSServiceAwsVpcConfiguration where
-  parseJSON (Object obj) =
-    ECSServiceAwsVpcConfiguration <$>
-      (obj .:? "AssignPublicIp") <*>
-      (obj .:? "SecurityGroups") <*>
-      (obj .: "Subnets")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSServiceAwsVpcConfiguration' containing required
 -- fields as arguments.
 ecsServiceAwsVpcConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSServiceDeploymentConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ECSServiceDeploymentConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSServiceDeploymentConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSServiceDeploymentConfiguration.hs
@@ -25,13 +25,6 @@
     , fmap (("MinimumHealthyPercent",) . toJSON . fmap Integer') _eCSServiceDeploymentConfigurationMinimumHealthyPercent
     ]
 
-instance FromJSON ECSServiceDeploymentConfiguration where
-  parseJSON (Object obj) =
-    ECSServiceDeploymentConfiguration <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "MaximumPercent") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MinimumHealthyPercent")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSServiceDeploymentConfiguration' containing required
 -- fields as arguments.
 ecsServiceDeploymentConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSServiceLoadBalancer.hs b/library-gen/Stratosphere/ResourceProperties/ECSServiceLoadBalancer.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSServiceLoadBalancer.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSServiceLoadBalancer.hs
@@ -29,15 +29,6 @@
     , fmap (("TargetGroupArn",) . toJSON) _eCSServiceLoadBalancerTargetGroupArn
     ]
 
-instance FromJSON ECSServiceLoadBalancer where
-  parseJSON (Object obj) =
-    ECSServiceLoadBalancer <$>
-      (obj .:? "ContainerName") <*>
-      fmap (fmap unInteger') (obj .: "ContainerPort") <*>
-      (obj .:? "LoadBalancerName") <*>
-      (obj .:? "TargetGroupArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSServiceLoadBalancer' containing required fields as
 -- arguments.
 ecsServiceLoadBalancer
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSServiceNetworkConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ECSServiceNetworkConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSServiceNetworkConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSServiceNetworkConfiguration.hs
@@ -23,12 +23,6 @@
     [ fmap (("AwsvpcConfiguration",) . toJSON) _eCSServiceNetworkConfigurationAwsvpcConfiguration
     ]
 
-instance FromJSON ECSServiceNetworkConfiguration where
-  parseJSON (Object obj) =
-    ECSServiceNetworkConfiguration <$>
-      (obj .:? "AwsvpcConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSServiceNetworkConfiguration' containing required
 -- fields as arguments.
 ecsServiceNetworkConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSServicePlacementConstraint.hs b/library-gen/Stratosphere/ResourceProperties/ECSServicePlacementConstraint.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSServicePlacementConstraint.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSServicePlacementConstraint.hs
@@ -25,13 +25,6 @@
     , (Just . ("Type",) . toJSON) _eCSServicePlacementConstraintType
     ]
 
-instance FromJSON ECSServicePlacementConstraint where
-  parseJSON (Object obj) =
-    ECSServicePlacementConstraint <$>
-      (obj .:? "Expression") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSServicePlacementConstraint' containing required
 -- fields as arguments.
 ecsServicePlacementConstraint
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSServicePlacementStrategy.hs b/library-gen/Stratosphere/ResourceProperties/ECSServicePlacementStrategy.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSServicePlacementStrategy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSServicePlacementStrategy.hs
@@ -25,13 +25,6 @@
     , (Just . ("Type",) . toJSON) _eCSServicePlacementStrategyType
     ]
 
-instance FromJSON ECSServicePlacementStrategy where
-  parseJSON (Object obj) =
-    ECSServicePlacementStrategy <$>
-      (obj .:? "Field") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSServicePlacementStrategy' containing required fields
 -- as arguments.
 ecsServicePlacementStrategy
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSServiceServiceRegistry.hs b/library-gen/Stratosphere/ResourceProperties/ECSServiceServiceRegistry.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSServiceServiceRegistry.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSServiceServiceRegistry.hs
@@ -29,15 +29,6 @@
     , fmap (("RegistryArn",) . toJSON) _eCSServiceServiceRegistryRegistryArn
     ]
 
-instance FromJSON ECSServiceServiceRegistry where
-  parseJSON (Object obj) =
-    ECSServiceServiceRegistry <$>
-      (obj .:? "ContainerName") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ContainerPort") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Port") <*>
-      (obj .:? "RegistryArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSServiceServiceRegistry' containing required fields as
 -- arguments.
 ecsServiceServiceRegistry
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDefinition.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDefinition.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDefinition.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionContainerDefinition.hs
@@ -88,40 +88,6 @@
     , fmap (("WorkingDirectory",) . toJSON) _eCSTaskDefinitionContainerDefinitionWorkingDirectory
     ]
 
-instance FromJSON ECSTaskDefinitionContainerDefinition where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionContainerDefinition <$>
-      (obj .:? "Command") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Cpu") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DisableNetworking") <*>
-      (obj .:? "DnsSearchDomains") <*>
-      (obj .:? "DnsServers") <*>
-      (obj .:? "DockerLabels") <*>
-      (obj .:? "DockerSecurityOptions") <*>
-      (obj .:? "EntryPoint") <*>
-      (obj .:? "Environment") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Essential") <*>
-      (obj .:? "ExtraHosts") <*>
-      (obj .:? "HealthCheck") <*>
-      (obj .:? "Hostname") <*>
-      (obj .: "Image") <*>
-      (obj .:? "Links") <*>
-      (obj .:? "LinuxParameters") <*>
-      (obj .:? "LogConfiguration") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Memory") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MemoryReservation") <*>
-      (obj .:? "MountPoints") <*>
-      (obj .: "Name") <*>
-      (obj .:? "PortMappings") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Privileged") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ReadonlyRootFilesystem") <*>
-      (obj .:? "RepositoryCredentials") <*>
-      (obj .:? "Ulimits") <*>
-      (obj .:? "User") <*>
-      (obj .:? "VolumesFrom") <*>
-      (obj .:? "WorkingDirectory")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionContainerDefinition' containing
 -- required fields as arguments.
 ecsTaskDefinitionContainerDefinition
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionDevice.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionDevice.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionDevice.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionDevice.hs
@@ -27,14 +27,6 @@
     , fmap (("Permissions",) . toJSON) _eCSTaskDefinitionDevicePermissions
     ]
 
-instance FromJSON ECSTaskDefinitionDevice where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionDevice <$>
-      (obj .:? "ContainerPath") <*>
-      (obj .: "HostPath") <*>
-      (obj .:? "Permissions")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionDevice' containing required fields as
 -- arguments.
 ecsTaskDefinitionDevice
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionDockerVolumeConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionDockerVolumeConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionDockerVolumeConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionDockerVolumeConfiguration.hs
@@ -32,16 +32,6 @@
     , fmap (("Scope",) . toJSON) _eCSTaskDefinitionDockerVolumeConfigurationScope
     ]
 
-instance FromJSON ECSTaskDefinitionDockerVolumeConfiguration where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionDockerVolumeConfiguration <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Autoprovision") <*>
-      (obj .:? "Driver") <*>
-      (obj .:? "DriverOpts") <*>
-      (obj .:? "Labels") <*>
-      (obj .:? "Scope")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionDockerVolumeConfiguration' containing
 -- required fields as arguments.
 ecsTaskDefinitionDockerVolumeConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHealthCheck.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHealthCheck.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHealthCheck.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHealthCheck.hs
@@ -31,16 +31,6 @@
     , fmap (("Timeout",) . toJSON . fmap Integer') _eCSTaskDefinitionHealthCheckTimeout
     ]
 
-instance FromJSON ECSTaskDefinitionHealthCheck where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionHealthCheck <$>
-      (obj .: "Command") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Interval") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Retries") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "StartPeriod") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Timeout")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionHealthCheck' containing required fields
 -- as arguments.
 ecsTaskDefinitionHealthCheck
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostEntry.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostEntry.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostEntry.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostEntry.hs
@@ -25,13 +25,6 @@
     , (Just . ("IpAddress",) . toJSON) _eCSTaskDefinitionHostEntryIpAddress
     ]
 
-instance FromJSON ECSTaskDefinitionHostEntry where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionHostEntry <$>
-      (obj .: "Hostname") <*>
-      (obj .: "IpAddress")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionHostEntry' containing required fields
 -- as arguments.
 ecsTaskDefinitionHostEntry
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostVolumeProperties.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostVolumeProperties.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostVolumeProperties.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionHostVolumeProperties.hs
@@ -24,12 +24,6 @@
     [ fmap (("SourcePath",) . toJSON) _eCSTaskDefinitionHostVolumePropertiesSourcePath
     ]
 
-instance FromJSON ECSTaskDefinitionHostVolumeProperties where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionHostVolumeProperties <$>
-      (obj .:? "SourcePath")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionHostVolumeProperties' containing
 -- required fields as arguments.
 ecsTaskDefinitionHostVolumeProperties
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKernelCapabilities.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKernelCapabilities.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKernelCapabilities.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKernelCapabilities.hs
@@ -25,13 +25,6 @@
     , fmap (("Drop",) . toJSON) _eCSTaskDefinitionKernelCapabilitiesDrop
     ]
 
-instance FromJSON ECSTaskDefinitionKernelCapabilities where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionKernelCapabilities <$>
-      (obj .:? "Add") <*>
-      (obj .:? "Drop")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionKernelCapabilities' containing required
 -- fields as arguments.
 ecsTaskDefinitionKernelCapabilities
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKeyValuePair.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKeyValuePair.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKeyValuePair.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionKeyValuePair.hs
@@ -25,13 +25,6 @@
     , fmap (("Value",) . toJSON) _eCSTaskDefinitionKeyValuePairValue
     ]
 
-instance FromJSON ECSTaskDefinitionKeyValuePair where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionKeyValuePair <$>
-      (obj .:? "Name") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionKeyValuePair' containing required
 -- fields as arguments.
 ecsTaskDefinitionKeyValuePair
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLinuxParameters.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLinuxParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLinuxParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLinuxParameters.hs
@@ -33,16 +33,6 @@
     , fmap (("Tmpfs",) . toJSON) _eCSTaskDefinitionLinuxParametersTmpfs
     ]
 
-instance FromJSON ECSTaskDefinitionLinuxParameters where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionLinuxParameters <$>
-      (obj .:? "Capabilities") <*>
-      (obj .:? "Devices") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "InitProcessEnabled") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SharedMemorySize") <*>
-      (obj .:? "Tmpfs")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionLinuxParameters' containing required
 -- fields as arguments.
 ecsTaskDefinitionLinuxParameters
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLogConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLogConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLogConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionLogConfiguration.hs
@@ -25,13 +25,6 @@
     , fmap (("Options",) . toJSON) _eCSTaskDefinitionLogConfigurationOptions
     ]
 
-instance FromJSON ECSTaskDefinitionLogConfiguration where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionLogConfiguration <$>
-      (obj .: "LogDriver") <*>
-      (obj .:? "Options")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionLogConfiguration' containing required
 -- fields as arguments.
 ecsTaskDefinitionLogConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionMountPoint.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionMountPoint.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionMountPoint.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionMountPoint.hs
@@ -27,14 +27,6 @@
     , fmap (("SourceVolume",) . toJSON) _eCSTaskDefinitionMountPointSourceVolume
     ]
 
-instance FromJSON ECSTaskDefinitionMountPoint where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionMountPoint <$>
-      (obj .:? "ContainerPath") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ReadOnly") <*>
-      (obj .:? "SourceVolume")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionMountPoint' containing required fields
 -- as arguments.
 ecsTaskDefinitionMountPoint
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionPortMapping.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionPortMapping.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionPortMapping.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionPortMapping.hs
@@ -27,14 +27,6 @@
     , fmap (("Protocol",) . toJSON) _eCSTaskDefinitionPortMappingProtocol
     ]
 
-instance FromJSON ECSTaskDefinitionPortMapping where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionPortMapping <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "ContainerPort") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "HostPort") <*>
-      (obj .:? "Protocol")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionPortMapping' containing required fields
 -- as arguments.
 ecsTaskDefinitionPortMapping
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionRepositoryCredentials.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionRepositoryCredentials.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionRepositoryCredentials.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionRepositoryCredentials.hs
@@ -24,12 +24,6 @@
     [ fmap (("CredentialsParameter",) . toJSON) _eCSTaskDefinitionRepositoryCredentialsCredentialsParameter
     ]
 
-instance FromJSON ECSTaskDefinitionRepositoryCredentials where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionRepositoryCredentials <$>
-      (obj .:? "CredentialsParameter")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionRepositoryCredentials' containing
 -- required fields as arguments.
 ecsTaskDefinitionRepositoryCredentials
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionTaskDefinitionPlacementConstraint.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionTaskDefinitionPlacementConstraint.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionTaskDefinitionPlacementConstraint.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionTaskDefinitionPlacementConstraint.hs
@@ -27,13 +27,6 @@
     , (Just . ("Type",) . toJSON) _eCSTaskDefinitionTaskDefinitionPlacementConstraintType
     ]
 
-instance FromJSON ECSTaskDefinitionTaskDefinitionPlacementConstraint where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionTaskDefinitionPlacementConstraint <$>
-      (obj .:? "Expression") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionTaskDefinitionPlacementConstraint'
 -- containing required fields as arguments.
 ecsTaskDefinitionTaskDefinitionPlacementConstraint
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionTmpfs.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionTmpfs.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionTmpfs.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionTmpfs.hs
@@ -27,14 +27,6 @@
     , fmap (("Size",) . toJSON . fmap Integer') _eCSTaskDefinitionTmpfsSize
     ]
 
-instance FromJSON ECSTaskDefinitionTmpfs where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionTmpfs <$>
-      (obj .:? "ContainerPath") <*>
-      (obj .:? "MountOptions") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Size")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionTmpfs' containing required fields as
 -- arguments.
 ecsTaskDefinitionTmpfs
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionUlimit.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionUlimit.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionUlimit.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionUlimit.hs
@@ -27,14 +27,6 @@
     , (Just . ("SoftLimit",) . toJSON . fmap Integer') _eCSTaskDefinitionUlimitSoftLimit
     ]
 
-instance FromJSON ECSTaskDefinitionUlimit where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionUlimit <$>
-      fmap (fmap unInteger') (obj .: "HardLimit") <*>
-      (obj .: "Name") <*>
-      fmap (fmap unInteger') (obj .: "SoftLimit")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionUlimit' containing required fields as
 -- arguments.
 ecsTaskDefinitionUlimit
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolume.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolume.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolume.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolume.hs
@@ -28,14 +28,6 @@
     , fmap (("Name",) . toJSON) _eCSTaskDefinitionVolumeName
     ]
 
-instance FromJSON ECSTaskDefinitionVolume where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionVolume <$>
-      (obj .:? "DockerVolumeConfiguration") <*>
-      (obj .:? "Host") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionVolume' containing required fields as
 -- arguments.
 ecsTaskDefinitionVolume
diff --git a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolumeFrom.hs b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolumeFrom.hs
--- a/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolumeFrom.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ECSTaskDefinitionVolumeFrom.hs
@@ -25,13 +25,6 @@
     , fmap (("SourceContainer",) . toJSON) _eCSTaskDefinitionVolumeFromSourceContainer
     ]
 
-instance FromJSON ECSTaskDefinitionVolumeFrom where
-  parseJSON (Object obj) =
-    ECSTaskDefinitionVolumeFrom <$>
-      fmap (fmap (fmap unBool')) (obj .:? "ReadOnly") <*>
-      (obj .:? "SourceContainer")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinitionVolumeFrom' containing required fields
 -- as arguments.
 ecsTaskDefinitionVolumeFrom
diff --git a/library-gen/Stratosphere/ResourceProperties/EFSFileSystemElasticFileSystemTag.hs b/library-gen/Stratosphere/ResourceProperties/EFSFileSystemElasticFileSystemTag.hs
--- a/library-gen/Stratosphere/ResourceProperties/EFSFileSystemElasticFileSystemTag.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EFSFileSystemElasticFileSystemTag.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _eFSFileSystemElasticFileSystemTagValue
     ]
 
-instance FromJSON EFSFileSystemElasticFileSystemTag where
-  parseJSON (Object obj) =
-    EFSFileSystemElasticFileSystemTag <$>
-      (obj .: "Key") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EFSFileSystemElasticFileSystemTag' containing required
 -- fields as arguments.
 efsFileSystemElasticFileSystemTag
diff --git a/library-gen/Stratosphere/ResourceProperties/EKSClusterResourcesVpcConfig.hs b/library-gen/Stratosphere/ResourceProperties/EKSClusterResourcesVpcConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EKSClusterResourcesVpcConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EKSClusterResourcesVpcConfig.hs
@@ -25,13 +25,6 @@
     , (Just . ("SubnetIds",) . toJSON) _eKSClusterResourcesVpcConfigSubnetIds
     ]
 
-instance FromJSON EKSClusterResourcesVpcConfig where
-  parseJSON (Object obj) =
-    EKSClusterResourcesVpcConfig <$>
-      (obj .:? "SecurityGroupIds") <*>
-      (obj .: "SubnetIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EKSClusterResourcesVpcConfig' containing required fields
 -- as arguments.
 eksClusterResourcesVpcConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterApplication.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterApplication.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterApplication.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterApplication.hs
@@ -29,15 +29,6 @@
     , fmap (("Version",) . toJSON) _eMRClusterApplicationVersion
     ]
 
-instance FromJSON EMRClusterApplication where
-  parseJSON (Object obj) =
-    EMRClusterApplication <$>
-      (obj .:? "AdditionalInfo") <*>
-      (obj .:? "Args") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterApplication' containing required fields as
 -- arguments.
 emrClusterApplication
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterAutoScalingPolicy.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterAutoScalingPolicy.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterAutoScalingPolicy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterAutoScalingPolicy.hs
@@ -26,13 +26,6 @@
     , (Just . ("Rules",) . toJSON) _eMRClusterAutoScalingPolicyRules
     ]
 
-instance FromJSON EMRClusterAutoScalingPolicy where
-  parseJSON (Object obj) =
-    EMRClusterAutoScalingPolicy <$>
-      (obj .: "Constraints") <*>
-      (obj .: "Rules")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterAutoScalingPolicy' containing required fields
 -- as arguments.
 emrClusterAutoScalingPolicy
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterBootstrapActionConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterBootstrapActionConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterBootstrapActionConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterBootstrapActionConfig.hs
@@ -25,13 +25,6 @@
     , (Just . ("ScriptBootstrapAction",) . toJSON) _eMRClusterBootstrapActionConfigScriptBootstrapAction
     ]
 
-instance FromJSON EMRClusterBootstrapActionConfig where
-  parseJSON (Object obj) =
-    EMRClusterBootstrapActionConfig <$>
-      (obj .: "Name") <*>
-      (obj .: "ScriptBootstrapAction")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterBootstrapActionConfig' containing required
 -- fields as arguments.
 emrClusterBootstrapActionConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterCloudWatchAlarmDefinition.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterCloudWatchAlarmDefinition.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterCloudWatchAlarmDefinition.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterCloudWatchAlarmDefinition.hs
@@ -39,20 +39,6 @@
     , fmap (("Unit",) . toJSON) _eMRClusterCloudWatchAlarmDefinitionUnit
     ]
 
-instance FromJSON EMRClusterCloudWatchAlarmDefinition where
-  parseJSON (Object obj) =
-    EMRClusterCloudWatchAlarmDefinition <$>
-      (obj .: "ComparisonOperator") <*>
-      (obj .:? "Dimensions") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "EvaluationPeriods") <*>
-      (obj .: "MetricName") <*>
-      (obj .:? "Namespace") <*>
-      fmap (fmap unInteger') (obj .: "Period") <*>
-      (obj .:? "Statistic") <*>
-      fmap (fmap unDouble') (obj .: "Threshold") <*>
-      (obj .:? "Unit")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterCloudWatchAlarmDefinition' containing required
 -- fields as arguments.
 emrClusterCloudWatchAlarmDefinition
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterConfiguration.hs
@@ -27,14 +27,6 @@
     , fmap (("Configurations",) . toJSON) _eMRClusterConfigurationConfigurations
     ]
 
-instance FromJSON EMRClusterConfiguration where
-  parseJSON (Object obj) =
-    EMRClusterConfiguration <$>
-      (obj .:? "Classification") <*>
-      (obj .:? "ConfigurationProperties") <*>
-      (obj .:? "Configurations")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterConfiguration' containing required fields as
 -- arguments.
 emrClusterConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsBlockDeviceConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsBlockDeviceConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsBlockDeviceConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsBlockDeviceConfig.hs
@@ -25,13 +25,6 @@
     , fmap (("VolumesPerInstance",) . toJSON . fmap Integer') _eMRClusterEbsBlockDeviceConfigVolumesPerInstance
     ]
 
-instance FromJSON EMRClusterEbsBlockDeviceConfig where
-  parseJSON (Object obj) =
-    EMRClusterEbsBlockDeviceConfig <$>
-      (obj .: "VolumeSpecification") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "VolumesPerInstance")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterEbsBlockDeviceConfig' containing required
 -- fields as arguments.
 emrClusterEbsBlockDeviceConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterEbsConfiguration.hs
@@ -25,13 +25,6 @@
     , fmap (("EbsOptimized",) . toJSON . fmap Bool') _eMRClusterEbsConfigurationEbsOptimized
     ]
 
-instance FromJSON EMRClusterEbsConfiguration where
-  parseJSON (Object obj) =
-    EMRClusterEbsConfiguration <$>
-      (obj .:? "EbsBlockDeviceConfigs") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EbsOptimized")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterEbsConfiguration' containing required fields
 -- as arguments.
 emrClusterEbsConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterHadoopJarStepConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterHadoopJarStepConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterHadoopJarStepConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterHadoopJarStepConfig.hs
@@ -29,15 +29,6 @@
     , fmap (("StepProperties",) . toJSON) _eMRClusterHadoopJarStepConfigStepProperties
     ]
 
-instance FromJSON EMRClusterHadoopJarStepConfig where
-  parseJSON (Object obj) =
-    EMRClusterHadoopJarStepConfig <$>
-      (obj .:? "Args") <*>
-      (obj .: "Jar") <*>
-      (obj .:? "MainClass") <*>
-      (obj .:? "StepProperties")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterHadoopJarStepConfig' containing required
 -- fields as arguments.
 emrClusterHadoopJarStepConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceFleetConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceFleetConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceFleetConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceFleetConfig.hs
@@ -32,16 +32,6 @@
     , fmap (("TargetSpotCapacity",) . toJSON . fmap Integer') _eMRClusterInstanceFleetConfigTargetSpotCapacity
     ]
 
-instance FromJSON EMRClusterInstanceFleetConfig where
-  parseJSON (Object obj) =
-    EMRClusterInstanceFleetConfig <$>
-      (obj .:? "InstanceTypeConfigs") <*>
-      (obj .:? "LaunchSpecifications") <*>
-      (obj .:? "Name") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "TargetOnDemandCapacity") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "TargetSpotCapacity")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterInstanceFleetConfig' containing required
 -- fields as arguments.
 emrClusterInstanceFleetConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceFleetProvisioningSpecifications.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceFleetProvisioningSpecifications.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceFleetProvisioningSpecifications.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceFleetProvisioningSpecifications.hs
@@ -25,12 +25,6 @@
     [ (Just . ("SpotSpecification",) . toJSON) _eMRClusterInstanceFleetProvisioningSpecificationsSpotSpecification
     ]
 
-instance FromJSON EMRClusterInstanceFleetProvisioningSpecifications where
-  parseJSON (Object obj) =
-    EMRClusterInstanceFleetProvisioningSpecifications <$>
-      (obj .: "SpotSpecification")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterInstanceFleetProvisioningSpecifications'
 -- containing required fields as arguments.
 emrClusterInstanceFleetProvisioningSpecifications
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceGroupConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceGroupConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceGroupConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceGroupConfig.hs
@@ -39,19 +39,6 @@
     , fmap (("Name",) . toJSON) _eMRClusterInstanceGroupConfigName
     ]
 
-instance FromJSON EMRClusterInstanceGroupConfig where
-  parseJSON (Object obj) =
-    EMRClusterInstanceGroupConfig <$>
-      (obj .:? "AutoScalingPolicy") <*>
-      (obj .:? "BidPrice") <*>
-      (obj .:? "Configurations") <*>
-      (obj .:? "EbsConfiguration") <*>
-      fmap (fmap unInteger') (obj .: "InstanceCount") <*>
-      (obj .: "InstanceType") <*>
-      (obj .:? "Market") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterInstanceGroupConfig' containing required
 -- fields as arguments.
 emrClusterInstanceGroupConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceTypeConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceTypeConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceTypeConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterInstanceTypeConfig.hs
@@ -34,17 +34,6 @@
     , fmap (("WeightedCapacity",) . toJSON . fmap Integer') _eMRClusterInstanceTypeConfigWeightedCapacity
     ]
 
-instance FromJSON EMRClusterInstanceTypeConfig where
-  parseJSON (Object obj) =
-    EMRClusterInstanceTypeConfig <$>
-      (obj .:? "BidPrice") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "BidPriceAsPercentageOfOnDemandPrice") <*>
-      (obj .:? "Configurations") <*>
-      (obj .:? "EbsConfiguration") <*>
-      (obj .: "InstanceType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "WeightedCapacity")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterInstanceTypeConfig' containing required fields
 -- as arguments.
 emrClusterInstanceTypeConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterJobFlowInstancesConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterJobFlowInstancesConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterJobFlowInstancesConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterJobFlowInstancesConfig.hs
@@ -53,26 +53,6 @@
     , fmap (("TerminationProtected",) . toJSON . fmap Bool') _eMRClusterJobFlowInstancesConfigTerminationProtected
     ]
 
-instance FromJSON EMRClusterJobFlowInstancesConfig where
-  parseJSON (Object obj) =
-    EMRClusterJobFlowInstancesConfig <$>
-      (obj .:? "AdditionalMasterSecurityGroups") <*>
-      (obj .:? "AdditionalSlaveSecurityGroups") <*>
-      (obj .:? "CoreInstanceFleet") <*>
-      (obj .:? "CoreInstanceGroup") <*>
-      (obj .:? "Ec2KeyName") <*>
-      (obj .:? "Ec2SubnetId") <*>
-      (obj .:? "EmrManagedMasterSecurityGroup") <*>
-      (obj .:? "EmrManagedSlaveSecurityGroup") <*>
-      (obj .:? "HadoopVersion") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "KeepJobFlowAliveWhenNoSteps") <*>
-      (obj .:? "MasterInstanceFleet") <*>
-      (obj .:? "MasterInstanceGroup") <*>
-      (obj .:? "Placement") <*>
-      (obj .:? "ServiceAccessSecurityGroup") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "TerminationProtected")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterJobFlowInstancesConfig' containing required
 -- fields as arguments.
 emrClusterJobFlowInstancesConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterKerberosAttributes.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterKerberosAttributes.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterKerberosAttributes.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterKerberosAttributes.hs
@@ -31,16 +31,6 @@
     , (Just . ("Realm",) . toJSON) _eMRClusterKerberosAttributesRealm
     ]
 
-instance FromJSON EMRClusterKerberosAttributes where
-  parseJSON (Object obj) =
-    EMRClusterKerberosAttributes <$>
-      (obj .:? "ADDomainJoinPassword") <*>
-      (obj .:? "ADDomainJoinUser") <*>
-      (obj .:? "CrossRealmTrustPrincipalPassword") <*>
-      (obj .: "KdcAdminPassword") <*>
-      (obj .: "Realm")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterKerberosAttributes' containing required fields
 -- as arguments.
 emrClusterKerberosAttributes
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterKeyValue.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterKeyValue.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterKeyValue.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterKeyValue.hs
@@ -25,13 +25,6 @@
     , fmap (("Value",) . toJSON) _eMRClusterKeyValueValue
     ]
 
-instance FromJSON EMRClusterKeyValue where
-  parseJSON (Object obj) =
-    EMRClusterKeyValue <$>
-      (obj .:? "Key") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterKeyValue' containing required fields as
 -- arguments.
 emrClusterKeyValue
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterMetricDimension.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterMetricDimension.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterMetricDimension.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterMetricDimension.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _eMRClusterMetricDimensionValue
     ]
 
-instance FromJSON EMRClusterMetricDimension where
-  parseJSON (Object obj) =
-    EMRClusterMetricDimension <$>
-      (obj .: "Key") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterMetricDimension' containing required fields as
 -- arguments.
 emrClusterMetricDimension
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterPlacementType.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterPlacementType.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterPlacementType.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterPlacementType.hs
@@ -23,12 +23,6 @@
     [ (Just . ("AvailabilityZone",) . toJSON) _eMRClusterPlacementTypeAvailabilityZone
     ]
 
-instance FromJSON EMRClusterPlacementType where
-  parseJSON (Object obj) =
-    EMRClusterPlacementType <$>
-      (obj .: "AvailabilityZone")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterPlacementType' containing required fields as
 -- arguments.
 emrClusterPlacementType
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingAction.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingAction.hs
@@ -25,13 +25,6 @@
     , (Just . ("SimpleScalingPolicyConfiguration",) . toJSON) _eMRClusterScalingActionSimpleScalingPolicyConfiguration
     ]
 
-instance FromJSON EMRClusterScalingAction where
-  parseJSON (Object obj) =
-    EMRClusterScalingAction <$>
-      (obj .:? "Market") <*>
-      (obj .: "SimpleScalingPolicyConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterScalingAction' containing required fields as
 -- arguments.
 emrClusterScalingAction
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingConstraints.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingConstraints.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingConstraints.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingConstraints.hs
@@ -25,13 +25,6 @@
     , (Just . ("MinCapacity",) . toJSON . fmap Integer') _eMRClusterScalingConstraintsMinCapacity
     ]
 
-instance FromJSON EMRClusterScalingConstraints where
-  parseJSON (Object obj) =
-    EMRClusterScalingConstraints <$>
-      fmap (fmap unInteger') (obj .: "MaxCapacity") <*>
-      fmap (fmap unInteger') (obj .: "MinCapacity")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterScalingConstraints' containing required fields
 -- as arguments.
 emrClusterScalingConstraints
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingRule.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingRule.hs
@@ -30,15 +30,6 @@
     , (Just . ("Trigger",) . toJSON) _eMRClusterScalingRuleTrigger
     ]
 
-instance FromJSON EMRClusterScalingRule where
-  parseJSON (Object obj) =
-    EMRClusterScalingRule <$>
-      (obj .: "Action") <*>
-      (obj .:? "Description") <*>
-      (obj .: "Name") <*>
-      (obj .: "Trigger")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterScalingRule' containing required fields as
 -- arguments.
 emrClusterScalingRule
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingTrigger.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingTrigger.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingTrigger.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterScalingTrigger.hs
@@ -23,12 +23,6 @@
     [ (Just . ("CloudWatchAlarmDefinition",) . toJSON) _eMRClusterScalingTriggerCloudWatchAlarmDefinition
     ]
 
-instance FromJSON EMRClusterScalingTrigger where
-  parseJSON (Object obj) =
-    EMRClusterScalingTrigger <$>
-      (obj .: "CloudWatchAlarmDefinition")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterScalingTrigger' containing required fields as
 -- arguments.
 emrClusterScalingTrigger
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterScriptBootstrapActionConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterScriptBootstrapActionConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterScriptBootstrapActionConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterScriptBootstrapActionConfig.hs
@@ -26,13 +26,6 @@
     , (Just . ("Path",) . toJSON) _eMRClusterScriptBootstrapActionConfigPath
     ]
 
-instance FromJSON EMRClusterScriptBootstrapActionConfig where
-  parseJSON (Object obj) =
-    EMRClusterScriptBootstrapActionConfig <$>
-      (obj .:? "Args") <*>
-      (obj .: "Path")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterScriptBootstrapActionConfig' containing
 -- required fields as arguments.
 emrClusterScriptBootstrapActionConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterSimpleScalingPolicyConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterSimpleScalingPolicyConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterSimpleScalingPolicyConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterSimpleScalingPolicyConfiguration.hs
@@ -28,14 +28,6 @@
     , (Just . ("ScalingAdjustment",) . toJSON . fmap Integer') _eMRClusterSimpleScalingPolicyConfigurationScalingAdjustment
     ]
 
-instance FromJSON EMRClusterSimpleScalingPolicyConfiguration where
-  parseJSON (Object obj) =
-    EMRClusterSimpleScalingPolicyConfiguration <$>
-      (obj .:? "AdjustmentType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "CoolDown") <*>
-      fmap (fmap unInteger') (obj .: "ScalingAdjustment")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterSimpleScalingPolicyConfiguration' containing
 -- required fields as arguments.
 emrClusterSimpleScalingPolicyConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterSpotProvisioningSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterSpotProvisioningSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterSpotProvisioningSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterSpotProvisioningSpecification.hs
@@ -28,14 +28,6 @@
     , (Just . ("TimeoutDurationMinutes",) . toJSON . fmap Integer') _eMRClusterSpotProvisioningSpecificationTimeoutDurationMinutes
     ]
 
-instance FromJSON EMRClusterSpotProvisioningSpecification where
-  parseJSON (Object obj) =
-    EMRClusterSpotProvisioningSpecification <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "BlockDurationMinutes") <*>
-      (obj .: "TimeoutAction") <*>
-      fmap (fmap unInteger') (obj .: "TimeoutDurationMinutes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterSpotProvisioningSpecification' containing
 -- required fields as arguments.
 emrClusterSpotProvisioningSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterStepConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterStepConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterStepConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterStepConfig.hs
@@ -27,14 +27,6 @@
     , (Just . ("Name",) . toJSON) _eMRClusterStepConfigName
     ]
 
-instance FromJSON EMRClusterStepConfig where
-  parseJSON (Object obj) =
-    EMRClusterStepConfig <$>
-      (obj .:? "ActionOnFailure") <*>
-      (obj .: "HadoopJarStep") <*>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterStepConfig' containing required fields as
 -- arguments.
 emrClusterStepConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRClusterVolumeSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EMRClusterVolumeSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRClusterVolumeSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRClusterVolumeSpecification.hs
@@ -27,14 +27,6 @@
     , (Just . ("VolumeType",) . toJSON) _eMRClusterVolumeSpecificationVolumeType
     ]
 
-instance FromJSON EMRClusterVolumeSpecification where
-  parseJSON (Object obj) =
-    EMRClusterVolumeSpecification <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "Iops") <*>
-      fmap (fmap unInteger') (obj .: "SizeInGB") <*>
-      (obj .: "VolumeType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRClusterVolumeSpecification' containing required
 -- fields as arguments.
 emrClusterVolumeSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigConfiguration.hs
@@ -27,14 +27,6 @@
     , fmap (("Configurations",) . toJSON) _eMRInstanceFleetConfigConfigurationConfigurations
     ]
 
-instance FromJSON EMRInstanceFleetConfigConfiguration where
-  parseJSON (Object obj) =
-    EMRInstanceFleetConfigConfiguration <$>
-      (obj .:? "Classification") <*>
-      (obj .:? "ConfigurationProperties") <*>
-      (obj .:? "Configurations")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceFleetConfigConfiguration' containing required
 -- fields as arguments.
 emrInstanceFleetConfigConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigEbsBlockDeviceConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigEbsBlockDeviceConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigEbsBlockDeviceConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigEbsBlockDeviceConfig.hs
@@ -26,13 +26,6 @@
     , fmap (("VolumesPerInstance",) . toJSON . fmap Integer') _eMRInstanceFleetConfigEbsBlockDeviceConfigVolumesPerInstance
     ]
 
-instance FromJSON EMRInstanceFleetConfigEbsBlockDeviceConfig where
-  parseJSON (Object obj) =
-    EMRInstanceFleetConfigEbsBlockDeviceConfig <$>
-      (obj .: "VolumeSpecification") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "VolumesPerInstance")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceFleetConfigEbsBlockDeviceConfig' containing
 -- required fields as arguments.
 emrInstanceFleetConfigEbsBlockDeviceConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigEbsConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigEbsConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigEbsConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigEbsConfiguration.hs
@@ -26,13 +26,6 @@
     , fmap (("EbsOptimized",) . toJSON . fmap Bool') _eMRInstanceFleetConfigEbsConfigurationEbsOptimized
     ]
 
-instance FromJSON EMRInstanceFleetConfigEbsConfiguration where
-  parseJSON (Object obj) =
-    EMRInstanceFleetConfigEbsConfiguration <$>
-      (obj .:? "EbsBlockDeviceConfigs") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EbsOptimized")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceFleetConfigEbsConfiguration' containing
 -- required fields as arguments.
 emrInstanceFleetConfigEbsConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigInstanceFleetProvisioningSpecifications.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigInstanceFleetProvisioningSpecifications.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigInstanceFleetProvisioningSpecifications.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigInstanceFleetProvisioningSpecifications.hs
@@ -25,12 +25,6 @@
     [ (Just . ("SpotSpecification",) . toJSON) _eMRInstanceFleetConfigInstanceFleetProvisioningSpecificationsSpotSpecification
     ]
 
-instance FromJSON EMRInstanceFleetConfigInstanceFleetProvisioningSpecifications where
-  parseJSON (Object obj) =
-    EMRInstanceFleetConfigInstanceFleetProvisioningSpecifications <$>
-      (obj .: "SpotSpecification")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'EMRInstanceFleetConfigInstanceFleetProvisioningSpecifications'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigInstanceTypeConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigInstanceTypeConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigInstanceTypeConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigInstanceTypeConfig.hs
@@ -35,17 +35,6 @@
     , fmap (("WeightedCapacity",) . toJSON . fmap Integer') _eMRInstanceFleetConfigInstanceTypeConfigWeightedCapacity
     ]
 
-instance FromJSON EMRInstanceFleetConfigInstanceTypeConfig where
-  parseJSON (Object obj) =
-    EMRInstanceFleetConfigInstanceTypeConfig <$>
-      (obj .:? "BidPrice") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "BidPriceAsPercentageOfOnDemandPrice") <*>
-      (obj .:? "Configurations") <*>
-      (obj .:? "EbsConfiguration") <*>
-      (obj .: "InstanceType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "WeightedCapacity")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceFleetConfigInstanceTypeConfig' containing
 -- required fields as arguments.
 emrInstanceFleetConfigInstanceTypeConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigSpotProvisioningSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigSpotProvisioningSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigSpotProvisioningSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigSpotProvisioningSpecification.hs
@@ -29,14 +29,6 @@
     , (Just . ("TimeoutDurationMinutes",) . toJSON . fmap Integer') _eMRInstanceFleetConfigSpotProvisioningSpecificationTimeoutDurationMinutes
     ]
 
-instance FromJSON EMRInstanceFleetConfigSpotProvisioningSpecification where
-  parseJSON (Object obj) =
-    EMRInstanceFleetConfigSpotProvisioningSpecification <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "BlockDurationMinutes") <*>
-      (obj .: "TimeoutAction") <*>
-      fmap (fmap unInteger') (obj .: "TimeoutDurationMinutes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceFleetConfigSpotProvisioningSpecification'
 -- containing required fields as arguments.
 emrInstanceFleetConfigSpotProvisioningSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigVolumeSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigVolumeSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigVolumeSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceFleetConfigVolumeSpecification.hs
@@ -28,14 +28,6 @@
     , (Just . ("VolumeType",) . toJSON) _eMRInstanceFleetConfigVolumeSpecificationVolumeType
     ]
 
-instance FromJSON EMRInstanceFleetConfigVolumeSpecification where
-  parseJSON (Object obj) =
-    EMRInstanceFleetConfigVolumeSpecification <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "Iops") <*>
-      fmap (fmap unInteger') (obj .: "SizeInGB") <*>
-      (obj .: "VolumeType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceFleetConfigVolumeSpecification' containing
 -- required fields as arguments.
 emrInstanceFleetConfigVolumeSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigAutoScalingPolicy.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigAutoScalingPolicy.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigAutoScalingPolicy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigAutoScalingPolicy.hs
@@ -27,13 +27,6 @@
     , (Just . ("Rules",) . toJSON) _eMRInstanceGroupConfigAutoScalingPolicyRules
     ]
 
-instance FromJSON EMRInstanceGroupConfigAutoScalingPolicy where
-  parseJSON (Object obj) =
-    EMRInstanceGroupConfigAutoScalingPolicy <$>
-      (obj .: "Constraints") <*>
-      (obj .: "Rules")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceGroupConfigAutoScalingPolicy' containing
 -- required fields as arguments.
 emrInstanceGroupConfigAutoScalingPolicy
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigCloudWatchAlarmDefinition.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigCloudWatchAlarmDefinition.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigCloudWatchAlarmDefinition.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigCloudWatchAlarmDefinition.hs
@@ -41,20 +41,6 @@
     , fmap (("Unit",) . toJSON) _eMRInstanceGroupConfigCloudWatchAlarmDefinitionUnit
     ]
 
-instance FromJSON EMRInstanceGroupConfigCloudWatchAlarmDefinition where
-  parseJSON (Object obj) =
-    EMRInstanceGroupConfigCloudWatchAlarmDefinition <$>
-      (obj .: "ComparisonOperator") <*>
-      (obj .:? "Dimensions") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "EvaluationPeriods") <*>
-      (obj .: "MetricName") <*>
-      (obj .:? "Namespace") <*>
-      fmap (fmap unInteger') (obj .: "Period") <*>
-      (obj .:? "Statistic") <*>
-      fmap (fmap unDouble') (obj .: "Threshold") <*>
-      (obj .:? "Unit")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceGroupConfigCloudWatchAlarmDefinition'
 -- containing required fields as arguments.
 emrInstanceGroupConfigCloudWatchAlarmDefinition
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigConfiguration.hs
@@ -27,14 +27,6 @@
     , fmap (("Configurations",) . toJSON) _eMRInstanceGroupConfigConfigurationConfigurations
     ]
 
-instance FromJSON EMRInstanceGroupConfigConfiguration where
-  parseJSON (Object obj) =
-    EMRInstanceGroupConfigConfiguration <$>
-      (obj .:? "Classification") <*>
-      (obj .:? "ConfigurationProperties") <*>
-      (obj .:? "Configurations")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceGroupConfigConfiguration' containing required
 -- fields as arguments.
 emrInstanceGroupConfigConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsBlockDeviceConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsBlockDeviceConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsBlockDeviceConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsBlockDeviceConfig.hs
@@ -26,13 +26,6 @@
     , fmap (("VolumesPerInstance",) . toJSON . fmap Integer') _eMRInstanceGroupConfigEbsBlockDeviceConfigVolumesPerInstance
     ]
 
-instance FromJSON EMRInstanceGroupConfigEbsBlockDeviceConfig where
-  parseJSON (Object obj) =
-    EMRInstanceGroupConfigEbsBlockDeviceConfig <$>
-      (obj .: "VolumeSpecification") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "VolumesPerInstance")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceGroupConfigEbsBlockDeviceConfig' containing
 -- required fields as arguments.
 emrInstanceGroupConfigEbsBlockDeviceConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigEbsConfiguration.hs
@@ -26,13 +26,6 @@
     , fmap (("EbsOptimized",) . toJSON . fmap Bool') _eMRInstanceGroupConfigEbsConfigurationEbsOptimized
     ]
 
-instance FromJSON EMRInstanceGroupConfigEbsConfiguration where
-  parseJSON (Object obj) =
-    EMRInstanceGroupConfigEbsConfiguration <$>
-      (obj .:? "EbsBlockDeviceConfigs") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EbsOptimized")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceGroupConfigEbsConfiguration' containing
 -- required fields as arguments.
 emrInstanceGroupConfigEbsConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigMetricDimension.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigMetricDimension.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigMetricDimension.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigMetricDimension.hs
@@ -26,13 +26,6 @@
     , (Just . ("Value",) . toJSON) _eMRInstanceGroupConfigMetricDimensionValue
     ]
 
-instance FromJSON EMRInstanceGroupConfigMetricDimension where
-  parseJSON (Object obj) =
-    EMRInstanceGroupConfigMetricDimension <$>
-      (obj .: "Key") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceGroupConfigMetricDimension' containing
 -- required fields as arguments.
 emrInstanceGroupConfigMetricDimension
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingAction.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingAction.hs
@@ -25,13 +25,6 @@
     , (Just . ("SimpleScalingPolicyConfiguration",) . toJSON) _eMRInstanceGroupConfigScalingActionSimpleScalingPolicyConfiguration
     ]
 
-instance FromJSON EMRInstanceGroupConfigScalingAction where
-  parseJSON (Object obj) =
-    EMRInstanceGroupConfigScalingAction <$>
-      (obj .:? "Market") <*>
-      (obj .: "SimpleScalingPolicyConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceGroupConfigScalingAction' containing required
 -- fields as arguments.
 emrInstanceGroupConfigScalingAction
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingConstraints.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingConstraints.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingConstraints.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingConstraints.hs
@@ -26,13 +26,6 @@
     , (Just . ("MinCapacity",) . toJSON . fmap Integer') _eMRInstanceGroupConfigScalingConstraintsMinCapacity
     ]
 
-instance FromJSON EMRInstanceGroupConfigScalingConstraints where
-  parseJSON (Object obj) =
-    EMRInstanceGroupConfigScalingConstraints <$>
-      fmap (fmap unInteger') (obj .: "MaxCapacity") <*>
-      fmap (fmap unInteger') (obj .: "MinCapacity")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceGroupConfigScalingConstraints' containing
 -- required fields as arguments.
 emrInstanceGroupConfigScalingConstraints
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingRule.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingRule.hs
@@ -30,15 +30,6 @@
     , (Just . ("Trigger",) . toJSON) _eMRInstanceGroupConfigScalingRuleTrigger
     ]
 
-instance FromJSON EMRInstanceGroupConfigScalingRule where
-  parseJSON (Object obj) =
-    EMRInstanceGroupConfigScalingRule <$>
-      (obj .: "Action") <*>
-      (obj .:? "Description") <*>
-      (obj .: "Name") <*>
-      (obj .: "Trigger")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceGroupConfigScalingRule' containing required
 -- fields as arguments.
 emrInstanceGroupConfigScalingRule
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingTrigger.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingTrigger.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingTrigger.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigScalingTrigger.hs
@@ -23,12 +23,6 @@
     [ (Just . ("CloudWatchAlarmDefinition",) . toJSON) _eMRInstanceGroupConfigScalingTriggerCloudWatchAlarmDefinition
     ]
 
-instance FromJSON EMRInstanceGroupConfigScalingTrigger where
-  parseJSON (Object obj) =
-    EMRInstanceGroupConfigScalingTrigger <$>
-      (obj .: "CloudWatchAlarmDefinition")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceGroupConfigScalingTrigger' containing
 -- required fields as arguments.
 emrInstanceGroupConfigScalingTrigger
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigSimpleScalingPolicyConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigSimpleScalingPolicyConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigSimpleScalingPolicyConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigSimpleScalingPolicyConfiguration.hs
@@ -29,14 +29,6 @@
     , (Just . ("ScalingAdjustment",) . toJSON . fmap Integer') _eMRInstanceGroupConfigSimpleScalingPolicyConfigurationScalingAdjustment
     ]
 
-instance FromJSON EMRInstanceGroupConfigSimpleScalingPolicyConfiguration where
-  parseJSON (Object obj) =
-    EMRInstanceGroupConfigSimpleScalingPolicyConfiguration <$>
-      (obj .:? "AdjustmentType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "CoolDown") <*>
-      fmap (fmap unInteger') (obj .: "ScalingAdjustment")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceGroupConfigSimpleScalingPolicyConfiguration'
 -- containing required fields as arguments.
 emrInstanceGroupConfigSimpleScalingPolicyConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigVolumeSpecification.hs b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigVolumeSpecification.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigVolumeSpecification.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRInstanceGroupConfigVolumeSpecification.hs
@@ -28,14 +28,6 @@
     , (Just . ("VolumeType",) . toJSON) _eMRInstanceGroupConfigVolumeSpecificationVolumeType
     ]
 
-instance FromJSON EMRInstanceGroupConfigVolumeSpecification where
-  parseJSON (Object obj) =
-    EMRInstanceGroupConfigVolumeSpecification <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "Iops") <*>
-      fmap (fmap unInteger') (obj .: "SizeInGB") <*>
-      (obj .: "VolumeType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceGroupConfigVolumeSpecification' containing
 -- required fields as arguments.
 emrInstanceGroupConfigVolumeSpecification
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRStepHadoopJarStepConfig.hs b/library-gen/Stratosphere/ResourceProperties/EMRStepHadoopJarStepConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRStepHadoopJarStepConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRStepHadoopJarStepConfig.hs
@@ -29,15 +29,6 @@
     , fmap (("StepProperties",) . toJSON) _eMRStepHadoopJarStepConfigStepProperties
     ]
 
-instance FromJSON EMRStepHadoopJarStepConfig where
-  parseJSON (Object obj) =
-    EMRStepHadoopJarStepConfig <$>
-      (obj .:? "Args") <*>
-      (obj .: "Jar") <*>
-      (obj .:? "MainClass") <*>
-      (obj .:? "StepProperties")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRStepHadoopJarStepConfig' containing required fields
 -- as arguments.
 emrStepHadoopJarStepConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/EMRStepKeyValue.hs b/library-gen/Stratosphere/ResourceProperties/EMRStepKeyValue.hs
--- a/library-gen/Stratosphere/ResourceProperties/EMRStepKeyValue.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EMRStepKeyValue.hs
@@ -25,13 +25,6 @@
     , fmap (("Value",) . toJSON) _eMRStepKeyValueValue
     ]
 
-instance FromJSON EMRStepKeyValue where
-  parseJSON (Object obj) =
-    EMRStepKeyValue <$>
-      (obj .:? "Key") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRStepKeyValue' containing required fields as
 -- arguments.
 emrStepKeyValue
diff --git a/library-gen/Stratosphere/ResourceProperties/ElastiCacheReplicationGroupNodeGroupConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ElastiCacheReplicationGroupNodeGroupConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElastiCacheReplicationGroupNodeGroupConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElastiCacheReplicationGroupNodeGroupConfiguration.hs
@@ -33,16 +33,6 @@
     , fmap (("Slots",) . toJSON) _elastiCacheReplicationGroupNodeGroupConfigurationSlots
     ]
 
-instance FromJSON ElastiCacheReplicationGroupNodeGroupConfiguration where
-  parseJSON (Object obj) =
-    ElastiCacheReplicationGroupNodeGroupConfiguration <$>
-      (obj .:? "NodeGroupId") <*>
-      (obj .:? "PrimaryAvailabilityZone") <*>
-      (obj .:? "ReplicaAvailabilityZones") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ReplicaCount") <*>
-      (obj .:? "Slots")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElastiCacheReplicationGroupNodeGroupConfiguration'
 -- containing required fields as arguments.
 elastiCacheReplicationGroupNodeGroupConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationApplicationResourceLifecycleConfig.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationApplicationResourceLifecycleConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationApplicationResourceLifecycleConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationApplicationResourceLifecycleConfig.hs
@@ -27,13 +27,6 @@
     , fmap (("VersionLifecycleConfig",) . toJSON) _elasticBeanstalkApplicationApplicationResourceLifecycleConfigVersionLifecycleConfig
     ]
 
-instance FromJSON ElasticBeanstalkApplicationApplicationResourceLifecycleConfig where
-  parseJSON (Object obj) =
-    ElasticBeanstalkApplicationApplicationResourceLifecycleConfig <$>
-      (obj .:? "ServiceRole") <*>
-      (obj .:? "VersionLifecycleConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ElasticBeanstalkApplicationApplicationResourceLifecycleConfig'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationApplicationVersionLifecycleConfig.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationApplicationVersionLifecycleConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationApplicationVersionLifecycleConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationApplicationVersionLifecycleConfig.hs
@@ -28,13 +28,6 @@
     , fmap (("MaxCountRule",) . toJSON) _elasticBeanstalkApplicationApplicationVersionLifecycleConfigMaxCountRule
     ]
 
-instance FromJSON ElasticBeanstalkApplicationApplicationVersionLifecycleConfig where
-  parseJSON (Object obj) =
-    ElasticBeanstalkApplicationApplicationVersionLifecycleConfig <$>
-      (obj .:? "MaxAgeRule") <*>
-      (obj .:? "MaxCountRule")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ElasticBeanstalkApplicationApplicationVersionLifecycleConfig' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationMaxAgeRule.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationMaxAgeRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationMaxAgeRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationMaxAgeRule.hs
@@ -28,14 +28,6 @@
     , fmap (("MaxAgeInDays",) . toJSON . fmap Integer') _elasticBeanstalkApplicationMaxAgeRuleMaxAgeInDays
     ]
 
-instance FromJSON ElasticBeanstalkApplicationMaxAgeRule where
-  parseJSON (Object obj) =
-    ElasticBeanstalkApplicationMaxAgeRule <$>
-      fmap (fmap (fmap unBool')) (obj .:? "DeleteSourceFromS3") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MaxAgeInDays")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticBeanstalkApplicationMaxAgeRule' containing
 -- required fields as arguments.
 elasticBeanstalkApplicationMaxAgeRule
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationMaxCountRule.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationMaxCountRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationMaxCountRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationMaxCountRule.hs
@@ -28,14 +28,6 @@
     , fmap (("MaxCount",) . toJSON . fmap Integer') _elasticBeanstalkApplicationMaxCountRuleMaxCount
     ]
 
-instance FromJSON ElasticBeanstalkApplicationMaxCountRule where
-  parseJSON (Object obj) =
-    ElasticBeanstalkApplicationMaxCountRule <$>
-      fmap (fmap (fmap unBool')) (obj .:? "DeleteSourceFromS3") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MaxCount")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticBeanstalkApplicationMaxCountRule' containing
 -- required fields as arguments.
 elasticBeanstalkApplicationMaxCountRule
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationVersionSourceBundle.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationVersionSourceBundle.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationVersionSourceBundle.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkApplicationVersionSourceBundle.hs
@@ -27,13 +27,6 @@
     , (Just . ("S3Key",) . toJSON) _elasticBeanstalkApplicationVersionSourceBundleS3Key
     ]
 
-instance FromJSON ElasticBeanstalkApplicationVersionSourceBundle where
-  parseJSON (Object obj) =
-    ElasticBeanstalkApplicationVersionSourceBundle <$>
-      (obj .: "S3Bucket") <*>
-      (obj .: "S3Key")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticBeanstalkApplicationVersionSourceBundle'
 -- containing required fields as arguments.
 elasticBeanstalkApplicationVersionSourceBundle
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting.hs
@@ -31,15 +31,6 @@
     , fmap (("Value",) . toJSON) _elasticBeanstalkConfigurationTemplateConfigurationOptionSettingValue
     ]
 
-instance FromJSON ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting where
-  parseJSON (Object obj) =
-    ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting <$>
-      (obj .: "Namespace") <*>
-      (obj .: "OptionName") <*>
-      (obj .:? "ResourceName") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ElasticBeanstalkConfigurationTemplateConfigurationOptionSetting'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateSourceConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateSourceConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateSourceConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkConfigurationTemplateSourceConfiguration.hs
@@ -27,13 +27,6 @@
     , (Just . ("TemplateName",) . toJSON) _elasticBeanstalkConfigurationTemplateSourceConfigurationTemplateName
     ]
 
-instance FromJSON ElasticBeanstalkConfigurationTemplateSourceConfiguration where
-  parseJSON (Object obj) =
-    ElasticBeanstalkConfigurationTemplateSourceConfiguration <$>
-      (obj .: "ApplicationName") <*>
-      (obj .: "TemplateName")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ElasticBeanstalkConfigurationTemplateSourceConfiguration' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentOptionSetting.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentOptionSetting.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentOptionSetting.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentOptionSetting.hs
@@ -30,15 +30,6 @@
     , fmap (("Value",) . toJSON) _elasticBeanstalkEnvironmentOptionSettingValue
     ]
 
-instance FromJSON ElasticBeanstalkEnvironmentOptionSetting where
-  parseJSON (Object obj) =
-    ElasticBeanstalkEnvironmentOptionSetting <$>
-      (obj .: "Namespace") <*>
-      (obj .: "OptionName") <*>
-      (obj .:? "ResourceName") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticBeanstalkEnvironmentOptionSetting' containing
 -- required fields as arguments.
 elasticBeanstalkEnvironmentOptionSetting
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentTier.hs b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentTier.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentTier.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticBeanstalkEnvironmentTier.hs
@@ -27,14 +27,6 @@
     , fmap (("Version",) . toJSON) _elasticBeanstalkEnvironmentTierVersion
     ]
 
-instance FromJSON ElasticBeanstalkEnvironmentTier where
-  parseJSON (Object obj) =
-    ElasticBeanstalkEnvironmentTier <$>
-      (obj .:? "Name") <*>
-      (obj .:? "Type") <*>
-      (obj .:? "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticBeanstalkEnvironmentTier' containing required
 -- fields as arguments.
 elasticBeanstalkEnvironmentTier
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAccessLoggingPolicy.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAccessLoggingPolicy.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAccessLoggingPolicy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAccessLoggingPolicy.hs
@@ -31,15 +31,6 @@
     , fmap (("S3BucketPrefix",) . toJSON) _elasticLoadBalancingLoadBalancerAccessLoggingPolicyS3BucketPrefix
     ]
 
-instance FromJSON ElasticLoadBalancingLoadBalancerAccessLoggingPolicy where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingLoadBalancerAccessLoggingPolicy <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "EmitInterval") <*>
-      fmap (fmap unBool') (obj .: "Enabled") <*>
-      (obj .: "S3BucketName") <*>
-      (obj .:? "S3BucketPrefix")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingLoadBalancerAccessLoggingPolicy'
 -- containing required fields as arguments.
 elasticLoadBalancingLoadBalancerAccessLoggingPolicy
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy.hs
@@ -27,13 +27,6 @@
     , (Just . ("PolicyName",) . toJSON) _elasticLoadBalancingLoadBalancerAppCookieStickinessPolicyPolicyName
     ]
 
-instance FromJSON ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy <$>
-      (obj .: "CookieName") <*>
-      (obj .: "PolicyName")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ElasticLoadBalancingLoadBalancerAppCookieStickinessPolicy' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy.hs
@@ -27,13 +27,6 @@
     , fmap (("Timeout",) . toJSON . fmap Integer') _elasticLoadBalancingLoadBalancerConnectionDrainingPolicyTimeout
     ]
 
-instance FromJSON ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy <$>
-      fmap (fmap unBool') (obj .: "Enabled") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Timeout")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ElasticLoadBalancingLoadBalancerConnectionDrainingPolicy' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionSettings.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionSettings.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionSettings.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerConnectionSettings.hs
@@ -25,12 +25,6 @@
     [ (Just . ("IdleTimeout",) . toJSON . fmap Integer') _elasticLoadBalancingLoadBalancerConnectionSettingsIdleTimeout
     ]
 
-instance FromJSON ElasticLoadBalancingLoadBalancerConnectionSettings where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingLoadBalancerConnectionSettings <$>
-      fmap (fmap unInteger') (obj .: "IdleTimeout")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingLoadBalancerConnectionSettings'
 -- containing required fields as arguments.
 elasticLoadBalancingLoadBalancerConnectionSettings
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerHealthCheck.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerHealthCheck.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerHealthCheck.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerHealthCheck.hs
@@ -33,16 +33,6 @@
     , (Just . ("UnhealthyThreshold",) . toJSON) _elasticLoadBalancingLoadBalancerHealthCheckUnhealthyThreshold
     ]
 
-instance FromJSON ElasticLoadBalancingLoadBalancerHealthCheck where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingLoadBalancerHealthCheck <$>
-      (obj .: "HealthyThreshold") <*>
-      (obj .: "Interval") <*>
-      (obj .: "Target") <*>
-      (obj .: "Timeout") <*>
-      (obj .: "UnhealthyThreshold")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingLoadBalancerHealthCheck' containing
 -- required fields as arguments.
 elasticLoadBalancingLoadBalancerHealthCheck
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy.hs
@@ -27,13 +27,6 @@
     , fmap (("PolicyName",) . toJSON) _elasticLoadBalancingLoadBalancerLBCookieStickinessPolicyPolicyName
     ]
 
-instance FromJSON ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy <$>
-      (obj .:? "CookieExpirationPeriod") <*>
-      (obj .:? "PolicyName")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ElasticLoadBalancingLoadBalancerLBCookieStickinessPolicy' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerListeners.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerListeners.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerListeners.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerListeners.hs
@@ -34,17 +34,6 @@
     , fmap (("SSLCertificateId",) . toJSON) _elasticLoadBalancingLoadBalancerListenersSSLCertificateId
     ]
 
-instance FromJSON ElasticLoadBalancingLoadBalancerListeners where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingLoadBalancerListeners <$>
-      (obj .: "InstancePort") <*>
-      (obj .:? "InstanceProtocol") <*>
-      (obj .: "LoadBalancerPort") <*>
-      (obj .:? "PolicyNames") <*>
-      (obj .: "Protocol") <*>
-      (obj .:? "SSLCertificateId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingLoadBalancerListeners' containing
 -- required fields as arguments.
 elasticLoadBalancingLoadBalancerListeners
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerPolicies.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerPolicies.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerPolicies.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingLoadBalancerPolicies.hs
@@ -32,16 +32,6 @@
     , (Just . ("PolicyType",) . toJSON) _elasticLoadBalancingLoadBalancerPoliciesPolicyType
     ]
 
-instance FromJSON ElasticLoadBalancingLoadBalancerPolicies where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingLoadBalancerPolicies <$>
-      (obj .: "Attributes") <*>
-      (obj .:? "InstancePorts") <*>
-      (obj .:? "LoadBalancerPorts") <*>
-      (obj .: "PolicyName") <*>
-      (obj .: "PolicyType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingLoadBalancerPolicies' containing
 -- required fields as arguments.
 elasticLoadBalancingLoadBalancerPolicies
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAction.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAction.hs
@@ -38,18 +38,6 @@
     , (Just . ("Type",) . toJSON) _elasticLoadBalancingV2ListenerActionType
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerAction where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerAction <$>
-      (obj .:? "AuthenticateCognitoConfig") <*>
-      (obj .:? "AuthenticateOidcConfig") <*>
-      (obj .:? "FixedResponseConfig") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Order") <*>
-      (obj .:? "RedirectConfig") <*>
-      (obj .:? "TargetGroupArn") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2ListenerAction' containing
 -- required fields as arguments.
 elasticLoadBalancingV2ListenerAction
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAuthenticateCognitoConfig.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAuthenticateCognitoConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAuthenticateCognitoConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAuthenticateCognitoConfig.hs
@@ -39,19 +39,6 @@
     , (Just . ("UserPoolDomain",) . toJSON) _elasticLoadBalancingV2ListenerAuthenticateCognitoConfigUserPoolDomain
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerAuthenticateCognitoConfig where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerAuthenticateCognitoConfig <$>
-      (obj .:? "AuthenticationRequestExtraParams") <*>
-      (obj .:? "OnUnauthenticatedRequest") <*>
-      (obj .:? "Scope") <*>
-      (obj .:? "SessionCookieName") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SessionTimeout") <*>
-      (obj .: "UserPoolArn") <*>
-      (obj .: "UserPoolClientId") <*>
-      (obj .: "UserPoolDomain")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2ListenerAuthenticateCognitoConfig'
 -- containing required fields as arguments.
 elasticLoadBalancingV2ListenerAuthenticateCognitoConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAuthenticateOidcConfig.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAuthenticateOidcConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAuthenticateOidcConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerAuthenticateOidcConfig.hs
@@ -45,22 +45,6 @@
     , (Just . ("UserInfoEndpoint",) . toJSON) _elasticLoadBalancingV2ListenerAuthenticateOidcConfigUserInfoEndpoint
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerAuthenticateOidcConfig where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerAuthenticateOidcConfig <$>
-      (obj .:? "AuthenticationRequestExtraParams") <*>
-      (obj .: "AuthorizationEndpoint") <*>
-      (obj .: "ClientId") <*>
-      (obj .: "ClientSecret") <*>
-      (obj .: "Issuer") <*>
-      (obj .:? "OnUnauthenticatedRequest") <*>
-      (obj .:? "Scope") <*>
-      (obj .:? "SessionCookieName") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SessionTimeout") <*>
-      (obj .: "TokenEndpoint") <*>
-      (obj .: "UserInfoEndpoint")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2ListenerAuthenticateOidcConfig'
 -- containing required fields as arguments.
 elasticLoadBalancingV2ListenerAuthenticateOidcConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificate.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificate.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificate.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificate.hs
@@ -24,12 +24,6 @@
     [ fmap (("CertificateArn",) . toJSON) _elasticLoadBalancingV2ListenerCertificateCertificateArn
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerCertificate where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerCertificate <$>
-      (obj .:? "CertificateArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2ListenerCertificate' containing
 -- required fields as arguments.
 elasticLoadBalancingV2ListenerCertificate
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificateCertificate.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificateCertificate.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificateCertificate.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerCertificateCertificate.hs
@@ -25,12 +25,6 @@
     [ fmap (("CertificateArn",) . toJSON) _elasticLoadBalancingV2ListenerCertificateCertificateCertificateArn
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerCertificateCertificate where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerCertificateCertificate <$>
-      (obj .:? "CertificateArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2ListenerCertificateCertificate'
 -- containing required fields as arguments.
 elasticLoadBalancingV2ListenerCertificateCertificate
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerFixedResponseConfig.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerFixedResponseConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerFixedResponseConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerFixedResponseConfig.hs
@@ -29,14 +29,6 @@
     , (Just . ("StatusCode",) . toJSON) _elasticLoadBalancingV2ListenerFixedResponseConfigStatusCode
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerFixedResponseConfig where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerFixedResponseConfig <$>
-      (obj .:? "ContentType") <*>
-      (obj .:? "MessageBody") <*>
-      (obj .: "StatusCode")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2ListenerFixedResponseConfig'
 -- containing required fields as arguments.
 elasticLoadBalancingV2ListenerFixedResponseConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRedirectConfig.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRedirectConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRedirectConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRedirectConfig.hs
@@ -35,17 +35,6 @@
     , (Just . ("StatusCode",) . toJSON) _elasticLoadBalancingV2ListenerRedirectConfigStatusCode
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerRedirectConfig where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerRedirectConfig <$>
-      (obj .:? "Host") <*>
-      (obj .:? "Path") <*>
-      (obj .:? "Port") <*>
-      (obj .:? "Protocol") <*>
-      (obj .:? "Query") <*>
-      (obj .: "StatusCode")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2ListenerRedirectConfig' containing
 -- required fields as arguments.
 elasticLoadBalancingV2ListenerRedirectConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAction.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAction.hs
@@ -39,18 +39,6 @@
     , (Just . ("Type",) . toJSON) _elasticLoadBalancingV2ListenerRuleActionType
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerRuleAction where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerRuleAction <$>
-      (obj .:? "AuthenticateCognitoConfig") <*>
-      (obj .:? "AuthenticateOidcConfig") <*>
-      (obj .:? "FixedResponseConfig") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Order") <*>
-      (obj .:? "RedirectConfig") <*>
-      (obj .:? "TargetGroupArn") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2ListenerRuleAction' containing
 -- required fields as arguments.
 elasticLoadBalancingV2ListenerRuleAction
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAuthenticateCognitoConfig.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAuthenticateCognitoConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAuthenticateCognitoConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAuthenticateCognitoConfig.hs
@@ -39,19 +39,6 @@
     , (Just . ("UserPoolDomain",) . toJSON) _elasticLoadBalancingV2ListenerRuleAuthenticateCognitoConfigUserPoolDomain
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerRuleAuthenticateCognitoConfig where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerRuleAuthenticateCognitoConfig <$>
-      (obj .:? "AuthenticationRequestExtraParams") <*>
-      (obj .:? "OnUnauthenticatedRequest") <*>
-      (obj .:? "Scope") <*>
-      (obj .:? "SessionCookieName") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SessionTimeout") <*>
-      (obj .: "UserPoolArn") <*>
-      (obj .: "UserPoolClientId") <*>
-      (obj .: "UserPoolDomain")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ElasticLoadBalancingV2ListenerRuleAuthenticateCognitoConfig' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAuthenticateOidcConfig.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAuthenticateOidcConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAuthenticateOidcConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleAuthenticateOidcConfig.hs
@@ -45,22 +45,6 @@
     , (Just . ("UserInfoEndpoint",) . toJSON) _elasticLoadBalancingV2ListenerRuleAuthenticateOidcConfigUserInfoEndpoint
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerRuleAuthenticateOidcConfig where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerRuleAuthenticateOidcConfig <$>
-      (obj .:? "AuthenticationRequestExtraParams") <*>
-      (obj .: "AuthorizationEndpoint") <*>
-      (obj .: "ClientId") <*>
-      (obj .: "ClientSecret") <*>
-      (obj .: "Issuer") <*>
-      (obj .:? "OnUnauthenticatedRequest") <*>
-      (obj .:? "Scope") <*>
-      (obj .:? "SessionCookieName") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SessionTimeout") <*>
-      (obj .: "TokenEndpoint") <*>
-      (obj .: "UserInfoEndpoint")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ElasticLoadBalancingV2ListenerRuleAuthenticateOidcConfig' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleFixedResponseConfig.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleFixedResponseConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleFixedResponseConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleFixedResponseConfig.hs
@@ -29,14 +29,6 @@
     , (Just . ("StatusCode",) . toJSON) _elasticLoadBalancingV2ListenerRuleFixedResponseConfigStatusCode
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerRuleFixedResponseConfig where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerRuleFixedResponseConfig <$>
-      (obj .:? "ContentType") <*>
-      (obj .:? "MessageBody") <*>
-      (obj .: "StatusCode")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2ListenerRuleFixedResponseConfig'
 -- containing required fields as arguments.
 elasticLoadBalancingV2ListenerRuleFixedResponseConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRedirectConfig.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRedirectConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRedirectConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRedirectConfig.hs
@@ -35,17 +35,6 @@
     , (Just . ("StatusCode",) . toJSON) _elasticLoadBalancingV2ListenerRuleRedirectConfigStatusCode
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerRuleRedirectConfig where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerRuleRedirectConfig <$>
-      (obj .:? "Host") <*>
-      (obj .:? "Path") <*>
-      (obj .:? "Port") <*>
-      (obj .:? "Protocol") <*>
-      (obj .:? "Query") <*>
-      (obj .: "StatusCode")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2ListenerRuleRedirectConfig'
 -- containing required fields as arguments.
 elasticLoadBalancingV2ListenerRuleRedirectConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRuleCondition.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRuleCondition.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRuleCondition.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2ListenerRuleRuleCondition.hs
@@ -27,13 +27,6 @@
     , fmap (("Values",) . toJSON) _elasticLoadBalancingV2ListenerRuleRuleConditionValues
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerRuleRuleCondition where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerRuleRuleCondition <$>
-      (obj .:? "Field") <*>
-      (obj .:? "Values")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2ListenerRuleRuleCondition'
 -- containing required fields as arguments.
 elasticLoadBalancingV2ListenerRuleRuleCondition
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute.hs
@@ -27,13 +27,6 @@
     , fmap (("Value",) . toJSON) _elasticLoadBalancingV2LoadBalancerLoadBalancerAttributeValue
     ]
 
-instance FromJSON ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute <$>
-      (obj .:? "Key") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2LoadBalancerLoadBalancerAttribute'
 -- containing required fields as arguments.
 elasticLoadBalancingV2LoadBalancerLoadBalancerAttribute
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerSubnetMapping.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerSubnetMapping.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerSubnetMapping.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2LoadBalancerSubnetMapping.hs
@@ -27,13 +27,6 @@
     , (Just . ("SubnetId",) . toJSON) _elasticLoadBalancingV2LoadBalancerSubnetMappingSubnetId
     ]
 
-instance FromJSON ElasticLoadBalancingV2LoadBalancerSubnetMapping where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2LoadBalancerSubnetMapping <$>
-      (obj .: "AllocationId") <*>
-      (obj .: "SubnetId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2LoadBalancerSubnetMapping'
 -- containing required fields as arguments.
 elasticLoadBalancingV2LoadBalancerSubnetMapping
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupMatcher.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupMatcher.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupMatcher.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupMatcher.hs
@@ -24,12 +24,6 @@
     [ (Just . ("HttpCode",) . toJSON) _elasticLoadBalancingV2TargetGroupMatcherHttpCode
     ]
 
-instance FromJSON ElasticLoadBalancingV2TargetGroupMatcher where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2TargetGroupMatcher <$>
-      (obj .: "HttpCode")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2TargetGroupMatcher' containing
 -- required fields as arguments.
 elasticLoadBalancingV2TargetGroupMatcher
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetDescription.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetDescription.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetDescription.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetDescription.hs
@@ -29,14 +29,6 @@
     , fmap (("Port",) . toJSON . fmap Integer') _elasticLoadBalancingV2TargetGroupTargetDescriptionPort
     ]
 
-instance FromJSON ElasticLoadBalancingV2TargetGroupTargetDescription where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2TargetGroupTargetDescription <$>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .: "Id") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Port")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2TargetGroupTargetDescription'
 -- containing required fields as arguments.
 elasticLoadBalancingV2TargetGroupTargetDescription
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetGroupAttribute.hs b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetGroupAttribute.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetGroupAttribute.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticLoadBalancingV2TargetGroupTargetGroupAttribute.hs
@@ -27,13 +27,6 @@
     , fmap (("Value",) . toJSON) _elasticLoadBalancingV2TargetGroupTargetGroupAttributeValue
     ]
 
-instance FromJSON ElasticLoadBalancingV2TargetGroupTargetGroupAttribute where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2TargetGroupTargetGroupAttribute <$>
-      (obj .:? "Key") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2TargetGroupTargetGroupAttribute'
 -- containing required fields as arguments.
 elasticLoadBalancingV2TargetGroupTargetGroupAttribute
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEBSOptions.hs b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEBSOptions.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEBSOptions.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEBSOptions.hs
@@ -29,15 +29,6 @@
     , fmap (("VolumeType",) . toJSON) _elasticsearchDomainEBSOptionsVolumeType
     ]
 
-instance FromJSON ElasticsearchDomainEBSOptions where
-  parseJSON (Object obj) =
-    ElasticsearchDomainEBSOptions <$>
-      fmap (fmap (fmap unBool')) (obj .:? "EBSEnabled") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Iops") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "VolumeSize") <*>
-      (obj .:? "VolumeType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticsearchDomainEBSOptions' containing required
 -- fields as arguments.
 elasticsearchDomainEBSOptions
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainElasticsearchClusterConfig.hs b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainElasticsearchClusterConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainElasticsearchClusterConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainElasticsearchClusterConfig.hs
@@ -35,17 +35,6 @@
     , fmap (("ZoneAwarenessEnabled",) . toJSON . fmap Bool') _elasticsearchDomainElasticsearchClusterConfigZoneAwarenessEnabled
     ]
 
-instance FromJSON ElasticsearchDomainElasticsearchClusterConfig where
-  parseJSON (Object obj) =
-    ElasticsearchDomainElasticsearchClusterConfig <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "DedicatedMasterCount") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DedicatedMasterEnabled") <*>
-      (obj .:? "DedicatedMasterType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "InstanceCount") <*>
-      (obj .:? "InstanceType") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ZoneAwarenessEnabled")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticsearchDomainElasticsearchClusterConfig'
 -- containing required fields as arguments.
 elasticsearchDomainElasticsearchClusterConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEncryptionAtRestOptions.hs b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEncryptionAtRestOptions.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEncryptionAtRestOptions.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainEncryptionAtRestOptions.hs
@@ -26,13 +26,6 @@
     , fmap (("KmsKeyId",) . toJSON) _elasticsearchDomainEncryptionAtRestOptionsKmsKeyId
     ]
 
-instance FromJSON ElasticsearchDomainEncryptionAtRestOptions where
-  parseJSON (Object obj) =
-    ElasticsearchDomainEncryptionAtRestOptions <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      (obj .:? "KmsKeyId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticsearchDomainEncryptionAtRestOptions' containing
 -- required fields as arguments.
 elasticsearchDomainEncryptionAtRestOptions
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainNodeToNodeEncryptionOptions.hs b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainNodeToNodeEncryptionOptions.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainNodeToNodeEncryptionOptions.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainNodeToNodeEncryptionOptions.hs
@@ -25,12 +25,6 @@
     [ fmap (("Enabled",) . toJSON . fmap Bool') _elasticsearchDomainNodeToNodeEncryptionOptionsEnabled
     ]
 
-instance FromJSON ElasticsearchDomainNodeToNodeEncryptionOptions where
-  parseJSON (Object obj) =
-    ElasticsearchDomainNodeToNodeEncryptionOptions <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticsearchDomainNodeToNodeEncryptionOptions'
 -- containing required fields as arguments.
 elasticsearchDomainNodeToNodeEncryptionOptions
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainSnapshotOptions.hs b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainSnapshotOptions.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainSnapshotOptions.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainSnapshotOptions.hs
@@ -23,12 +23,6 @@
     [ fmap (("AutomatedSnapshotStartHour",) . toJSON . fmap Integer') _elasticsearchDomainSnapshotOptionsAutomatedSnapshotStartHour
     ]
 
-instance FromJSON ElasticsearchDomainSnapshotOptions where
-  parseJSON (Object obj) =
-    ElasticsearchDomainSnapshotOptions <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "AutomatedSnapshotStartHour")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticsearchDomainSnapshotOptions' containing required
 -- fields as arguments.
 elasticsearchDomainSnapshotOptions
diff --git a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainVPCOptions.hs b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainVPCOptions.hs
--- a/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainVPCOptions.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ElasticsearchDomainVPCOptions.hs
@@ -25,13 +25,6 @@
     , fmap (("SubnetIds",) . toJSON) _elasticsearchDomainVPCOptionsSubnetIds
     ]
 
-instance FromJSON ElasticsearchDomainVPCOptions where
-  parseJSON (Object obj) =
-    ElasticsearchDomainVPCOptions <$>
-      (obj .:? "SecurityGroupIds") <*>
-      (obj .:? "SubnetIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticsearchDomainVPCOptions' containing required
 -- fields as arguments.
 elasticsearchDomainVPCOptions
diff --git a/library-gen/Stratosphere/ResourceProperties/EventsEventBusPolicyCondition.hs b/library-gen/Stratosphere/ResourceProperties/EventsEventBusPolicyCondition.hs
--- a/library-gen/Stratosphere/ResourceProperties/EventsEventBusPolicyCondition.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EventsEventBusPolicyCondition.hs
@@ -27,14 +27,6 @@
     , fmap (("Value",) . toJSON) _eventsEventBusPolicyConditionValue
     ]
 
-instance FromJSON EventsEventBusPolicyCondition where
-  parseJSON (Object obj) =
-    EventsEventBusPolicyCondition <$>
-      (obj .:? "Key") <*>
-      (obj .:? "Type") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EventsEventBusPolicyCondition' containing required
 -- fields as arguments.
 eventsEventBusPolicyCondition
diff --git a/library-gen/Stratosphere/ResourceProperties/EventsRuleEcsParameters.hs b/library-gen/Stratosphere/ResourceProperties/EventsRuleEcsParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/EventsRuleEcsParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EventsRuleEcsParameters.hs
@@ -25,13 +25,6 @@
     , (Just . ("TaskDefinitionArn",) . toJSON) _eventsRuleEcsParametersTaskDefinitionArn
     ]
 
-instance FromJSON EventsRuleEcsParameters where
-  parseJSON (Object obj) =
-    EventsRuleEcsParameters <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "TaskCount") <*>
-      (obj .: "TaskDefinitionArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EventsRuleEcsParameters' containing required fields as
 -- arguments.
 eventsRuleEcsParameters
diff --git a/library-gen/Stratosphere/ResourceProperties/EventsRuleInputTransformer.hs b/library-gen/Stratosphere/ResourceProperties/EventsRuleInputTransformer.hs
--- a/library-gen/Stratosphere/ResourceProperties/EventsRuleInputTransformer.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EventsRuleInputTransformer.hs
@@ -25,13 +25,6 @@
     , (Just . ("InputTemplate",) . toJSON) _eventsRuleInputTransformerInputTemplate
     ]
 
-instance FromJSON EventsRuleInputTransformer where
-  parseJSON (Object obj) =
-    EventsRuleInputTransformer <$>
-      (obj .:? "InputPathsMap") <*>
-      (obj .: "InputTemplate")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EventsRuleInputTransformer' containing required fields
 -- as arguments.
 eventsRuleInputTransformer
diff --git a/library-gen/Stratosphere/ResourceProperties/EventsRuleKinesisParameters.hs b/library-gen/Stratosphere/ResourceProperties/EventsRuleKinesisParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/EventsRuleKinesisParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EventsRuleKinesisParameters.hs
@@ -23,12 +23,6 @@
     [ (Just . ("PartitionKeyPath",) . toJSON) _eventsRuleKinesisParametersPartitionKeyPath
     ]
 
-instance FromJSON EventsRuleKinesisParameters where
-  parseJSON (Object obj) =
-    EventsRuleKinesisParameters <$>
-      (obj .: "PartitionKeyPath")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EventsRuleKinesisParameters' containing required fields
 -- as arguments.
 eventsRuleKinesisParameters
diff --git a/library-gen/Stratosphere/ResourceProperties/EventsRuleRunCommandParameters.hs b/library-gen/Stratosphere/ResourceProperties/EventsRuleRunCommandParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/EventsRuleRunCommandParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EventsRuleRunCommandParameters.hs
@@ -23,12 +23,6 @@
     [ (Just . ("RunCommandTargets",) . toJSON) _eventsRuleRunCommandParametersRunCommandTargets
     ]
 
-instance FromJSON EventsRuleRunCommandParameters where
-  parseJSON (Object obj) =
-    EventsRuleRunCommandParameters <$>
-      (obj .: "RunCommandTargets")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EventsRuleRunCommandParameters' containing required
 -- fields as arguments.
 eventsRuleRunCommandParameters
diff --git a/library-gen/Stratosphere/ResourceProperties/EventsRuleRunCommandTarget.hs b/library-gen/Stratosphere/ResourceProperties/EventsRuleRunCommandTarget.hs
--- a/library-gen/Stratosphere/ResourceProperties/EventsRuleRunCommandTarget.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EventsRuleRunCommandTarget.hs
@@ -25,13 +25,6 @@
     , (Just . ("Values",) . toJSON) _eventsRuleRunCommandTargetValues
     ]
 
-instance FromJSON EventsRuleRunCommandTarget where
-  parseJSON (Object obj) =
-    EventsRuleRunCommandTarget <$>
-      (obj .: "Key") <*>
-      (obj .: "Values")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EventsRuleRunCommandTarget' containing required fields
 -- as arguments.
 eventsRuleRunCommandTarget
diff --git a/library-gen/Stratosphere/ResourceProperties/EventsRuleSqsParameters.hs b/library-gen/Stratosphere/ResourceProperties/EventsRuleSqsParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/EventsRuleSqsParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EventsRuleSqsParameters.hs
@@ -23,12 +23,6 @@
     [ (Just . ("MessageGroupId",) . toJSON) _eventsRuleSqsParametersMessageGroupId
     ]
 
-instance FromJSON EventsRuleSqsParameters where
-  parseJSON (Object obj) =
-    EventsRuleSqsParameters <$>
-      (obj .: "MessageGroupId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EventsRuleSqsParameters' containing required fields as
 -- arguments.
 eventsRuleSqsParameters
diff --git a/library-gen/Stratosphere/ResourceProperties/EventsRuleTarget.hs b/library-gen/Stratosphere/ResourceProperties/EventsRuleTarget.hs
--- a/library-gen/Stratosphere/ResourceProperties/EventsRuleTarget.hs
+++ b/library-gen/Stratosphere/ResourceProperties/EventsRuleTarget.hs
@@ -45,21 +45,6 @@
     , fmap (("SqsParameters",) . toJSON) _eventsRuleTargetSqsParameters
     ]
 
-instance FromJSON EventsRuleTarget where
-  parseJSON (Object obj) =
-    EventsRuleTarget <$>
-      (obj .: "Arn") <*>
-      (obj .:? "EcsParameters") <*>
-      (obj .: "Id") <*>
-      (obj .:? "Input") <*>
-      (obj .:? "InputPath") <*>
-      (obj .:? "InputTransformer") <*>
-      (obj .:? "KinesisParameters") <*>
-      (obj .:? "RoleArn") <*>
-      (obj .:? "RunCommandParameters") <*>
-      (obj .:? "SqsParameters")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EventsRuleTarget' containing required fields as
 -- arguments.
 eventsRuleTarget
diff --git a/library-gen/Stratosphere/ResourceProperties/FSxFileSystemLustreConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/FSxFileSystemLustreConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/FSxFileSystemLustreConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/FSxFileSystemLustreConfiguration.hs
@@ -29,15 +29,6 @@
     , fmap (("WeeklyMaintenanceStartTime",) . toJSON) _fSxFileSystemLustreConfigurationWeeklyMaintenanceStartTime
     ]
 
-instance FromJSON FSxFileSystemLustreConfiguration where
-  parseJSON (Object obj) =
-    FSxFileSystemLustreConfiguration <$>
-      (obj .:? "ExportPath") <*>
-      (obj .:? "ImportPath") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ImportedFileChunkSize") <*>
-      (obj .:? "WeeklyMaintenanceStartTime")
-  parseJSON _ = mempty
-
 -- | Constructor for 'FSxFileSystemLustreConfiguration' containing required
 -- fields as arguments.
 fSxFileSystemLustreConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/FSxFileSystemTagEntry.hs b/library-gen/Stratosphere/ResourceProperties/FSxFileSystemTagEntry.hs
--- a/library-gen/Stratosphere/ResourceProperties/FSxFileSystemTagEntry.hs
+++ b/library-gen/Stratosphere/ResourceProperties/FSxFileSystemTagEntry.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _fSxFileSystemTagEntryValue
     ]
 
-instance FromJSON FSxFileSystemTagEntry where
-  parseJSON (Object obj) =
-    FSxFileSystemTagEntry <$>
-      (obj .: "Key") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'FSxFileSystemTagEntry' containing required fields as
 -- arguments.
 fSxFileSystemTagEntry
diff --git a/library-gen/Stratosphere/ResourceProperties/FSxFileSystemWindowsConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/FSxFileSystemWindowsConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/FSxFileSystemWindowsConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/FSxFileSystemWindowsConfiguration.hs
@@ -33,17 +33,6 @@
     , fmap (("WeeklyMaintenanceStartTime",) . toJSON) _fSxFileSystemWindowsConfigurationWeeklyMaintenanceStartTime
     ]
 
-instance FromJSON FSxFileSystemWindowsConfiguration where
-  parseJSON (Object obj) =
-    FSxFileSystemWindowsConfiguration <$>
-      (obj .:? "ActiveDirectoryId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "AutomaticBackupRetentionDays") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "CopyTagsToBackups") <*>
-      (obj .:? "DailyAutomaticBackupStartTime") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ThroughputCapacity") <*>
-      (obj .:? "WeeklyMaintenanceStartTime")
-  parseJSON _ = mempty
-
 -- | Constructor for 'FSxFileSystemWindowsConfiguration' containing required
 -- fields as arguments.
 fSxFileSystemWindowsConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/GameLiftAliasRoutingStrategy.hs b/library-gen/Stratosphere/ResourceProperties/GameLiftAliasRoutingStrategy.hs
--- a/library-gen/Stratosphere/ResourceProperties/GameLiftAliasRoutingStrategy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GameLiftAliasRoutingStrategy.hs
@@ -27,14 +27,6 @@
     , (Just . ("Type",) . toJSON) _gameLiftAliasRoutingStrategyType
     ]
 
-instance FromJSON GameLiftAliasRoutingStrategy where
-  parseJSON (Object obj) =
-    GameLiftAliasRoutingStrategy <$>
-      (obj .:? "FleetId") <*>
-      (obj .:? "Message") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GameLiftAliasRoutingStrategy' containing required fields
 -- as arguments.
 gameLiftAliasRoutingStrategy
diff --git a/library-gen/Stratosphere/ResourceProperties/GameLiftBuildS3Location.hs b/library-gen/Stratosphere/ResourceProperties/GameLiftBuildS3Location.hs
--- a/library-gen/Stratosphere/ResourceProperties/GameLiftBuildS3Location.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GameLiftBuildS3Location.hs
@@ -27,14 +27,6 @@
     , (Just . ("RoleArn",) . toJSON) _gameLiftBuildS3LocationRoleArn
     ]
 
-instance FromJSON GameLiftBuildS3Location where
-  parseJSON (Object obj) =
-    GameLiftBuildS3Location <$>
-      (obj .: "Bucket") <*>
-      (obj .: "Key") <*>
-      (obj .: "RoleArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GameLiftBuildS3Location' containing required fields as
 -- arguments.
 gameLiftBuildS3Location
diff --git a/library-gen/Stratosphere/ResourceProperties/GameLiftFleetIpPermission.hs b/library-gen/Stratosphere/ResourceProperties/GameLiftFleetIpPermission.hs
--- a/library-gen/Stratosphere/ResourceProperties/GameLiftFleetIpPermission.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GameLiftFleetIpPermission.hs
@@ -29,15 +29,6 @@
     , (Just . ("ToPort",) . toJSON . fmap Integer') _gameLiftFleetIpPermissionToPort
     ]
 
-instance FromJSON GameLiftFleetIpPermission where
-  parseJSON (Object obj) =
-    GameLiftFleetIpPermission <$>
-      fmap (fmap unInteger') (obj .: "FromPort") <*>
-      (obj .: "IpRange") <*>
-      (obj .: "Protocol") <*>
-      fmap (fmap unInteger') (obj .: "ToPort")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GameLiftFleetIpPermission' containing required fields as
 -- arguments.
 gameLiftFleetIpPermission
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueClassifierGrokClassifier.hs b/library-gen/Stratosphere/ResourceProperties/GlueClassifierGrokClassifier.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueClassifierGrokClassifier.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueClassifierGrokClassifier.hs
@@ -29,15 +29,6 @@
     , fmap (("Name",) . toJSON) _glueClassifierGrokClassifierName
     ]
 
-instance FromJSON GlueClassifierGrokClassifier where
-  parseJSON (Object obj) =
-    GlueClassifierGrokClassifier <$>
-      (obj .: "Classification") <*>
-      (obj .:? "CustomPatterns") <*>
-      (obj .: "GrokPattern") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueClassifierGrokClassifier' containing required fields
 -- as arguments.
 glueClassifierGrokClassifier
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueClassifierJsonClassifier.hs b/library-gen/Stratosphere/ResourceProperties/GlueClassifierJsonClassifier.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueClassifierJsonClassifier.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueClassifierJsonClassifier.hs
@@ -25,13 +25,6 @@
     , fmap (("Name",) . toJSON) _glueClassifierJsonClassifierName
     ]
 
-instance FromJSON GlueClassifierJsonClassifier where
-  parseJSON (Object obj) =
-    GlueClassifierJsonClassifier <$>
-      (obj .: "JsonPath") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueClassifierJsonClassifier' containing required fields
 -- as arguments.
 glueClassifierJsonClassifier
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueClassifierXMLClassifier.hs b/library-gen/Stratosphere/ResourceProperties/GlueClassifierXMLClassifier.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueClassifierXMLClassifier.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueClassifierXMLClassifier.hs
@@ -27,14 +27,6 @@
     , (Just . ("RowTag",) . toJSON) _glueClassifierXMLClassifierRowTag
     ]
 
-instance FromJSON GlueClassifierXMLClassifier where
-  parseJSON (Object obj) =
-    GlueClassifierXMLClassifier <$>
-      (obj .: "Classification") <*>
-      (obj .:? "Name") <*>
-      (obj .: "RowTag")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueClassifierXMLClassifier' containing required fields
 -- as arguments.
 glueClassifierXMLClassifier
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueConnectionConnectionInput.hs b/library-gen/Stratosphere/ResourceProperties/GlueConnectionConnectionInput.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueConnectionConnectionInput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueConnectionConnectionInput.hs
@@ -33,17 +33,6 @@
     , fmap (("PhysicalConnectionRequirements",) . toJSON) _glueConnectionConnectionInputPhysicalConnectionRequirements
     ]
 
-instance FromJSON GlueConnectionConnectionInput where
-  parseJSON (Object obj) =
-    GlueConnectionConnectionInput <$>
-      (obj .: "ConnectionProperties") <*>
-      (obj .: "ConnectionType") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "MatchCriteria") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "PhysicalConnectionRequirements")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueConnectionConnectionInput' containing required
 -- fields as arguments.
 glueConnectionConnectionInput
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueConnectionPhysicalConnectionRequirements.hs b/library-gen/Stratosphere/ResourceProperties/GlueConnectionPhysicalConnectionRequirements.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueConnectionPhysicalConnectionRequirements.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueConnectionPhysicalConnectionRequirements.hs
@@ -29,14 +29,6 @@
     , fmap (("SubnetId",) . toJSON) _glueConnectionPhysicalConnectionRequirementsSubnetId
     ]
 
-instance FromJSON GlueConnectionPhysicalConnectionRequirements where
-  parseJSON (Object obj) =
-    GlueConnectionPhysicalConnectionRequirements <$>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .:? "SecurityGroupIdList") <*>
-      (obj .:? "SubnetId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueConnectionPhysicalConnectionRequirements' containing
 -- required fields as arguments.
 glueConnectionPhysicalConnectionRequirements
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueCrawlerJdbcTarget.hs b/library-gen/Stratosphere/ResourceProperties/GlueCrawlerJdbcTarget.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueCrawlerJdbcTarget.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueCrawlerJdbcTarget.hs
@@ -27,14 +27,6 @@
     , fmap (("Path",) . toJSON) _glueCrawlerJdbcTargetPath
     ]
 
-instance FromJSON GlueCrawlerJdbcTarget where
-  parseJSON (Object obj) =
-    GlueCrawlerJdbcTarget <$>
-      (obj .:? "ConnectionName") <*>
-      (obj .:? "Exclusions") <*>
-      (obj .:? "Path")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueCrawlerJdbcTarget' containing required fields as
 -- arguments.
 glueCrawlerJdbcTarget
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueCrawlerS3Target.hs b/library-gen/Stratosphere/ResourceProperties/GlueCrawlerS3Target.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueCrawlerS3Target.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueCrawlerS3Target.hs
@@ -25,13 +25,6 @@
     , fmap (("Path",) . toJSON) _glueCrawlerS3TargetPath
     ]
 
-instance FromJSON GlueCrawlerS3Target where
-  parseJSON (Object obj) =
-    GlueCrawlerS3Target <$>
-      (obj .:? "Exclusions") <*>
-      (obj .:? "Path")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueCrawlerS3Target' containing required fields as
 -- arguments.
 glueCrawlerS3Target
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueCrawlerSchedule.hs b/library-gen/Stratosphere/ResourceProperties/GlueCrawlerSchedule.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueCrawlerSchedule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueCrawlerSchedule.hs
@@ -23,12 +23,6 @@
     [ fmap (("ScheduleExpression",) . toJSON) _glueCrawlerScheduleScheduleExpression
     ]
 
-instance FromJSON GlueCrawlerSchedule where
-  parseJSON (Object obj) =
-    GlueCrawlerSchedule <$>
-      (obj .:? "ScheduleExpression")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueCrawlerSchedule' containing required fields as
 -- arguments.
 glueCrawlerSchedule
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueCrawlerSchemaChangePolicy.hs b/library-gen/Stratosphere/ResourceProperties/GlueCrawlerSchemaChangePolicy.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueCrawlerSchemaChangePolicy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueCrawlerSchemaChangePolicy.hs
@@ -25,13 +25,6 @@
     , fmap (("UpdateBehavior",) . toJSON) _glueCrawlerSchemaChangePolicyUpdateBehavior
     ]
 
-instance FromJSON GlueCrawlerSchemaChangePolicy where
-  parseJSON (Object obj) =
-    GlueCrawlerSchemaChangePolicy <$>
-      (obj .:? "DeleteBehavior") <*>
-      (obj .:? "UpdateBehavior")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueCrawlerSchemaChangePolicy' containing required
 -- fields as arguments.
 glueCrawlerSchemaChangePolicy
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueCrawlerTargets.hs b/library-gen/Stratosphere/ResourceProperties/GlueCrawlerTargets.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueCrawlerTargets.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueCrawlerTargets.hs
@@ -26,13 +26,6 @@
     , fmap (("S3Targets",) . toJSON) _glueCrawlerTargetsS3Targets
     ]
 
-instance FromJSON GlueCrawlerTargets where
-  parseJSON (Object obj) =
-    GlueCrawlerTargets <$>
-      (obj .:? "JdbcTargets") <*>
-      (obj .:? "S3Targets")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueCrawlerTargets' containing required fields as
 -- arguments.
 glueCrawlerTargets
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueDatabaseDatabaseInput.hs b/library-gen/Stratosphere/ResourceProperties/GlueDatabaseDatabaseInput.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueDatabaseDatabaseInput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueDatabaseDatabaseInput.hs
@@ -29,15 +29,6 @@
     , fmap (("Parameters",) . toJSON) _glueDatabaseDatabaseInputParameters
     ]
 
-instance FromJSON GlueDatabaseDatabaseInput where
-  parseJSON (Object obj) =
-    GlueDatabaseDatabaseInput <$>
-      (obj .:? "Description") <*>
-      (obj .:? "LocationUri") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Parameters")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueDatabaseDatabaseInput' containing required fields as
 -- arguments.
 glueDatabaseDatabaseInput
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueJobConnectionsList.hs b/library-gen/Stratosphere/ResourceProperties/GlueJobConnectionsList.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueJobConnectionsList.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueJobConnectionsList.hs
@@ -23,12 +23,6 @@
     [ fmap (("Connections",) . toJSON) _glueJobConnectionsListConnections
     ]
 
-instance FromJSON GlueJobConnectionsList where
-  parseJSON (Object obj) =
-    GlueJobConnectionsList <$>
-      (obj .:? "Connections")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueJobConnectionsList' containing required fields as
 -- arguments.
 glueJobConnectionsList
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueJobExecutionProperty.hs b/library-gen/Stratosphere/ResourceProperties/GlueJobExecutionProperty.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueJobExecutionProperty.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueJobExecutionProperty.hs
@@ -23,12 +23,6 @@
     [ fmap (("MaxConcurrentRuns",) . toJSON . fmap Double') _glueJobExecutionPropertyMaxConcurrentRuns
     ]
 
-instance FromJSON GlueJobExecutionProperty where
-  parseJSON (Object obj) =
-    GlueJobExecutionProperty <$>
-      fmap (fmap (fmap unDouble')) (obj .:? "MaxConcurrentRuns")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueJobExecutionProperty' containing required fields as
 -- arguments.
 glueJobExecutionProperty
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueJobJobCommand.hs b/library-gen/Stratosphere/ResourceProperties/GlueJobJobCommand.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueJobJobCommand.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueJobJobCommand.hs
@@ -25,13 +25,6 @@
     , fmap (("ScriptLocation",) . toJSON) _glueJobJobCommandScriptLocation
     ]
 
-instance FromJSON GlueJobJobCommand where
-  parseJSON (Object obj) =
-    GlueJobJobCommand <$>
-      (obj .:? "Name") <*>
-      (obj .:? "ScriptLocation")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueJobJobCommand' containing required fields as
 -- arguments.
 glueJobJobCommand
diff --git a/library-gen/Stratosphere/ResourceProperties/GluePartitionColumn.hs b/library-gen/Stratosphere/ResourceProperties/GluePartitionColumn.hs
--- a/library-gen/Stratosphere/ResourceProperties/GluePartitionColumn.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GluePartitionColumn.hs
@@ -27,14 +27,6 @@
     , fmap (("Type",) . toJSON) _gluePartitionColumnType
     ]
 
-instance FromJSON GluePartitionColumn where
-  parseJSON (Object obj) =
-    GluePartitionColumn <$>
-      (obj .:? "Comment") <*>
-      (obj .: "Name") <*>
-      (obj .:? "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GluePartitionColumn' containing required fields as
 -- arguments.
 gluePartitionColumn
diff --git a/library-gen/Stratosphere/ResourceProperties/GluePartitionOrder.hs b/library-gen/Stratosphere/ResourceProperties/GluePartitionOrder.hs
--- a/library-gen/Stratosphere/ResourceProperties/GluePartitionOrder.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GluePartitionOrder.hs
@@ -25,13 +25,6 @@
     , fmap (("SortOrder",) . toJSON . fmap Integer') _gluePartitionOrderSortOrder
     ]
 
-instance FromJSON GluePartitionOrder where
-  parseJSON (Object obj) =
-    GluePartitionOrder <$>
-      (obj .: "Column") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SortOrder")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GluePartitionOrder' containing required fields as
 -- arguments.
 gluePartitionOrder
diff --git a/library-gen/Stratosphere/ResourceProperties/GluePartitionPartitionInput.hs b/library-gen/Stratosphere/ResourceProperties/GluePartitionPartitionInput.hs
--- a/library-gen/Stratosphere/ResourceProperties/GluePartitionPartitionInput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GluePartitionPartitionInput.hs
@@ -27,14 +27,6 @@
     , (Just . ("Values",) . toJSON) _gluePartitionPartitionInputValues
     ]
 
-instance FromJSON GluePartitionPartitionInput where
-  parseJSON (Object obj) =
-    GluePartitionPartitionInput <$>
-      (obj .:? "Parameters") <*>
-      (obj .:? "StorageDescriptor") <*>
-      (obj .: "Values")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GluePartitionPartitionInput' containing required fields
 -- as arguments.
 gluePartitionPartitionInput
diff --git a/library-gen/Stratosphere/ResourceProperties/GluePartitionSerdeInfo.hs b/library-gen/Stratosphere/ResourceProperties/GluePartitionSerdeInfo.hs
--- a/library-gen/Stratosphere/ResourceProperties/GluePartitionSerdeInfo.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GluePartitionSerdeInfo.hs
@@ -27,14 +27,6 @@
     , fmap (("SerializationLibrary",) . toJSON) _gluePartitionSerdeInfoSerializationLibrary
     ]
 
-instance FromJSON GluePartitionSerdeInfo where
-  parseJSON (Object obj) =
-    GluePartitionSerdeInfo <$>
-      (obj .:? "Name") <*>
-      (obj .:? "Parameters") <*>
-      (obj .:? "SerializationLibrary")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GluePartitionSerdeInfo' containing required fields as
 -- arguments.
 gluePartitionSerdeInfo
diff --git a/library-gen/Stratosphere/ResourceProperties/GluePartitionSkewedInfo.hs b/library-gen/Stratosphere/ResourceProperties/GluePartitionSkewedInfo.hs
--- a/library-gen/Stratosphere/ResourceProperties/GluePartitionSkewedInfo.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GluePartitionSkewedInfo.hs
@@ -27,14 +27,6 @@
     , fmap (("SkewedColumnValues",) . toJSON) _gluePartitionSkewedInfoSkewedColumnValues
     ]
 
-instance FromJSON GluePartitionSkewedInfo where
-  parseJSON (Object obj) =
-    GluePartitionSkewedInfo <$>
-      (obj .:? "SkewedColumnNames") <*>
-      (obj .:? "SkewedColumnValueLocationMaps") <*>
-      (obj .:? "SkewedColumnValues")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GluePartitionSkewedInfo' containing required fields as
 -- arguments.
 gluePartitionSkewedInfo
diff --git a/library-gen/Stratosphere/ResourceProperties/GluePartitionStorageDescriptor.hs b/library-gen/Stratosphere/ResourceProperties/GluePartitionStorageDescriptor.hs
--- a/library-gen/Stratosphere/ResourceProperties/GluePartitionStorageDescriptor.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GluePartitionStorageDescriptor.hs
@@ -48,23 +48,6 @@
     , fmap (("StoredAsSubDirectories",) . toJSON . fmap Bool') _gluePartitionStorageDescriptorStoredAsSubDirectories
     ]
 
-instance FromJSON GluePartitionStorageDescriptor where
-  parseJSON (Object obj) =
-    GluePartitionStorageDescriptor <$>
-      (obj .:? "BucketColumns") <*>
-      (obj .:? "Columns") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Compressed") <*>
-      (obj .:? "InputFormat") <*>
-      (obj .:? "Location") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "NumberOfBuckets") <*>
-      (obj .:? "OutputFormat") <*>
-      (obj .:? "Parameters") <*>
-      (obj .:? "SerdeInfo") <*>
-      (obj .:? "SkewedInfo") <*>
-      (obj .:? "SortColumns") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "StoredAsSubDirectories")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GluePartitionStorageDescriptor' containing required
 -- fields as arguments.
 gluePartitionStorageDescriptor
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueTableColumn.hs b/library-gen/Stratosphere/ResourceProperties/GlueTableColumn.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueTableColumn.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueTableColumn.hs
@@ -27,14 +27,6 @@
     , fmap (("Type",) . toJSON) _glueTableColumnType
     ]
 
-instance FromJSON GlueTableColumn where
-  parseJSON (Object obj) =
-    GlueTableColumn <$>
-      (obj .:? "Comment") <*>
-      (obj .: "Name") <*>
-      (obj .:? "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueTableColumn' containing required fields as
 -- arguments.
 glueTableColumn
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueTableOrder.hs b/library-gen/Stratosphere/ResourceProperties/GlueTableOrder.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueTableOrder.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueTableOrder.hs
@@ -25,13 +25,6 @@
     , (Just . ("SortOrder",) . toJSON . fmap Integer') _glueTableOrderSortOrder
     ]
 
-instance FromJSON GlueTableOrder where
-  parseJSON (Object obj) =
-    GlueTableOrder <$>
-      (obj .: "Column") <*>
-      fmap (fmap unInteger') (obj .: "SortOrder")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueTableOrder' containing required fields as arguments.
 glueTableOrder
   :: Val Text -- ^ 'gtoColumn'
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueTableSerdeInfo.hs b/library-gen/Stratosphere/ResourceProperties/GlueTableSerdeInfo.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueTableSerdeInfo.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueTableSerdeInfo.hs
@@ -27,14 +27,6 @@
     , fmap (("SerializationLibrary",) . toJSON) _glueTableSerdeInfoSerializationLibrary
     ]
 
-instance FromJSON GlueTableSerdeInfo where
-  parseJSON (Object obj) =
-    GlueTableSerdeInfo <$>
-      (obj .:? "Name") <*>
-      (obj .:? "Parameters") <*>
-      (obj .:? "SerializationLibrary")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueTableSerdeInfo' containing required fields as
 -- arguments.
 glueTableSerdeInfo
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueTableSkewedInfo.hs b/library-gen/Stratosphere/ResourceProperties/GlueTableSkewedInfo.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueTableSkewedInfo.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueTableSkewedInfo.hs
@@ -27,14 +27,6 @@
     , fmap (("SkewedColumnValues",) . toJSON) _glueTableSkewedInfoSkewedColumnValues
     ]
 
-instance FromJSON GlueTableSkewedInfo where
-  parseJSON (Object obj) =
-    GlueTableSkewedInfo <$>
-      (obj .:? "SkewedColumnNames") <*>
-      (obj .:? "SkewedColumnValueLocationMaps") <*>
-      (obj .:? "SkewedColumnValues")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueTableSkewedInfo' containing required fields as
 -- arguments.
 glueTableSkewedInfo
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueTableStorageDescriptor.hs b/library-gen/Stratosphere/ResourceProperties/GlueTableStorageDescriptor.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueTableStorageDescriptor.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueTableStorageDescriptor.hs
@@ -48,23 +48,6 @@
     , fmap (("StoredAsSubDirectories",) . toJSON . fmap Bool') _glueTableStorageDescriptorStoredAsSubDirectories
     ]
 
-instance FromJSON GlueTableStorageDescriptor where
-  parseJSON (Object obj) =
-    GlueTableStorageDescriptor <$>
-      (obj .:? "BucketColumns") <*>
-      (obj .:? "Columns") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Compressed") <*>
-      (obj .:? "InputFormat") <*>
-      (obj .:? "Location") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "NumberOfBuckets") <*>
-      (obj .:? "OutputFormat") <*>
-      (obj .:? "Parameters") <*>
-      (obj .:? "SerdeInfo") <*>
-      (obj .:? "SkewedInfo") <*>
-      (obj .:? "SortColumns") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "StoredAsSubDirectories")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueTableStorageDescriptor' containing required fields
 -- as arguments.
 glueTableStorageDescriptor
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueTableTableInput.hs b/library-gen/Stratosphere/ResourceProperties/GlueTableTableInput.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueTableTableInput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueTableTableInput.hs
@@ -42,21 +42,6 @@
     , fmap (("ViewOriginalText",) . toJSON) _glueTableTableInputViewOriginalText
     ]
 
-instance FromJSON GlueTableTableInput where
-  parseJSON (Object obj) =
-    GlueTableTableInput <$>
-      (obj .:? "Description") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Owner") <*>
-      (obj .:? "Parameters") <*>
-      (obj .:? "PartitionKeys") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Retention") <*>
-      (obj .:? "StorageDescriptor") <*>
-      (obj .:? "TableType") <*>
-      (obj .:? "ViewExpandedText") <*>
-      (obj .:? "ViewOriginalText")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueTableTableInput' containing required fields as
 -- arguments.
 glueTableTableInput
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueTriggerAction.hs b/library-gen/Stratosphere/ResourceProperties/GlueTriggerAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueTriggerAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueTriggerAction.hs
@@ -25,13 +25,6 @@
     , fmap (("JobName",) . toJSON) _glueTriggerActionJobName
     ]
 
-instance FromJSON GlueTriggerAction where
-  parseJSON (Object obj) =
-    GlueTriggerAction <$>
-      (obj .:? "Arguments") <*>
-      (obj .:? "JobName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueTriggerAction' containing required fields as
 -- arguments.
 glueTriggerAction
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueTriggerCondition.hs b/library-gen/Stratosphere/ResourceProperties/GlueTriggerCondition.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueTriggerCondition.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueTriggerCondition.hs
@@ -27,14 +27,6 @@
     , fmap (("State",) . toJSON) _glueTriggerConditionState
     ]
 
-instance FromJSON GlueTriggerCondition where
-  parseJSON (Object obj) =
-    GlueTriggerCondition <$>
-      (obj .:? "JobName") <*>
-      (obj .:? "LogicalOperator") <*>
-      (obj .:? "State")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueTriggerCondition' containing required fields as
 -- arguments.
 glueTriggerCondition
diff --git a/library-gen/Stratosphere/ResourceProperties/GlueTriggerPredicate.hs b/library-gen/Stratosphere/ResourceProperties/GlueTriggerPredicate.hs
--- a/library-gen/Stratosphere/ResourceProperties/GlueTriggerPredicate.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GlueTriggerPredicate.hs
@@ -25,13 +25,6 @@
     , fmap (("Logical",) . toJSON) _glueTriggerPredicateLogical
     ]
 
-instance FromJSON GlueTriggerPredicate where
-  parseJSON (Object obj) =
-    GlueTriggerPredicate <$>
-      (obj .:? "Conditions") <*>
-      (obj .:? "Logical")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueTriggerPredicate' containing required fields as
 -- arguments.
 glueTriggerPredicate
diff --git a/library-gen/Stratosphere/ResourceProperties/GuardDutyFilterCondition.hs b/library-gen/Stratosphere/ResourceProperties/GuardDutyFilterCondition.hs
--- a/library-gen/Stratosphere/ResourceProperties/GuardDutyFilterCondition.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GuardDutyFilterCondition.hs
@@ -31,16 +31,6 @@
     , fmap (("Neq",) . toJSON) _guardDutyFilterConditionNeq
     ]
 
-instance FromJSON GuardDutyFilterCondition where
-  parseJSON (Object obj) =
-    GuardDutyFilterCondition <$>
-      (obj .:? "Eq") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Gte") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Lt") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Lte") <*>
-      (obj .:? "Neq")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GuardDutyFilterCondition' containing required fields as
 -- arguments.
 guardDutyFilterCondition
diff --git a/library-gen/Stratosphere/ResourceProperties/GuardDutyFilterFindingCriteria.hs b/library-gen/Stratosphere/ResourceProperties/GuardDutyFilterFindingCriteria.hs
--- a/library-gen/Stratosphere/ResourceProperties/GuardDutyFilterFindingCriteria.hs
+++ b/library-gen/Stratosphere/ResourceProperties/GuardDutyFilterFindingCriteria.hs
@@ -25,13 +25,6 @@
     , fmap (("ItemType",) . toJSON) _guardDutyFilterFindingCriteriaItemType
     ]
 
-instance FromJSON GuardDutyFilterFindingCriteria where
-  parseJSON (Object obj) =
-    GuardDutyFilterFindingCriteria <$>
-      (obj .:? "Criterion") <*>
-      (obj .:? "ItemType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GuardDutyFilterFindingCriteria' containing required
 -- fields as arguments.
 guardDutyFilterFindingCriteria
diff --git a/library-gen/Stratosphere/ResourceProperties/IAMGroupPolicy.hs b/library-gen/Stratosphere/ResourceProperties/IAMGroupPolicy.hs
--- a/library-gen/Stratosphere/ResourceProperties/IAMGroupPolicy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IAMGroupPolicy.hs
@@ -25,13 +25,6 @@
     , (Just . ("PolicyName",) . toJSON) _iAMGroupPolicyPolicyName
     ]
 
-instance FromJSON IAMGroupPolicy where
-  parseJSON (Object obj) =
-    IAMGroupPolicy <$>
-      (obj .: "PolicyDocument") <*>
-      (obj .: "PolicyName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IAMGroupPolicy' containing required fields as arguments.
 iamGroupPolicy
   :: Object -- ^ 'iamgpPolicyDocument'
diff --git a/library-gen/Stratosphere/ResourceProperties/IAMRolePolicy.hs b/library-gen/Stratosphere/ResourceProperties/IAMRolePolicy.hs
--- a/library-gen/Stratosphere/ResourceProperties/IAMRolePolicy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IAMRolePolicy.hs
@@ -25,13 +25,6 @@
     , (Just . ("PolicyName",) . toJSON) _iAMRolePolicyPolicyName
     ]
 
-instance FromJSON IAMRolePolicy where
-  parseJSON (Object obj) =
-    IAMRolePolicy <$>
-      (obj .: "PolicyDocument") <*>
-      (obj .: "PolicyName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IAMRolePolicy' containing required fields as arguments.
 iamRolePolicy
   :: Object -- ^ 'iamrpPolicyDocument'
diff --git a/library-gen/Stratosphere/ResourceProperties/IAMUserLoginProfile.hs b/library-gen/Stratosphere/ResourceProperties/IAMUserLoginProfile.hs
--- a/library-gen/Stratosphere/ResourceProperties/IAMUserLoginProfile.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IAMUserLoginProfile.hs
@@ -25,13 +25,6 @@
     , fmap (("PasswordResetRequired",) . toJSON . fmap Bool') _iAMUserLoginProfilePasswordResetRequired
     ]
 
-instance FromJSON IAMUserLoginProfile where
-  parseJSON (Object obj) =
-    IAMUserLoginProfile <$>
-      (obj .: "Password") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "PasswordResetRequired")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IAMUserLoginProfile' containing required fields as
 -- arguments.
 iamUserLoginProfile
diff --git a/library-gen/Stratosphere/ResourceProperties/IAMUserPolicy.hs b/library-gen/Stratosphere/ResourceProperties/IAMUserPolicy.hs
--- a/library-gen/Stratosphere/ResourceProperties/IAMUserPolicy.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IAMUserPolicy.hs
@@ -25,13 +25,6 @@
     , (Just . ("PolicyName",) . toJSON) _iAMUserPolicyPolicyName
     ]
 
-instance FromJSON IAMUserPolicy where
-  parseJSON (Object obj) =
-    IAMUserPolicy <$>
-      (obj .: "PolicyDocument") <*>
-      (obj .: "PolicyName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IAMUserPolicy' containing required fields as arguments.
 iamUserPolicy
   :: Object -- ^ 'iamupPolicyDocument'
diff --git a/library-gen/Stratosphere/ResourceProperties/IoT1ClickProjectDeviceTemplate.hs b/library-gen/Stratosphere/ResourceProperties/IoT1ClickProjectDeviceTemplate.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoT1ClickProjectDeviceTemplate.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoT1ClickProjectDeviceTemplate.hs
@@ -25,13 +25,6 @@
     , fmap (("DeviceType",) . toJSON) _ioT1ClickProjectDeviceTemplateDeviceType
     ]
 
-instance FromJSON IoT1ClickProjectDeviceTemplate where
-  parseJSON (Object obj) =
-    IoT1ClickProjectDeviceTemplate <$>
-      (obj .:? "CallbackOverrides") <*>
-      (obj .:? "DeviceType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoT1ClickProjectDeviceTemplate' containing required
 -- fields as arguments.
 ioT1ClickProjectDeviceTemplate
diff --git a/library-gen/Stratosphere/ResourceProperties/IoT1ClickProjectPlacementTemplate.hs b/library-gen/Stratosphere/ResourceProperties/IoT1ClickProjectPlacementTemplate.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoT1ClickProjectPlacementTemplate.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoT1ClickProjectPlacementTemplate.hs
@@ -25,13 +25,6 @@
     , fmap (("DeviceTemplates",) . toJSON) _ioT1ClickProjectPlacementTemplateDeviceTemplates
     ]
 
-instance FromJSON IoT1ClickProjectPlacementTemplate where
-  parseJSON (Object obj) =
-    IoT1ClickProjectPlacementTemplate <$>
-      (obj .:? "DefaultAttributes") <*>
-      (obj .:? "DeviceTemplates")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoT1ClickProjectPlacementTemplate' containing required
 -- fields as arguments.
 ioT1ClickProjectPlacementTemplate
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsChannelRetentionPeriod.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsChannelRetentionPeriod.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsChannelRetentionPeriod.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsChannelRetentionPeriod.hs
@@ -25,13 +25,6 @@
     , fmap (("Unlimited",) . toJSON . fmap Bool') _ioTAnalyticsChannelRetentionPeriodUnlimited
     ]
 
-instance FromJSON IoTAnalyticsChannelRetentionPeriod where
-  parseJSON (Object obj) =
-    IoTAnalyticsChannelRetentionPeriod <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "NumberOfDays") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Unlimited")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsChannelRetentionPeriod' containing required
 -- fields as arguments.
 ioTAnalyticsChannelRetentionPeriod
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetAction.hs
@@ -28,14 +28,6 @@
     , fmap (("QueryAction",) . toJSON) _ioTAnalyticsDatasetActionQueryAction
     ]
 
-instance FromJSON IoTAnalyticsDatasetAction where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatasetAction <$>
-      (obj .: "ActionName") <*>
-      (obj .:? "ContainerAction") <*>
-      (obj .:? "QueryAction")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatasetAction' containing required fields as
 -- arguments.
 ioTAnalyticsDatasetAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetContainerAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetContainerAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetContainerAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetContainerAction.hs
@@ -30,15 +30,6 @@
     , fmap (("Variables",) . toJSON) _ioTAnalyticsDatasetContainerActionVariables
     ]
 
-instance FromJSON IoTAnalyticsDatasetContainerAction where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatasetContainerAction <$>
-      (obj .: "ExecutionRoleArn") <*>
-      (obj .: "Image") <*>
-      (obj .: "ResourceConfiguration") <*>
-      (obj .:? "Variables")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatasetContainerAction' containing required
 -- fields as arguments.
 ioTAnalyticsDatasetContainerAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetDatasetContentVersionValue.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetDatasetContentVersionValue.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetDatasetContentVersionValue.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetDatasetContentVersionValue.hs
@@ -25,12 +25,6 @@
     [ fmap (("DatasetName",) . toJSON) _ioTAnalyticsDatasetDatasetContentVersionValueDatasetName
     ]
 
-instance FromJSON IoTAnalyticsDatasetDatasetContentVersionValue where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatasetDatasetContentVersionValue <$>
-      (obj .:? "DatasetName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatasetDatasetContentVersionValue'
 -- containing required fields as arguments.
 ioTAnalyticsDatasetDatasetContentVersionValue
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetDeltaTime.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetDeltaTime.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetDeltaTime.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetDeltaTime.hs
@@ -25,13 +25,6 @@
     , (Just . ("TimeExpression",) . toJSON) _ioTAnalyticsDatasetDeltaTimeTimeExpression
     ]
 
-instance FromJSON IoTAnalyticsDatasetDeltaTime where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatasetDeltaTime <$>
-      fmap (fmap unInteger') (obj .: "OffsetSeconds") <*>
-      (obj .: "TimeExpression")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatasetDeltaTime' containing required fields
 -- as arguments.
 ioTAnalyticsDatasetDeltaTime
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetFilter.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetFilter.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetFilter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetFilter.hs
@@ -23,12 +23,6 @@
     [ fmap (("DeltaTime",) . toJSON) _ioTAnalyticsDatasetFilterDeltaTime
     ]
 
-instance FromJSON IoTAnalyticsDatasetFilter where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatasetFilter <$>
-      (obj .:? "DeltaTime")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatasetFilter' containing required fields as
 -- arguments.
 ioTAnalyticsDatasetFilter
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetOutputFileUriValue.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetOutputFileUriValue.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetOutputFileUriValue.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetOutputFileUriValue.hs
@@ -24,12 +24,6 @@
     [ fmap (("FileName",) . toJSON) _ioTAnalyticsDatasetOutputFileUriValueFileName
     ]
 
-instance FromJSON IoTAnalyticsDatasetOutputFileUriValue where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatasetOutputFileUriValue <$>
-      (obj .:? "FileName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatasetOutputFileUriValue' containing
 -- required fields as arguments.
 ioTAnalyticsDatasetOutputFileUriValue
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetQueryAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetQueryAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetQueryAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetQueryAction.hs
@@ -25,13 +25,6 @@
     , (Just . ("SqlQuery",) . toJSON) _ioTAnalyticsDatasetQueryActionSqlQuery
     ]
 
-instance FromJSON IoTAnalyticsDatasetQueryAction where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatasetQueryAction <$>
-      (obj .:? "Filters") <*>
-      (obj .: "SqlQuery")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatasetQueryAction' containing required
 -- fields as arguments.
 ioTAnalyticsDatasetQueryAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetResourceConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetResourceConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetResourceConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetResourceConfiguration.hs
@@ -26,13 +26,6 @@
     , (Just . ("VolumeSizeInGB",) . toJSON . fmap Integer') _ioTAnalyticsDatasetResourceConfigurationVolumeSizeInGB
     ]
 
-instance FromJSON IoTAnalyticsDatasetResourceConfiguration where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatasetResourceConfiguration <$>
-      (obj .: "ComputeType") <*>
-      fmap (fmap unInteger') (obj .: "VolumeSizeInGB")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatasetResourceConfiguration' containing
 -- required fields as arguments.
 ioTAnalyticsDatasetResourceConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetRetentionPeriod.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetRetentionPeriod.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetRetentionPeriod.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetRetentionPeriod.hs
@@ -25,13 +25,6 @@
     , (Just . ("Unlimited",) . toJSON . fmap Bool') _ioTAnalyticsDatasetRetentionPeriodUnlimited
     ]
 
-instance FromJSON IoTAnalyticsDatasetRetentionPeriod where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatasetRetentionPeriod <$>
-      fmap (fmap unInteger') (obj .: "NumberOfDays") <*>
-      fmap (fmap unBool') (obj .: "Unlimited")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatasetRetentionPeriod' containing required
 -- fields as arguments.
 ioTAnalyticsDatasetRetentionPeriod
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetSchedule.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetSchedule.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetSchedule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetSchedule.hs
@@ -23,12 +23,6 @@
     [ (Just . ("ScheduleExpression",) . toJSON) _ioTAnalyticsDatasetScheduleScheduleExpression
     ]
 
-instance FromJSON IoTAnalyticsDatasetSchedule where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatasetSchedule <$>
-      (obj .: "ScheduleExpression")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatasetSchedule' containing required fields
 -- as arguments.
 ioTAnalyticsDatasetSchedule
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetTrigger.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetTrigger.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetTrigger.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetTrigger.hs
@@ -26,13 +26,6 @@
     , fmap (("TriggeringDataset",) . toJSON) _ioTAnalyticsDatasetTriggerTriggeringDataset
     ]
 
-instance FromJSON IoTAnalyticsDatasetTrigger where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatasetTrigger <$>
-      (obj .:? "Schedule") <*>
-      (obj .:? "TriggeringDataset")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatasetTrigger' containing required fields
 -- as arguments.
 ioTAnalyticsDatasetTrigger
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetTriggeringDataset.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetTriggeringDataset.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetTriggeringDataset.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetTriggeringDataset.hs
@@ -23,12 +23,6 @@
     [ (Just . ("DatasetName",) . toJSON) _ioTAnalyticsDatasetTriggeringDatasetDatasetName
     ]
 
-instance FromJSON IoTAnalyticsDatasetTriggeringDataset where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatasetTriggeringDataset <$>
-      (obj .: "DatasetName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatasetTriggeringDataset' containing
 -- required fields as arguments.
 ioTAnalyticsDatasetTriggeringDataset
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetVariable.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetVariable.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetVariable.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatasetVariable.hs
@@ -32,16 +32,6 @@
     , (Just . ("VariableName",) . toJSON) _ioTAnalyticsDatasetVariableVariableName
     ]
 
-instance FromJSON IoTAnalyticsDatasetVariable where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatasetVariable <$>
-      (obj .:? "DatasetContentVersionValue") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "DoubleValue") <*>
-      (obj .:? "OutputFileUriValue") <*>
-      (obj .:? "StringValue") <*>
-      (obj .: "VariableName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatasetVariable' containing required fields
 -- as arguments.
 ioTAnalyticsDatasetVariable
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatastoreRetentionPeriod.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatastoreRetentionPeriod.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatastoreRetentionPeriod.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsDatastoreRetentionPeriod.hs
@@ -25,13 +25,6 @@
     , fmap (("Unlimited",) . toJSON . fmap Bool') _ioTAnalyticsDatastoreRetentionPeriodUnlimited
     ]
 
-instance FromJSON IoTAnalyticsDatastoreRetentionPeriod where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatastoreRetentionPeriod <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "NumberOfDays") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Unlimited")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatastoreRetentionPeriod' containing
 -- required fields as arguments.
 ioTAnalyticsDatastoreRetentionPeriod
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineActivity.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineActivity.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineActivity.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineActivity.hs
@@ -50,21 +50,6 @@
     , fmap (("SelectAttributes",) . toJSON) _ioTAnalyticsPipelineActivitySelectAttributes
     ]
 
-instance FromJSON IoTAnalyticsPipelineActivity where
-  parseJSON (Object obj) =
-    IoTAnalyticsPipelineActivity <$>
-      (obj .:? "AddAttributes") <*>
-      (obj .:? "Channel") <*>
-      (obj .:? "Datastore") <*>
-      (obj .:? "DeviceRegistryEnrich") <*>
-      (obj .:? "DeviceShadowEnrich") <*>
-      (obj .:? "Filter") <*>
-      (obj .:? "Lambda") <*>
-      (obj .:? "Math") <*>
-      (obj .:? "RemoveAttributes") <*>
-      (obj .:? "SelectAttributes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsPipelineActivity' containing required fields
 -- as arguments.
 ioTAnalyticsPipelineActivity
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineAddAttributes.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineAddAttributes.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineAddAttributes.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineAddAttributes.hs
@@ -27,14 +27,6 @@
     , fmap (("Next",) . toJSON) _ioTAnalyticsPipelineAddAttributesNext
     ]
 
-instance FromJSON IoTAnalyticsPipelineAddAttributes where
-  parseJSON (Object obj) =
-    IoTAnalyticsPipelineAddAttributes <$>
-      (obj .:? "Attributes") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Next")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsPipelineAddAttributes' containing required
 -- fields as arguments.
 ioTAnalyticsPipelineAddAttributes
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineChannel.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineChannel.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineChannel.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineChannel.hs
@@ -27,14 +27,6 @@
     , fmap (("Next",) . toJSON) _ioTAnalyticsPipelineChannelNext
     ]
 
-instance FromJSON IoTAnalyticsPipelineChannel where
-  parseJSON (Object obj) =
-    IoTAnalyticsPipelineChannel <$>
-      (obj .:? "ChannelName") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Next")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsPipelineChannel' containing required fields
 -- as arguments.
 ioTAnalyticsPipelineChannel
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDatastore.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDatastore.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDatastore.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDatastore.hs
@@ -25,13 +25,6 @@
     , fmap (("Name",) . toJSON) _ioTAnalyticsPipelineDatastoreName
     ]
 
-instance FromJSON IoTAnalyticsPipelineDatastore where
-  parseJSON (Object obj) =
-    IoTAnalyticsPipelineDatastore <$>
-      (obj .:? "DatastoreName") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsPipelineDatastore' containing required
 -- fields as arguments.
 ioTAnalyticsPipelineDatastore
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDeviceRegistryEnrich.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDeviceRegistryEnrich.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDeviceRegistryEnrich.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDeviceRegistryEnrich.hs
@@ -32,16 +32,6 @@
     , fmap (("ThingName",) . toJSON) _ioTAnalyticsPipelineDeviceRegistryEnrichThingName
     ]
 
-instance FromJSON IoTAnalyticsPipelineDeviceRegistryEnrich where
-  parseJSON (Object obj) =
-    IoTAnalyticsPipelineDeviceRegistryEnrich <$>
-      (obj .:? "Attribute") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Next") <*>
-      (obj .:? "RoleArn") <*>
-      (obj .:? "ThingName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsPipelineDeviceRegistryEnrich' containing
 -- required fields as arguments.
 ioTAnalyticsPipelineDeviceRegistryEnrich
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDeviceShadowEnrich.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDeviceShadowEnrich.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDeviceShadowEnrich.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineDeviceShadowEnrich.hs
@@ -32,16 +32,6 @@
     , fmap (("ThingName",) . toJSON) _ioTAnalyticsPipelineDeviceShadowEnrichThingName
     ]
 
-instance FromJSON IoTAnalyticsPipelineDeviceShadowEnrich where
-  parseJSON (Object obj) =
-    IoTAnalyticsPipelineDeviceShadowEnrich <$>
-      (obj .:? "Attribute") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Next") <*>
-      (obj .:? "RoleArn") <*>
-      (obj .:? "ThingName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsPipelineDeviceShadowEnrich' containing
 -- required fields as arguments.
 ioTAnalyticsPipelineDeviceShadowEnrich
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineFilter.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineFilter.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineFilter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineFilter.hs
@@ -27,14 +27,6 @@
     , fmap (("Next",) . toJSON) _ioTAnalyticsPipelineFilterNext
     ]
 
-instance FromJSON IoTAnalyticsPipelineFilter where
-  parseJSON (Object obj) =
-    IoTAnalyticsPipelineFilter <$>
-      (obj .:? "Filter") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Next")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsPipelineFilter' containing required fields
 -- as arguments.
 ioTAnalyticsPipelineFilter
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineLambda.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineLambda.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineLambda.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineLambda.hs
@@ -29,15 +29,6 @@
     , fmap (("Next",) . toJSON) _ioTAnalyticsPipelineLambdaNext
     ]
 
-instance FromJSON IoTAnalyticsPipelineLambda where
-  parseJSON (Object obj) =
-    IoTAnalyticsPipelineLambda <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "BatchSize") <*>
-      (obj .:? "LambdaName") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Next")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsPipelineLambda' containing required fields
 -- as arguments.
 ioTAnalyticsPipelineLambda
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineMath.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineMath.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineMath.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineMath.hs
@@ -29,15 +29,6 @@
     , fmap (("Next",) . toJSON) _ioTAnalyticsPipelineMathNext
     ]
 
-instance FromJSON IoTAnalyticsPipelineMath where
-  parseJSON (Object obj) =
-    IoTAnalyticsPipelineMath <$>
-      (obj .:? "Attribute") <*>
-      (obj .:? "Math") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Next")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsPipelineMath' containing required fields as
 -- arguments.
 ioTAnalyticsPipelineMath
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineRemoveAttributes.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineRemoveAttributes.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineRemoveAttributes.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineRemoveAttributes.hs
@@ -27,14 +27,6 @@
     , fmap (("Next",) . toJSON) _ioTAnalyticsPipelineRemoveAttributesNext
     ]
 
-instance FromJSON IoTAnalyticsPipelineRemoveAttributes where
-  parseJSON (Object obj) =
-    IoTAnalyticsPipelineRemoveAttributes <$>
-      (obj .:? "Attributes") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Next")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsPipelineRemoveAttributes' containing
 -- required fields as arguments.
 ioTAnalyticsPipelineRemoveAttributes
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineSelectAttributes.hs b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineSelectAttributes.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineSelectAttributes.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTAnalyticsPipelineSelectAttributes.hs
@@ -27,14 +27,6 @@
     , fmap (("Next",) . toJSON) _ioTAnalyticsPipelineSelectAttributesNext
     ]
 
-instance FromJSON IoTAnalyticsPipelineSelectAttributes where
-  parseJSON (Object obj) =
-    IoTAnalyticsPipelineSelectAttributes <$>
-      (obj .:? "Attributes") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Next")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsPipelineSelectAttributes' containing
 -- required fields as arguments.
 ioTAnalyticsPipelineSelectAttributes
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTThingAttributePayload.hs b/library-gen/Stratosphere/ResourceProperties/IoTThingAttributePayload.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTThingAttributePayload.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTThingAttributePayload.hs
@@ -23,12 +23,6 @@
     [ fmap (("Attributes",) . toJSON) _ioTThingAttributePayloadAttributes
     ]
 
-instance FromJSON IoTThingAttributePayload where
-  parseJSON (Object obj) =
-    IoTThingAttributePayload <$>
-      (obj .:? "Attributes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTThingAttributePayload' containing required fields as
 -- arguments.
 ioTThingAttributePayload
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleAction.hs
@@ -62,25 +62,6 @@
     , fmap (("StepFunctions",) . toJSON) _ioTTopicRuleActionStepFunctions
     ]
 
-instance FromJSON IoTTopicRuleAction where
-  parseJSON (Object obj) =
-    IoTTopicRuleAction <$>
-      (obj .:? "CloudwatchAlarm") <*>
-      (obj .:? "CloudwatchMetric") <*>
-      (obj .:? "DynamoDB") <*>
-      (obj .:? "DynamoDBv2") <*>
-      (obj .:? "Elasticsearch") <*>
-      (obj .:? "Firehose") <*>
-      (obj .:? "IotAnalytics") <*>
-      (obj .:? "Kinesis") <*>
-      (obj .:? "Lambda") <*>
-      (obj .:? "Republish") <*>
-      (obj .:? "S3") <*>
-      (obj .:? "Sns") <*>
-      (obj .:? "Sqs") <*>
-      (obj .:? "StepFunctions")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleAction' containing required fields as
 -- arguments.
 ioTTopicRuleAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchAlarmAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchAlarmAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchAlarmAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchAlarmAction.hs
@@ -29,15 +29,6 @@
     , (Just . ("StateValue",) . toJSON) _ioTTopicRuleCloudwatchAlarmActionStateValue
     ]
 
-instance FromJSON IoTTopicRuleCloudwatchAlarmAction where
-  parseJSON (Object obj) =
-    IoTTopicRuleCloudwatchAlarmAction <$>
-      (obj .: "AlarmName") <*>
-      (obj .: "RoleArn") <*>
-      (obj .: "StateReason") <*>
-      (obj .: "StateValue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleCloudwatchAlarmAction' containing required
 -- fields as arguments.
 ioTTopicRuleCloudwatchAlarmAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchMetricAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchMetricAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchMetricAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleCloudwatchMetricAction.hs
@@ -33,17 +33,6 @@
     , (Just . ("RoleArn",) . toJSON) _ioTTopicRuleCloudwatchMetricActionRoleArn
     ]
 
-instance FromJSON IoTTopicRuleCloudwatchMetricAction where
-  parseJSON (Object obj) =
-    IoTTopicRuleCloudwatchMetricAction <$>
-      (obj .: "MetricName") <*>
-      (obj .: "MetricNamespace") <*>
-      (obj .:? "MetricTimestamp") <*>
-      (obj .: "MetricUnit") <*>
-      (obj .: "MetricValue") <*>
-      (obj .: "RoleArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleCloudwatchMetricAction' containing required
 -- fields as arguments.
 ioTTopicRuleCloudwatchMetricAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBAction.hs
@@ -39,20 +39,6 @@
     , (Just . ("TableName",) . toJSON) _ioTTopicRuleDynamoDBActionTableName
     ]
 
-instance FromJSON IoTTopicRuleDynamoDBAction where
-  parseJSON (Object obj) =
-    IoTTopicRuleDynamoDBAction <$>
-      (obj .: "HashKeyField") <*>
-      (obj .:? "HashKeyType") <*>
-      (obj .: "HashKeyValue") <*>
-      (obj .:? "PayloadField") <*>
-      (obj .:? "RangeKeyField") <*>
-      (obj .:? "RangeKeyType") <*>
-      (obj .:? "RangeKeyValue") <*>
-      (obj .: "RoleArn") <*>
-      (obj .: "TableName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleDynamoDBAction' containing required fields
 -- as arguments.
 ioTTopicRuleDynamoDBAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBV2Action.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBV2Action.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBV2Action.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleDynamoDBV2Action.hs
@@ -25,13 +25,6 @@
     , fmap (("RoleArn",) . toJSON) _ioTTopicRuleDynamoDBV2ActionRoleArn
     ]
 
-instance FromJSON IoTTopicRuleDynamoDBV2Action where
-  parseJSON (Object obj) =
-    IoTTopicRuleDynamoDBV2Action <$>
-      (obj .:? "PutItem") <*>
-      (obj .:? "RoleArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleDynamoDBV2Action' containing required fields
 -- as arguments.
 ioTTopicRuleDynamoDBV2Action
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleElasticsearchAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleElasticsearchAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleElasticsearchAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleElasticsearchAction.hs
@@ -31,16 +31,6 @@
     , (Just . ("Type",) . toJSON) _ioTTopicRuleElasticsearchActionType
     ]
 
-instance FromJSON IoTTopicRuleElasticsearchAction where
-  parseJSON (Object obj) =
-    IoTTopicRuleElasticsearchAction <$>
-      (obj .: "Endpoint") <*>
-      (obj .: "Id") <*>
-      (obj .: "Index") <*>
-      (obj .: "RoleArn") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleElasticsearchAction' containing required
 -- fields as arguments.
 ioTTopicRuleElasticsearchAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleFirehoseAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleFirehoseAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleFirehoseAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleFirehoseAction.hs
@@ -27,14 +27,6 @@
     , fmap (("Separator",) . toJSON) _ioTTopicRuleFirehoseActionSeparator
     ]
 
-instance FromJSON IoTTopicRuleFirehoseAction where
-  parseJSON (Object obj) =
-    IoTTopicRuleFirehoseAction <$>
-      (obj .: "DeliveryStreamName") <*>
-      (obj .: "RoleArn") <*>
-      (obj .:? "Separator")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleFirehoseAction' containing required fields
 -- as arguments.
 ioTTopicRuleFirehoseAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleIotAnalyticsAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleIotAnalyticsAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleIotAnalyticsAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleIotAnalyticsAction.hs
@@ -25,13 +25,6 @@
     , (Just . ("RoleArn",) . toJSON) _ioTTopicRuleIotAnalyticsActionRoleArn
     ]
 
-instance FromJSON IoTTopicRuleIotAnalyticsAction where
-  parseJSON (Object obj) =
-    IoTTopicRuleIotAnalyticsAction <$>
-      (obj .: "ChannelName") <*>
-      (obj .: "RoleArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleIotAnalyticsAction' containing required
 -- fields as arguments.
 ioTTopicRuleIotAnalyticsAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleKinesisAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleKinesisAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleKinesisAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleKinesisAction.hs
@@ -27,14 +27,6 @@
     , (Just . ("StreamName",) . toJSON) _ioTTopicRuleKinesisActionStreamName
     ]
 
-instance FromJSON IoTTopicRuleKinesisAction where
-  parseJSON (Object obj) =
-    IoTTopicRuleKinesisAction <$>
-      (obj .:? "PartitionKey") <*>
-      (obj .: "RoleArn") <*>
-      (obj .: "StreamName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleKinesisAction' containing required fields as
 -- arguments.
 ioTTopicRuleKinesisAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleLambdaAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleLambdaAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleLambdaAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleLambdaAction.hs
@@ -23,12 +23,6 @@
     [ fmap (("FunctionArn",) . toJSON) _ioTTopicRuleLambdaActionFunctionArn
     ]
 
-instance FromJSON IoTTopicRuleLambdaAction where
-  parseJSON (Object obj) =
-    IoTTopicRuleLambdaAction <$>
-      (obj .:? "FunctionArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleLambdaAction' containing required fields as
 -- arguments.
 ioTTopicRuleLambdaAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRulePutItemInput.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRulePutItemInput.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRulePutItemInput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRulePutItemInput.hs
@@ -23,12 +23,6 @@
     [ (Just . ("TableName",) . toJSON) _ioTTopicRulePutItemInputTableName
     ]
 
-instance FromJSON IoTTopicRulePutItemInput where
-  parseJSON (Object obj) =
-    IoTTopicRulePutItemInput <$>
-      (obj .: "TableName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRulePutItemInput' containing required fields as
 -- arguments.
 ioTTopicRulePutItemInput
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleRepublishAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleRepublishAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleRepublishAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleRepublishAction.hs
@@ -25,13 +25,6 @@
     , (Just . ("Topic",) . toJSON) _ioTTopicRuleRepublishActionTopic
     ]
 
-instance FromJSON IoTTopicRuleRepublishAction where
-  parseJSON (Object obj) =
-    IoTTopicRuleRepublishAction <$>
-      (obj .: "RoleArn") <*>
-      (obj .: "Topic")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleRepublishAction' containing required fields
 -- as arguments.
 ioTTopicRuleRepublishAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleS3Action.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleS3Action.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleS3Action.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleS3Action.hs
@@ -27,14 +27,6 @@
     , (Just . ("RoleArn",) . toJSON) _ioTTopicRuleS3ActionRoleArn
     ]
 
-instance FromJSON IoTTopicRuleS3Action where
-  parseJSON (Object obj) =
-    IoTTopicRuleS3Action <$>
-      (obj .: "BucketName") <*>
-      (obj .: "Key") <*>
-      (obj .: "RoleArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleS3Action' containing required fields as
 -- arguments.
 ioTTopicRuleS3Action
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSnsAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSnsAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSnsAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSnsAction.hs
@@ -27,14 +27,6 @@
     , (Just . ("TargetArn",) . toJSON) _ioTTopicRuleSnsActionTargetArn
     ]
 
-instance FromJSON IoTTopicRuleSnsAction where
-  parseJSON (Object obj) =
-    IoTTopicRuleSnsAction <$>
-      (obj .:? "MessageFormat") <*>
-      (obj .: "RoleArn") <*>
-      (obj .: "TargetArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleSnsAction' containing required fields as
 -- arguments.
 ioTTopicRuleSnsAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSqsAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSqsAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSqsAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleSqsAction.hs
@@ -27,14 +27,6 @@
     , fmap (("UseBase64",) . toJSON . fmap Bool') _ioTTopicRuleSqsActionUseBase64
     ]
 
-instance FromJSON IoTTopicRuleSqsAction where
-  parseJSON (Object obj) =
-    IoTTopicRuleSqsAction <$>
-      (obj .: "QueueUrl") <*>
-      (obj .: "RoleArn") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "UseBase64")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleSqsAction' containing required fields as
 -- arguments.
 ioTTopicRuleSqsAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleStepFunctionsAction.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleStepFunctionsAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleStepFunctionsAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleStepFunctionsAction.hs
@@ -27,14 +27,6 @@
     , (Just . ("StateMachineName",) . toJSON) _ioTTopicRuleStepFunctionsActionStateMachineName
     ]
 
-instance FromJSON IoTTopicRuleStepFunctionsAction where
-  parseJSON (Object obj) =
-    IoTTopicRuleStepFunctionsAction <$>
-      (obj .:? "ExecutionNamePrefix") <*>
-      (obj .: "RoleArn") <*>
-      (obj .: "StateMachineName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleStepFunctionsAction' containing required
 -- fields as arguments.
 ioTTopicRuleStepFunctionsAction
diff --git a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleTopicRulePayload.hs b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleTopicRulePayload.hs
--- a/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleTopicRulePayload.hs
+++ b/library-gen/Stratosphere/ResourceProperties/IoTTopicRuleTopicRulePayload.hs
@@ -33,17 +33,6 @@
     , (Just . ("Sql",) . toJSON) _ioTTopicRuleTopicRulePayloadSql
     ]
 
-instance FromJSON IoTTopicRuleTopicRulePayload where
-  parseJSON (Object obj) =
-    IoTTopicRuleTopicRulePayload <$>
-      (obj .: "Actions") <*>
-      (obj .:? "AwsIotSqlVersion") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "ErrorAction") <*>
-      fmap (fmap unBool') (obj .: "RuleDisabled") <*>
-      (obj .: "Sql")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRuleTopicRulePayload' containing required fields
 -- as arguments.
 ioTTopicRuleTopicRulePayload
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationCSVMappingParameters.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationCSVMappingParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationCSVMappingParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationCSVMappingParameters.hs
@@ -27,13 +27,6 @@
     , (Just . ("RecordRowDelimiter",) . toJSON) _kinesisAnalyticsApplicationCSVMappingParametersRecordRowDelimiter
     ]
 
-instance FromJSON KinesisAnalyticsApplicationCSVMappingParameters where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationCSVMappingParameters <$>
-      (obj .: "RecordColumnDelimiter") <*>
-      (obj .: "RecordRowDelimiter")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationCSVMappingParameters'
 -- containing required fields as arguments.
 kinesisAnalyticsApplicationCSVMappingParameters
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInput.hs
@@ -37,17 +37,6 @@
     , (Just . ("NamePrefix",) . toJSON) _kinesisAnalyticsApplicationInputNamePrefix
     ]
 
-instance FromJSON KinesisAnalyticsApplicationInput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationInput <$>
-      (obj .:? "InputParallelism") <*>
-      (obj .:? "InputProcessingConfiguration") <*>
-      (obj .: "InputSchema") <*>
-      (obj .:? "KinesisFirehoseInput") <*>
-      (obj .:? "KinesisStreamsInput") <*>
-      (obj .: "NamePrefix")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationInput' containing required
 -- fields as arguments.
 kinesisAnalyticsApplicationInput
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputLambdaProcessor.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputLambdaProcessor.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputLambdaProcessor.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputLambdaProcessor.hs
@@ -27,13 +27,6 @@
     , (Just . ("RoleARN",) . toJSON) _kinesisAnalyticsApplicationInputLambdaProcessorRoleARN
     ]
 
-instance FromJSON KinesisAnalyticsApplicationInputLambdaProcessor where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationInputLambdaProcessor <$>
-      (obj .: "ResourceARN") <*>
-      (obj .: "RoleARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationInputLambdaProcessor'
 -- containing required fields as arguments.
 kinesisAnalyticsApplicationInputLambdaProcessor
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputParallelism.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputParallelism.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputParallelism.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputParallelism.hs
@@ -25,12 +25,6 @@
     [ fmap (("Count",) . toJSON . fmap Integer') _kinesisAnalyticsApplicationInputParallelismCount
     ]
 
-instance FromJSON KinesisAnalyticsApplicationInputParallelism where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationInputParallelism <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "Count")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationInputParallelism' containing
 -- required fields as arguments.
 kinesisAnalyticsApplicationInputParallelism
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputProcessingConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputProcessingConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputProcessingConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputProcessingConfiguration.hs
@@ -25,12 +25,6 @@
     [ fmap (("InputLambdaProcessor",) . toJSON) _kinesisAnalyticsApplicationInputProcessingConfigurationInputLambdaProcessor
     ]
 
-instance FromJSON KinesisAnalyticsApplicationInputProcessingConfiguration where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationInputProcessingConfiguration <$>
-      (obj .:? "InputLambdaProcessor")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationInputProcessingConfiguration'
 -- containing required fields as arguments.
 kinesisAnalyticsApplicationInputProcessingConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputSchema.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputSchema.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputSchema.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationInputSchema.hs
@@ -29,14 +29,6 @@
     , (Just . ("RecordFormat",) . toJSON) _kinesisAnalyticsApplicationInputSchemaRecordFormat
     ]
 
-instance FromJSON KinesisAnalyticsApplicationInputSchema where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationInputSchema <$>
-      (obj .: "RecordColumns") <*>
-      (obj .:? "RecordEncoding") <*>
-      (obj .: "RecordFormat")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationInputSchema' containing
 -- required fields as arguments.
 kinesisAnalyticsApplicationInputSchema
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationJSONMappingParameters.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationJSONMappingParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationJSONMappingParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationJSONMappingParameters.hs
@@ -25,12 +25,6 @@
     [ (Just . ("RecordRowPath",) . toJSON) _kinesisAnalyticsApplicationJSONMappingParametersRecordRowPath
     ]
 
-instance FromJSON KinesisAnalyticsApplicationJSONMappingParameters where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationJSONMappingParameters <$>
-      (obj .: "RecordRowPath")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationJSONMappingParameters'
 -- containing required fields as arguments.
 kinesisAnalyticsApplicationJSONMappingParameters
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationKinesisFirehoseInput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationKinesisFirehoseInput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationKinesisFirehoseInput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationKinesisFirehoseInput.hs
@@ -27,13 +27,6 @@
     , (Just . ("RoleARN",) . toJSON) _kinesisAnalyticsApplicationKinesisFirehoseInputRoleARN
     ]
 
-instance FromJSON KinesisAnalyticsApplicationKinesisFirehoseInput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationKinesisFirehoseInput <$>
-      (obj .: "ResourceARN") <*>
-      (obj .: "RoleARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationKinesisFirehoseInput'
 -- containing required fields as arguments.
 kinesisAnalyticsApplicationKinesisFirehoseInput
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationKinesisStreamsInput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationKinesisStreamsInput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationKinesisStreamsInput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationKinesisStreamsInput.hs
@@ -27,13 +27,6 @@
     , (Just . ("RoleARN",) . toJSON) _kinesisAnalyticsApplicationKinesisStreamsInputRoleARN
     ]
 
-instance FromJSON KinesisAnalyticsApplicationKinesisStreamsInput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationKinesisStreamsInput <$>
-      (obj .: "ResourceARN") <*>
-      (obj .: "RoleARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationKinesisStreamsInput'
 -- containing required fields as arguments.
 kinesisAnalyticsApplicationKinesisStreamsInput
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationMappingParameters.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationMappingParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationMappingParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationMappingParameters.hs
@@ -28,13 +28,6 @@
     , fmap (("JSONMappingParameters",) . toJSON) _kinesisAnalyticsApplicationMappingParametersJSONMappingParameters
     ]
 
-instance FromJSON KinesisAnalyticsApplicationMappingParameters where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationMappingParameters <$>
-      (obj .:? "CSVMappingParameters") <*>
-      (obj .:? "JSONMappingParameters")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationMappingParameters' containing
 -- required fields as arguments.
 kinesisAnalyticsApplicationMappingParameters
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputDestinationSchema.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputDestinationSchema.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputDestinationSchema.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputDestinationSchema.hs
@@ -25,12 +25,6 @@
     [ fmap (("RecordFormatType",) . toJSON) _kinesisAnalyticsApplicationOutputDestinationSchemaRecordFormatType
     ]
 
-instance FromJSON KinesisAnalyticsApplicationOutputDestinationSchema where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationOutputDestinationSchema <$>
-      (obj .:? "RecordFormatType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationOutputDestinationSchema'
 -- containing required fields as arguments.
 kinesisAnalyticsApplicationOutputDestinationSchema
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputKinesisFirehoseOutput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputKinesisFirehoseOutput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputKinesisFirehoseOutput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputKinesisFirehoseOutput.hs
@@ -27,13 +27,6 @@
     , (Just . ("RoleARN",) . toJSON) _kinesisAnalyticsApplicationOutputKinesisFirehoseOutputRoleARN
     ]
 
-instance FromJSON KinesisAnalyticsApplicationOutputKinesisFirehoseOutput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationOutputKinesisFirehoseOutput <$>
-      (obj .: "ResourceARN") <*>
-      (obj .: "RoleARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationOutputKinesisFirehoseOutput'
 -- containing required fields as arguments.
 kinesisAnalyticsApplicationOutputKinesisFirehoseOutput
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputKinesisStreamsOutput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputKinesisStreamsOutput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputKinesisStreamsOutput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputKinesisStreamsOutput.hs
@@ -27,13 +27,6 @@
     , (Just . ("RoleARN",) . toJSON) _kinesisAnalyticsApplicationOutputKinesisStreamsOutputRoleARN
     ]
 
-instance FromJSON KinesisAnalyticsApplicationOutputKinesisStreamsOutput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationOutputKinesisStreamsOutput <$>
-      (obj .: "ResourceARN") <*>
-      (obj .: "RoleARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationOutputKinesisStreamsOutput'
 -- containing required fields as arguments.
 kinesisAnalyticsApplicationOutputKinesisStreamsOutput
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputLambdaOutput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputLambdaOutput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputLambdaOutput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputLambdaOutput.hs
@@ -27,13 +27,6 @@
     , (Just . ("RoleARN",) . toJSON) _kinesisAnalyticsApplicationOutputLambdaOutputRoleARN
     ]
 
-instance FromJSON KinesisAnalyticsApplicationOutputLambdaOutput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationOutputLambdaOutput <$>
-      (obj .: "ResourceARN") <*>
-      (obj .: "RoleARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationOutputLambdaOutput'
 -- containing required fields as arguments.
 kinesisAnalyticsApplicationOutputLambdaOutput
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputOutput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputOutput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputOutput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationOutputOutput.hs
@@ -35,16 +35,6 @@
     , fmap (("Name",) . toJSON) _kinesisAnalyticsApplicationOutputOutputName
     ]
 
-instance FromJSON KinesisAnalyticsApplicationOutputOutput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationOutputOutput <$>
-      (obj .: "DestinationSchema") <*>
-      (obj .:? "KinesisFirehoseOutput") <*>
-      (obj .:? "KinesisStreamsOutput") <*>
-      (obj .:? "LambdaOutput") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationOutputOutput' containing
 -- required fields as arguments.
 kinesisAnalyticsApplicationOutputOutput
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationRecordColumn.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationRecordColumn.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationRecordColumn.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationRecordColumn.hs
@@ -28,14 +28,6 @@
     , (Just . ("SqlType",) . toJSON) _kinesisAnalyticsApplicationRecordColumnSqlType
     ]
 
-instance FromJSON KinesisAnalyticsApplicationRecordColumn where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationRecordColumn <$>
-      (obj .:? "Mapping") <*>
-      (obj .: "Name") <*>
-      (obj .: "SqlType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationRecordColumn' containing
 -- required fields as arguments.
 kinesisAnalyticsApplicationRecordColumn
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationRecordFormat.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationRecordFormat.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationRecordFormat.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationRecordFormat.hs
@@ -26,13 +26,6 @@
     , (Just . ("RecordFormatType",) . toJSON) _kinesisAnalyticsApplicationRecordFormatRecordFormatType
     ]
 
-instance FromJSON KinesisAnalyticsApplicationRecordFormat where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationRecordFormat <$>
-      (obj .:? "MappingParameters") <*>
-      (obj .: "RecordFormatType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationRecordFormat' containing
 -- required fields as arguments.
 kinesisAnalyticsApplicationRecordFormat
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceCSVMappingParameters.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceCSVMappingParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceCSVMappingParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceCSVMappingParameters.hs
@@ -27,13 +27,6 @@
     , (Just . ("RecordRowDelimiter",) . toJSON) _kinesisAnalyticsApplicationReferenceDataSourceCSVMappingParametersRecordRowDelimiter
     ]
 
-instance FromJSON KinesisAnalyticsApplicationReferenceDataSourceCSVMappingParameters where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationReferenceDataSourceCSVMappingParameters <$>
-      (obj .: "RecordColumnDelimiter") <*>
-      (obj .: "RecordRowDelimiter")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsApplicationReferenceDataSourceCSVMappingParameters'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceJSONMappingParameters.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceJSONMappingParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceJSONMappingParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceJSONMappingParameters.hs
@@ -25,12 +25,6 @@
     [ (Just . ("RecordRowPath",) . toJSON) _kinesisAnalyticsApplicationReferenceDataSourceJSONMappingParametersRecordRowPath
     ]
 
-instance FromJSON KinesisAnalyticsApplicationReferenceDataSourceJSONMappingParameters where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationReferenceDataSourceJSONMappingParameters <$>
-      (obj .: "RecordRowPath")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsApplicationReferenceDataSourceJSONMappingParameters'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceMappingParameters.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceMappingParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceMappingParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceMappingParameters.hs
@@ -28,13 +28,6 @@
     , fmap (("JSONMappingParameters",) . toJSON) _kinesisAnalyticsApplicationReferenceDataSourceMappingParametersJSONMappingParameters
     ]
 
-instance FromJSON KinesisAnalyticsApplicationReferenceDataSourceMappingParameters where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationReferenceDataSourceMappingParameters <$>
-      (obj .:? "CSVMappingParameters") <*>
-      (obj .:? "JSONMappingParameters")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsApplicationReferenceDataSourceMappingParameters'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceRecordColumn.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceRecordColumn.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceRecordColumn.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceRecordColumn.hs
@@ -29,14 +29,6 @@
     , (Just . ("SqlType",) . toJSON) _kinesisAnalyticsApplicationReferenceDataSourceRecordColumnSqlType
     ]
 
-instance FromJSON KinesisAnalyticsApplicationReferenceDataSourceRecordColumn where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationReferenceDataSourceRecordColumn <$>
-      (obj .:? "Mapping") <*>
-      (obj .: "Name") <*>
-      (obj .: "SqlType")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsApplicationReferenceDataSourceRecordColumn' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceRecordFormat.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceRecordFormat.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceRecordFormat.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceRecordFormat.hs
@@ -27,13 +27,6 @@
     , (Just . ("RecordFormatType",) . toJSON) _kinesisAnalyticsApplicationReferenceDataSourceRecordFormatRecordFormatType
     ]
 
-instance FromJSON KinesisAnalyticsApplicationReferenceDataSourceRecordFormat where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationReferenceDataSourceRecordFormat <$>
-      (obj .:? "MappingParameters") <*>
-      (obj .: "RecordFormatType")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsApplicationReferenceDataSourceRecordFormat' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceReferenceDataSource.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceReferenceDataSource.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceReferenceDataSource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceReferenceDataSource.hs
@@ -30,14 +30,6 @@
     , fmap (("TableName",) . toJSON) _kinesisAnalyticsApplicationReferenceDataSourceReferenceDataSourceTableName
     ]
 
-instance FromJSON KinesisAnalyticsApplicationReferenceDataSourceReferenceDataSource where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationReferenceDataSourceReferenceDataSource <$>
-      (obj .: "ReferenceSchema") <*>
-      (obj .:? "S3ReferenceDataSource") <*>
-      (obj .:? "TableName")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsApplicationReferenceDataSourceReferenceDataSource'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceReferenceSchema.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceReferenceSchema.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceReferenceSchema.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceReferenceSchema.hs
@@ -30,14 +30,6 @@
     , (Just . ("RecordFormat",) . toJSON) _kinesisAnalyticsApplicationReferenceDataSourceReferenceSchemaRecordFormat
     ]
 
-instance FromJSON KinesisAnalyticsApplicationReferenceDataSourceReferenceSchema where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationReferenceDataSourceReferenceSchema <$>
-      (obj .: "RecordColumns") <*>
-      (obj .:? "RecordEncoding") <*>
-      (obj .: "RecordFormat")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsApplicationReferenceDataSourceReferenceSchema'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceS3ReferenceDataSource.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceS3ReferenceDataSource.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceS3ReferenceDataSource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsApplicationReferenceDataSourceS3ReferenceDataSource.hs
@@ -29,14 +29,6 @@
     , (Just . ("ReferenceRoleARN",) . toJSON) _kinesisAnalyticsApplicationReferenceDataSourceS3ReferenceDataSourceReferenceRoleARN
     ]
 
-instance FromJSON KinesisAnalyticsApplicationReferenceDataSourceS3ReferenceDataSource where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationReferenceDataSourceS3ReferenceDataSource <$>
-      (obj .: "BucketARN") <*>
-      (obj .: "FileKey") <*>
-      (obj .: "ReferenceRoleARN")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsApplicationReferenceDataSourceS3ReferenceDataSource'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationCodeConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationCodeConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationCodeConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationCodeConfiguration.hs
@@ -27,13 +27,6 @@
     , (Just . ("CodeContentType",) . toJSON) _kinesisAnalyticsV2ApplicationApplicationCodeConfigurationCodeContentType
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationApplicationCodeConfiguration where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationApplicationCodeConfiguration <$>
-      (obj .: "CodeContent") <*>
-      (obj .: "CodeContentType")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationApplicationCodeConfiguration' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationConfiguration.hs
@@ -37,16 +37,6 @@
     , fmap (("SqlApplicationConfiguration",) . toJSON) _kinesisAnalyticsV2ApplicationApplicationConfigurationSqlApplicationConfiguration
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationApplicationConfiguration where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationApplicationConfiguration <$>
-      (obj .:? "ApplicationCodeConfiguration") <*>
-      (obj .:? "ApplicationSnapshotConfiguration") <*>
-      (obj .:? "EnvironmentProperties") <*>
-      (obj .:? "FlinkApplicationConfiguration") <*>
-      (obj .:? "SqlApplicationConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationApplicationConfiguration'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationApplicationConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationSnapshotConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationSnapshotConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationSnapshotConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationApplicationSnapshotConfiguration.hs
@@ -25,12 +25,6 @@
     [ (Just . ("SnapshotsEnabled",) . toJSON . fmap Bool') _kinesisAnalyticsV2ApplicationApplicationSnapshotConfigurationSnapshotsEnabled
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationApplicationSnapshotConfiguration where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationApplicationSnapshotConfiguration <$>
-      fmap (fmap unBool') (obj .: "SnapshotsEnabled")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationApplicationSnapshotConfiguration'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCSVMappingParameters.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCSVMappingParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCSVMappingParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCSVMappingParameters.hs
@@ -27,13 +27,6 @@
     , (Just . ("RecordRowDelimiter",) . toJSON) _kinesisAnalyticsV2ApplicationCSVMappingParametersRecordRowDelimiter
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationCSVMappingParameters where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationCSVMappingParameters <$>
-      (obj .: "RecordColumnDelimiter") <*>
-      (obj .: "RecordRowDelimiter")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationCSVMappingParameters'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationCSVMappingParameters
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCheckpointConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCheckpointConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCheckpointConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCheckpointConfiguration.hs
@@ -31,15 +31,6 @@
     , fmap (("MinPauseBetweenCheckpoints",) . toJSON . fmap Integer') _kinesisAnalyticsV2ApplicationCheckpointConfigurationMinPauseBetweenCheckpoints
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationCheckpointConfiguration where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationCheckpointConfiguration <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "CheckpointInterval") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "CheckpointingEnabled") <*>
-      (obj .: "ConfigurationType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MinPauseBetweenCheckpoints")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationCheckpointConfiguration'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationCheckpointConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCloudWatchLoggingOptionCloudWatchLoggingOption.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCloudWatchLoggingOptionCloudWatchLoggingOption.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCloudWatchLoggingOptionCloudWatchLoggingOption.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCloudWatchLoggingOptionCloudWatchLoggingOption.hs
@@ -26,12 +26,6 @@
     [ (Just . ("LogStreamARN",) . toJSON) _kinesisAnalyticsV2ApplicationCloudWatchLoggingOptionCloudWatchLoggingOptionLogStreamARN
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationCloudWatchLoggingOptionCloudWatchLoggingOption where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationCloudWatchLoggingOptionCloudWatchLoggingOption <$>
-      (obj .: "LogStreamARN")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationCloudWatchLoggingOptionCloudWatchLoggingOption'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCodeContent.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCodeContent.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCodeContent.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationCodeContent.hs
@@ -28,14 +28,6 @@
     , fmap (("ZipFileContent",) . toJSON) _kinesisAnalyticsV2ApplicationCodeContentZipFileContent
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationCodeContent where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationCodeContent <$>
-      (obj .:? "S3ContentLocation") <*>
-      (obj .:? "TextContent") <*>
-      (obj .:? "ZipFileContent")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationCodeContent' containing
 -- required fields as arguments.
 kinesisAnalyticsV2ApplicationCodeContent
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationEnvironmentProperties.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationEnvironmentProperties.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationEnvironmentProperties.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationEnvironmentProperties.hs
@@ -25,12 +25,6 @@
     [ fmap (("PropertyGroups",) . toJSON) _kinesisAnalyticsV2ApplicationEnvironmentPropertiesPropertyGroups
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationEnvironmentProperties where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationEnvironmentProperties <$>
-      (obj .:? "PropertyGroups")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationEnvironmentProperties'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationEnvironmentProperties
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationFlinkApplicationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationFlinkApplicationConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationFlinkApplicationConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationFlinkApplicationConfiguration.hs
@@ -31,14 +31,6 @@
     , fmap (("ParallelismConfiguration",) . toJSON) _kinesisAnalyticsV2ApplicationFlinkApplicationConfigurationParallelismConfiguration
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationFlinkApplicationConfiguration where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationFlinkApplicationConfiguration <$>
-      (obj .:? "CheckpointConfiguration") <*>
-      (obj .:? "MonitoringConfiguration") <*>
-      (obj .:? "ParallelismConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationFlinkApplicationConfiguration' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInput.hs
@@ -37,17 +37,6 @@
     , (Just . ("NamePrefix",) . toJSON) _kinesisAnalyticsV2ApplicationInputNamePrefix
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationInput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationInput <$>
-      (obj .:? "InputParallelism") <*>
-      (obj .:? "InputProcessingConfiguration") <*>
-      (obj .: "InputSchema") <*>
-      (obj .:? "KinesisFirehoseInput") <*>
-      (obj .:? "KinesisStreamsInput") <*>
-      (obj .: "NamePrefix")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationInput' containing required
 -- fields as arguments.
 kinesisAnalyticsV2ApplicationInput
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputLambdaProcessor.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputLambdaProcessor.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputLambdaProcessor.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputLambdaProcessor.hs
@@ -25,12 +25,6 @@
     [ (Just . ("ResourceARN",) . toJSON) _kinesisAnalyticsV2ApplicationInputLambdaProcessorResourceARN
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationInputLambdaProcessor where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationInputLambdaProcessor <$>
-      (obj .: "ResourceARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationInputLambdaProcessor'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationInputLambdaProcessor
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputParallelism.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputParallelism.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputParallelism.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputParallelism.hs
@@ -25,12 +25,6 @@
     [ fmap (("Count",) . toJSON . fmap Integer') _kinesisAnalyticsV2ApplicationInputParallelismCount
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationInputParallelism where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationInputParallelism <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "Count")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationInputParallelism'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationInputParallelism
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputProcessingConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputProcessingConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputProcessingConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputProcessingConfiguration.hs
@@ -25,12 +25,6 @@
     [ fmap (("InputLambdaProcessor",) . toJSON) _kinesisAnalyticsV2ApplicationInputProcessingConfigurationInputLambdaProcessor
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationInputProcessingConfiguration where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationInputProcessingConfiguration <$>
-      (obj .:? "InputLambdaProcessor")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationInputProcessingConfiguration' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputSchema.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputSchema.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputSchema.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationInputSchema.hs
@@ -29,14 +29,6 @@
     , (Just . ("RecordFormat",) . toJSON) _kinesisAnalyticsV2ApplicationInputSchemaRecordFormat
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationInputSchema where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationInputSchema <$>
-      (obj .: "RecordColumns") <*>
-      (obj .:? "RecordEncoding") <*>
-      (obj .: "RecordFormat")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationInputSchema' containing
 -- required fields as arguments.
 kinesisAnalyticsV2ApplicationInputSchema
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationJSONMappingParameters.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationJSONMappingParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationJSONMappingParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationJSONMappingParameters.hs
@@ -25,12 +25,6 @@
     [ (Just . ("RecordRowPath",) . toJSON) _kinesisAnalyticsV2ApplicationJSONMappingParametersRecordRowPath
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationJSONMappingParameters where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationJSONMappingParameters <$>
-      (obj .: "RecordRowPath")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationJSONMappingParameters'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationJSONMappingParameters
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationKinesisFirehoseInput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationKinesisFirehoseInput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationKinesisFirehoseInput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationKinesisFirehoseInput.hs
@@ -25,12 +25,6 @@
     [ (Just . ("ResourceARN",) . toJSON) _kinesisAnalyticsV2ApplicationKinesisFirehoseInputResourceARN
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationKinesisFirehoseInput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationKinesisFirehoseInput <$>
-      (obj .: "ResourceARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationKinesisFirehoseInput'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationKinesisFirehoseInput
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationKinesisStreamsInput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationKinesisStreamsInput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationKinesisStreamsInput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationKinesisStreamsInput.hs
@@ -25,12 +25,6 @@
     [ (Just . ("ResourceARN",) . toJSON) _kinesisAnalyticsV2ApplicationKinesisStreamsInputResourceARN
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationKinesisStreamsInput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationKinesisStreamsInput <$>
-      (obj .: "ResourceARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationKinesisStreamsInput'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationKinesisStreamsInput
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationMappingParameters.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationMappingParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationMappingParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationMappingParameters.hs
@@ -28,13 +28,6 @@
     , fmap (("JSONMappingParameters",) . toJSON) _kinesisAnalyticsV2ApplicationMappingParametersJSONMappingParameters
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationMappingParameters where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationMappingParameters <$>
-      (obj .:? "CSVMappingParameters") <*>
-      (obj .:? "JSONMappingParameters")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationMappingParameters'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationMappingParameters
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationMonitoringConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationMonitoringConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationMonitoringConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationMonitoringConfiguration.hs
@@ -29,14 +29,6 @@
     , fmap (("MetricsLevel",) . toJSON) _kinesisAnalyticsV2ApplicationMonitoringConfigurationMetricsLevel
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationMonitoringConfiguration where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationMonitoringConfiguration <$>
-      (obj .: "ConfigurationType") <*>
-      (obj .:? "LogLevel") <*>
-      (obj .:? "MetricsLevel")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationMonitoringConfiguration'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationMonitoringConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputDestinationSchema.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputDestinationSchema.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputDestinationSchema.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputDestinationSchema.hs
@@ -25,12 +25,6 @@
     [ fmap (("RecordFormatType",) . toJSON) _kinesisAnalyticsV2ApplicationOutputDestinationSchemaRecordFormatType
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationOutputDestinationSchema where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationOutputDestinationSchema <$>
-      (obj .:? "RecordFormatType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationOutputDestinationSchema'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationOutputDestinationSchema
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputKinesisFirehoseOutput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputKinesisFirehoseOutput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputKinesisFirehoseOutput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputKinesisFirehoseOutput.hs
@@ -25,12 +25,6 @@
     [ (Just . ("ResourceARN",) . toJSON) _kinesisAnalyticsV2ApplicationOutputKinesisFirehoseOutputResourceARN
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationOutputKinesisFirehoseOutput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationOutputKinesisFirehoseOutput <$>
-      (obj .: "ResourceARN")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationOutputKinesisFirehoseOutput' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputKinesisStreamsOutput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputKinesisStreamsOutput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputKinesisStreamsOutput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputKinesisStreamsOutput.hs
@@ -25,12 +25,6 @@
     [ (Just . ("ResourceARN",) . toJSON) _kinesisAnalyticsV2ApplicationOutputKinesisStreamsOutputResourceARN
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationOutputKinesisStreamsOutput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationOutputKinesisStreamsOutput <$>
-      (obj .: "ResourceARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationOutputKinesisStreamsOutput'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationOutputKinesisStreamsOutput
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputLambdaOutput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputLambdaOutput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputLambdaOutput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputLambdaOutput.hs
@@ -25,12 +25,6 @@
     [ (Just . ("ResourceARN",) . toJSON) _kinesisAnalyticsV2ApplicationOutputLambdaOutputResourceARN
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationOutputLambdaOutput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationOutputLambdaOutput <$>
-      (obj .: "ResourceARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationOutputLambdaOutput'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationOutputLambdaOutput
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputOutput.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputOutput.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputOutput.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationOutputOutput.hs
@@ -35,16 +35,6 @@
     , fmap (("Name",) . toJSON) _kinesisAnalyticsV2ApplicationOutputOutputName
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationOutputOutput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationOutputOutput <$>
-      (obj .: "DestinationSchema") <*>
-      (obj .:? "KinesisFirehoseOutput") <*>
-      (obj .:? "KinesisStreamsOutput") <*>
-      (obj .:? "LambdaOutput") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationOutputOutput' containing
 -- required fields as arguments.
 kinesisAnalyticsV2ApplicationOutputOutput
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationParallelismConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationParallelismConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationParallelismConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationParallelismConfiguration.hs
@@ -31,15 +31,6 @@
     , fmap (("ParallelismPerKPU",) . toJSON . fmap Integer') _kinesisAnalyticsV2ApplicationParallelismConfigurationParallelismPerKPU
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationParallelismConfiguration where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationParallelismConfiguration <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AutoScalingEnabled") <*>
-      (obj .: "ConfigurationType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Parallelism") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ParallelismPerKPU")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationParallelismConfiguration'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationParallelismConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationPropertyGroup.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationPropertyGroup.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationPropertyGroup.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationPropertyGroup.hs
@@ -26,13 +26,6 @@
     , fmap (("PropertyMap",) . toJSON) _kinesisAnalyticsV2ApplicationPropertyGroupPropertyMap
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationPropertyGroup where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationPropertyGroup <$>
-      (obj .:? "PropertyGroupId") <*>
-      (obj .:? "PropertyMap")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationPropertyGroup' containing
 -- required fields as arguments.
 kinesisAnalyticsV2ApplicationPropertyGroup
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationRecordColumn.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationRecordColumn.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationRecordColumn.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationRecordColumn.hs
@@ -28,14 +28,6 @@
     , (Just . ("SqlType",) . toJSON) _kinesisAnalyticsV2ApplicationRecordColumnSqlType
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationRecordColumn where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationRecordColumn <$>
-      (obj .:? "Mapping") <*>
-      (obj .: "Name") <*>
-      (obj .: "SqlType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationRecordColumn' containing
 -- required fields as arguments.
 kinesisAnalyticsV2ApplicationRecordColumn
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationRecordFormat.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationRecordFormat.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationRecordFormat.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationRecordFormat.hs
@@ -26,13 +26,6 @@
     , (Just . ("RecordFormatType",) . toJSON) _kinesisAnalyticsV2ApplicationRecordFormatRecordFormatType
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationRecordFormat where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationRecordFormat <$>
-      (obj .:? "MappingParameters") <*>
-      (obj .: "RecordFormatType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationRecordFormat' containing
 -- required fields as arguments.
 kinesisAnalyticsV2ApplicationRecordFormat
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceCSVMappingParameters.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceCSVMappingParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceCSVMappingParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceCSVMappingParameters.hs
@@ -27,13 +27,6 @@
     , (Just . ("RecordRowDelimiter",) . toJSON) _kinesisAnalyticsV2ApplicationReferenceDataSourceCSVMappingParametersRecordRowDelimiter
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationReferenceDataSourceCSVMappingParameters where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationReferenceDataSourceCSVMappingParameters <$>
-      (obj .: "RecordColumnDelimiter") <*>
-      (obj .: "RecordRowDelimiter")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationReferenceDataSourceCSVMappingParameters'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceJSONMappingParameters.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceJSONMappingParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceJSONMappingParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceJSONMappingParameters.hs
@@ -26,12 +26,6 @@
     [ (Just . ("RecordRowPath",) . toJSON) _kinesisAnalyticsV2ApplicationReferenceDataSourceJSONMappingParametersRecordRowPath
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationReferenceDataSourceJSONMappingParameters where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationReferenceDataSourceJSONMappingParameters <$>
-      (obj .: "RecordRowPath")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationReferenceDataSourceJSONMappingParameters'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceMappingParameters.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceMappingParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceMappingParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceMappingParameters.hs
@@ -28,13 +28,6 @@
     , fmap (("JSONMappingParameters",) . toJSON) _kinesisAnalyticsV2ApplicationReferenceDataSourceMappingParametersJSONMappingParameters
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationReferenceDataSourceMappingParameters where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationReferenceDataSourceMappingParameters <$>
-      (obj .:? "CSVMappingParameters") <*>
-      (obj .:? "JSONMappingParameters")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationReferenceDataSourceMappingParameters'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceRecordColumn.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceRecordColumn.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceRecordColumn.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceRecordColumn.hs
@@ -29,14 +29,6 @@
     , (Just . ("SqlType",) . toJSON) _kinesisAnalyticsV2ApplicationReferenceDataSourceRecordColumnSqlType
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationReferenceDataSourceRecordColumn where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationReferenceDataSourceRecordColumn <$>
-      (obj .:? "Mapping") <*>
-      (obj .: "Name") <*>
-      (obj .: "SqlType")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationReferenceDataSourceRecordColumn' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceRecordFormat.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceRecordFormat.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceRecordFormat.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceRecordFormat.hs
@@ -27,13 +27,6 @@
     , (Just . ("RecordFormatType",) . toJSON) _kinesisAnalyticsV2ApplicationReferenceDataSourceRecordFormatRecordFormatType
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationReferenceDataSourceRecordFormat where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationReferenceDataSourceRecordFormat <$>
-      (obj .:? "MappingParameters") <*>
-      (obj .: "RecordFormatType")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationReferenceDataSourceRecordFormat' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceDataSource.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceDataSource.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceDataSource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceDataSource.hs
@@ -30,14 +30,6 @@
     , fmap (("TableName",) . toJSON) _kinesisAnalyticsV2ApplicationReferenceDataSourceReferenceDataSourceTableName
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceDataSource where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceDataSource <$>
-      (obj .: "ReferenceSchema") <*>
-      (obj .:? "S3ReferenceDataSource") <*>
-      (obj .:? "TableName")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceDataSource'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceSchema.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceSchema.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceSchema.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceSchema.hs
@@ -30,14 +30,6 @@
     , (Just . ("RecordFormat",) . toJSON) _kinesisAnalyticsV2ApplicationReferenceDataSourceReferenceSchemaRecordFormat
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceSchema where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceSchema <$>
-      (obj .: "RecordColumns") <*>
-      (obj .:? "RecordEncoding") <*>
-      (obj .: "RecordFormat")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationReferenceDataSourceReferenceSchema'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceS3ReferenceDataSource.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceS3ReferenceDataSource.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceS3ReferenceDataSource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationReferenceDataSourceS3ReferenceDataSource.hs
@@ -28,13 +28,6 @@
     , (Just . ("FileKey",) . toJSON) _kinesisAnalyticsV2ApplicationReferenceDataSourceS3ReferenceDataSourceFileKey
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationReferenceDataSourceS3ReferenceDataSource where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationReferenceDataSourceS3ReferenceDataSource <$>
-      (obj .: "BucketARN") <*>
-      (obj .: "FileKey")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationReferenceDataSourceS3ReferenceDataSource'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationS3ContentLocation.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationS3ContentLocation.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationS3ContentLocation.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationS3ContentLocation.hs
@@ -29,14 +29,6 @@
     , fmap (("ObjectVersion",) . toJSON) _kinesisAnalyticsV2ApplicationS3ContentLocationObjectVersion
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationS3ContentLocation where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationS3ContentLocation <$>
-      (obj .:? "BucketARN") <*>
-      (obj .:? "FileKey") <*>
-      (obj .:? "ObjectVersion")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationS3ContentLocation'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationS3ContentLocation
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationSqlApplicationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationSqlApplicationConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationSqlApplicationConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisAnalyticsV2ApplicationSqlApplicationConfiguration.hs
@@ -25,12 +25,6 @@
     [ fmap (("Inputs",) . toJSON) _kinesisAnalyticsV2ApplicationSqlApplicationConfigurationInputs
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationSqlApplicationConfiguration where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationSqlApplicationConfiguration <$>
-      (obj .:? "Inputs")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisAnalyticsV2ApplicationSqlApplicationConfiguration' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamBufferingHints.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamBufferingHints.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamBufferingHints.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamBufferingHints.hs
@@ -27,13 +27,6 @@
     , (Just . ("SizeInMBs",) . toJSON . fmap Integer') _kinesisFirehoseDeliveryStreamBufferingHintsSizeInMBs
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamBufferingHints where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamBufferingHints <$>
-      fmap (fmap unInteger') (obj .: "IntervalInSeconds") <*>
-      fmap (fmap unInteger') (obj .: "SizeInMBs")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisFirehoseDeliveryStreamBufferingHints' containing
 -- required fields as arguments.
 kinesisFirehoseDeliveryStreamBufferingHints
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions.hs
@@ -29,14 +29,6 @@
     , fmap (("LogStreamName",) . toJSON) _kinesisFirehoseDeliveryStreamCloudWatchLoggingOptionsLogStreamName
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      (obj .:? "LogGroupName") <*>
-      (obj .:? "LogStreamName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisFirehoseDeliveryStreamCloudWatchLoggingOptions'
 -- containing required fields as arguments.
 kinesisFirehoseDeliveryStreamCloudWatchLoggingOptions
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCopyCommand.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCopyCommand.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCopyCommand.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamCopyCommand.hs
@@ -28,14 +28,6 @@
     , (Just . ("DataTableName",) . toJSON) _kinesisFirehoseDeliveryStreamCopyCommandDataTableName
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamCopyCommand where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamCopyCommand <$>
-      (obj .:? "CopyOptions") <*>
-      (obj .:? "DataTableColumns") <*>
-      (obj .: "DataTableName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisFirehoseDeliveryStreamCopyCommand' containing
 -- required fields as arguments.
 kinesisFirehoseDeliveryStreamCopyCommand
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchBufferingHints.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchBufferingHints.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchBufferingHints.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchBufferingHints.hs
@@ -27,13 +27,6 @@
     , (Just . ("SizeInMBs",) . toJSON . fmap Integer') _kinesisFirehoseDeliveryStreamElasticsearchBufferingHintsSizeInMBs
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamElasticsearchBufferingHints where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamElasticsearchBufferingHints <$>
-      fmap (fmap unInteger') (obj .: "IntervalInSeconds") <*>
-      fmap (fmap unInteger') (obj .: "SizeInMBs")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisFirehoseDeliveryStreamElasticsearchBufferingHints' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration.hs
@@ -50,22 +50,6 @@
     , (Just . ("TypeName",) . toJSON) _kinesisFirehoseDeliveryStreamElasticsearchDestinationConfigurationTypeName
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration <$>
-      (obj .: "BufferingHints") <*>
-      (obj .:? "CloudWatchLoggingOptions") <*>
-      (obj .: "DomainARN") <*>
-      (obj .: "IndexName") <*>
-      (obj .: "IndexRotationPeriod") <*>
-      (obj .:? "ProcessingConfiguration") <*>
-      (obj .: "RetryOptions") <*>
-      (obj .: "RoleARN") <*>
-      (obj .: "S3BackupMode") <*>
-      (obj .: "S3Configuration") <*>
-      (obj .: "TypeName")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisFirehoseDeliveryStreamElasticsearchDestinationConfiguration'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchRetryOptions.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchRetryOptions.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchRetryOptions.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamElasticsearchRetryOptions.hs
@@ -25,12 +25,6 @@
     [ (Just . ("DurationInSeconds",) . toJSON . fmap Integer') _kinesisFirehoseDeliveryStreamElasticsearchRetryOptionsDurationInSeconds
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamElasticsearchRetryOptions where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamElasticsearchRetryOptions <$>
-      fmap (fmap unInteger') (obj .: "DurationInSeconds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisFirehoseDeliveryStreamElasticsearchRetryOptions'
 -- containing required fields as arguments.
 kinesisFirehoseDeliveryStreamElasticsearchRetryOptions
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamEncryptionConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamEncryptionConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamEncryptionConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamEncryptionConfiguration.hs
@@ -28,13 +28,6 @@
     , fmap (("NoEncryptionConfig",) . toJSON) _kinesisFirehoseDeliveryStreamEncryptionConfigurationNoEncryptionConfig
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamEncryptionConfiguration where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamEncryptionConfiguration <$>
-      (obj .:? "KMSEncryptionConfig") <*>
-      (obj .:? "NoEncryptionConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisFirehoseDeliveryStreamEncryptionConfiguration'
 -- containing required fields as arguments.
 kinesisFirehoseDeliveryStreamEncryptionConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamExtendedS3DestinationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamExtendedS3DestinationConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamExtendedS3DestinationConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamExtendedS3DestinationConfiguration.hs
@@ -47,21 +47,6 @@
     , fmap (("S3BackupMode",) . toJSON) _kinesisFirehoseDeliveryStreamExtendedS3DestinationConfigurationS3BackupMode
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamExtendedS3DestinationConfiguration where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamExtendedS3DestinationConfiguration <$>
-      (obj .: "BucketARN") <*>
-      (obj .: "BufferingHints") <*>
-      (obj .:? "CloudWatchLoggingOptions") <*>
-      (obj .: "CompressionFormat") <*>
-      (obj .:? "EncryptionConfiguration") <*>
-      (obj .: "Prefix") <*>
-      (obj .:? "ProcessingConfiguration") <*>
-      (obj .: "RoleARN") <*>
-      (obj .:? "S3BackupConfiguration") <*>
-      (obj .:? "S3BackupMode")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisFirehoseDeliveryStreamExtendedS3DestinationConfiguration'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKMSEncryptionConfig.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKMSEncryptionConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKMSEncryptionConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKMSEncryptionConfig.hs
@@ -25,12 +25,6 @@
     [ (Just . ("AWSKMSKeyARN",) . toJSON) _kinesisFirehoseDeliveryStreamKMSEncryptionConfigAWSKMSKeyARN
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamKMSEncryptionConfig where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamKMSEncryptionConfig <$>
-      (obj .: "AWSKMSKeyARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisFirehoseDeliveryStreamKMSEncryptionConfig'
 -- containing required fields as arguments.
 kinesisFirehoseDeliveryStreamKMSEncryptionConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKinesisStreamSourceConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKinesisStreamSourceConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKinesisStreamSourceConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamKinesisStreamSourceConfiguration.hs
@@ -27,13 +27,6 @@
     , (Just . ("RoleARN",) . toJSON) _kinesisFirehoseDeliveryStreamKinesisStreamSourceConfigurationRoleARN
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamKinesisStreamSourceConfiguration where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamKinesisStreamSourceConfiguration <$>
-      (obj .: "KinesisStreamARN") <*>
-      (obj .: "RoleARN")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisFirehoseDeliveryStreamKinesisStreamSourceConfiguration'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessingConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessingConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessingConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessingConfiguration.hs
@@ -27,13 +27,6 @@
     , fmap (("Processors",) . toJSON) _kinesisFirehoseDeliveryStreamProcessingConfigurationProcessors
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamProcessingConfiguration where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamProcessingConfiguration <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      (obj .:? "Processors")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisFirehoseDeliveryStreamProcessingConfiguration'
 -- containing required fields as arguments.
 kinesisFirehoseDeliveryStreamProcessingConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessor.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessor.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessor.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessor.hs
@@ -26,13 +26,6 @@
     , (Just . ("Type",) . toJSON) _kinesisFirehoseDeliveryStreamProcessorType
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamProcessor where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamProcessor <$>
-      (obj .: "Parameters") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisFirehoseDeliveryStreamProcessor' containing
 -- required fields as arguments.
 kinesisFirehoseDeliveryStreamProcessor
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessorParameter.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessorParameter.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessorParameter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamProcessorParameter.hs
@@ -27,13 +27,6 @@
     , (Just . ("ParameterValue",) . toJSON) _kinesisFirehoseDeliveryStreamProcessorParameterParameterValue
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamProcessorParameter where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamProcessorParameter <$>
-      (obj .: "ParameterName") <*>
-      (obj .: "ParameterValue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisFirehoseDeliveryStreamProcessorParameter'
 -- containing required fields as arguments.
 kinesisFirehoseDeliveryStreamProcessorParameter
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration.hs
@@ -42,19 +42,6 @@
     , (Just . ("Username",) . toJSON) _kinesisFirehoseDeliveryStreamRedshiftDestinationConfigurationUsername
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration <$>
-      (obj .:? "CloudWatchLoggingOptions") <*>
-      (obj .: "ClusterJDBCURL") <*>
-      (obj .: "CopyCommand") <*>
-      (obj .: "Password") <*>
-      (obj .:? "ProcessingConfiguration") <*>
-      (obj .: "RoleARN") <*>
-      (obj .: "S3Configuration") <*>
-      (obj .: "Username")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisFirehoseDeliveryStreamRedshiftDestinationConfiguration'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamS3DestinationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamS3DestinationConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamS3DestinationConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamS3DestinationConfiguration.hs
@@ -40,18 +40,6 @@
     , (Just . ("RoleARN",) . toJSON) _kinesisFirehoseDeliveryStreamS3DestinationConfigurationRoleARN
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamS3DestinationConfiguration where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamS3DestinationConfiguration <$>
-      (obj .: "BucketARN") <*>
-      (obj .: "BufferingHints") <*>
-      (obj .:? "CloudWatchLoggingOptions") <*>
-      (obj .: "CompressionFormat") <*>
-      (obj .:? "EncryptionConfiguration") <*>
-      (obj .:? "Prefix") <*>
-      (obj .: "RoleARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisFirehoseDeliveryStreamS3DestinationConfiguration'
 -- containing required fields as arguments.
 kinesisFirehoseDeliveryStreamS3DestinationConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamSplunkDestinationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamSplunkDestinationConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamSplunkDestinationConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamSplunkDestinationConfiguration.hs
@@ -44,20 +44,6 @@
     , (Just . ("S3Configuration",) . toJSON) _kinesisFirehoseDeliveryStreamSplunkDestinationConfigurationS3Configuration
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamSplunkDestinationConfiguration where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamSplunkDestinationConfiguration <$>
-      (obj .:? "CloudWatchLoggingOptions") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "HECAcknowledgmentTimeoutInSeconds") <*>
-      (obj .: "HECEndpoint") <*>
-      (obj .: "HECEndpointType") <*>
-      (obj .: "HECToken") <*>
-      (obj .:? "ProcessingConfiguration") <*>
-      (obj .:? "RetryOptions") <*>
-      (obj .:? "S3BackupMode") <*>
-      (obj .: "S3Configuration")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'KinesisFirehoseDeliveryStreamSplunkDestinationConfiguration' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamSplunkRetryOptions.hs b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamSplunkRetryOptions.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamSplunkRetryOptions.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisFirehoseDeliveryStreamSplunkRetryOptions.hs
@@ -25,12 +25,6 @@
     [ (Just . ("DurationInSeconds",) . toJSON . fmap Integer') _kinesisFirehoseDeliveryStreamSplunkRetryOptionsDurationInSeconds
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStreamSplunkRetryOptions where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStreamSplunkRetryOptions <$>
-      fmap (fmap unInteger') (obj .: "DurationInSeconds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisFirehoseDeliveryStreamSplunkRetryOptions'
 -- containing required fields as arguments.
 kinesisFirehoseDeliveryStreamSplunkRetryOptions
diff --git a/library-gen/Stratosphere/ResourceProperties/KinesisStreamStreamEncryption.hs b/library-gen/Stratosphere/ResourceProperties/KinesisStreamStreamEncryption.hs
--- a/library-gen/Stratosphere/ResourceProperties/KinesisStreamStreamEncryption.hs
+++ b/library-gen/Stratosphere/ResourceProperties/KinesisStreamStreamEncryption.hs
@@ -25,13 +25,6 @@
     , (Just . ("KeyId",) . toJSON) _kinesisStreamStreamEncryptionKeyId
     ]
 
-instance FromJSON KinesisStreamStreamEncryption where
-  parseJSON (Object obj) =
-    KinesisStreamStreamEncryption <$>
-      (obj .: "EncryptionType") <*>
-      (obj .: "KeyId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisStreamStreamEncryption' containing required
 -- fields as arguments.
 kinesisStreamStreamEncryption
diff --git a/library-gen/Stratosphere/ResourceProperties/LambdaAliasAliasRoutingConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/LambdaAliasAliasRoutingConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/LambdaAliasAliasRoutingConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/LambdaAliasAliasRoutingConfiguration.hs
@@ -23,12 +23,6 @@
     [ (Just . ("AdditionalVersionWeights",) . toJSON) _lambdaAliasAliasRoutingConfigurationAdditionalVersionWeights
     ]
 
-instance FromJSON LambdaAliasAliasRoutingConfiguration where
-  parseJSON (Object obj) =
-    LambdaAliasAliasRoutingConfiguration <$>
-      (obj .: "AdditionalVersionWeights")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaAliasAliasRoutingConfiguration' containing
 -- required fields as arguments.
 lambdaAliasAliasRoutingConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/LambdaAliasVersionWeight.hs b/library-gen/Stratosphere/ResourceProperties/LambdaAliasVersionWeight.hs
--- a/library-gen/Stratosphere/ResourceProperties/LambdaAliasVersionWeight.hs
+++ b/library-gen/Stratosphere/ResourceProperties/LambdaAliasVersionWeight.hs
@@ -25,13 +25,6 @@
     , (Just . ("FunctionWeight",) . toJSON . fmap Double') _lambdaAliasVersionWeightFunctionWeight
     ]
 
-instance FromJSON LambdaAliasVersionWeight where
-  parseJSON (Object obj) =
-    LambdaAliasVersionWeight <$>
-      (obj .: "FunctionVersion") <*>
-      fmap (fmap unDouble') (obj .: "FunctionWeight")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaAliasVersionWeight' containing required fields as
 -- arguments.
 lambdaAliasVersionWeight
diff --git a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionCode.hs b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionCode.hs
--- a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionCode.hs
+++ b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionCode.hs
@@ -29,15 +29,6 @@
     , fmap (("ZipFile",) . toJSON) _lambdaFunctionCodeZipFile
     ]
 
-instance FromJSON LambdaFunctionCode where
-  parseJSON (Object obj) =
-    LambdaFunctionCode <$>
-      (obj .:? "S3Bucket") <*>
-      (obj .:? "S3Key") <*>
-      (obj .:? "S3ObjectVersion") <*>
-      (obj .:? "ZipFile")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaFunctionCode' containing required fields as
 -- arguments.
 lambdaFunctionCode
diff --git a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionDeadLetterConfig.hs b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionDeadLetterConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionDeadLetterConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionDeadLetterConfig.hs
@@ -23,12 +23,6 @@
     [ fmap (("TargetArn",) . toJSON) _lambdaFunctionDeadLetterConfigTargetArn
     ]
 
-instance FromJSON LambdaFunctionDeadLetterConfig where
-  parseJSON (Object obj) =
-    LambdaFunctionDeadLetterConfig <$>
-      (obj .:? "TargetArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaFunctionDeadLetterConfig' containing required
 -- fields as arguments.
 lambdaFunctionDeadLetterConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionEnvironment.hs b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionEnvironment.hs
--- a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionEnvironment.hs
+++ b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionEnvironment.hs
@@ -23,12 +23,6 @@
     [ fmap (("Variables",) . toJSON) _lambdaFunctionEnvironmentVariables
     ]
 
-instance FromJSON LambdaFunctionEnvironment where
-  parseJSON (Object obj) =
-    LambdaFunctionEnvironment <$>
-      (obj .:? "Variables")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaFunctionEnvironment' containing required fields as
 -- arguments.
 lambdaFunctionEnvironment
diff --git a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionTracingConfig.hs b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionTracingConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionTracingConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionTracingConfig.hs
@@ -23,12 +23,6 @@
     [ fmap (("Mode",) . toJSON) _lambdaFunctionTracingConfigMode
     ]
 
-instance FromJSON LambdaFunctionTracingConfig where
-  parseJSON (Object obj) =
-    LambdaFunctionTracingConfig <$>
-      (obj .:? "Mode")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaFunctionTracingConfig' containing required fields
 -- as arguments.
 lambdaFunctionTracingConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionVpcConfig.hs b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionVpcConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/LambdaFunctionVpcConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/LambdaFunctionVpcConfig.hs
@@ -25,13 +25,6 @@
     , (Just . ("SubnetIds",) . toJSON) _lambdaFunctionVpcConfigSubnetIds
     ]
 
-instance FromJSON LambdaFunctionVpcConfig where
-  parseJSON (Object obj) =
-    LambdaFunctionVpcConfig <$>
-      (obj .: "SecurityGroupIds") <*>
-      (obj .: "SubnetIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaFunctionVpcConfig' containing required fields as
 -- arguments.
 lambdaFunctionVpcConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/LambdaLayerVersionContent.hs b/library-gen/Stratosphere/ResourceProperties/LambdaLayerVersionContent.hs
--- a/library-gen/Stratosphere/ResourceProperties/LambdaLayerVersionContent.hs
+++ b/library-gen/Stratosphere/ResourceProperties/LambdaLayerVersionContent.hs
@@ -27,14 +27,6 @@
     , fmap (("S3ObjectVersion",) . toJSON) _lambdaLayerVersionContentS3ObjectVersion
     ]
 
-instance FromJSON LambdaLayerVersionContent where
-  parseJSON (Object obj) =
-    LambdaLayerVersionContent <$>
-      (obj .: "S3Bucket") <*>
-      (obj .: "S3Key") <*>
-      (obj .:? "S3ObjectVersion")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaLayerVersionContent' containing required fields as
 -- arguments.
 lambdaLayerVersionContent
diff --git a/library-gen/Stratosphere/ResourceProperties/LogsMetricFilterMetricTransformation.hs b/library-gen/Stratosphere/ResourceProperties/LogsMetricFilterMetricTransformation.hs
--- a/library-gen/Stratosphere/ResourceProperties/LogsMetricFilterMetricTransformation.hs
+++ b/library-gen/Stratosphere/ResourceProperties/LogsMetricFilterMetricTransformation.hs
@@ -29,15 +29,6 @@
     , (Just . ("MetricValue",) . toJSON) _logsMetricFilterMetricTransformationMetricValue
     ]
 
-instance FromJSON LogsMetricFilterMetricTransformation where
-  parseJSON (Object obj) =
-    LogsMetricFilterMetricTransformation <$>
-      fmap (fmap (fmap unDouble')) (obj .:? "DefaultValue") <*>
-      (obj .: "MetricName") <*>
-      (obj .: "MetricNamespace") <*>
-      (obj .: "MetricValue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LogsMetricFilterMetricTransformation' containing
 -- required fields as arguments.
 logsMetricFilterMetricTransformation
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppDataSource.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppDataSource.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppDataSource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppDataSource.hs
@@ -27,14 +27,6 @@
     , fmap (("Type",) . toJSON) _opsWorksAppDataSourceType
     ]
 
-instance FromJSON OpsWorksAppDataSource where
-  parseJSON (Object obj) =
-    OpsWorksAppDataSource <$>
-      (obj .:? "Arn") <*>
-      (obj .:? "DatabaseName") <*>
-      (obj .:? "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksAppDataSource' containing required fields as
 -- arguments.
 opsWorksAppDataSource
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppEnvironmentVariable.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppEnvironmentVariable.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppEnvironmentVariable.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppEnvironmentVariable.hs
@@ -27,14 +27,6 @@
     , (Just . ("Value",) . toJSON) _opsWorksAppEnvironmentVariableValue
     ]
 
-instance FromJSON OpsWorksAppEnvironmentVariable where
-  parseJSON (Object obj) =
-    OpsWorksAppEnvironmentVariable <$>
-      (obj .: "Key") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Secure") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksAppEnvironmentVariable' containing required
 -- fields as arguments.
 opsWorksAppEnvironmentVariable
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSource.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSource.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSource.hs
@@ -33,17 +33,6 @@
     , fmap (("Username",) . toJSON) _opsWorksAppSourceUsername
     ]
 
-instance FromJSON OpsWorksAppSource where
-  parseJSON (Object obj) =
-    OpsWorksAppSource <$>
-      (obj .:? "Password") <*>
-      (obj .:? "Revision") <*>
-      (obj .:? "SshKey") <*>
-      (obj .:? "Type") <*>
-      (obj .:? "Url") <*>
-      (obj .:? "Username")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksAppSource' containing required fields as
 -- arguments.
 opsWorksAppSource
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSslConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSslConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSslConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksAppSslConfiguration.hs
@@ -27,14 +27,6 @@
     , fmap (("PrivateKey",) . toJSON) _opsWorksAppSslConfigurationPrivateKey
     ]
 
-instance FromJSON OpsWorksAppSslConfiguration where
-  parseJSON (Object obj) =
-    OpsWorksAppSslConfiguration <$>
-      (obj .:? "Certificate") <*>
-      (obj .:? "Chain") <*>
-      (obj .:? "PrivateKey")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksAppSslConfiguration' containing required fields
 -- as arguments.
 opsWorksAppSslConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksCMServerEngineAttribute.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksCMServerEngineAttribute.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksCMServerEngineAttribute.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksCMServerEngineAttribute.hs
@@ -25,13 +25,6 @@
     , fmap (("Value",) . toJSON) _opsWorksCMServerEngineAttributeValue
     ]
 
-instance FromJSON OpsWorksCMServerEngineAttribute where
-  parseJSON (Object obj) =
-    OpsWorksCMServerEngineAttribute <$>
-      (obj .:? "Name") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksCMServerEngineAttribute' containing required
 -- fields as arguments.
 opsWorksCMServerEngineAttribute
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceBlockDeviceMapping.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceBlockDeviceMapping.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceBlockDeviceMapping.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceBlockDeviceMapping.hs
@@ -29,15 +29,6 @@
     , fmap (("VirtualName",) . toJSON) _opsWorksInstanceBlockDeviceMappingVirtualName
     ]
 
-instance FromJSON OpsWorksInstanceBlockDeviceMapping where
-  parseJSON (Object obj) =
-    OpsWorksInstanceBlockDeviceMapping <$>
-      (obj .:? "DeviceName") <*>
-      (obj .:? "Ebs") <*>
-      (obj .:? "NoDevice") <*>
-      (obj .:? "VirtualName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksInstanceBlockDeviceMapping' containing required
 -- fields as arguments.
 opsWorksInstanceBlockDeviceMapping
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceEbsBlockDevice.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceEbsBlockDevice.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceEbsBlockDevice.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceEbsBlockDevice.hs
@@ -31,16 +31,6 @@
     , fmap (("VolumeType",) . toJSON) _opsWorksInstanceEbsBlockDeviceVolumeType
     ]
 
-instance FromJSON OpsWorksInstanceEbsBlockDevice where
-  parseJSON (Object obj) =
-    OpsWorksInstanceEbsBlockDevice <$>
-      fmap (fmap (fmap unBool')) (obj .:? "DeleteOnTermination") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Iops") <*>
-      (obj .:? "SnapshotId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "VolumeSize") <*>
-      (obj .:? "VolumeType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksInstanceEbsBlockDevice' containing required
 -- fields as arguments.
 opsWorksInstanceEbsBlockDevice
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceTimeBasedAutoScaling.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceTimeBasedAutoScaling.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceTimeBasedAutoScaling.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksInstanceTimeBasedAutoScaling.hs
@@ -35,18 +35,6 @@
     , fmap (("Wednesday",) . toJSON) _opsWorksInstanceTimeBasedAutoScalingWednesday
     ]
 
-instance FromJSON OpsWorksInstanceTimeBasedAutoScaling where
-  parseJSON (Object obj) =
-    OpsWorksInstanceTimeBasedAutoScaling <$>
-      (obj .:? "Friday") <*>
-      (obj .:? "Monday") <*>
-      (obj .:? "Saturday") <*>
-      (obj .:? "Sunday") <*>
-      (obj .:? "Thursday") <*>
-      (obj .:? "Tuesday") <*>
-      (obj .:? "Wednesday")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksInstanceTimeBasedAutoScaling' containing
 -- required fields as arguments.
 opsWorksInstanceTimeBasedAutoScaling
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerAutoScalingThresholds.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerAutoScalingThresholds.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerAutoScalingThresholds.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerAutoScalingThresholds.hs
@@ -33,17 +33,6 @@
     , fmap (("ThresholdsWaitTime",) . toJSON . fmap Integer') _opsWorksLayerAutoScalingThresholdsThresholdsWaitTime
     ]
 
-instance FromJSON OpsWorksLayerAutoScalingThresholds where
-  parseJSON (Object obj) =
-    OpsWorksLayerAutoScalingThresholds <$>
-      fmap (fmap (fmap unDouble')) (obj .:? "CpuThreshold") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "IgnoreMetricsTime") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "InstanceCount") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "LoadThreshold") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "MemoryThreshold") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ThresholdsWaitTime")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksLayerAutoScalingThresholds' containing required
 -- fields as arguments.
 opsWorksLayerAutoScalingThresholds
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLifecycleEventConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLifecycleEventConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLifecycleEventConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLifecycleEventConfiguration.hs
@@ -24,12 +24,6 @@
     [ fmap (("ShutdownEventConfiguration",) . toJSON) _opsWorksLayerLifecycleEventConfigurationShutdownEventConfiguration
     ]
 
-instance FromJSON OpsWorksLayerLifecycleEventConfiguration where
-  parseJSON (Object obj) =
-    OpsWorksLayerLifecycleEventConfiguration <$>
-      (obj .:? "ShutdownEventConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksLayerLifecycleEventConfiguration' containing
 -- required fields as arguments.
 opsWorksLayerLifecycleEventConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLoadBasedAutoScaling.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLoadBasedAutoScaling.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLoadBasedAutoScaling.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerLoadBasedAutoScaling.hs
@@ -27,14 +27,6 @@
     , fmap (("UpScaling",) . toJSON) _opsWorksLayerLoadBasedAutoScalingUpScaling
     ]
 
-instance FromJSON OpsWorksLayerLoadBasedAutoScaling where
-  parseJSON (Object obj) =
-    OpsWorksLayerLoadBasedAutoScaling <$>
-      (obj .:? "DownScaling") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Enable") <*>
-      (obj .:? "UpScaling")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksLayerLoadBasedAutoScaling' containing required
 -- fields as arguments.
 opsWorksLayerLoadBasedAutoScaling
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerRecipes.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerRecipes.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerRecipes.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerRecipes.hs
@@ -31,16 +31,6 @@
     , fmap (("Undeploy",) . toJSON) _opsWorksLayerRecipesUndeploy
     ]
 
-instance FromJSON OpsWorksLayerRecipes where
-  parseJSON (Object obj) =
-    OpsWorksLayerRecipes <$>
-      (obj .:? "Configure") <*>
-      (obj .:? "Deploy") <*>
-      (obj .:? "Setup") <*>
-      (obj .:? "Shutdown") <*>
-      (obj .:? "Undeploy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksLayerRecipes' containing required fields as
 -- arguments.
 opsWorksLayerRecipes
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerShutdownEventConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerShutdownEventConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerShutdownEventConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerShutdownEventConfiguration.hs
@@ -26,13 +26,6 @@
     , fmap (("ExecutionTimeout",) . toJSON . fmap Integer') _opsWorksLayerShutdownEventConfigurationExecutionTimeout
     ]
 
-instance FromJSON OpsWorksLayerShutdownEventConfiguration where
-  parseJSON (Object obj) =
-    OpsWorksLayerShutdownEventConfiguration <$>
-      fmap (fmap (fmap unBool')) (obj .:? "DelayUntilElbConnectionsDrained") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ExecutionTimeout")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksLayerShutdownEventConfiguration' containing
 -- required fields as arguments.
 opsWorksLayerShutdownEventConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerVolumeConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerVolumeConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerVolumeConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksLayerVolumeConfiguration.hs
@@ -35,18 +35,6 @@
     , fmap (("VolumeType",) . toJSON) _opsWorksLayerVolumeConfigurationVolumeType
     ]
 
-instance FromJSON OpsWorksLayerVolumeConfiguration where
-  parseJSON (Object obj) =
-    OpsWorksLayerVolumeConfiguration <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Encrypted") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Iops") <*>
-      (obj .:? "MountPoint") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "NumberOfDisks") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "RaidLevel") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Size") <*>
-      (obj .:? "VolumeType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksLayerVolumeConfiguration' containing required
 -- fields as arguments.
 opsWorksLayerVolumeConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackChefConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackChefConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackChefConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackChefConfiguration.hs
@@ -25,13 +25,6 @@
     , fmap (("ManageBerkshelf",) . toJSON . fmap Bool') _opsWorksStackChefConfigurationManageBerkshelf
     ]
 
-instance FromJSON OpsWorksStackChefConfiguration where
-  parseJSON (Object obj) =
-    OpsWorksStackChefConfiguration <$>
-      (obj .:? "BerkshelfVersion") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ManageBerkshelf")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksStackChefConfiguration' containing required
 -- fields as arguments.
 opsWorksStackChefConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackElasticIp.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackElasticIp.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackElasticIp.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackElasticIp.hs
@@ -25,13 +25,6 @@
     , fmap (("Name",) . toJSON) _opsWorksStackElasticIpName
     ]
 
-instance FromJSON OpsWorksStackElasticIp where
-  parseJSON (Object obj) =
-    OpsWorksStackElasticIp <$>
-      (obj .: "Ip") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksStackElasticIp' containing required fields as
 -- arguments.
 opsWorksStackElasticIp
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackRdsDbInstance.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackRdsDbInstance.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackRdsDbInstance.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackRdsDbInstance.hs
@@ -27,14 +27,6 @@
     , (Just . ("RdsDbInstanceArn",) . toJSON) _opsWorksStackRdsDbInstanceRdsDbInstanceArn
     ]
 
-instance FromJSON OpsWorksStackRdsDbInstance where
-  parseJSON (Object obj) =
-    OpsWorksStackRdsDbInstance <$>
-      (obj .: "DbPassword") <*>
-      (obj .: "DbUser") <*>
-      (obj .: "RdsDbInstanceArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksStackRdsDbInstance' containing required fields
 -- as arguments.
 opsWorksStackRdsDbInstance
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackSource.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackSource.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackSource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackSource.hs
@@ -33,17 +33,6 @@
     , fmap (("Username",) . toJSON) _opsWorksStackSourceUsername
     ]
 
-instance FromJSON OpsWorksStackSource where
-  parseJSON (Object obj) =
-    OpsWorksStackSource <$>
-      (obj .:? "Password") <*>
-      (obj .:? "Revision") <*>
-      (obj .:? "SshKey") <*>
-      (obj .:? "Type") <*>
-      (obj .:? "Url") <*>
-      (obj .:? "Username")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksStackSource' containing required fields as
 -- arguments.
 opsWorksStackSource
diff --git a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackStackConfigurationManager.hs b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackStackConfigurationManager.hs
--- a/library-gen/Stratosphere/ResourceProperties/OpsWorksStackStackConfigurationManager.hs
+++ b/library-gen/Stratosphere/ResourceProperties/OpsWorksStackStackConfigurationManager.hs
@@ -26,13 +26,6 @@
     , fmap (("Version",) . toJSON) _opsWorksStackStackConfigurationManagerVersion
     ]
 
-instance FromJSON OpsWorksStackStackConfigurationManager where
-  parseJSON (Object obj) =
-    OpsWorksStackStackConfigurationManager <$>
-      (obj .:? "Name") <*>
-      (obj .:? "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksStackStackConfigurationManager' containing
 -- required fields as arguments.
 opsWorksStackStackConfigurationManager
diff --git a/library-gen/Stratosphere/ResourceProperties/RDSDBClusterScalingConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/RDSDBClusterScalingConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/RDSDBClusterScalingConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/RDSDBClusterScalingConfiguration.hs
@@ -29,15 +29,6 @@
     , fmap (("SecondsUntilAutoPause",) . toJSON . fmap Integer') _rDSDBClusterScalingConfigurationSecondsUntilAutoPause
     ]
 
-instance FromJSON RDSDBClusterScalingConfiguration where
-  parseJSON (Object obj) =
-    RDSDBClusterScalingConfiguration <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AutoPause") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MaxCapacity") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MinCapacity") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SecondsUntilAutoPause")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSDBClusterScalingConfiguration' containing required
 -- fields as arguments.
 rdsdbClusterScalingConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/RDSDBInstanceProcessorFeature.hs b/library-gen/Stratosphere/ResourceProperties/RDSDBInstanceProcessorFeature.hs
--- a/library-gen/Stratosphere/ResourceProperties/RDSDBInstanceProcessorFeature.hs
+++ b/library-gen/Stratosphere/ResourceProperties/RDSDBInstanceProcessorFeature.hs
@@ -25,13 +25,6 @@
     , fmap (("Value",) . toJSON) _rDSDBInstanceProcessorFeatureValue
     ]
 
-instance FromJSON RDSDBInstanceProcessorFeature where
-  parseJSON (Object obj) =
-    RDSDBInstanceProcessorFeature <$>
-      (obj .:? "Name") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSDBInstanceProcessorFeature' containing required
 -- fields as arguments.
 rdsdbInstanceProcessorFeature
diff --git a/library-gen/Stratosphere/ResourceProperties/RDSDBSecurityGroupIngressProperty.hs b/library-gen/Stratosphere/ResourceProperties/RDSDBSecurityGroupIngressProperty.hs
--- a/library-gen/Stratosphere/ResourceProperties/RDSDBSecurityGroupIngressProperty.hs
+++ b/library-gen/Stratosphere/ResourceProperties/RDSDBSecurityGroupIngressProperty.hs
@@ -29,15 +29,6 @@
     , fmap (("EC2SecurityGroupOwnerId",) . toJSON) _rDSDBSecurityGroupIngressPropertyEC2SecurityGroupOwnerId
     ]
 
-instance FromJSON RDSDBSecurityGroupIngressProperty where
-  parseJSON (Object obj) =
-    RDSDBSecurityGroupIngressProperty <$>
-      (obj .:? "CIDRIP") <*>
-      (obj .:? "EC2SecurityGroupId") <*>
-      (obj .:? "EC2SecurityGroupName") <*>
-      (obj .:? "EC2SecurityGroupOwnerId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSDBSecurityGroupIngressProperty' containing required
 -- fields as arguments.
 rdsdbSecurityGroupIngressProperty
diff --git a/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionConfiguration.hs
@@ -33,17 +33,6 @@
     , fmap (("VpcSecurityGroupMemberships",) . toJSON) _rDSOptionGroupOptionConfigurationVpcSecurityGroupMemberships
     ]
 
-instance FromJSON RDSOptionGroupOptionConfiguration where
-  parseJSON (Object obj) =
-    RDSOptionGroupOptionConfiguration <$>
-      (obj .:? "DBSecurityGroupMemberships") <*>
-      (obj .: "OptionName") <*>
-      (obj .:? "OptionSettings") <*>
-      (obj .:? "OptionVersion") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Port") <*>
-      (obj .:? "VpcSecurityGroupMemberships")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSOptionGroupOptionConfiguration' containing required
 -- fields as arguments.
 rdsOptionGroupOptionConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionSetting.hs b/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionSetting.hs
--- a/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionSetting.hs
+++ b/library-gen/Stratosphere/ResourceProperties/RDSOptionGroupOptionSetting.hs
@@ -25,13 +25,6 @@
     , fmap (("Value",) . toJSON) _rDSOptionGroupOptionSettingValue
     ]
 
-instance FromJSON RDSOptionGroupOptionSetting where
-  parseJSON (Object obj) =
-    RDSOptionGroupOptionSetting <$>
-      (obj .:? "Name") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSOptionGroupOptionSetting' containing required fields
 -- as arguments.
 rdsOptionGroupOptionSetting
diff --git a/library-gen/Stratosphere/ResourceProperties/RedshiftClusterLoggingProperties.hs b/library-gen/Stratosphere/ResourceProperties/RedshiftClusterLoggingProperties.hs
--- a/library-gen/Stratosphere/ResourceProperties/RedshiftClusterLoggingProperties.hs
+++ b/library-gen/Stratosphere/ResourceProperties/RedshiftClusterLoggingProperties.hs
@@ -25,13 +25,6 @@
     , fmap (("S3KeyPrefix",) . toJSON) _redshiftClusterLoggingPropertiesS3KeyPrefix
     ]
 
-instance FromJSON RedshiftClusterLoggingProperties where
-  parseJSON (Object obj) =
-    RedshiftClusterLoggingProperties <$>
-      (obj .: "BucketName") <*>
-      (obj .:? "S3KeyPrefix")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RedshiftClusterLoggingProperties' containing required
 -- fields as arguments.
 redshiftClusterLoggingProperties
diff --git a/library-gen/Stratosphere/ResourceProperties/RedshiftClusterParameterGroupParameter.hs b/library-gen/Stratosphere/ResourceProperties/RedshiftClusterParameterGroupParameter.hs
--- a/library-gen/Stratosphere/ResourceProperties/RedshiftClusterParameterGroupParameter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/RedshiftClusterParameterGroupParameter.hs
@@ -26,13 +26,6 @@
     , (Just . ("ParameterValue",) . toJSON) _redshiftClusterParameterGroupParameterParameterValue
     ]
 
-instance FromJSON RedshiftClusterParameterGroupParameter where
-  parseJSON (Object obj) =
-    RedshiftClusterParameterGroupParameter <$>
-      (obj .: "ParameterName") <*>
-      (obj .: "ParameterValue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RedshiftClusterParameterGroupParameter' containing
 -- required fields as arguments.
 redshiftClusterParameterGroupParameter
diff --git a/library-gen/Stratosphere/ResourceProperties/RoboMakerRobotApplicationRobotSoftwareSuite.hs b/library-gen/Stratosphere/ResourceProperties/RoboMakerRobotApplicationRobotSoftwareSuite.hs
--- a/library-gen/Stratosphere/ResourceProperties/RoboMakerRobotApplicationRobotSoftwareSuite.hs
+++ b/library-gen/Stratosphere/ResourceProperties/RoboMakerRobotApplicationRobotSoftwareSuite.hs
@@ -27,13 +27,6 @@
     , (Just . ("Version",) . toJSON) _roboMakerRobotApplicationRobotSoftwareSuiteVersion
     ]
 
-instance FromJSON RoboMakerRobotApplicationRobotSoftwareSuite where
-  parseJSON (Object obj) =
-    RoboMakerRobotApplicationRobotSoftwareSuite <$>
-      (obj .: "Name") <*>
-      (obj .: "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RoboMakerRobotApplicationRobotSoftwareSuite' containing
 -- required fields as arguments.
 roboMakerRobotApplicationRobotSoftwareSuite
diff --git a/library-gen/Stratosphere/ResourceProperties/RoboMakerRobotApplicationSourceConfig.hs b/library-gen/Stratosphere/ResourceProperties/RoboMakerRobotApplicationSourceConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/RoboMakerRobotApplicationSourceConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/RoboMakerRobotApplicationSourceConfig.hs
@@ -28,14 +28,6 @@
     , (Just . ("S3Key",) . toJSON) _roboMakerRobotApplicationSourceConfigS3Key
     ]
 
-instance FromJSON RoboMakerRobotApplicationSourceConfig where
-  parseJSON (Object obj) =
-    RoboMakerRobotApplicationSourceConfig <$>
-      (obj .: "Architecture") <*>
-      (obj .: "S3Bucket") <*>
-      (obj .: "S3Key")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RoboMakerRobotApplicationSourceConfig' containing
 -- required fields as arguments.
 roboMakerRobotApplicationSourceConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationRenderingEngine.hs b/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationRenderingEngine.hs
--- a/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationRenderingEngine.hs
+++ b/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationRenderingEngine.hs
@@ -27,13 +27,6 @@
     , (Just . ("Version",) . toJSON) _roboMakerSimulationApplicationRenderingEngineVersion
     ]
 
-instance FromJSON RoboMakerSimulationApplicationRenderingEngine where
-  parseJSON (Object obj) =
-    RoboMakerSimulationApplicationRenderingEngine <$>
-      (obj .: "Name") <*>
-      (obj .: "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RoboMakerSimulationApplicationRenderingEngine'
 -- containing required fields as arguments.
 roboMakerSimulationApplicationRenderingEngine
diff --git a/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationRobotSoftwareSuite.hs b/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationRobotSoftwareSuite.hs
--- a/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationRobotSoftwareSuite.hs
+++ b/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationRobotSoftwareSuite.hs
@@ -27,13 +27,6 @@
     , (Just . ("Version",) . toJSON) _roboMakerSimulationApplicationRobotSoftwareSuiteVersion
     ]
 
-instance FromJSON RoboMakerSimulationApplicationRobotSoftwareSuite where
-  parseJSON (Object obj) =
-    RoboMakerSimulationApplicationRobotSoftwareSuite <$>
-      (obj .: "Name") <*>
-      (obj .: "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RoboMakerSimulationApplicationRobotSoftwareSuite'
 -- containing required fields as arguments.
 roboMakerSimulationApplicationRobotSoftwareSuite
diff --git a/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationSimulationSoftwareSuite.hs b/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationSimulationSoftwareSuite.hs
--- a/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationSimulationSoftwareSuite.hs
+++ b/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationSimulationSoftwareSuite.hs
@@ -27,13 +27,6 @@
     , (Just . ("Version",) . toJSON) _roboMakerSimulationApplicationSimulationSoftwareSuiteVersion
     ]
 
-instance FromJSON RoboMakerSimulationApplicationSimulationSoftwareSuite where
-  parseJSON (Object obj) =
-    RoboMakerSimulationApplicationSimulationSoftwareSuite <$>
-      (obj .: "Name") <*>
-      (obj .: "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RoboMakerSimulationApplicationSimulationSoftwareSuite'
 -- containing required fields as arguments.
 roboMakerSimulationApplicationSimulationSoftwareSuite
diff --git a/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationSourceConfig.hs b/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationSourceConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationSourceConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/RoboMakerSimulationApplicationSourceConfig.hs
@@ -28,14 +28,6 @@
     , (Just . ("S3Key",) . toJSON) _roboMakerSimulationApplicationSourceConfigS3Key
     ]
 
-instance FromJSON RoboMakerSimulationApplicationSourceConfig where
-  parseJSON (Object obj) =
-    RoboMakerSimulationApplicationSourceConfig <$>
-      (obj .: "Architecture") <*>
-      (obj .: "S3Bucket") <*>
-      (obj .: "S3Key")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RoboMakerSimulationApplicationSourceConfig' containing
 -- required fields as arguments.
 roboMakerSimulationApplicationSourceConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckAlarmIdentifier.hs b/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckAlarmIdentifier.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckAlarmIdentifier.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckAlarmIdentifier.hs
@@ -25,13 +25,6 @@
     , (Just . ("Region",) . toJSON) _route53HealthCheckAlarmIdentifierRegion
     ]
 
-instance FromJSON Route53HealthCheckAlarmIdentifier where
-  parseJSON (Object obj) =
-    Route53HealthCheckAlarmIdentifier <$>
-      (obj .: "Name") <*>
-      (obj .: "Region")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53HealthCheckAlarmIdentifier' containing required
 -- fields as arguments.
 route53HealthCheckAlarmIdentifier
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckConfig.hs b/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckConfig.hs
@@ -53,27 +53,6 @@
     , (Just . ("Type",) . toJSON) _route53HealthCheckHealthCheckConfigType
     ]
 
-instance FromJSON Route53HealthCheckHealthCheckConfig where
-  parseJSON (Object obj) =
-    Route53HealthCheckHealthCheckConfig <$>
-      (obj .:? "AlarmIdentifier") <*>
-      (obj .:? "ChildHealthChecks") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnableSNI") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "FailureThreshold") <*>
-      (obj .:? "FullyQualifiedDomainName") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "HealthThreshold") <*>
-      (obj .:? "IPAddress") <*>
-      (obj .:? "InsufficientDataHealthStatus") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Inverted") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "MeasureLatency") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Port") <*>
-      (obj .:? "Regions") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "RequestInterval") <*>
-      (obj .:? "ResourcePath") <*>
-      (obj .:? "SearchString") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53HealthCheckHealthCheckConfig' containing required
 -- fields as arguments.
 route53HealthCheckHealthCheckConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckTag.hs b/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckTag.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckTag.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53HealthCheckHealthCheckTag.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _route53HealthCheckHealthCheckTagValue
     ]
 
-instance FromJSON Route53HealthCheckHealthCheckTag where
-  parseJSON (Object obj) =
-    Route53HealthCheckHealthCheckTag <$>
-      (obj .: "Key") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53HealthCheckHealthCheckTag' containing required
 -- fields as arguments.
 route53HealthCheckHealthCheckTag
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneConfig.hs b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneConfig.hs
@@ -23,12 +23,6 @@
     [ fmap (("Comment",) . toJSON) _route53HostedZoneHostedZoneConfigComment
     ]
 
-instance FromJSON Route53HostedZoneHostedZoneConfig where
-  parseJSON (Object obj) =
-    Route53HostedZoneHostedZoneConfig <$>
-      (obj .:? "Comment")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53HostedZoneHostedZoneConfig' containing required
 -- fields as arguments.
 route53HostedZoneHostedZoneConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneTag.hs b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneTag.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneTag.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneHostedZoneTag.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _route53HostedZoneHostedZoneTagValue
     ]
 
-instance FromJSON Route53HostedZoneHostedZoneTag where
-  parseJSON (Object obj) =
-    Route53HostedZoneHostedZoneTag <$>
-      (obj .: "Key") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53HostedZoneHostedZoneTag' containing required
 -- fields as arguments.
 route53HostedZoneHostedZoneTag
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneQueryLoggingConfig.hs b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneQueryLoggingConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneQueryLoggingConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneQueryLoggingConfig.hs
@@ -23,12 +23,6 @@
     [ (Just . ("CloudWatchLogsLogGroupArn",) . toJSON) _route53HostedZoneQueryLoggingConfigCloudWatchLogsLogGroupArn
     ]
 
-instance FromJSON Route53HostedZoneQueryLoggingConfig where
-  parseJSON (Object obj) =
-    Route53HostedZoneQueryLoggingConfig <$>
-      (obj .: "CloudWatchLogsLogGroupArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53HostedZoneQueryLoggingConfig' containing required
 -- fields as arguments.
 route53HostedZoneQueryLoggingConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneVPC.hs b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneVPC.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneVPC.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53HostedZoneVPC.hs
@@ -25,13 +25,6 @@
     , (Just . ("VPCRegion",) . toJSON) _route53HostedZoneVPCVPCRegion
     ]
 
-instance FromJSON Route53HostedZoneVPC where
-  parseJSON (Object obj) =
-    Route53HostedZoneVPC <$>
-      (obj .: "VPCId") <*>
-      (obj .: "VPCRegion")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53HostedZoneVPC' containing required fields as
 -- arguments.
 route53HostedZoneVPC
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetAliasTarget.hs b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetAliasTarget.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetAliasTarget.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetAliasTarget.hs
@@ -27,14 +27,6 @@
     , (Just . ("HostedZoneId",) . toJSON) _route53RecordSetAliasTargetHostedZoneId
     ]
 
-instance FromJSON Route53RecordSetAliasTarget where
-  parseJSON (Object obj) =
-    Route53RecordSetAliasTarget <$>
-      (obj .: "DNSName") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EvaluateTargetHealth") <*>
-      (obj .: "HostedZoneId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53RecordSetAliasTarget' containing required fields
 -- as arguments.
 route53RecordSetAliasTarget
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGeoLocation.hs b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGeoLocation.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGeoLocation.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGeoLocation.hs
@@ -27,14 +27,6 @@
     , fmap (("SubdivisionCode",) . toJSON) _route53RecordSetGeoLocationSubdivisionCode
     ]
 
-instance FromJSON Route53RecordSetGeoLocation where
-  parseJSON (Object obj) =
-    Route53RecordSetGeoLocation <$>
-      (obj .:? "ContinentCode") <*>
-      (obj .:? "CountryCode") <*>
-      (obj .:? "SubdivisionCode")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53RecordSetGeoLocation' containing required fields
 -- as arguments.
 route53RecordSetGeoLocation
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupAliasTarget.hs b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupAliasTarget.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupAliasTarget.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupAliasTarget.hs
@@ -27,14 +27,6 @@
     , (Just . ("HostedZoneId",) . toJSON) _route53RecordSetGroupAliasTargetHostedZoneId
     ]
 
-instance FromJSON Route53RecordSetGroupAliasTarget where
-  parseJSON (Object obj) =
-    Route53RecordSetGroupAliasTarget <$>
-      (obj .: "DNSName") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EvaluateTargetHealth") <*>
-      (obj .: "HostedZoneId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53RecordSetGroupAliasTarget' containing required
 -- fields as arguments.
 route53RecordSetGroupAliasTarget
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupGeoLocation.hs b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupGeoLocation.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupGeoLocation.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupGeoLocation.hs
@@ -27,14 +27,6 @@
     , fmap (("SubdivisionCode",) . toJSON) _route53RecordSetGroupGeoLocationSubdivisionCode
     ]
 
-instance FromJSON Route53RecordSetGroupGeoLocation where
-  parseJSON (Object obj) =
-    Route53RecordSetGroupGeoLocation <$>
-      (obj .:? "ContinentCode") <*>
-      (obj .:? "CountryCode") <*>
-      (obj .:? "SubdivisionCode")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53RecordSetGroupGeoLocation' containing required
 -- fields as arguments.
 route53RecordSetGroupGeoLocation
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupRecordSet.hs b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupRecordSet.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupRecordSet.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53RecordSetGroupRecordSet.hs
@@ -52,26 +52,6 @@
     , fmap (("Weight",) . toJSON . fmap Integer') _route53RecordSetGroupRecordSetWeight
     ]
 
-instance FromJSON Route53RecordSetGroupRecordSet where
-  parseJSON (Object obj) =
-    Route53RecordSetGroupRecordSet <$>
-      (obj .:? "AliasTarget") <*>
-      (obj .:? "Comment") <*>
-      (obj .:? "Failover") <*>
-      (obj .:? "GeoLocation") <*>
-      (obj .:? "HealthCheckId") <*>
-      (obj .:? "HostedZoneId") <*>
-      (obj .:? "HostedZoneName") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "MultiValueAnswer") <*>
-      (obj .: "Name") <*>
-      (obj .:? "Region") <*>
-      (obj .:? "ResourceRecords") <*>
-      (obj .:? "SetIdentifier") <*>
-      (obj .:? "TTL") <*>
-      (obj .: "Type") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Weight")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53RecordSetGroupRecordSet' containing required
 -- fields as arguments.
 route53RecordSetGroupRecordSet
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53ResolverResolverEndpointIpAddressRequest.hs b/library-gen/Stratosphere/ResourceProperties/Route53ResolverResolverEndpointIpAddressRequest.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53ResolverResolverEndpointIpAddressRequest.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53ResolverResolverEndpointIpAddressRequest.hs
@@ -27,13 +27,6 @@
     , (Just . ("SubnetId",) . toJSON) _route53ResolverResolverEndpointIpAddressRequestSubnetId
     ]
 
-instance FromJSON Route53ResolverResolverEndpointIpAddressRequest where
-  parseJSON (Object obj) =
-    Route53ResolverResolverEndpointIpAddressRequest <$>
-      (obj .:? "Ip") <*>
-      (obj .: "SubnetId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53ResolverResolverEndpointIpAddressRequest'
 -- containing required fields as arguments.
 route53ResolverResolverEndpointIpAddressRequest
diff --git a/library-gen/Stratosphere/ResourceProperties/Route53ResolverResolverRuleTargetAddress.hs b/library-gen/Stratosphere/ResourceProperties/Route53ResolverResolverRuleTargetAddress.hs
--- a/library-gen/Stratosphere/ResourceProperties/Route53ResolverResolverRuleTargetAddress.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Route53ResolverResolverRuleTargetAddress.hs
@@ -26,13 +26,6 @@
     , (Just . ("Port",) . toJSON) _route53ResolverResolverRuleTargetAddressPort
     ]
 
-instance FromJSON Route53ResolverResolverRuleTargetAddress where
-  parseJSON (Object obj) =
-    Route53ResolverResolverRuleTargetAddress <$>
-      (obj .: "Ip") <*>
-      (obj .: "Port")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53ResolverResolverRuleTargetAddress' containing
 -- required fields as arguments.
 route53ResolverResolverRuleTargetAddress
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketAbortIncompleteMultipartUpload.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketAbortIncompleteMultipartUpload.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketAbortIncompleteMultipartUpload.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketAbortIncompleteMultipartUpload.hs
@@ -24,12 +24,6 @@
     [ (Just . ("DaysAfterInitiation",) . toJSON . fmap Integer') _s3BucketAbortIncompleteMultipartUploadDaysAfterInitiation
     ]
 
-instance FromJSON S3BucketAbortIncompleteMultipartUpload where
-  parseJSON (Object obj) =
-    S3BucketAbortIncompleteMultipartUpload <$>
-      fmap (fmap unInteger') (obj .: "DaysAfterInitiation")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketAbortIncompleteMultipartUpload' containing
 -- required fields as arguments.
 s3BucketAbortIncompleteMultipartUpload
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketAccelerateConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketAccelerateConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketAccelerateConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketAccelerateConfiguration.hs
@@ -23,12 +23,6 @@
     [ (Just . ("AccelerationStatus",) . toJSON) _s3BucketAccelerateConfigurationAccelerationStatus
     ]
 
-instance FromJSON S3BucketAccelerateConfiguration where
-  parseJSON (Object obj) =
-    S3BucketAccelerateConfiguration <$>
-      (obj .: "AccelerationStatus")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketAccelerateConfiguration' containing required
 -- fields as arguments.
 s3BucketAccelerateConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketAccessControlTranslation.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketAccessControlTranslation.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketAccessControlTranslation.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketAccessControlTranslation.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Owner",) . toJSON) _s3BucketAccessControlTranslationOwner
     ]
 
-instance FromJSON S3BucketAccessControlTranslation where
-  parseJSON (Object obj) =
-    S3BucketAccessControlTranslation <$>
-      (obj .: "Owner")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketAccessControlTranslation' containing required
 -- fields as arguments.
 s3BucketAccessControlTranslation
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketAnalyticsConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketAnalyticsConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketAnalyticsConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketAnalyticsConfiguration.hs
@@ -30,15 +30,6 @@
     , fmap (("TagFilters",) . toJSON) _s3BucketAnalyticsConfigurationTagFilters
     ]
 
-instance FromJSON S3BucketAnalyticsConfiguration where
-  parseJSON (Object obj) =
-    S3BucketAnalyticsConfiguration <$>
-      (obj .: "Id") <*>
-      (obj .:? "Prefix") <*>
-      (obj .: "StorageClassAnalysis") <*>
-      (obj .:? "TagFilters")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketAnalyticsConfiguration' containing required
 -- fields as arguments.
 s3BucketAnalyticsConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketBucketEncryption.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketBucketEncryption.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketBucketEncryption.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketBucketEncryption.hs
@@ -23,12 +23,6 @@
     [ (Just . ("ServerSideEncryptionConfiguration",) . toJSON) _s3BucketBucketEncryptionServerSideEncryptionConfiguration
     ]
 
-instance FromJSON S3BucketBucketEncryption where
-  parseJSON (Object obj) =
-    S3BucketBucketEncryption <$>
-      (obj .: "ServerSideEncryptionConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketBucketEncryption' containing required fields as
 -- arguments.
 s3BucketBucketEncryption
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketCorsConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketCorsConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketCorsConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketCorsConfiguration.hs
@@ -23,12 +23,6 @@
     [ (Just . ("CorsRules",) . toJSON) _s3BucketCorsConfigurationCorsRules
     ]
 
-instance FromJSON S3BucketCorsConfiguration where
-  parseJSON (Object obj) =
-    S3BucketCorsConfiguration <$>
-      (obj .: "CorsRules")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketCorsConfiguration' containing required fields as
 -- arguments.
 s3BucketCorsConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketCorsRule.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketCorsRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketCorsRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketCorsRule.hs
@@ -33,17 +33,6 @@
     , fmap (("MaxAge",) . toJSON . fmap Integer') _s3BucketCorsRuleMaxAge
     ]
 
-instance FromJSON S3BucketCorsRule where
-  parseJSON (Object obj) =
-    S3BucketCorsRule <$>
-      (obj .:? "AllowedHeaders") <*>
-      (obj .: "AllowedMethods") <*>
-      (obj .: "AllowedOrigins") <*>
-      (obj .:? "ExposedHeaders") <*>
-      (obj .:? "Id") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MaxAge")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketCorsRule' containing required fields as
 -- arguments.
 s3BucketCorsRule
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketDataExport.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketDataExport.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketDataExport.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketDataExport.hs
@@ -25,13 +25,6 @@
     , (Just . ("OutputSchemaVersion",) . toJSON) _s3BucketDataExportOutputSchemaVersion
     ]
 
-instance FromJSON S3BucketDataExport where
-  parseJSON (Object obj) =
-    S3BucketDataExport <$>
-      (obj .: "Destination") <*>
-      (obj .: "OutputSchemaVersion")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketDataExport' containing required fields as
 -- arguments.
 s3BucketDataExport
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketDestination.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketDestination.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketDestination.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketDestination.hs
@@ -29,15 +29,6 @@
     , fmap (("Prefix",) . toJSON) _s3BucketDestinationPrefix
     ]
 
-instance FromJSON S3BucketDestination where
-  parseJSON (Object obj) =
-    S3BucketDestination <$>
-      (obj .:? "BucketAccountId") <*>
-      (obj .: "BucketArn") <*>
-      (obj .: "Format") <*>
-      (obj .:? "Prefix")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketDestination' containing required fields as
 -- arguments.
 s3BucketDestination
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketEncryptionConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketEncryptionConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketEncryptionConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketEncryptionConfiguration.hs
@@ -23,12 +23,6 @@
     [ (Just . ("ReplicaKmsKeyID",) . toJSON) _s3BucketEncryptionConfigurationReplicaKmsKeyID
     ]
 
-instance FromJSON S3BucketEncryptionConfiguration where
-  parseJSON (Object obj) =
-    S3BucketEncryptionConfiguration <$>
-      (obj .: "ReplicaKmsKeyID")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketEncryptionConfiguration' containing required
 -- fields as arguments.
 s3BucketEncryptionConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketFilterRule.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketFilterRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketFilterRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketFilterRule.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _s3BucketFilterRuleValue
     ]
 
-instance FromJSON S3BucketFilterRule where
-  parseJSON (Object obj) =
-    S3BucketFilterRule <$>
-      (obj .: "Name") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketFilterRule' containing required fields as
 -- arguments.
 s3BucketFilterRule
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketInventoryConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketInventoryConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketInventoryConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketInventoryConfiguration.hs
@@ -35,18 +35,6 @@
     , (Just . ("ScheduleFrequency",) . toJSON) _s3BucketInventoryConfigurationScheduleFrequency
     ]
 
-instance FromJSON S3BucketInventoryConfiguration where
-  parseJSON (Object obj) =
-    S3BucketInventoryConfiguration <$>
-      (obj .: "Destination") <*>
-      fmap (fmap unBool') (obj .: "Enabled") <*>
-      (obj .: "Id") <*>
-      (obj .: "IncludedObjectVersions") <*>
-      (obj .:? "OptionalFields") <*>
-      (obj .:? "Prefix") <*>
-      (obj .: "ScheduleFrequency")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketInventoryConfiguration' containing required
 -- fields as arguments.
 s3BucketInventoryConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketLambdaConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketLambdaConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketLambdaConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketLambdaConfiguration.hs
@@ -27,14 +27,6 @@
     , (Just . ("Function",) . toJSON) _s3BucketLambdaConfigurationFunction
     ]
 
-instance FromJSON S3BucketLambdaConfiguration where
-  parseJSON (Object obj) =
-    S3BucketLambdaConfiguration <$>
-      (obj .: "Event") <*>
-      (obj .:? "Filter") <*>
-      (obj .: "Function")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketLambdaConfiguration' containing required fields
 -- as arguments.
 s3BucketLambdaConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketLifecycleConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketLifecycleConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketLifecycleConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketLifecycleConfiguration.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Rules",) . toJSON) _s3BucketLifecycleConfigurationRules
     ]
 
-instance FromJSON S3BucketLifecycleConfiguration where
-  parseJSON (Object obj) =
-    S3BucketLifecycleConfiguration <$>
-      (obj .: "Rules")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketLifecycleConfiguration' containing required
 -- fields as arguments.
 s3BucketLifecycleConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketLoggingConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketLoggingConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketLoggingConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketLoggingConfiguration.hs
@@ -25,13 +25,6 @@
     , fmap (("LogFilePrefix",) . toJSON) _s3BucketLoggingConfigurationLogFilePrefix
     ]
 
-instance FromJSON S3BucketLoggingConfiguration where
-  parseJSON (Object obj) =
-    S3BucketLoggingConfiguration <$>
-      (obj .:? "DestinationBucketName") <*>
-      (obj .:? "LogFilePrefix")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketLoggingConfiguration' containing required fields
 -- as arguments.
 s3BucketLoggingConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketMetricsConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketMetricsConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketMetricsConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketMetricsConfiguration.hs
@@ -27,14 +27,6 @@
     , fmap (("TagFilters",) . toJSON) _s3BucketMetricsConfigurationTagFilters
     ]
 
-instance FromJSON S3BucketMetricsConfiguration where
-  parseJSON (Object obj) =
-    S3BucketMetricsConfiguration <$>
-      (obj .: "Id") <*>
-      (obj .:? "Prefix") <*>
-      (obj .:? "TagFilters")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketMetricsConfiguration' containing required fields
 -- as arguments.
 s3BucketMetricsConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketNoncurrentVersionTransition.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketNoncurrentVersionTransition.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketNoncurrentVersionTransition.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketNoncurrentVersionTransition.hs
@@ -25,13 +25,6 @@
     , (Just . ("TransitionInDays",) . toJSON . fmap Integer') _s3BucketNoncurrentVersionTransitionTransitionInDays
     ]
 
-instance FromJSON S3BucketNoncurrentVersionTransition where
-  parseJSON (Object obj) =
-    S3BucketNoncurrentVersionTransition <$>
-      (obj .: "StorageClass") <*>
-      fmap (fmap unInteger') (obj .: "TransitionInDays")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketNoncurrentVersionTransition' containing required
 -- fields as arguments.
 s3BucketNoncurrentVersionTransition
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationConfiguration.hs
@@ -29,14 +29,6 @@
     , fmap (("TopicConfigurations",) . toJSON) _s3BucketNotificationConfigurationTopicConfigurations
     ]
 
-instance FromJSON S3BucketNotificationConfiguration where
-  parseJSON (Object obj) =
-    S3BucketNotificationConfiguration <$>
-      (obj .:? "LambdaConfigurations") <*>
-      (obj .:? "QueueConfigurations") <*>
-      (obj .:? "TopicConfigurations")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketNotificationConfiguration' containing required
 -- fields as arguments.
 s3BucketNotificationConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationFilter.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationFilter.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationFilter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketNotificationFilter.hs
@@ -23,12 +23,6 @@
     [ (Just . ("S3Key",) . toJSON) _s3BucketNotificationFilterS3Key
     ]
 
-instance FromJSON S3BucketNotificationFilter where
-  parseJSON (Object obj) =
-    S3BucketNotificationFilter <$>
-      (obj .: "S3Key")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketNotificationFilter' containing required fields
 -- as arguments.
 s3BucketNotificationFilter
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketPublicAccessBlockConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketPublicAccessBlockConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketPublicAccessBlockConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketPublicAccessBlockConfiguration.hs
@@ -30,15 +30,6 @@
     , fmap (("RestrictPublicBuckets",) . toJSON . fmap Bool') _s3BucketPublicAccessBlockConfigurationRestrictPublicBuckets
     ]
 
-instance FromJSON S3BucketPublicAccessBlockConfiguration where
-  parseJSON (Object obj) =
-    S3BucketPublicAccessBlockConfiguration <$>
-      fmap (fmap (fmap unBool')) (obj .:? "BlockPublicAcls") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "BlockPublicPolicy") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IgnorePublicAcls") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "RestrictPublicBuckets")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketPublicAccessBlockConfiguration' containing
 -- required fields as arguments.
 s3BucketPublicAccessBlockConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketQueueConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketQueueConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketQueueConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketQueueConfiguration.hs
@@ -27,14 +27,6 @@
     , (Just . ("Queue",) . toJSON) _s3BucketQueueConfigurationQueue
     ]
 
-instance FromJSON S3BucketQueueConfiguration where
-  parseJSON (Object obj) =
-    S3BucketQueueConfiguration <$>
-      (obj .: "Event") <*>
-      (obj .:? "Filter") <*>
-      (obj .: "Queue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketQueueConfiguration' containing required fields
 -- as arguments.
 s3BucketQueueConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectAllRequestsTo.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectAllRequestsTo.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectAllRequestsTo.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectAllRequestsTo.hs
@@ -25,13 +25,6 @@
     , fmap (("Protocol",) . toJSON) _s3BucketRedirectAllRequestsToProtocol
     ]
 
-instance FromJSON S3BucketRedirectAllRequestsTo where
-  parseJSON (Object obj) =
-    S3BucketRedirectAllRequestsTo <$>
-      (obj .: "HostName") <*>
-      (obj .:? "Protocol")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketRedirectAllRequestsTo' containing required
 -- fields as arguments.
 s3BucketRedirectAllRequestsTo
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectRule.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketRedirectRule.hs
@@ -31,16 +31,6 @@
     , fmap (("ReplaceKeyWith",) . toJSON) _s3BucketRedirectRuleReplaceKeyWith
     ]
 
-instance FromJSON S3BucketRedirectRule where
-  parseJSON (Object obj) =
-    S3BucketRedirectRule <$>
-      (obj .:? "HostName") <*>
-      (obj .:? "HttpRedirectCode") <*>
-      (obj .:? "Protocol") <*>
-      (obj .:? "ReplaceKeyPrefixWith") <*>
-      (obj .:? "ReplaceKeyWith")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketRedirectRule' containing required fields as
 -- arguments.
 s3BucketRedirectRule
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationConfiguration.hs
@@ -25,13 +25,6 @@
     , (Just . ("Rules",) . toJSON) _s3BucketReplicationConfigurationRules
     ]
 
-instance FromJSON S3BucketReplicationConfiguration where
-  parseJSON (Object obj) =
-    S3BucketReplicationConfiguration <$>
-      (obj .: "Role") <*>
-      (obj .: "Rules")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketReplicationConfiguration' containing required
 -- fields as arguments.
 s3BucketReplicationConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationDestination.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationDestination.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationDestination.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationDestination.hs
@@ -32,16 +32,6 @@
     , fmap (("StorageClass",) . toJSON) _s3BucketReplicationDestinationStorageClass
     ]
 
-instance FromJSON S3BucketReplicationDestination where
-  parseJSON (Object obj) =
-    S3BucketReplicationDestination <$>
-      (obj .:? "AccessControlTranslation") <*>
-      (obj .:? "Account") <*>
-      (obj .: "Bucket") <*>
-      (obj .:? "EncryptionConfiguration") <*>
-      (obj .:? "StorageClass")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketReplicationDestination' containing required
 -- fields as arguments.
 s3BucketReplicationDestination
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationRule.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketReplicationRule.hs
@@ -32,16 +32,6 @@
     , (Just . ("Status",) . toJSON) _s3BucketReplicationRuleStatus
     ]
 
-instance FromJSON S3BucketReplicationRule where
-  parseJSON (Object obj) =
-    S3BucketReplicationRule <$>
-      (obj .: "Destination") <*>
-      (obj .:? "Id") <*>
-      (obj .: "Prefix") <*>
-      (obj .:? "SourceSelectionCriteria") <*>
-      (obj .: "Status")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketReplicationRule' containing required fields as
 -- arguments.
 s3BucketReplicationRule
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRule.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRule.hs
@@ -26,13 +26,6 @@
     , fmap (("RoutingRuleCondition",) . toJSON) _s3BucketRoutingRuleRoutingRuleCondition
     ]
 
-instance FromJSON S3BucketRoutingRule where
-  parseJSON (Object obj) =
-    S3BucketRoutingRule <$>
-      (obj .: "RedirectRule") <*>
-      (obj .:? "RoutingRuleCondition")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketRoutingRule' containing required fields as
 -- arguments.
 s3BucketRoutingRule
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRuleCondition.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRuleCondition.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRuleCondition.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketRoutingRuleCondition.hs
@@ -25,13 +25,6 @@
     , fmap (("KeyPrefixEquals",) . toJSON) _s3BucketRoutingRuleConditionKeyPrefixEquals
     ]
 
-instance FromJSON S3BucketRoutingRuleCondition where
-  parseJSON (Object obj) =
-    S3BucketRoutingRuleCondition <$>
-      (obj .:? "HttpErrorCodeReturnedEquals") <*>
-      (obj .:? "KeyPrefixEquals")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketRoutingRuleCondition' containing required fields
 -- as arguments.
 s3BucketRoutingRuleCondition
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketRule.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketRule.hs
@@ -48,23 +48,6 @@
     , fmap (("Transitions",) . toJSON) _s3BucketRuleTransitions
     ]
 
-instance FromJSON S3BucketRule where
-  parseJSON (Object obj) =
-    S3BucketRule <$>
-      (obj .:? "AbortIncompleteMultipartUpload") <*>
-      (obj .:? "ExpirationDate") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ExpirationInDays") <*>
-      (obj .:? "Id") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "NoncurrentVersionExpirationInDays") <*>
-      (obj .:? "NoncurrentVersionTransition") <*>
-      (obj .:? "NoncurrentVersionTransitions") <*>
-      (obj .:? "Prefix") <*>
-      (obj .: "Status") <*>
-      (obj .:? "TagFilters") <*>
-      (obj .:? "Transition") <*>
-      (obj .:? "Transitions")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketRule' containing required fields as arguments.
 s3BucketRule
   :: Val Text -- ^ 'sbrStatus'
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketS3KeyFilter.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketS3KeyFilter.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketS3KeyFilter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketS3KeyFilter.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Rules",) . toJSON) _s3BucketS3KeyFilterRules
     ]
 
-instance FromJSON S3BucketS3KeyFilter where
-  parseJSON (Object obj) =
-    S3BucketS3KeyFilter <$>
-      (obj .: "Rules")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketS3KeyFilter' containing required fields as
 -- arguments.
 s3BucketS3KeyFilter
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketServerSideEncryptionByDefault.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketServerSideEncryptionByDefault.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketServerSideEncryptionByDefault.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketServerSideEncryptionByDefault.hs
@@ -26,13 +26,6 @@
     , (Just . ("SSEAlgorithm",) . toJSON) _s3BucketServerSideEncryptionByDefaultSSEAlgorithm
     ]
 
-instance FromJSON S3BucketServerSideEncryptionByDefault where
-  parseJSON (Object obj) =
-    S3BucketServerSideEncryptionByDefault <$>
-      (obj .:? "KMSMasterKeyID") <*>
-      (obj .: "SSEAlgorithm")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketServerSideEncryptionByDefault' containing
 -- required fields as arguments.
 s3BucketServerSideEncryptionByDefault
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketServerSideEncryptionRule.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketServerSideEncryptionRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketServerSideEncryptionRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketServerSideEncryptionRule.hs
@@ -23,12 +23,6 @@
     [ fmap (("ServerSideEncryptionByDefault",) . toJSON) _s3BucketServerSideEncryptionRuleServerSideEncryptionByDefault
     ]
 
-instance FromJSON S3BucketServerSideEncryptionRule where
-  parseJSON (Object obj) =
-    S3BucketServerSideEncryptionRule <$>
-      (obj .:? "ServerSideEncryptionByDefault")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketServerSideEncryptionRule' containing required
 -- fields as arguments.
 s3BucketServerSideEncryptionRule
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketSourceSelectionCriteria.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketSourceSelectionCriteria.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketSourceSelectionCriteria.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketSourceSelectionCriteria.hs
@@ -23,12 +23,6 @@
     [ (Just . ("SseKmsEncryptedObjects",) . toJSON) _s3BucketSourceSelectionCriteriaSseKmsEncryptedObjects
     ]
 
-instance FromJSON S3BucketSourceSelectionCriteria where
-  parseJSON (Object obj) =
-    S3BucketSourceSelectionCriteria <$>
-      (obj .: "SseKmsEncryptedObjects")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketSourceSelectionCriteria' containing required
 -- fields as arguments.
 s3BucketSourceSelectionCriteria
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketSseKmsEncryptedObjects.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketSseKmsEncryptedObjects.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketSseKmsEncryptedObjects.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketSseKmsEncryptedObjects.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Status",) . toJSON) _s3BucketSseKmsEncryptedObjectsStatus
     ]
 
-instance FromJSON S3BucketSseKmsEncryptedObjects where
-  parseJSON (Object obj) =
-    S3BucketSseKmsEncryptedObjects <$>
-      (obj .: "Status")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketSseKmsEncryptedObjects' containing required
 -- fields as arguments.
 s3BucketSseKmsEncryptedObjects
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketStorageClassAnalysis.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketStorageClassAnalysis.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketStorageClassAnalysis.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketStorageClassAnalysis.hs
@@ -23,12 +23,6 @@
     [ fmap (("DataExport",) . toJSON) _s3BucketStorageClassAnalysisDataExport
     ]
 
-instance FromJSON S3BucketStorageClassAnalysis where
-  parseJSON (Object obj) =
-    S3BucketStorageClassAnalysis <$>
-      (obj .:? "DataExport")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketStorageClassAnalysis' containing required fields
 -- as arguments.
 s3BucketStorageClassAnalysis
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketTagFilter.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketTagFilter.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketTagFilter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketTagFilter.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _s3BucketTagFilterValue
     ]
 
-instance FromJSON S3BucketTagFilter where
-  parseJSON (Object obj) =
-    S3BucketTagFilter <$>
-      (obj .: "Key") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketTagFilter' containing required fields as
 -- arguments.
 s3BucketTagFilter
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketTopicConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketTopicConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketTopicConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketTopicConfiguration.hs
@@ -27,14 +27,6 @@
     , (Just . ("Topic",) . toJSON) _s3BucketTopicConfigurationTopic
     ]
 
-instance FromJSON S3BucketTopicConfiguration where
-  parseJSON (Object obj) =
-    S3BucketTopicConfiguration <$>
-      (obj .: "Event") <*>
-      (obj .:? "Filter") <*>
-      (obj .: "Topic")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketTopicConfiguration' containing required fields
 -- as arguments.
 s3BucketTopicConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketTransition.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketTransition.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketTransition.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketTransition.hs
@@ -27,14 +27,6 @@
     , fmap (("TransitionInDays",) . toJSON . fmap Integer') _s3BucketTransitionTransitionInDays
     ]
 
-instance FromJSON S3BucketTransition where
-  parseJSON (Object obj) =
-    S3BucketTransition <$>
-      (obj .: "StorageClass") <*>
-      (obj .:? "TransitionDate") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "TransitionInDays")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketTransition' containing required fields as
 -- arguments.
 s3BucketTransition
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketVersioningConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketVersioningConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketVersioningConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketVersioningConfiguration.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Status",) . toJSON) _s3BucketVersioningConfigurationStatus
     ]
 
-instance FromJSON S3BucketVersioningConfiguration where
-  parseJSON (Object obj) =
-    S3BucketVersioningConfiguration <$>
-      (obj .: "Status")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketVersioningConfiguration' containing required
 -- fields as arguments.
 s3BucketVersioningConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/S3BucketWebsiteConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/S3BucketWebsiteConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/S3BucketWebsiteConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/S3BucketWebsiteConfiguration.hs
@@ -30,15 +30,6 @@
     , fmap (("RoutingRules",) . toJSON) _s3BucketWebsiteConfigurationRoutingRules
     ]
 
-instance FromJSON S3BucketWebsiteConfiguration where
-  parseJSON (Object obj) =
-    S3BucketWebsiteConfiguration <$>
-      (obj .:? "ErrorDocument") <*>
-      (obj .:? "IndexDocument") <*>
-      (obj .:? "RedirectAllRequestsTo") <*>
-      (obj .:? "RoutingRules")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketWebsiteConfiguration' containing required fields
 -- as arguments.
 s3BucketWebsiteConfiguration
diff --git a/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationCloudWatchDestination.hs b/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationCloudWatchDestination.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationCloudWatchDestination.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationCloudWatchDestination.hs
@@ -25,12 +25,6 @@
     [ fmap (("DimensionConfigurations",) . toJSON) _sESConfigurationSetEventDestinationCloudWatchDestinationDimensionConfigurations
     ]
 
-instance FromJSON SESConfigurationSetEventDestinationCloudWatchDestination where
-  parseJSON (Object obj) =
-    SESConfigurationSetEventDestinationCloudWatchDestination <$>
-      (obj .:? "DimensionConfigurations")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'SESConfigurationSetEventDestinationCloudWatchDestination' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationDimensionConfiguration.hs b/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationDimensionConfiguration.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationDimensionConfiguration.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationDimensionConfiguration.hs
@@ -29,14 +29,6 @@
     , (Just . ("DimensionValueSource",) . toJSON) _sESConfigurationSetEventDestinationDimensionConfigurationDimensionValueSource
     ]
 
-instance FromJSON SESConfigurationSetEventDestinationDimensionConfiguration where
-  parseJSON (Object obj) =
-    SESConfigurationSetEventDestinationDimensionConfiguration <$>
-      (obj .: "DefaultDimensionValue") <*>
-      (obj .: "DimensionName") <*>
-      (obj .: "DimensionValueSource")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'SESConfigurationSetEventDestinationDimensionConfiguration' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationEventDestination.hs b/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationEventDestination.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationEventDestination.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationEventDestination.hs
@@ -34,16 +34,6 @@
     , fmap (("Name",) . toJSON) _sESConfigurationSetEventDestinationEventDestinationName
     ]
 
-instance FromJSON SESConfigurationSetEventDestinationEventDestination where
-  parseJSON (Object obj) =
-    SESConfigurationSetEventDestinationEventDestination <$>
-      (obj .:? "CloudWatchDestination") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      (obj .:? "KinesisFirehoseDestination") <*>
-      (obj .: "MatchingEventTypes") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESConfigurationSetEventDestinationEventDestination'
 -- containing required fields as arguments.
 sesConfigurationSetEventDestinationEventDestination
diff --git a/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationKinesisFirehoseDestination.hs b/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationKinesisFirehoseDestination.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationKinesisFirehoseDestination.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESConfigurationSetEventDestinationKinesisFirehoseDestination.hs
@@ -27,13 +27,6 @@
     , (Just . ("IAMRoleARN",) . toJSON) _sESConfigurationSetEventDestinationKinesisFirehoseDestinationIAMRoleARN
     ]
 
-instance FromJSON SESConfigurationSetEventDestinationKinesisFirehoseDestination where
-  parseJSON (Object obj) =
-    SESConfigurationSetEventDestinationKinesisFirehoseDestination <$>
-      (obj .: "DeliveryStreamARN") <*>
-      (obj .: "IAMRoleARN")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'SESConfigurationSetEventDestinationKinesisFirehoseDestination'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/SESReceiptFilterFilter.hs b/library-gen/Stratosphere/ResourceProperties/SESReceiptFilterFilter.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESReceiptFilterFilter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESReceiptFilterFilter.hs
@@ -25,13 +25,6 @@
     , fmap (("Name",) . toJSON) _sESReceiptFilterFilterName
     ]
 
-instance FromJSON SESReceiptFilterFilter where
-  parseJSON (Object obj) =
-    SESReceiptFilterFilter <$>
-      (obj .: "IpFilter") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptFilterFilter' containing required fields as
 -- arguments.
 sesReceiptFilterFilter
diff --git a/library-gen/Stratosphere/ResourceProperties/SESReceiptFilterIpFilter.hs b/library-gen/Stratosphere/ResourceProperties/SESReceiptFilterIpFilter.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESReceiptFilterIpFilter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESReceiptFilterIpFilter.hs
@@ -25,13 +25,6 @@
     , (Just . ("Policy",) . toJSON) _sESReceiptFilterIpFilterPolicy
     ]
 
-instance FromJSON SESReceiptFilterIpFilter where
-  parseJSON (Object obj) =
-    SESReceiptFilterIpFilter <$>
-      (obj .: "Cidr") <*>
-      (obj .: "Policy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptFilterIpFilter' containing required fields as
 -- arguments.
 sesReceiptFilterIpFilter
diff --git a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleAction.hs b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleAction.hs
@@ -41,18 +41,6 @@
     , fmap (("WorkmailAction",) . toJSON) _sESReceiptRuleActionWorkmailAction
     ]
 
-instance FromJSON SESReceiptRuleAction where
-  parseJSON (Object obj) =
-    SESReceiptRuleAction <$>
-      (obj .:? "AddHeaderAction") <*>
-      (obj .:? "BounceAction") <*>
-      (obj .:? "LambdaAction") <*>
-      (obj .:? "S3Action") <*>
-      (obj .:? "SNSAction") <*>
-      (obj .:? "StopAction") <*>
-      (obj .:? "WorkmailAction")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptRuleAction' containing required fields as
 -- arguments.
 sesReceiptRuleAction
diff --git a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleAddHeaderAction.hs b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleAddHeaderAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleAddHeaderAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleAddHeaderAction.hs
@@ -25,13 +25,6 @@
     , (Just . ("HeaderValue",) . toJSON) _sESReceiptRuleAddHeaderActionHeaderValue
     ]
 
-instance FromJSON SESReceiptRuleAddHeaderAction where
-  parseJSON (Object obj) =
-    SESReceiptRuleAddHeaderAction <$>
-      (obj .: "HeaderName") <*>
-      (obj .: "HeaderValue")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptRuleAddHeaderAction' containing required
 -- fields as arguments.
 sesReceiptRuleAddHeaderAction
diff --git a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleBounceAction.hs b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleBounceAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleBounceAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleBounceAction.hs
@@ -31,16 +31,6 @@
     , fmap (("TopicArn",) . toJSON) _sESReceiptRuleBounceActionTopicArn
     ]
 
-instance FromJSON SESReceiptRuleBounceAction where
-  parseJSON (Object obj) =
-    SESReceiptRuleBounceAction <$>
-      (obj .: "Message") <*>
-      (obj .: "Sender") <*>
-      (obj .: "SmtpReplyCode") <*>
-      (obj .:? "StatusCode") <*>
-      (obj .:? "TopicArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptRuleBounceAction' containing required fields
 -- as arguments.
 sesReceiptRuleBounceAction
diff --git a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleLambdaAction.hs b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleLambdaAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleLambdaAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleLambdaAction.hs
@@ -27,14 +27,6 @@
     , fmap (("TopicArn",) . toJSON) _sESReceiptRuleLambdaActionTopicArn
     ]
 
-instance FromJSON SESReceiptRuleLambdaAction where
-  parseJSON (Object obj) =
-    SESReceiptRuleLambdaAction <$>
-      (obj .: "FunctionArn") <*>
-      (obj .:? "InvocationType") <*>
-      (obj .:? "TopicArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptRuleLambdaAction' containing required fields
 -- as arguments.
 sesReceiptRuleLambdaAction
diff --git a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleRule.hs b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleRule.hs
@@ -33,17 +33,6 @@
     , fmap (("TlsPolicy",) . toJSON) _sESReceiptRuleRuleTlsPolicy
     ]
 
-instance FromJSON SESReceiptRuleRule where
-  parseJSON (Object obj) =
-    SESReceiptRuleRule <$>
-      (obj .:? "Actions") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Recipients") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ScanEnabled") <*>
-      (obj .:? "TlsPolicy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptRuleRule' containing required fields as
 -- arguments.
 sesReceiptRuleRule
diff --git a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleS3Action.hs b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleS3Action.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleS3Action.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleS3Action.hs
@@ -29,15 +29,6 @@
     , fmap (("TopicArn",) . toJSON) _sESReceiptRuleS3ActionTopicArn
     ]
 
-instance FromJSON SESReceiptRuleS3Action where
-  parseJSON (Object obj) =
-    SESReceiptRuleS3Action <$>
-      (obj .: "BucketName") <*>
-      (obj .:? "KmsKeyArn") <*>
-      (obj .:? "ObjectKeyPrefix") <*>
-      (obj .:? "TopicArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptRuleS3Action' containing required fields as
 -- arguments.
 sesReceiptRuleS3Action
diff --git a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleSNSAction.hs b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleSNSAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleSNSAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleSNSAction.hs
@@ -25,13 +25,6 @@
     , fmap (("TopicArn",) . toJSON) _sESReceiptRuleSNSActionTopicArn
     ]
 
-instance FromJSON SESReceiptRuleSNSAction where
-  parseJSON (Object obj) =
-    SESReceiptRuleSNSAction <$>
-      (obj .:? "Encoding") <*>
-      (obj .:? "TopicArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptRuleSNSAction' containing required fields as
 -- arguments.
 sesReceiptRuleSNSAction
diff --git a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleStopAction.hs b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleStopAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleStopAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleStopAction.hs
@@ -25,13 +25,6 @@
     , fmap (("TopicArn",) . toJSON) _sESReceiptRuleStopActionTopicArn
     ]
 
-instance FromJSON SESReceiptRuleStopAction where
-  parseJSON (Object obj) =
-    SESReceiptRuleStopAction <$>
-      (obj .: "Scope") <*>
-      (obj .:? "TopicArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptRuleStopAction' containing required fields as
 -- arguments.
 sesReceiptRuleStopAction
diff --git a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleWorkmailAction.hs b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleWorkmailAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleWorkmailAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESReceiptRuleWorkmailAction.hs
@@ -25,13 +25,6 @@
     , fmap (("TopicArn",) . toJSON) _sESReceiptRuleWorkmailActionTopicArn
     ]
 
-instance FromJSON SESReceiptRuleWorkmailAction where
-  parseJSON (Object obj) =
-    SESReceiptRuleWorkmailAction <$>
-      (obj .: "OrganizationArn") <*>
-      (obj .:? "TopicArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptRuleWorkmailAction' containing required fields
 -- as arguments.
 sesReceiptRuleWorkmailAction
diff --git a/library-gen/Stratosphere/ResourceProperties/SESTemplateTemplate.hs b/library-gen/Stratosphere/ResourceProperties/SESTemplateTemplate.hs
--- a/library-gen/Stratosphere/ResourceProperties/SESTemplateTemplate.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SESTemplateTemplate.hs
@@ -29,15 +29,6 @@
     , fmap (("TextPart",) . toJSON) _sESTemplateTemplateTextPart
     ]
 
-instance FromJSON SESTemplateTemplate where
-  parseJSON (Object obj) =
-    SESTemplateTemplate <$>
-      (obj .:? "HtmlPart") <*>
-      (obj .:? "SubjectPart") <*>
-      (obj .:? "TemplateName") <*>
-      (obj .:? "TextPart")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESTemplateTemplate' containing required fields as
 -- arguments.
 sesTemplateTemplate
diff --git a/library-gen/Stratosphere/ResourceProperties/SNSTopicSubscription.hs b/library-gen/Stratosphere/ResourceProperties/SNSTopicSubscription.hs
--- a/library-gen/Stratosphere/ResourceProperties/SNSTopicSubscription.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SNSTopicSubscription.hs
@@ -25,13 +25,6 @@
     , (Just . ("Protocol",) . toJSON) _sNSTopicSubscriptionProtocol
     ]
 
-instance FromJSON SNSTopicSubscription where
-  parseJSON (Object obj) =
-    SNSTopicSubscription <$>
-      (obj .: "Endpoint") <*>
-      (obj .: "Protocol")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SNSTopicSubscription' containing required fields as
 -- arguments.
 snsTopicSubscription
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMAssociationInstanceAssociationOutputLocation.hs b/library-gen/Stratosphere/ResourceProperties/SSMAssociationInstanceAssociationOutputLocation.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMAssociationInstanceAssociationOutputLocation.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMAssociationInstanceAssociationOutputLocation.hs
@@ -25,12 +25,6 @@
     [ fmap (("S3Location",) . toJSON) _sSMAssociationInstanceAssociationOutputLocationS3Location
     ]
 
-instance FromJSON SSMAssociationInstanceAssociationOutputLocation where
-  parseJSON (Object obj) =
-    SSMAssociationInstanceAssociationOutputLocation <$>
-      (obj .:? "S3Location")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMAssociationInstanceAssociationOutputLocation'
 -- containing required fields as arguments.
 ssmAssociationInstanceAssociationOutputLocation
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMAssociationParameterValues.hs b/library-gen/Stratosphere/ResourceProperties/SSMAssociationParameterValues.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMAssociationParameterValues.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMAssociationParameterValues.hs
@@ -23,12 +23,6 @@
     [ (Just . ("ParameterValues",) . toJSON) _sSMAssociationParameterValuesParameterValues
     ]
 
-instance FromJSON SSMAssociationParameterValues where
-  parseJSON (Object obj) =
-    SSMAssociationParameterValues <$>
-      (obj .: "ParameterValues")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMAssociationParameterValues' containing required
 -- fields as arguments.
 ssmAssociationParameterValues
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMAssociationS3OutputLocation.hs b/library-gen/Stratosphere/ResourceProperties/SSMAssociationS3OutputLocation.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMAssociationS3OutputLocation.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMAssociationS3OutputLocation.hs
@@ -25,13 +25,6 @@
     , fmap (("OutputS3KeyPrefix",) . toJSON) _sSMAssociationS3OutputLocationOutputS3KeyPrefix
     ]
 
-instance FromJSON SSMAssociationS3OutputLocation where
-  parseJSON (Object obj) =
-    SSMAssociationS3OutputLocation <$>
-      (obj .:? "OutputS3BucketName") <*>
-      (obj .:? "OutputS3KeyPrefix")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMAssociationS3OutputLocation' containing required
 -- fields as arguments.
 ssmAssociationS3OutputLocation
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMAssociationTarget.hs b/library-gen/Stratosphere/ResourceProperties/SSMAssociationTarget.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMAssociationTarget.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMAssociationTarget.hs
@@ -25,13 +25,6 @@
     , (Just . ("Values",) . toJSON) _sSMAssociationTargetValues
     ]
 
-instance FromJSON SSMAssociationTarget where
-  parseJSON (Object obj) =
-    SSMAssociationTarget <$>
-      (obj .: "Key") <*>
-      (obj .: "Values")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMAssociationTarget' containing required fields as
 -- arguments.
 ssmAssociationTarget
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskLoggingInfo.hs b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskLoggingInfo.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskLoggingInfo.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskLoggingInfo.hs
@@ -27,14 +27,6 @@
     , fmap (("S3Prefix",) . toJSON) _sSMMaintenanceWindowTaskLoggingInfoS3Prefix
     ]
 
-instance FromJSON SSMMaintenanceWindowTaskLoggingInfo where
-  parseJSON (Object obj) =
-    SSMMaintenanceWindowTaskLoggingInfo <$>
-      (obj .: "Region") <*>
-      (obj .: "S3Bucket") <*>
-      (obj .:? "S3Prefix")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMMaintenanceWindowTaskLoggingInfo' containing required
 -- fields as arguments.
 ssmMaintenanceWindowTaskLoggingInfo
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowAutomationParameters.hs b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowAutomationParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowAutomationParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowAutomationParameters.hs
@@ -27,13 +27,6 @@
     , fmap (("Parameters",) . toJSON) _sSMMaintenanceWindowTaskMaintenanceWindowAutomationParametersParameters
     ]
 
-instance FromJSON SSMMaintenanceWindowTaskMaintenanceWindowAutomationParameters where
-  parseJSON (Object obj) =
-    SSMMaintenanceWindowTaskMaintenanceWindowAutomationParameters <$>
-      (obj .:? "DocumentVersion") <*>
-      (obj .:? "Parameters")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'SSMMaintenanceWindowTaskMaintenanceWindowAutomationParameters'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowLambdaParameters.hs b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowLambdaParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowLambdaParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowLambdaParameters.hs
@@ -29,14 +29,6 @@
     , fmap (("Qualifier",) . toJSON) _sSMMaintenanceWindowTaskMaintenanceWindowLambdaParametersQualifier
     ]
 
-instance FromJSON SSMMaintenanceWindowTaskMaintenanceWindowLambdaParameters where
-  parseJSON (Object obj) =
-    SSMMaintenanceWindowTaskMaintenanceWindowLambdaParameters <$>
-      (obj .:? "ClientContext") <*>
-      (obj .:? "Payload") <*>
-      (obj .:? "Qualifier")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'SSMMaintenanceWindowTaskMaintenanceWindowLambdaParameters' containing
 -- required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowRunCommandParameters.hs b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowRunCommandParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowRunCommandParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowRunCommandParameters.hs
@@ -41,20 +41,6 @@
     , fmap (("TimeoutSeconds",) . toJSON . fmap Integer') _sSMMaintenanceWindowTaskMaintenanceWindowRunCommandParametersTimeoutSeconds
     ]
 
-instance FromJSON SSMMaintenanceWindowTaskMaintenanceWindowRunCommandParameters where
-  parseJSON (Object obj) =
-    SSMMaintenanceWindowTaskMaintenanceWindowRunCommandParameters <$>
-      (obj .:? "Comment") <*>
-      (obj .:? "DocumentHash") <*>
-      (obj .:? "DocumentHashType") <*>
-      (obj .:? "NotificationConfig") <*>
-      (obj .:? "OutputS3BucketName") <*>
-      (obj .:? "OutputS3KeyPrefix") <*>
-      (obj .:? "Parameters") <*>
-      (obj .:? "ServiceRoleArn") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "TimeoutSeconds")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'SSMMaintenanceWindowTaskMaintenanceWindowRunCommandParameters'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowStepFunctionsParameters.hs b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowStepFunctionsParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowStepFunctionsParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskMaintenanceWindowStepFunctionsParameters.hs
@@ -27,13 +27,6 @@
     , fmap (("Name",) . toJSON) _sSMMaintenanceWindowTaskMaintenanceWindowStepFunctionsParametersName
     ]
 
-instance FromJSON SSMMaintenanceWindowTaskMaintenanceWindowStepFunctionsParameters where
-  parseJSON (Object obj) =
-    SSMMaintenanceWindowTaskMaintenanceWindowStepFunctionsParameters <$>
-      (obj .:? "Input") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'SSMMaintenanceWindowTaskMaintenanceWindowStepFunctionsParameters'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskNotificationConfig.hs b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskNotificationConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskNotificationConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskNotificationConfig.hs
@@ -28,14 +28,6 @@
     , fmap (("NotificationType",) . toJSON) _sSMMaintenanceWindowTaskNotificationConfigNotificationType
     ]
 
-instance FromJSON SSMMaintenanceWindowTaskNotificationConfig where
-  parseJSON (Object obj) =
-    SSMMaintenanceWindowTaskNotificationConfig <$>
-      (obj .: "NotificationArn") <*>
-      (obj .:? "NotificationEvents") <*>
-      (obj .:? "NotificationType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMMaintenanceWindowTaskNotificationConfig' containing
 -- required fields as arguments.
 ssmMaintenanceWindowTaskNotificationConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskTarget.hs b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskTarget.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskTarget.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskTarget.hs
@@ -25,13 +25,6 @@
     , fmap (("Values",) . toJSON) _sSMMaintenanceWindowTaskTargetValues
     ]
 
-instance FromJSON SSMMaintenanceWindowTaskTarget where
-  parseJSON (Object obj) =
-    SSMMaintenanceWindowTaskTarget <$>
-      (obj .: "Key") <*>
-      (obj .:? "Values")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMMaintenanceWindowTaskTarget' containing required
 -- fields as arguments.
 ssmMaintenanceWindowTaskTarget
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskTaskInvocationParameters.hs b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskTaskInvocationParameters.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskTaskInvocationParameters.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMMaintenanceWindowTaskTaskInvocationParameters.hs
@@ -34,15 +34,6 @@
     , fmap (("MaintenanceWindowStepFunctionsParameters",) . toJSON) _sSMMaintenanceWindowTaskTaskInvocationParametersMaintenanceWindowStepFunctionsParameters
     ]
 
-instance FromJSON SSMMaintenanceWindowTaskTaskInvocationParameters where
-  parseJSON (Object obj) =
-    SSMMaintenanceWindowTaskTaskInvocationParameters <$>
-      (obj .:? "MaintenanceWindowAutomationParameters") <*>
-      (obj .:? "MaintenanceWindowLambdaParameters") <*>
-      (obj .:? "MaintenanceWindowRunCommandParameters") <*>
-      (obj .:? "MaintenanceWindowStepFunctionsParameters")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMMaintenanceWindowTaskTaskInvocationParameters'
 -- containing required fields as arguments.
 ssmMaintenanceWindowTaskTaskInvocationParameters
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchFilter.hs b/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchFilter.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchFilter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchFilter.hs
@@ -25,13 +25,6 @@
     , fmap (("Values",) . toJSON) _sSMPatchBaselinePatchFilterValues
     ]
 
-instance FromJSON SSMPatchBaselinePatchFilter where
-  parseJSON (Object obj) =
-    SSMPatchBaselinePatchFilter <$>
-      (obj .:? "Key") <*>
-      (obj .:? "Values")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMPatchBaselinePatchFilter' containing required fields
 -- as arguments.
 ssmPatchBaselinePatchFilter
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchFilterGroup.hs b/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchFilterGroup.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchFilterGroup.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchFilterGroup.hs
@@ -23,12 +23,6 @@
     [ fmap (("PatchFilters",) . toJSON) _sSMPatchBaselinePatchFilterGroupPatchFilters
     ]
 
-instance FromJSON SSMPatchBaselinePatchFilterGroup where
-  parseJSON (Object obj) =
-    SSMPatchBaselinePatchFilterGroup <$>
-      (obj .:? "PatchFilters")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMPatchBaselinePatchFilterGroup' containing required
 -- fields as arguments.
 ssmPatchBaselinePatchFilterGroup
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchSource.hs b/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchSource.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchSource.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselinePatchSource.hs
@@ -27,14 +27,6 @@
     , fmap (("Products",) . toJSON) _sSMPatchBaselinePatchSourceProducts
     ]
 
-instance FromJSON SSMPatchBaselinePatchSource where
-  parseJSON (Object obj) =
-    SSMPatchBaselinePatchSource <$>
-      (obj .:? "Configuration") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Products")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMPatchBaselinePatchSource' containing required fields
 -- as arguments.
 ssmPatchBaselinePatchSource
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselineRule.hs b/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselineRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselineRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselineRule.hs
@@ -29,15 +29,6 @@
     , fmap (("PatchFilterGroup",) . toJSON) _sSMPatchBaselineRulePatchFilterGroup
     ]
 
-instance FromJSON SSMPatchBaselineRule where
-  parseJSON (Object obj) =
-    SSMPatchBaselineRule <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "ApproveAfterDays") <*>
-      (obj .:? "ComplianceLevel") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnableNonSecurity") <*>
-      (obj .:? "PatchFilterGroup")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMPatchBaselineRule' containing required fields as
 -- arguments.
 ssmPatchBaselineRule
diff --git a/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselineRuleGroup.hs b/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselineRuleGroup.hs
--- a/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselineRuleGroup.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SSMPatchBaselineRuleGroup.hs
@@ -23,12 +23,6 @@
     [ fmap (("PatchRules",) . toJSON) _sSMPatchBaselineRuleGroupPatchRules
     ]
 
-instance FromJSON SSMPatchBaselineRuleGroup where
-  parseJSON (Object obj) =
-    SSMPatchBaselineRuleGroup <$>
-      (obj .:? "PatchRules")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMPatchBaselineRuleGroup' containing required fields as
 -- arguments.
 ssmPatchBaselineRuleGroup
diff --git a/library-gen/Stratosphere/ResourceProperties/SageMakerEndpointConfigProductionVariant.hs b/library-gen/Stratosphere/ResourceProperties/SageMakerEndpointConfigProductionVariant.hs
--- a/library-gen/Stratosphere/ResourceProperties/SageMakerEndpointConfigProductionVariant.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SageMakerEndpointConfigProductionVariant.hs
@@ -34,17 +34,6 @@
     , (Just . ("VariantName",) . toJSON) _sageMakerEndpointConfigProductionVariantVariantName
     ]
 
-instance FromJSON SageMakerEndpointConfigProductionVariant where
-  parseJSON (Object obj) =
-    SageMakerEndpointConfigProductionVariant <$>
-      (obj .:? "AcceleratorType") <*>
-      fmap (fmap unInteger') (obj .: "InitialInstanceCount") <*>
-      fmap (fmap unDouble') (obj .: "InitialVariantWeight") <*>
-      (obj .: "InstanceType") <*>
-      (obj .: "ModelName") <*>
-      (obj .: "VariantName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SageMakerEndpointConfigProductionVariant' containing
 -- required fields as arguments.
 sageMakerEndpointConfigProductionVariant
diff --git a/library-gen/Stratosphere/ResourceProperties/SageMakerModelContainerDefinition.hs b/library-gen/Stratosphere/ResourceProperties/SageMakerModelContainerDefinition.hs
--- a/library-gen/Stratosphere/ResourceProperties/SageMakerModelContainerDefinition.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SageMakerModelContainerDefinition.hs
@@ -29,15 +29,6 @@
     , fmap (("ModelDataUrl",) . toJSON) _sageMakerModelContainerDefinitionModelDataUrl
     ]
 
-instance FromJSON SageMakerModelContainerDefinition where
-  parseJSON (Object obj) =
-    SageMakerModelContainerDefinition <$>
-      (obj .:? "ContainerHostname") <*>
-      (obj .:? "Environment") <*>
-      (obj .: "Image") <*>
-      (obj .:? "ModelDataUrl")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SageMakerModelContainerDefinition' containing required
 -- fields as arguments.
 sageMakerModelContainerDefinition
diff --git a/library-gen/Stratosphere/ResourceProperties/SageMakerModelVpcConfig.hs b/library-gen/Stratosphere/ResourceProperties/SageMakerModelVpcConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/SageMakerModelVpcConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SageMakerModelVpcConfig.hs
@@ -25,13 +25,6 @@
     , (Just . ("Subnets",) . toJSON) _sageMakerModelVpcConfigSubnets
     ]
 
-instance FromJSON SageMakerModelVpcConfig where
-  parseJSON (Object obj) =
-    SageMakerModelVpcConfig <$>
-      (obj .: "SecurityGroupIds") <*>
-      (obj .: "Subnets")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SageMakerModelVpcConfig' containing required fields as
 -- arguments.
 sageMakerModelVpcConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/SageMakerNotebookInstanceLifecycleConfigNotebookInstanceLifecycleHook.hs b/library-gen/Stratosphere/ResourceProperties/SageMakerNotebookInstanceLifecycleConfigNotebookInstanceLifecycleHook.hs
--- a/library-gen/Stratosphere/ResourceProperties/SageMakerNotebookInstanceLifecycleConfigNotebookInstanceLifecycleHook.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SageMakerNotebookInstanceLifecycleConfigNotebookInstanceLifecycleHook.hs
@@ -26,12 +26,6 @@
     [ fmap (("Content",) . toJSON) _sageMakerNotebookInstanceLifecycleConfigNotebookInstanceLifecycleHookContent
     ]
 
-instance FromJSON SageMakerNotebookInstanceLifecycleConfigNotebookInstanceLifecycleHook where
-  parseJSON (Object obj) =
-    SageMakerNotebookInstanceLifecycleConfigNotebookInstanceLifecycleHook <$>
-      (obj .:? "Content")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'SageMakerNotebookInstanceLifecycleConfigNotebookInstanceLifecycleHook'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/SecretsManagerRotationScheduleRotationRules.hs b/library-gen/Stratosphere/ResourceProperties/SecretsManagerRotationScheduleRotationRules.hs
--- a/library-gen/Stratosphere/ResourceProperties/SecretsManagerRotationScheduleRotationRules.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SecretsManagerRotationScheduleRotationRules.hs
@@ -25,12 +25,6 @@
     [ fmap (("AutomaticallyAfterDays",) . toJSON . fmap Integer') _secretsManagerRotationScheduleRotationRulesAutomaticallyAfterDays
     ]
 
-instance FromJSON SecretsManagerRotationScheduleRotationRules where
-  parseJSON (Object obj) =
-    SecretsManagerRotationScheduleRotationRules <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "AutomaticallyAfterDays")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SecretsManagerRotationScheduleRotationRules' containing
 -- required fields as arguments.
 secretsManagerRotationScheduleRotationRules
diff --git a/library-gen/Stratosphere/ResourceProperties/SecretsManagerSecretGenerateSecretString.hs b/library-gen/Stratosphere/ResourceProperties/SecretsManagerSecretGenerateSecretString.hs
--- a/library-gen/Stratosphere/ResourceProperties/SecretsManagerSecretGenerateSecretString.hs
+++ b/library-gen/Stratosphere/ResourceProperties/SecretsManagerSecretGenerateSecretString.hs
@@ -42,21 +42,6 @@
     , fmap (("SecretStringTemplate",) . toJSON) _secretsManagerSecretGenerateSecretStringSecretStringTemplate
     ]
 
-instance FromJSON SecretsManagerSecretGenerateSecretString where
-  parseJSON (Object obj) =
-    SecretsManagerSecretGenerateSecretString <$>
-      (obj .:? "ExcludeCharacters") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ExcludeLowercase") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ExcludeNumbers") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ExcludePunctuation") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ExcludeUppercase") <*>
-      (obj .:? "GenerateStringKey") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeSpace") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "PasswordLength") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "RequireEachIncludedType") <*>
-      (obj .:? "SecretStringTemplate")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SecretsManagerSecretGenerateSecretString' containing
 -- required fields as arguments.
 secretsManagerSecretGenerateSecretString
diff --git a/library-gen/Stratosphere/ResourceProperties/ServiceCatalogCloudFormationProductProvisioningArtifactProperties.hs b/library-gen/Stratosphere/ResourceProperties/ServiceCatalogCloudFormationProductProvisioningArtifactProperties.hs
--- a/library-gen/Stratosphere/ResourceProperties/ServiceCatalogCloudFormationProductProvisioningArtifactProperties.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ServiceCatalogCloudFormationProductProvisioningArtifactProperties.hs
@@ -29,14 +29,6 @@
     , fmap (("Name",) . toJSON) _serviceCatalogCloudFormationProductProvisioningArtifactPropertiesName
     ]
 
-instance FromJSON ServiceCatalogCloudFormationProductProvisioningArtifactProperties where
-  parseJSON (Object obj) =
-    ServiceCatalogCloudFormationProductProvisioningArtifactProperties <$>
-      (obj .:? "Description") <*>
-      (obj .: "Info") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ServiceCatalogCloudFormationProductProvisioningArtifactProperties'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ServiceCatalogCloudFormationProvisionedProductProvisioningParameter.hs b/library-gen/Stratosphere/ResourceProperties/ServiceCatalogCloudFormationProvisionedProductProvisioningParameter.hs
--- a/library-gen/Stratosphere/ResourceProperties/ServiceCatalogCloudFormationProvisionedProductProvisioningParameter.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ServiceCatalogCloudFormationProvisionedProductProvisioningParameter.hs
@@ -27,13 +27,6 @@
     , fmap (("Value",) . toJSON) _serviceCatalogCloudFormationProvisionedProductProvisioningParameterValue
     ]
 
-instance FromJSON ServiceCatalogCloudFormationProvisionedProductProvisioningParameter where
-  parseJSON (Object obj) =
-    ServiceCatalogCloudFormationProvisionedProductProvisioningParameter <$>
-      (obj .:? "Key") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for
 -- 'ServiceCatalogCloudFormationProvisionedProductProvisioningParameter'
 -- containing required fields as arguments.
diff --git a/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceDnsConfig.hs b/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceDnsConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceDnsConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceDnsConfig.hs
@@ -27,14 +27,6 @@
     , fmap (("RoutingPolicy",) . toJSON) _serviceDiscoveryServiceDnsConfigRoutingPolicy
     ]
 
-instance FromJSON ServiceDiscoveryServiceDnsConfig where
-  parseJSON (Object obj) =
-    ServiceDiscoveryServiceDnsConfig <$>
-      (obj .: "DnsRecords") <*>
-      (obj .:? "NamespaceId") <*>
-      (obj .:? "RoutingPolicy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceDiscoveryServiceDnsConfig' containing required
 -- fields as arguments.
 serviceDiscoveryServiceDnsConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceDnsRecord.hs b/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceDnsRecord.hs
--- a/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceDnsRecord.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceDnsRecord.hs
@@ -25,13 +25,6 @@
     , (Just . ("Type",) . toJSON) _serviceDiscoveryServiceDnsRecordType
     ]
 
-instance FromJSON ServiceDiscoveryServiceDnsRecord where
-  parseJSON (Object obj) =
-    ServiceDiscoveryServiceDnsRecord <$>
-      (obj .: "TTL") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceDiscoveryServiceDnsRecord' containing required
 -- fields as arguments.
 serviceDiscoveryServiceDnsRecord
diff --git a/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceHealthCheckConfig.hs b/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceHealthCheckConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceHealthCheckConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceHealthCheckConfig.hs
@@ -28,14 +28,6 @@
     , (Just . ("Type",) . toJSON) _serviceDiscoveryServiceHealthCheckConfigType
     ]
 
-instance FromJSON ServiceDiscoveryServiceHealthCheckConfig where
-  parseJSON (Object obj) =
-    ServiceDiscoveryServiceHealthCheckConfig <$>
-      fmap (fmap (fmap unDouble')) (obj .:? "FailureThreshold") <*>
-      (obj .:? "ResourcePath") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceDiscoveryServiceHealthCheckConfig' containing
 -- required fields as arguments.
 serviceDiscoveryServiceHealthCheckConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceHealthCheckCustomConfig.hs b/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceHealthCheckCustomConfig.hs
--- a/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceHealthCheckCustomConfig.hs
+++ b/library-gen/Stratosphere/ResourceProperties/ServiceDiscoveryServiceHealthCheckCustomConfig.hs
@@ -25,12 +25,6 @@
     [ fmap (("FailureThreshold",) . toJSON . fmap Double') _serviceDiscoveryServiceHealthCheckCustomConfigFailureThreshold
     ]
 
-instance FromJSON ServiceDiscoveryServiceHealthCheckCustomConfig where
-  parseJSON (Object obj) =
-    ServiceDiscoveryServiceHealthCheckCustomConfig <$>
-      fmap (fmap (fmap unDouble')) (obj .:? "FailureThreshold")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceDiscoveryServiceHealthCheckCustomConfig'
 -- containing required fields as arguments.
 serviceDiscoveryServiceHealthCheckCustomConfig
diff --git a/library-gen/Stratosphere/ResourceProperties/Tag.hs b/library-gen/Stratosphere/ResourceProperties/Tag.hs
--- a/library-gen/Stratosphere/ResourceProperties/Tag.hs
+++ b/library-gen/Stratosphere/ResourceProperties/Tag.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _tagValue
     ]
 
-instance FromJSON Tag where
-  parseJSON (Object obj) =
-    Tag <$>
-      (obj .: "Key") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Tag' containing required fields as arguments.
 tag
   :: Val Text -- ^ 'tagKey'
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetByteMatchTuple.hs b/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetByteMatchTuple.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetByteMatchTuple.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetByteMatchTuple.hs
@@ -31,16 +31,6 @@
     , (Just . ("TextTransformation",) . toJSON) _wAFByteMatchSetByteMatchTupleTextTransformation
     ]
 
-instance FromJSON WAFByteMatchSetByteMatchTuple where
-  parseJSON (Object obj) =
-    WAFByteMatchSetByteMatchTuple <$>
-      (obj .: "FieldToMatch") <*>
-      (obj .: "PositionalConstraint") <*>
-      (obj .:? "TargetString") <*>
-      (obj .:? "TargetStringBase64") <*>
-      (obj .: "TextTransformation")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFByteMatchSetByteMatchTuple' containing required
 -- fields as arguments.
 wafByteMatchSetByteMatchTuple
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetFieldToMatch.hs b/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetFieldToMatch.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetFieldToMatch.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFByteMatchSetFieldToMatch.hs
@@ -25,13 +25,6 @@
     , (Just . ("Type",) . toJSON) _wAFByteMatchSetFieldToMatchType
     ]
 
-instance FromJSON WAFByteMatchSetFieldToMatch where
-  parseJSON (Object obj) =
-    WAFByteMatchSetFieldToMatch <$>
-      (obj .:? "Data") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFByteMatchSetFieldToMatch' containing required fields
 -- as arguments.
 wafByteMatchSetFieldToMatch
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFIPSetIPSetDescriptor.hs b/library-gen/Stratosphere/ResourceProperties/WAFIPSetIPSetDescriptor.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFIPSetIPSetDescriptor.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFIPSetIPSetDescriptor.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _wAFIPSetIPSetDescriptorValue
     ]
 
-instance FromJSON WAFIPSetIPSetDescriptor where
-  parseJSON (Object obj) =
-    WAFIPSetIPSetDescriptor <$>
-      (obj .: "Type") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFIPSetIPSetDescriptor' containing required fields as
 -- arguments.
 wafipSetIPSetDescriptor
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRegionalByteMatchSetByteMatchTuple.hs b/library-gen/Stratosphere/ResourceProperties/WAFRegionalByteMatchSetByteMatchTuple.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFRegionalByteMatchSetByteMatchTuple.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFRegionalByteMatchSetByteMatchTuple.hs
@@ -32,16 +32,6 @@
     , (Just . ("TextTransformation",) . toJSON) _wAFRegionalByteMatchSetByteMatchTupleTextTransformation
     ]
 
-instance FromJSON WAFRegionalByteMatchSetByteMatchTuple where
-  parseJSON (Object obj) =
-    WAFRegionalByteMatchSetByteMatchTuple <$>
-      (obj .: "FieldToMatch") <*>
-      (obj .: "PositionalConstraint") <*>
-      (obj .:? "TargetString") <*>
-      (obj .:? "TargetStringBase64") <*>
-      (obj .: "TextTransformation")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalByteMatchSetByteMatchTuple' containing
 -- required fields as arguments.
 wafRegionalByteMatchSetByteMatchTuple
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRegionalByteMatchSetFieldToMatch.hs b/library-gen/Stratosphere/ResourceProperties/WAFRegionalByteMatchSetFieldToMatch.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFRegionalByteMatchSetFieldToMatch.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFRegionalByteMatchSetFieldToMatch.hs
@@ -25,13 +25,6 @@
     , (Just . ("Type",) . toJSON) _wAFRegionalByteMatchSetFieldToMatchType
     ]
 
-instance FromJSON WAFRegionalByteMatchSetFieldToMatch where
-  parseJSON (Object obj) =
-    WAFRegionalByteMatchSetFieldToMatch <$>
-      (obj .:? "Data") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalByteMatchSetFieldToMatch' containing required
 -- fields as arguments.
 wafRegionalByteMatchSetFieldToMatch
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRegionalIPSetIPSetDescriptor.hs b/library-gen/Stratosphere/ResourceProperties/WAFRegionalIPSetIPSetDescriptor.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFRegionalIPSetIPSetDescriptor.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFRegionalIPSetIPSetDescriptor.hs
@@ -25,13 +25,6 @@
     , (Just . ("Value",) . toJSON) _wAFRegionalIPSetIPSetDescriptorValue
     ]
 
-instance FromJSON WAFRegionalIPSetIPSetDescriptor where
-  parseJSON (Object obj) =
-    WAFRegionalIPSetIPSetDescriptor <$>
-      (obj .: "Type") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalIPSetIPSetDescriptor' containing required
 -- fields as arguments.
 wafRegionalIPSetIPSetDescriptor
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRegionalRulePredicate.hs b/library-gen/Stratosphere/ResourceProperties/WAFRegionalRulePredicate.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFRegionalRulePredicate.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFRegionalRulePredicate.hs
@@ -27,14 +27,6 @@
     , (Just . ("Type",) . toJSON) _wAFRegionalRulePredicateType
     ]
 
-instance FromJSON WAFRegionalRulePredicate where
-  parseJSON (Object obj) =
-    WAFRegionalRulePredicate <$>
-      (obj .: "DataId") <*>
-      fmap (fmap unBool') (obj .: "Negated") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalRulePredicate' containing required fields as
 -- arguments.
 wafRegionalRulePredicate
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRegionalSizeConstraintSetFieldToMatch.hs b/library-gen/Stratosphere/ResourceProperties/WAFRegionalSizeConstraintSetFieldToMatch.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFRegionalSizeConstraintSetFieldToMatch.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFRegionalSizeConstraintSetFieldToMatch.hs
@@ -26,13 +26,6 @@
     , (Just . ("Type",) . toJSON) _wAFRegionalSizeConstraintSetFieldToMatchType
     ]
 
-instance FromJSON WAFRegionalSizeConstraintSetFieldToMatch where
-  parseJSON (Object obj) =
-    WAFRegionalSizeConstraintSetFieldToMatch <$>
-      (obj .:? "Data") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalSizeConstraintSetFieldToMatch' containing
 -- required fields as arguments.
 wafRegionalSizeConstraintSetFieldToMatch
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRegionalSizeConstraintSetSizeConstraint.hs b/library-gen/Stratosphere/ResourceProperties/WAFRegionalSizeConstraintSetSizeConstraint.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFRegionalSizeConstraintSetSizeConstraint.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFRegionalSizeConstraintSetSizeConstraint.hs
@@ -30,15 +30,6 @@
     , (Just . ("TextTransformation",) . toJSON) _wAFRegionalSizeConstraintSetSizeConstraintTextTransformation
     ]
 
-instance FromJSON WAFRegionalSizeConstraintSetSizeConstraint where
-  parseJSON (Object obj) =
-    WAFRegionalSizeConstraintSetSizeConstraint <$>
-      (obj .: "ComparisonOperator") <*>
-      (obj .: "FieldToMatch") <*>
-      fmap (fmap unInteger') (obj .: "Size") <*>
-      (obj .: "TextTransformation")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalSizeConstraintSetSizeConstraint' containing
 -- required fields as arguments.
 wafRegionalSizeConstraintSetSizeConstraint
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRegionalSqlInjectionMatchSetFieldToMatch.hs b/library-gen/Stratosphere/ResourceProperties/WAFRegionalSqlInjectionMatchSetFieldToMatch.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFRegionalSqlInjectionMatchSetFieldToMatch.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFRegionalSqlInjectionMatchSetFieldToMatch.hs
@@ -27,13 +27,6 @@
     , (Just . ("Type",) . toJSON) _wAFRegionalSqlInjectionMatchSetFieldToMatchType
     ]
 
-instance FromJSON WAFRegionalSqlInjectionMatchSetFieldToMatch where
-  parseJSON (Object obj) =
-    WAFRegionalSqlInjectionMatchSetFieldToMatch <$>
-      (obj .:? "Data") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalSqlInjectionMatchSetFieldToMatch' containing
 -- required fields as arguments.
 wafRegionalSqlInjectionMatchSetFieldToMatch
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRegionalSqlInjectionMatchSetSqlInjectionMatchTuple.hs b/library-gen/Stratosphere/ResourceProperties/WAFRegionalSqlInjectionMatchSetSqlInjectionMatchTuple.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFRegionalSqlInjectionMatchSetSqlInjectionMatchTuple.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFRegionalSqlInjectionMatchSetSqlInjectionMatchTuple.hs
@@ -27,13 +27,6 @@
     , (Just . ("TextTransformation",) . toJSON) _wAFRegionalSqlInjectionMatchSetSqlInjectionMatchTupleTextTransformation
     ]
 
-instance FromJSON WAFRegionalSqlInjectionMatchSetSqlInjectionMatchTuple where
-  parseJSON (Object obj) =
-    WAFRegionalSqlInjectionMatchSetSqlInjectionMatchTuple <$>
-      (obj .: "FieldToMatch") <*>
-      (obj .: "TextTransformation")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalSqlInjectionMatchSetSqlInjectionMatchTuple'
 -- containing required fields as arguments.
 wafRegionalSqlInjectionMatchSetSqlInjectionMatchTuple
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRegionalWebACLAction.hs b/library-gen/Stratosphere/ResourceProperties/WAFRegionalWebACLAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFRegionalWebACLAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFRegionalWebACLAction.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Type",) . toJSON) _wAFRegionalWebACLActionType
     ]
 
-instance FromJSON WAFRegionalWebACLAction where
-  parseJSON (Object obj) =
-    WAFRegionalWebACLAction <$>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalWebACLAction' containing required fields as
 -- arguments.
 wafRegionalWebACLAction
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRegionalWebACLRule.hs b/library-gen/Stratosphere/ResourceProperties/WAFRegionalWebACLRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFRegionalWebACLRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFRegionalWebACLRule.hs
@@ -27,14 +27,6 @@
     , (Just . ("RuleId",) . toJSON) _wAFRegionalWebACLRuleRuleId
     ]
 
-instance FromJSON WAFRegionalWebACLRule where
-  parseJSON (Object obj) =
-    WAFRegionalWebACLRule <$>
-      (obj .: "Action") <*>
-      fmap (fmap unInteger') (obj .: "Priority") <*>
-      (obj .: "RuleId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalWebACLRule' containing required fields as
 -- arguments.
 wafRegionalWebACLRule
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRegionalXssMatchSetFieldToMatch.hs b/library-gen/Stratosphere/ResourceProperties/WAFRegionalXssMatchSetFieldToMatch.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFRegionalXssMatchSetFieldToMatch.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFRegionalXssMatchSetFieldToMatch.hs
@@ -25,13 +25,6 @@
     , (Just . ("Type",) . toJSON) _wAFRegionalXssMatchSetFieldToMatchType
     ]
 
-instance FromJSON WAFRegionalXssMatchSetFieldToMatch where
-  parseJSON (Object obj) =
-    WAFRegionalXssMatchSetFieldToMatch <$>
-      (obj .:? "Data") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalXssMatchSetFieldToMatch' containing required
 -- fields as arguments.
 wafRegionalXssMatchSetFieldToMatch
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRegionalXssMatchSetXssMatchTuple.hs b/library-gen/Stratosphere/ResourceProperties/WAFRegionalXssMatchSetXssMatchTuple.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFRegionalXssMatchSetXssMatchTuple.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFRegionalXssMatchSetXssMatchTuple.hs
@@ -25,13 +25,6 @@
     , (Just . ("TextTransformation",) . toJSON) _wAFRegionalXssMatchSetXssMatchTupleTextTransformation
     ]
 
-instance FromJSON WAFRegionalXssMatchSetXssMatchTuple where
-  parseJSON (Object obj) =
-    WAFRegionalXssMatchSetXssMatchTuple <$>
-      (obj .: "FieldToMatch") <*>
-      (obj .: "TextTransformation")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalXssMatchSetXssMatchTuple' containing required
 -- fields as arguments.
 wafRegionalXssMatchSetXssMatchTuple
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFRulePredicate.hs b/library-gen/Stratosphere/ResourceProperties/WAFRulePredicate.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFRulePredicate.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFRulePredicate.hs
@@ -27,14 +27,6 @@
     , (Just . ("Type",) . toJSON) _wAFRulePredicateType
     ]
 
-instance FromJSON WAFRulePredicate where
-  parseJSON (Object obj) =
-    WAFRulePredicate <$>
-      (obj .: "DataId") <*>
-      fmap (fmap unBool') (obj .: "Negated") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRulePredicate' containing required fields as
 -- arguments.
 wafRulePredicate
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetFieldToMatch.hs b/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetFieldToMatch.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetFieldToMatch.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetFieldToMatch.hs
@@ -25,13 +25,6 @@
     , (Just . ("Type",) . toJSON) _wAFSizeConstraintSetFieldToMatchType
     ]
 
-instance FromJSON WAFSizeConstraintSetFieldToMatch where
-  parseJSON (Object obj) =
-    WAFSizeConstraintSetFieldToMatch <$>
-      (obj .:? "Data") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFSizeConstraintSetFieldToMatch' containing required
 -- fields as arguments.
 wafSizeConstraintSetFieldToMatch
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetSizeConstraint.hs b/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetSizeConstraint.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetSizeConstraint.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFSizeConstraintSetSizeConstraint.hs
@@ -29,15 +29,6 @@
     , (Just . ("TextTransformation",) . toJSON) _wAFSizeConstraintSetSizeConstraintTextTransformation
     ]
 
-instance FromJSON WAFSizeConstraintSetSizeConstraint where
-  parseJSON (Object obj) =
-    WAFSizeConstraintSetSizeConstraint <$>
-      (obj .: "ComparisonOperator") <*>
-      (obj .: "FieldToMatch") <*>
-      fmap (fmap unInteger') (obj .: "Size") <*>
-      (obj .: "TextTransformation")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFSizeConstraintSetSizeConstraint' containing required
 -- fields as arguments.
 wafSizeConstraintSetSizeConstraint
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetFieldToMatch.hs b/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetFieldToMatch.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetFieldToMatch.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetFieldToMatch.hs
@@ -25,13 +25,6 @@
     , (Just . ("Type",) . toJSON) _wAFSqlInjectionMatchSetFieldToMatchType
     ]
 
-instance FromJSON WAFSqlInjectionMatchSetFieldToMatch where
-  parseJSON (Object obj) =
-    WAFSqlInjectionMatchSetFieldToMatch <$>
-      (obj .:? "Data") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFSqlInjectionMatchSetFieldToMatch' containing required
 -- fields as arguments.
 wafSqlInjectionMatchSetFieldToMatch
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetSqlInjectionMatchTuple.hs b/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetSqlInjectionMatchTuple.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetSqlInjectionMatchTuple.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFSqlInjectionMatchSetSqlInjectionMatchTuple.hs
@@ -27,13 +27,6 @@
     , (Just . ("TextTransformation",) . toJSON) _wAFSqlInjectionMatchSetSqlInjectionMatchTupleTextTransformation
     ]
 
-instance FromJSON WAFSqlInjectionMatchSetSqlInjectionMatchTuple where
-  parseJSON (Object obj) =
-    WAFSqlInjectionMatchSetSqlInjectionMatchTuple <$>
-      (obj .: "FieldToMatch") <*>
-      (obj .: "TextTransformation")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFSqlInjectionMatchSetSqlInjectionMatchTuple'
 -- containing required fields as arguments.
 wafSqlInjectionMatchSetSqlInjectionMatchTuple
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFWebACLActivatedRule.hs b/library-gen/Stratosphere/ResourceProperties/WAFWebACLActivatedRule.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFWebACLActivatedRule.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFWebACLActivatedRule.hs
@@ -27,14 +27,6 @@
     , (Just . ("RuleId",) . toJSON) _wAFWebACLActivatedRuleRuleId
     ]
 
-instance FromJSON WAFWebACLActivatedRule where
-  parseJSON (Object obj) =
-    WAFWebACLActivatedRule <$>
-      (obj .:? "Action") <*>
-      fmap (fmap unInteger') (obj .: "Priority") <*>
-      (obj .: "RuleId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFWebACLActivatedRule' containing required fields as
 -- arguments.
 wafWebACLActivatedRule
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFWebACLWafAction.hs b/library-gen/Stratosphere/ResourceProperties/WAFWebACLWafAction.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFWebACLWafAction.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFWebACLWafAction.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Type",) . toJSON) _wAFWebACLWafActionType
     ]
 
-instance FromJSON WAFWebACLWafAction where
-  parseJSON (Object obj) =
-    WAFWebACLWafAction <$>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFWebACLWafAction' containing required fields as
 -- arguments.
 wafWebACLWafAction
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetFieldToMatch.hs b/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetFieldToMatch.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetFieldToMatch.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetFieldToMatch.hs
@@ -25,13 +25,6 @@
     , (Just . ("Type",) . toJSON) _wAFXssMatchSetFieldToMatchType
     ]
 
-instance FromJSON WAFXssMatchSetFieldToMatch where
-  parseJSON (Object obj) =
-    WAFXssMatchSetFieldToMatch <$>
-      (obj .:? "Data") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFXssMatchSetFieldToMatch' containing required fields
 -- as arguments.
 wafXssMatchSetFieldToMatch
diff --git a/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetXssMatchTuple.hs b/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetXssMatchTuple.hs
--- a/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetXssMatchTuple.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WAFXssMatchSetXssMatchTuple.hs
@@ -25,13 +25,6 @@
     , (Just . ("TextTransformation",) . toJSON) _wAFXssMatchSetXssMatchTupleTextTransformation
     ]
 
-instance FromJSON WAFXssMatchSetXssMatchTuple where
-  parseJSON (Object obj) =
-    WAFXssMatchSetXssMatchTuple <$>
-      (obj .: "FieldToMatch") <*>
-      (obj .: "TextTransformation")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFXssMatchSetXssMatchTuple' containing required fields
 -- as arguments.
 wafXssMatchSetXssMatchTuple
diff --git a/library-gen/Stratosphere/ResourceProperties/WorkSpacesWorkspaceWorkspaceProperties.hs b/library-gen/Stratosphere/ResourceProperties/WorkSpacesWorkspaceWorkspaceProperties.hs
--- a/library-gen/Stratosphere/ResourceProperties/WorkSpacesWorkspaceWorkspaceProperties.hs
+++ b/library-gen/Stratosphere/ResourceProperties/WorkSpacesWorkspaceWorkspaceProperties.hs
@@ -32,16 +32,6 @@
     , fmap (("UserVolumeSizeGib",) . toJSON . fmap Integer') _workSpacesWorkspaceWorkspacePropertiesUserVolumeSizeGib
     ]
 
-instance FromJSON WorkSpacesWorkspaceWorkspaceProperties where
-  parseJSON (Object obj) =
-    WorkSpacesWorkspaceWorkspaceProperties <$>
-      (obj .:? "ComputeTypeName") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "RootVolumeSizeGib") <*>
-      (obj .:? "RunningMode") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "RunningModeAutoStopTimeoutInMinutes") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "UserVolumeSizeGib")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WorkSpacesWorkspaceWorkspaceProperties' containing
 -- required fields as arguments.
 workSpacesWorkspaceWorkspaceProperties
diff --git a/library-gen/Stratosphere/Resources.hs b/library-gen/Stratosphere/Resources.hs
--- a/library-gen/Stratosphere/Resources.hs
+++ b/library-gen/Stratosphere/Resources.hs
@@ -9,10 +9,6 @@
 {-# LANGUAGE TemplateHaskell #-}
 {-# LANGUAGE TypeFamilies #-}
 
-#if MIN_VERSION_GLASGOW_HASKELL(8,0,1,0)
-{-# OPTIONS_GHC -fmax-pmcheck-iterations=40000000 #-}
-#endif
-
 -- | See:
 -- http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/resources-section-structure.html
 --
@@ -1560,7 +1556,6 @@
   deriving (Show, Eq, Generic)
 
 instance ToJSON DeletionPolicy where
-instance FromJSON DeletionPolicy where
 
 data Resource =
   Resource
@@ -2336,383 +2331,6 @@
   [ "Type" .= ("Alexa::ASK::Skill" :: String), "Properties" .= toJSON x]
 
 
-resourceFromJSON :: T.Text -> Object -> Parser Resource
-resourceFromJSON n o =
-    do type' <- o .: "Type" :: Parser String
-       props <- case type' of
-         "AWS::AmazonMQ::Broker" -> AmazonMQBrokerProperties <$> (o .: "Properties")
-         "AWS::AmazonMQ::Configuration" -> AmazonMQConfigurationProperties <$> (o .: "Properties")
-         "AWS::AmazonMQ::ConfigurationAssociation" -> AmazonMQConfigurationAssociationProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::Account" -> ApiGatewayAccountProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::ApiKey" -> ApiGatewayApiKeyProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::Authorizer" -> ApiGatewayAuthorizerProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::BasePathMapping" -> ApiGatewayBasePathMappingProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::ClientCertificate" -> ApiGatewayClientCertificateProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::Deployment" -> ApiGatewayDeploymentProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::DocumentationPart" -> ApiGatewayDocumentationPartProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::DocumentationVersion" -> ApiGatewayDocumentationVersionProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::DomainName" -> ApiGatewayDomainNameProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::GatewayResponse" -> ApiGatewayGatewayResponseProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::Method" -> ApiGatewayMethodProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::Model" -> ApiGatewayModelProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::RequestValidator" -> ApiGatewayRequestValidatorProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::Resource" -> ApiGatewayResourceProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::RestApi" -> ApiGatewayRestApiProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::Stage" -> ApiGatewayStageProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::UsagePlan" -> ApiGatewayUsagePlanProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::UsagePlanKey" -> ApiGatewayUsagePlanKeyProperties <$> (o .: "Properties")
-         "AWS::ApiGateway::VpcLink" -> ApiGatewayVpcLinkProperties <$> (o .: "Properties")
-         "AWS::ApiGatewayV2::Api" -> ApiGatewayV2ApiProperties <$> (o .: "Properties")
-         "AWS::ApiGatewayV2::Authorizer" -> ApiGatewayV2AuthorizerProperties <$> (o .: "Properties")
-         "AWS::ApiGatewayV2::Deployment" -> ApiGatewayV2DeploymentProperties <$> (o .: "Properties")
-         "AWS::ApiGatewayV2::Integration" -> ApiGatewayV2IntegrationProperties <$> (o .: "Properties")
-         "AWS::ApiGatewayV2::IntegrationResponse" -> ApiGatewayV2IntegrationResponseProperties <$> (o .: "Properties")
-         "AWS::ApiGatewayV2::Model" -> ApiGatewayV2ModelProperties <$> (o .: "Properties")
-         "AWS::ApiGatewayV2::Route" -> ApiGatewayV2RouteProperties <$> (o .: "Properties")
-         "AWS::ApiGatewayV2::RouteResponse" -> ApiGatewayV2RouteResponseProperties <$> (o .: "Properties")
-         "AWS::ApiGatewayV2::Stage" -> ApiGatewayV2StageProperties <$> (o .: "Properties")
-         "AWS::AppStream::DirectoryConfig" -> AppStreamDirectoryConfigProperties <$> (o .: "Properties")
-         "AWS::AppStream::Fleet" -> AppStreamFleetProperties <$> (o .: "Properties")
-         "AWS::AppStream::ImageBuilder" -> AppStreamImageBuilderProperties <$> (o .: "Properties")
-         "AWS::AppStream::Stack" -> AppStreamStackProperties <$> (o .: "Properties")
-         "AWS::AppStream::StackFleetAssociation" -> AppStreamStackFleetAssociationProperties <$> (o .: "Properties")
-         "AWS::AppStream::StackUserAssociation" -> AppStreamStackUserAssociationProperties <$> (o .: "Properties")
-         "AWS::AppStream::User" -> AppStreamUserProperties <$> (o .: "Properties")
-         "AWS::AppSync::ApiKey" -> AppSyncApiKeyProperties <$> (o .: "Properties")
-         "AWS::AppSync::DataSource" -> AppSyncDataSourceProperties <$> (o .: "Properties")
-         "AWS::AppSync::FunctionConfiguration" -> AppSyncFunctionConfigurationProperties <$> (o .: "Properties")
-         "AWS::AppSync::GraphQLApi" -> AppSyncGraphQLApiProperties <$> (o .: "Properties")
-         "AWS::AppSync::GraphQLSchema" -> AppSyncGraphQLSchemaProperties <$> (o .: "Properties")
-         "AWS::AppSync::Resolver" -> AppSyncResolverProperties <$> (o .: "Properties")
-         "AWS::ApplicationAutoScaling::ScalableTarget" -> ApplicationAutoScalingScalableTargetProperties <$> (o .: "Properties")
-         "AWS::ApplicationAutoScaling::ScalingPolicy" -> ApplicationAutoScalingScalingPolicyProperties <$> (o .: "Properties")
-         "AWS::Athena::NamedQuery" -> AthenaNamedQueryProperties <$> (o .: "Properties")
-         "AWS::AutoScaling::AutoScalingGroup" -> AutoScalingAutoScalingGroupProperties <$> (o .: "Properties")
-         "AWS::AutoScaling::LaunchConfiguration" -> AutoScalingLaunchConfigurationProperties <$> (o .: "Properties")
-         "AWS::AutoScaling::LifecycleHook" -> AutoScalingLifecycleHookProperties <$> (o .: "Properties")
-         "AWS::AutoScaling::ScalingPolicy" -> AutoScalingScalingPolicyProperties <$> (o .: "Properties")
-         "AWS::AutoScaling::ScheduledAction" -> AutoScalingScheduledActionProperties <$> (o .: "Properties")
-         "AWS::AutoScalingPlans::ScalingPlan" -> AutoScalingPlansScalingPlanProperties <$> (o .: "Properties")
-         "AWS::Batch::ComputeEnvironment" -> BatchComputeEnvironmentProperties <$> (o .: "Properties")
-         "AWS::Batch::JobDefinition" -> BatchJobDefinitionProperties <$> (o .: "Properties")
-         "AWS::Batch::JobQueue" -> BatchJobQueueProperties <$> (o .: "Properties")
-         "AWS::Budgets::Budget" -> BudgetsBudgetProperties <$> (o .: "Properties")
-         "AWS::CertificateManager::Certificate" -> CertificateManagerCertificateProperties <$> (o .: "Properties")
-         "AWS::Cloud9::EnvironmentEC2" -> Cloud9EnvironmentEC2Properties <$> (o .: "Properties")
-         "AWS::CloudFormation::CustomResource" -> CloudFormationCustomResourceProperties <$> (o .: "Properties")
-         "AWS::CloudFormation::Macro" -> CloudFormationMacroProperties <$> (o .: "Properties")
-         "AWS::CloudFormation::Stack" -> CloudFormationStackProperties <$> (o .: "Properties")
-         "AWS::CloudFormation::WaitCondition" -> CloudFormationWaitConditionProperties <$> (o .: "Properties")
-         "AWS::CloudFormation::WaitConditionHandle" -> CloudFormationWaitConditionHandleProperties <$> (o .: "Properties")
-         "AWS::CloudFront::CloudFrontOriginAccessIdentity" -> CloudFrontCloudFrontOriginAccessIdentityProperties <$> (o .: "Properties")
-         "AWS::CloudFront::Distribution" -> CloudFrontDistributionProperties <$> (o .: "Properties")
-         "AWS::CloudFront::StreamingDistribution" -> CloudFrontStreamingDistributionProperties <$> (o .: "Properties")
-         "AWS::CloudTrail::Trail" -> CloudTrailTrailProperties <$> (o .: "Properties")
-         "AWS::CloudWatch::Alarm" -> CloudWatchAlarmProperties <$> (o .: "Properties")
-         "AWS::CloudWatch::Dashboard" -> CloudWatchDashboardProperties <$> (o .: "Properties")
-         "AWS::CodeBuild::Project" -> CodeBuildProjectProperties <$> (o .: "Properties")
-         "AWS::CodeCommit::Repository" -> CodeCommitRepositoryProperties <$> (o .: "Properties")
-         "AWS::CodeDeploy::Application" -> CodeDeployApplicationProperties <$> (o .: "Properties")
-         "AWS::CodeDeploy::DeploymentConfig" -> CodeDeployDeploymentConfigProperties <$> (o .: "Properties")
-         "AWS::CodeDeploy::DeploymentGroup" -> CodeDeployDeploymentGroupProperties <$> (o .: "Properties")
-         "AWS::CodePipeline::CustomActionType" -> CodePipelineCustomActionTypeProperties <$> (o .: "Properties")
-         "AWS::CodePipeline::Pipeline" -> CodePipelinePipelineProperties <$> (o .: "Properties")
-         "AWS::CodePipeline::Webhook" -> CodePipelineWebhookProperties <$> (o .: "Properties")
-         "AWS::Cognito::IdentityPool" -> CognitoIdentityPoolProperties <$> (o .: "Properties")
-         "AWS::Cognito::IdentityPoolRoleAttachment" -> CognitoIdentityPoolRoleAttachmentProperties <$> (o .: "Properties")
-         "AWS::Cognito::UserPool" -> CognitoUserPoolProperties <$> (o .: "Properties")
-         "AWS::Cognito::UserPoolClient" -> CognitoUserPoolClientProperties <$> (o .: "Properties")
-         "AWS::Cognito::UserPoolGroup" -> CognitoUserPoolGroupProperties <$> (o .: "Properties")
-         "AWS::Cognito::UserPoolUser" -> CognitoUserPoolUserProperties <$> (o .: "Properties")
-         "AWS::Cognito::UserPoolUserToGroupAttachment" -> CognitoUserPoolUserToGroupAttachmentProperties <$> (o .: "Properties")
-         "AWS::Config::AggregationAuthorization" -> ConfigAggregationAuthorizationProperties <$> (o .: "Properties")
-         "AWS::Config::ConfigRule" -> ConfigConfigRuleProperties <$> (o .: "Properties")
-         "AWS::Config::ConfigurationAggregator" -> ConfigConfigurationAggregatorProperties <$> (o .: "Properties")
-         "AWS::Config::ConfigurationRecorder" -> ConfigConfigurationRecorderProperties <$> (o .: "Properties")
-         "AWS::Config::DeliveryChannel" -> ConfigDeliveryChannelProperties <$> (o .: "Properties")
-         "AWS::DAX::Cluster" -> DAXClusterProperties <$> (o .: "Properties")
-         "AWS::DAX::ParameterGroup" -> DAXParameterGroupProperties <$> (o .: "Properties")
-         "AWS::DAX::SubnetGroup" -> DAXSubnetGroupProperties <$> (o .: "Properties")
-         "AWS::DLM::LifecyclePolicy" -> DLMLifecyclePolicyProperties <$> (o .: "Properties")
-         "AWS::DMS::Certificate" -> DMSCertificateProperties <$> (o .: "Properties")
-         "AWS::DMS::Endpoint" -> DMSEndpointProperties <$> (o .: "Properties")
-         "AWS::DMS::EventSubscription" -> DMSEventSubscriptionProperties <$> (o .: "Properties")
-         "AWS::DMS::ReplicationInstance" -> DMSReplicationInstanceProperties <$> (o .: "Properties")
-         "AWS::DMS::ReplicationSubnetGroup" -> DMSReplicationSubnetGroupProperties <$> (o .: "Properties")
-         "AWS::DMS::ReplicationTask" -> DMSReplicationTaskProperties <$> (o .: "Properties")
-         "AWS::DataPipeline::Pipeline" -> DataPipelinePipelineProperties <$> (o .: "Properties")
-         "AWS::DirectoryService::MicrosoftAD" -> DirectoryServiceMicrosoftADProperties <$> (o .: "Properties")
-         "AWS::DirectoryService::SimpleAD" -> DirectoryServiceSimpleADProperties <$> (o .: "Properties")
-         "AWS::DocDB::DBCluster" -> DocDBDBClusterProperties <$> (o .: "Properties")
-         "AWS::DocDB::DBClusterParameterGroup" -> DocDBDBClusterParameterGroupProperties <$> (o .: "Properties")
-         "AWS::DocDB::DBInstance" -> DocDBDBInstanceProperties <$> (o .: "Properties")
-         "AWS::DocDB::DBSubnetGroup" -> DocDBDBSubnetGroupProperties <$> (o .: "Properties")
-         "AWS::DynamoDB::Table" -> DynamoDBTableProperties <$> (o .: "Properties")
-         "AWS::EC2::CustomerGateway" -> EC2CustomerGatewayProperties <$> (o .: "Properties")
-         "AWS::EC2::DHCPOptions" -> EC2DHCPOptionsProperties <$> (o .: "Properties")
-         "AWS::EC2::EC2Fleet" -> EC2EC2FleetProperties <$> (o .: "Properties")
-         "AWS::EC2::EIP" -> EC2EIPProperties <$> (o .: "Properties")
-         "AWS::EC2::EIPAssociation" -> EC2EIPAssociationProperties <$> (o .: "Properties")
-         "AWS::EC2::EgressOnlyInternetGateway" -> EC2EgressOnlyInternetGatewayProperties <$> (o .: "Properties")
-         "AWS::EC2::FlowLog" -> EC2FlowLogProperties <$> (o .: "Properties")
-         "AWS::EC2::Host" -> EC2HostProperties <$> (o .: "Properties")
-         "AWS::EC2::Instance" -> EC2InstanceProperties <$> (o .: "Properties")
-         "AWS::EC2::InternetGateway" -> EC2InternetGatewayProperties <$> (o .: "Properties")
-         "AWS::EC2::LaunchTemplate" -> EC2LaunchTemplateProperties <$> (o .: "Properties")
-         "AWS::EC2::NatGateway" -> EC2NatGatewayProperties <$> (o .: "Properties")
-         "AWS::EC2::NetworkAcl" -> EC2NetworkAclProperties <$> (o .: "Properties")
-         "AWS::EC2::NetworkAclEntry" -> EC2NetworkAclEntryProperties <$> (o .: "Properties")
-         "AWS::EC2::NetworkInterface" -> EC2NetworkInterfaceProperties <$> (o .: "Properties")
-         "AWS::EC2::NetworkInterfaceAttachment" -> EC2NetworkInterfaceAttachmentProperties <$> (o .: "Properties")
-         "AWS::EC2::NetworkInterfacePermission" -> EC2NetworkInterfacePermissionProperties <$> (o .: "Properties")
-         "AWS::EC2::PlacementGroup" -> EC2PlacementGroupProperties <$> (o .: "Properties")
-         "AWS::EC2::Route" -> EC2RouteProperties <$> (o .: "Properties")
-         "AWS::EC2::RouteTable" -> EC2RouteTableProperties <$> (o .: "Properties")
-         "AWS::EC2::SecurityGroup" -> EC2SecurityGroupProperties <$> (o .: "Properties")
-         "AWS::EC2::SecurityGroupEgress" -> EC2SecurityGroupEgressProperties <$> (o .: "Properties")
-         "AWS::EC2::SecurityGroupIngress" -> EC2SecurityGroupIngressProperties <$> (o .: "Properties")
-         "AWS::EC2::SpotFleet" -> EC2SpotFleetProperties <$> (o .: "Properties")
-         "AWS::EC2::Subnet" -> EC2SubnetProperties <$> (o .: "Properties")
-         "AWS::EC2::SubnetCidrBlock" -> EC2SubnetCidrBlockProperties <$> (o .: "Properties")
-         "AWS::EC2::SubnetNetworkAclAssociation" -> EC2SubnetNetworkAclAssociationProperties <$> (o .: "Properties")
-         "AWS::EC2::SubnetRouteTableAssociation" -> EC2SubnetRouteTableAssociationProperties <$> (o .: "Properties")
-         "AWS::EC2::TransitGateway" -> EC2TransitGatewayProperties <$> (o .: "Properties")
-         "AWS::EC2::TransitGatewayAttachment" -> EC2TransitGatewayAttachmentProperties <$> (o .: "Properties")
-         "AWS::EC2::TransitGatewayRoute" -> EC2TransitGatewayRouteProperties <$> (o .: "Properties")
-         "AWS::EC2::TransitGatewayRouteTable" -> EC2TransitGatewayRouteTableProperties <$> (o .: "Properties")
-         "AWS::EC2::TransitGatewayRouteTableAssociation" -> EC2TransitGatewayRouteTableAssociationProperties <$> (o .: "Properties")
-         "AWS::EC2::TransitGatewayRouteTablePropagation" -> EC2TransitGatewayRouteTablePropagationProperties <$> (o .: "Properties")
-         "AWS::EC2::TrunkInterfaceAssociation" -> EC2TrunkInterfaceAssociationProperties <$> (o .: "Properties")
-         "AWS::EC2::VPC" -> EC2VPCProperties <$> (o .: "Properties")
-         "AWS::EC2::VPCCidrBlock" -> EC2VPCCidrBlockProperties <$> (o .: "Properties")
-         "AWS::EC2::VPCDHCPOptionsAssociation" -> EC2VPCDHCPOptionsAssociationProperties <$> (o .: "Properties")
-         "AWS::EC2::VPCEndpoint" -> EC2VPCEndpointProperties <$> (o .: "Properties")
-         "AWS::EC2::VPCEndpointConnectionNotification" -> EC2VPCEndpointConnectionNotificationProperties <$> (o .: "Properties")
-         "AWS::EC2::VPCEndpointServicePermissions" -> EC2VPCEndpointServicePermissionsProperties <$> (o .: "Properties")
-         "AWS::EC2::VPCGatewayAttachment" -> EC2VPCGatewayAttachmentProperties <$> (o .: "Properties")
-         "AWS::EC2::VPCPeeringConnection" -> EC2VPCPeeringConnectionProperties <$> (o .: "Properties")
-         "AWS::EC2::VPNConnection" -> EC2VPNConnectionProperties <$> (o .: "Properties")
-         "AWS::EC2::VPNConnectionRoute" -> EC2VPNConnectionRouteProperties <$> (o .: "Properties")
-         "AWS::EC2::VPNGateway" -> EC2VPNGatewayProperties <$> (o .: "Properties")
-         "AWS::EC2::VPNGatewayRoutePropagation" -> EC2VPNGatewayRoutePropagationProperties <$> (o .: "Properties")
-         "AWS::EC2::Volume" -> EC2VolumeProperties <$> (o .: "Properties")
-         "AWS::EC2::VolumeAttachment" -> EC2VolumeAttachmentProperties <$> (o .: "Properties")
-         "AWS::ECR::Repository" -> ECRRepositoryProperties <$> (o .: "Properties")
-         "AWS::ECS::Cluster" -> ECSClusterProperties <$> (o .: "Properties")
-         "AWS::ECS::Service" -> ECSServiceProperties <$> (o .: "Properties")
-         "AWS::ECS::TaskDefinition" -> ECSTaskDefinitionProperties <$> (o .: "Properties")
-         "AWS::EFS::FileSystem" -> EFSFileSystemProperties <$> (o .: "Properties")
-         "AWS::EFS::MountTarget" -> EFSMountTargetProperties <$> (o .: "Properties")
-         "AWS::EKS::Cluster" -> EKSClusterProperties <$> (o .: "Properties")
-         "AWS::EMR::Cluster" -> EMRClusterProperties <$> (o .: "Properties")
-         "AWS::EMR::InstanceFleetConfig" -> EMRInstanceFleetConfigProperties <$> (o .: "Properties")
-         "AWS::EMR::InstanceGroupConfig" -> EMRInstanceGroupConfigProperties <$> (o .: "Properties")
-         "AWS::EMR::SecurityConfiguration" -> EMRSecurityConfigurationProperties <$> (o .: "Properties")
-         "AWS::EMR::Step" -> EMRStepProperties <$> (o .: "Properties")
-         "AWS::ElastiCache::CacheCluster" -> ElastiCacheCacheClusterProperties <$> (o .: "Properties")
-         "AWS::ElastiCache::ParameterGroup" -> ElastiCacheParameterGroupProperties <$> (o .: "Properties")
-         "AWS::ElastiCache::ReplicationGroup" -> ElastiCacheReplicationGroupProperties <$> (o .: "Properties")
-         "AWS::ElastiCache::SecurityGroup" -> ElastiCacheSecurityGroupProperties <$> (o .: "Properties")
-         "AWS::ElastiCache::SecurityGroupIngress" -> ElastiCacheSecurityGroupIngressProperties <$> (o .: "Properties")
-         "AWS::ElastiCache::SubnetGroup" -> ElastiCacheSubnetGroupProperties <$> (o .: "Properties")
-         "AWS::ElasticBeanstalk::Application" -> ElasticBeanstalkApplicationProperties <$> (o .: "Properties")
-         "AWS::ElasticBeanstalk::ApplicationVersion" -> ElasticBeanstalkApplicationVersionProperties <$> (o .: "Properties")
-         "AWS::ElasticBeanstalk::ConfigurationTemplate" -> ElasticBeanstalkConfigurationTemplateProperties <$> (o .: "Properties")
-         "AWS::ElasticBeanstalk::Environment" -> ElasticBeanstalkEnvironmentProperties <$> (o .: "Properties")
-         "AWS::ElasticLoadBalancing::LoadBalancer" -> ElasticLoadBalancingLoadBalancerProperties <$> (o .: "Properties")
-         "AWS::ElasticLoadBalancingV2::Listener" -> ElasticLoadBalancingV2ListenerProperties <$> (o .: "Properties")
-         "AWS::ElasticLoadBalancingV2::ListenerCertificate" -> ElasticLoadBalancingV2ListenerCertificateResourceProperties <$> (o .: "Properties")
-         "AWS::ElasticLoadBalancingV2::ListenerRule" -> ElasticLoadBalancingV2ListenerRuleProperties <$> (o .: "Properties")
-         "AWS::ElasticLoadBalancingV2::LoadBalancer" -> ElasticLoadBalancingV2LoadBalancerProperties <$> (o .: "Properties")
-         "AWS::ElasticLoadBalancingV2::TargetGroup" -> ElasticLoadBalancingV2TargetGroupProperties <$> (o .: "Properties")
-         "AWS::Elasticsearch::Domain" -> ElasticsearchDomainProperties <$> (o .: "Properties")
-         "AWS::Events::EventBusPolicy" -> EventsEventBusPolicyProperties <$> (o .: "Properties")
-         "AWS::Events::Rule" -> EventsRuleProperties <$> (o .: "Properties")
-         "AWS::FSx::FileSystem" -> FSxFileSystemProperties <$> (o .: "Properties")
-         "AWS::GameLift::Alias" -> GameLiftAliasProperties <$> (o .: "Properties")
-         "AWS::GameLift::Build" -> GameLiftBuildProperties <$> (o .: "Properties")
-         "AWS::GameLift::Fleet" -> GameLiftFleetProperties <$> (o .: "Properties")
-         "AWS::Glue::Classifier" -> GlueClassifierProperties <$> (o .: "Properties")
-         "AWS::Glue::Connection" -> GlueConnectionProperties <$> (o .: "Properties")
-         "AWS::Glue::Crawler" -> GlueCrawlerProperties <$> (o .: "Properties")
-         "AWS::Glue::Database" -> GlueDatabaseProperties <$> (o .: "Properties")
-         "AWS::Glue::DevEndpoint" -> GlueDevEndpointProperties <$> (o .: "Properties")
-         "AWS::Glue::Job" -> GlueJobProperties <$> (o .: "Properties")
-         "AWS::Glue::Partition" -> GluePartitionProperties <$> (o .: "Properties")
-         "AWS::Glue::Table" -> GlueTableProperties <$> (o .: "Properties")
-         "AWS::Glue::Trigger" -> GlueTriggerProperties <$> (o .: "Properties")
-         "AWS::GuardDuty::Detector" -> GuardDutyDetectorProperties <$> (o .: "Properties")
-         "AWS::GuardDuty::Filter" -> GuardDutyFilterProperties <$> (o .: "Properties")
-         "AWS::GuardDuty::IPSet" -> GuardDutyIPSetProperties <$> (o .: "Properties")
-         "AWS::GuardDuty::Master" -> GuardDutyMasterProperties <$> (o .: "Properties")
-         "AWS::GuardDuty::Member" -> GuardDutyMemberProperties <$> (o .: "Properties")
-         "AWS::GuardDuty::ThreatIntelSet" -> GuardDutyThreatIntelSetProperties <$> (o .: "Properties")
-         "AWS::IAM::AccessKey" -> IAMAccessKeyProperties <$> (o .: "Properties")
-         "AWS::IAM::Group" -> IAMGroupProperties <$> (o .: "Properties")
-         "AWS::IAM::InstanceProfile" -> IAMInstanceProfileProperties <$> (o .: "Properties")
-         "AWS::IAM::ManagedPolicy" -> IAMManagedPolicyProperties <$> (o .: "Properties")
-         "AWS::IAM::Policy" -> IAMPolicyProperties <$> (o .: "Properties")
-         "AWS::IAM::Role" -> IAMRoleProperties <$> (o .: "Properties")
-         "AWS::IAM::ServiceLinkedRole" -> IAMServiceLinkedRoleProperties <$> (o .: "Properties")
-         "AWS::IAM::User" -> IAMUserProperties <$> (o .: "Properties")
-         "AWS::IAM::UserToGroupAddition" -> IAMUserToGroupAdditionProperties <$> (o .: "Properties")
-         "AWS::Inspector::AssessmentTarget" -> InspectorAssessmentTargetProperties <$> (o .: "Properties")
-         "AWS::Inspector::AssessmentTemplate" -> InspectorAssessmentTemplateProperties <$> (o .: "Properties")
-         "AWS::Inspector::ResourceGroup" -> InspectorResourceGroupProperties <$> (o .: "Properties")
-         "AWS::IoT1Click::Device" -> IoT1ClickDeviceProperties <$> (o .: "Properties")
-         "AWS::IoT1Click::Placement" -> IoT1ClickPlacementProperties <$> (o .: "Properties")
-         "AWS::IoT1Click::Project" -> IoT1ClickProjectProperties <$> (o .: "Properties")
-         "AWS::IoT::Certificate" -> IoTCertificateProperties <$> (o .: "Properties")
-         "AWS::IoT::Policy" -> IoTPolicyProperties <$> (o .: "Properties")
-         "AWS::IoT::PolicyPrincipalAttachment" -> IoTPolicyPrincipalAttachmentProperties <$> (o .: "Properties")
-         "AWS::IoT::Thing" -> IoTThingProperties <$> (o .: "Properties")
-         "AWS::IoT::ThingPrincipalAttachment" -> IoTThingPrincipalAttachmentProperties <$> (o .: "Properties")
-         "AWS::IoT::TopicRule" -> IoTTopicRuleProperties <$> (o .: "Properties")
-         "AWS::IoTAnalytics::Channel" -> IoTAnalyticsChannelProperties <$> (o .: "Properties")
-         "AWS::IoTAnalytics::Dataset" -> IoTAnalyticsDatasetProperties <$> (o .: "Properties")
-         "AWS::IoTAnalytics::Datastore" -> IoTAnalyticsDatastoreProperties <$> (o .: "Properties")
-         "AWS::IoTAnalytics::Pipeline" -> IoTAnalyticsPipelineProperties <$> (o .: "Properties")
-         "AWS::KMS::Alias" -> KMSAliasProperties <$> (o .: "Properties")
-         "AWS::KMS::Key" -> KMSKeyProperties <$> (o .: "Properties")
-         "AWS::Kinesis::Stream" -> KinesisStreamProperties <$> (o .: "Properties")
-         "AWS::Kinesis::StreamConsumer" -> KinesisStreamConsumerProperties <$> (o .: "Properties")
-         "AWS::KinesisAnalytics::Application" -> KinesisAnalyticsApplicationProperties <$> (o .: "Properties")
-         "AWS::KinesisAnalytics::ApplicationOutput" -> KinesisAnalyticsApplicationOutputProperties <$> (o .: "Properties")
-         "AWS::KinesisAnalytics::ApplicationReferenceDataSource" -> KinesisAnalyticsApplicationReferenceDataSourceProperties <$> (o .: "Properties")
-         "AWS::KinesisAnalyticsV2::Application" -> KinesisAnalyticsV2ApplicationProperties <$> (o .: "Properties")
-         "AWS::KinesisAnalyticsV2::ApplicationCloudWatchLoggingOption" -> KinesisAnalyticsV2ApplicationCloudWatchLoggingOptionProperties <$> (o .: "Properties")
-         "AWS::KinesisAnalyticsV2::ApplicationOutput" -> KinesisAnalyticsV2ApplicationOutputProperties <$> (o .: "Properties")
-         "AWS::KinesisAnalyticsV2::ApplicationReferenceDataSource" -> KinesisAnalyticsV2ApplicationReferenceDataSourceProperties <$> (o .: "Properties")
-         "AWS::KinesisFirehose::DeliveryStream" -> KinesisFirehoseDeliveryStreamProperties <$> (o .: "Properties")
-         "AWS::Lambda::Alias" -> LambdaAliasProperties <$> (o .: "Properties")
-         "AWS::Lambda::EventSourceMapping" -> LambdaEventSourceMappingProperties <$> (o .: "Properties")
-         "AWS::Lambda::Function" -> LambdaFunctionProperties <$> (o .: "Properties")
-         "AWS::Lambda::LayerVersion" -> LambdaLayerVersionProperties <$> (o .: "Properties")
-         "AWS::Lambda::LayerVersionPermission" -> LambdaLayerVersionPermissionProperties <$> (o .: "Properties")
-         "AWS::Lambda::Permission" -> LambdaPermissionProperties <$> (o .: "Properties")
-         "AWS::Lambda::Version" -> LambdaVersionProperties <$> (o .: "Properties")
-         "AWS::Logs::Destination" -> LogsDestinationProperties <$> (o .: "Properties")
-         "AWS::Logs::LogGroup" -> LogsLogGroupProperties <$> (o .: "Properties")
-         "AWS::Logs::LogStream" -> LogsLogStreamProperties <$> (o .: "Properties")
-         "AWS::Logs::MetricFilter" -> LogsMetricFilterProperties <$> (o .: "Properties")
-         "AWS::Logs::SubscriptionFilter" -> LogsSubscriptionFilterProperties <$> (o .: "Properties")
-         "AWS::Neptune::DBCluster" -> NeptuneDBClusterProperties <$> (o .: "Properties")
-         "AWS::Neptune::DBClusterParameterGroup" -> NeptuneDBClusterParameterGroupProperties <$> (o .: "Properties")
-         "AWS::Neptune::DBInstance" -> NeptuneDBInstanceProperties <$> (o .: "Properties")
-         "AWS::Neptune::DBParameterGroup" -> NeptuneDBParameterGroupProperties <$> (o .: "Properties")
-         "AWS::Neptune::DBSubnetGroup" -> NeptuneDBSubnetGroupProperties <$> (o .: "Properties")
-         "AWS::OpsWorks::App" -> OpsWorksAppProperties <$> (o .: "Properties")
-         "AWS::OpsWorks::ElasticLoadBalancerAttachment" -> OpsWorksElasticLoadBalancerAttachmentProperties <$> (o .: "Properties")
-         "AWS::OpsWorks::Instance" -> OpsWorksInstanceProperties <$> (o .: "Properties")
-         "AWS::OpsWorks::Layer" -> OpsWorksLayerProperties <$> (o .: "Properties")
-         "AWS::OpsWorks::Stack" -> OpsWorksStackProperties <$> (o .: "Properties")
-         "AWS::OpsWorks::UserProfile" -> OpsWorksUserProfileProperties <$> (o .: "Properties")
-         "AWS::OpsWorks::Volume" -> OpsWorksVolumeProperties <$> (o .: "Properties")
-         "AWS::OpsWorksCM::Server" -> OpsWorksCMServerProperties <$> (o .: "Properties")
-         "AWS::RAM::ResourceShare" -> RAMResourceShareProperties <$> (o .: "Properties")
-         "AWS::RDS::DBCluster" -> RDSDBClusterProperties <$> (o .: "Properties")
-         "AWS::RDS::DBClusterParameterGroup" -> RDSDBClusterParameterGroupProperties <$> (o .: "Properties")
-         "AWS::RDS::DBInstance" -> RDSDBInstanceProperties <$> (o .: "Properties")
-         "AWS::RDS::DBParameterGroup" -> RDSDBParameterGroupProperties <$> (o .: "Properties")
-         "AWS::RDS::DBSecurityGroup" -> RDSDBSecurityGroupProperties <$> (o .: "Properties")
-         "AWS::RDS::DBSecurityGroupIngress" -> RDSDBSecurityGroupIngressProperties <$> (o .: "Properties")
-         "AWS::RDS::DBSubnetGroup" -> RDSDBSubnetGroupProperties <$> (o .: "Properties")
-         "AWS::RDS::EventSubscription" -> RDSEventSubscriptionProperties <$> (o .: "Properties")
-         "AWS::RDS::OptionGroup" -> RDSOptionGroupProperties <$> (o .: "Properties")
-         "AWS::Redshift::Cluster" -> RedshiftClusterProperties <$> (o .: "Properties")
-         "AWS::Redshift::ClusterParameterGroup" -> RedshiftClusterParameterGroupProperties <$> (o .: "Properties")
-         "AWS::Redshift::ClusterSecurityGroup" -> RedshiftClusterSecurityGroupProperties <$> (o .: "Properties")
-         "AWS::Redshift::ClusterSecurityGroupIngress" -> RedshiftClusterSecurityGroupIngressProperties <$> (o .: "Properties")
-         "AWS::Redshift::ClusterSubnetGroup" -> RedshiftClusterSubnetGroupProperties <$> (o .: "Properties")
-         "AWS::RoboMaker::Fleet" -> RoboMakerFleetProperties <$> (o .: "Properties")
-         "AWS::RoboMaker::Robot" -> RoboMakerRobotProperties <$> (o .: "Properties")
-         "AWS::RoboMaker::RobotApplication" -> RoboMakerRobotApplicationProperties <$> (o .: "Properties")
-         "AWS::RoboMaker::RobotApplicationVersion" -> RoboMakerRobotApplicationVersionProperties <$> (o .: "Properties")
-         "AWS::RoboMaker::SimulationApplication" -> RoboMakerSimulationApplicationProperties <$> (o .: "Properties")
-         "AWS::RoboMaker::SimulationApplicationVersion" -> RoboMakerSimulationApplicationVersionProperties <$> (o .: "Properties")
-         "AWS::Route53::HealthCheck" -> Route53HealthCheckProperties <$> (o .: "Properties")
-         "AWS::Route53::HostedZone" -> Route53HostedZoneProperties <$> (o .: "Properties")
-         "AWS::Route53::RecordSet" -> Route53RecordSetProperties <$> (o .: "Properties")
-         "AWS::Route53::RecordSetGroup" -> Route53RecordSetGroupProperties <$> (o .: "Properties")
-         "AWS::Route53Resolver::ResolverEndpoint" -> Route53ResolverResolverEndpointProperties <$> (o .: "Properties")
-         "AWS::Route53Resolver::ResolverRule" -> Route53ResolverResolverRuleProperties <$> (o .: "Properties")
-         "AWS::Route53Resolver::ResolverRuleAssociation" -> Route53ResolverResolverRuleAssociationProperties <$> (o .: "Properties")
-         "AWS::S3::Bucket" -> S3BucketProperties <$> (o .: "Properties")
-         "AWS::S3::BucketPolicy" -> S3BucketPolicyProperties <$> (o .: "Properties")
-         "AWS::SDB::Domain" -> SDBDomainProperties <$> (o .: "Properties")
-         "AWS::SES::ConfigurationSet" -> SESConfigurationSetProperties <$> (o .: "Properties")
-         "AWS::SES::ConfigurationSetEventDestination" -> SESConfigurationSetEventDestinationProperties <$> (o .: "Properties")
-         "AWS::SES::ReceiptFilter" -> SESReceiptFilterProperties <$> (o .: "Properties")
-         "AWS::SES::ReceiptRule" -> SESReceiptRuleProperties <$> (o .: "Properties")
-         "AWS::SES::ReceiptRuleSet" -> SESReceiptRuleSetProperties <$> (o .: "Properties")
-         "AWS::SES::Template" -> SESTemplateProperties <$> (o .: "Properties")
-         "AWS::SNS::Subscription" -> SNSSubscriptionProperties <$> (o .: "Properties")
-         "AWS::SNS::Topic" -> SNSTopicProperties <$> (o .: "Properties")
-         "AWS::SNS::TopicPolicy" -> SNSTopicPolicyProperties <$> (o .: "Properties")
-         "AWS::SQS::Queue" -> SQSQueueProperties <$> (o .: "Properties")
-         "AWS::SQS::QueuePolicy" -> SQSQueuePolicyProperties <$> (o .: "Properties")
-         "AWS::SSM::Association" -> SSMAssociationProperties <$> (o .: "Properties")
-         "AWS::SSM::Document" -> SSMDocumentProperties <$> (o .: "Properties")
-         "AWS::SSM::MaintenanceWindow" -> SSMMaintenanceWindowProperties <$> (o .: "Properties")
-         "AWS::SSM::MaintenanceWindowTask" -> SSMMaintenanceWindowTaskProperties <$> (o .: "Properties")
-         "AWS::SSM::Parameter" -> SSMParameterProperties <$> (o .: "Properties")
-         "AWS::SSM::PatchBaseline" -> SSMPatchBaselineProperties <$> (o .: "Properties")
-         "AWS::SSM::ResourceDataSync" -> SSMResourceDataSyncProperties <$> (o .: "Properties")
-         "AWS::SageMaker::Endpoint" -> SageMakerEndpointProperties <$> (o .: "Properties")
-         "AWS::SageMaker::EndpointConfig" -> SageMakerEndpointConfigProperties <$> (o .: "Properties")
-         "AWS::SageMaker::Model" -> SageMakerModelProperties <$> (o .: "Properties")
-         "AWS::SageMaker::NotebookInstance" -> SageMakerNotebookInstanceProperties <$> (o .: "Properties")
-         "AWS::SageMaker::NotebookInstanceLifecycleConfig" -> SageMakerNotebookInstanceLifecycleConfigProperties <$> (o .: "Properties")
-         "AWS::SecretsManager::ResourcePolicy" -> SecretsManagerResourcePolicyProperties <$> (o .: "Properties")
-         "AWS::SecretsManager::RotationSchedule" -> SecretsManagerRotationScheduleProperties <$> (o .: "Properties")
-         "AWS::SecretsManager::Secret" -> SecretsManagerSecretProperties <$> (o .: "Properties")
-         "AWS::SecretsManager::SecretTargetAttachment" -> SecretsManagerSecretTargetAttachmentProperties <$> (o .: "Properties")
-         "AWS::ServiceCatalog::AcceptedPortfolioShare" -> ServiceCatalogAcceptedPortfolioShareProperties <$> (o .: "Properties")
-         "AWS::ServiceCatalog::CloudFormationProduct" -> ServiceCatalogCloudFormationProductProperties <$> (o .: "Properties")
-         "AWS::ServiceCatalog::CloudFormationProvisionedProduct" -> ServiceCatalogCloudFormationProvisionedProductProperties <$> (o .: "Properties")
-         "AWS::ServiceCatalog::LaunchNotificationConstraint" -> ServiceCatalogLaunchNotificationConstraintProperties <$> (o .: "Properties")
-         "AWS::ServiceCatalog::LaunchRoleConstraint" -> ServiceCatalogLaunchRoleConstraintProperties <$> (o .: "Properties")
-         "AWS::ServiceCatalog::LaunchTemplateConstraint" -> ServiceCatalogLaunchTemplateConstraintProperties <$> (o .: "Properties")
-         "AWS::ServiceCatalog::Portfolio" -> ServiceCatalogPortfolioProperties <$> (o .: "Properties")
-         "AWS::ServiceCatalog::PortfolioPrincipalAssociation" -> ServiceCatalogPortfolioPrincipalAssociationProperties <$> (o .: "Properties")
-         "AWS::ServiceCatalog::PortfolioProductAssociation" -> ServiceCatalogPortfolioProductAssociationProperties <$> (o .: "Properties")
-         "AWS::ServiceCatalog::PortfolioShare" -> ServiceCatalogPortfolioShareProperties <$> (o .: "Properties")
-         "AWS::ServiceCatalog::TagOption" -> ServiceCatalogTagOptionProperties <$> (o .: "Properties")
-         "AWS::ServiceCatalog::TagOptionAssociation" -> ServiceCatalogTagOptionAssociationProperties <$> (o .: "Properties")
-         "AWS::ServiceDiscovery::HttpNamespace" -> ServiceDiscoveryHttpNamespaceProperties <$> (o .: "Properties")
-         "AWS::ServiceDiscovery::Instance" -> ServiceDiscoveryInstanceProperties <$> (o .: "Properties")
-         "AWS::ServiceDiscovery::PrivateDnsNamespace" -> ServiceDiscoveryPrivateDnsNamespaceProperties <$> (o .: "Properties")
-         "AWS::ServiceDiscovery::PublicDnsNamespace" -> ServiceDiscoveryPublicDnsNamespaceProperties <$> (o .: "Properties")
-         "AWS::ServiceDiscovery::Service" -> ServiceDiscoveryServiceProperties <$> (o .: "Properties")
-         "AWS::StepFunctions::Activity" -> StepFunctionsActivityProperties <$> (o .: "Properties")
-         "AWS::StepFunctions::StateMachine" -> StepFunctionsStateMachineProperties <$> (o .: "Properties")
-         "AWS::WAF::ByteMatchSet" -> WAFByteMatchSetProperties <$> (o .: "Properties")
-         "AWS::WAF::IPSet" -> WAFIPSetProperties <$> (o .: "Properties")
-         "AWS::WAF::Rule" -> WAFRuleProperties <$> (o .: "Properties")
-         "AWS::WAF::SizeConstraintSet" -> WAFSizeConstraintSetProperties <$> (o .: "Properties")
-         "AWS::WAF::SqlInjectionMatchSet" -> WAFSqlInjectionMatchSetProperties <$> (o .: "Properties")
-         "AWS::WAF::WebACL" -> WAFWebACLProperties <$> (o .: "Properties")
-         "AWS::WAF::XssMatchSet" -> WAFXssMatchSetProperties <$> (o .: "Properties")
-         "AWS::WAFRegional::ByteMatchSet" -> WAFRegionalByteMatchSetProperties <$> (o .: "Properties")
-         "AWS::WAFRegional::IPSet" -> WAFRegionalIPSetProperties <$> (o .: "Properties")
-         "AWS::WAFRegional::Rule" -> WAFRegionalRuleProperties <$> (o .: "Properties")
-         "AWS::WAFRegional::SizeConstraintSet" -> WAFRegionalSizeConstraintSetProperties <$> (o .: "Properties")
-         "AWS::WAFRegional::SqlInjectionMatchSet" -> WAFRegionalSqlInjectionMatchSetProperties <$> (o .: "Properties")
-         "AWS::WAFRegional::WebACL" -> WAFRegionalWebACLProperties <$> (o .: "Properties")
-         "AWS::WAFRegional::WebACLAssociation" -> WAFRegionalWebACLAssociationProperties <$> (o .: "Properties")
-         "AWS::WAFRegional::XssMatchSet" -> WAFRegionalXssMatchSetProperties <$> (o .: "Properties")
-         "AWS::WorkSpaces::Workspace" -> WorkSpacesWorkspaceProperties <$> (o .: "Properties")
-         "Alexa::ASK::Skill" -> ASKSkillProperties <$> (o .: "Properties")
-
-         _ -> fail $ "Unknown resource type: " ++ type'
-       dp <- o .:? "DeletionPolicy"
-       cp <- o .:? "CreationPolicy"
-       up <- o .:? "UpdatePolicy"
-       deps <- o .:? "DependsOn"
-       meta <- o .:? "Metadata"
-       cond <- o .:? "Condition"
-       return $ Resource n props dp cp up deps meta cond
-
 -- | Wrapper around a list of 'Resources's to we can modify the aeson
 -- instances.
 newtype Resources = Resources { unResources :: [Resource] }
@@ -2726,10 +2344,6 @@
 instance NamedItem Resource where
   itemName = _resourceName
   nameToJSON = resourceToJSON
-  nameParseJSON = resourceFromJSON
 
 instance ToJSON Resources where
   toJSON = namedItemToJSON . unResources
-
-instance FromJSON Resources where
-  parseJSON v = Resources <$> namedItemFromJSON v
diff --git a/library-gen/Stratosphere/Resources/ASKSkill.hs b/library-gen/Stratosphere/Resources/ASKSkill.hs
--- a/library-gen/Stratosphere/Resources/ASKSkill.hs
+++ b/library-gen/Stratosphere/Resources/ASKSkill.hs
@@ -28,14 +28,6 @@
     , (Just . ("VendorId",) . toJSON) _aSKSkillVendorId
     ]
 
-instance FromJSON ASKSkill where
-  parseJSON (Object obj) =
-    ASKSkill <$>
-      (obj .: "AuthenticationConfiguration") <*>
-      (obj .: "SkillPackage") <*>
-      (obj .: "VendorId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ASKSkill' containing required fields as arguments.
 askSkill
   :: ASKSkillAuthenticationConfiguration -- ^ 'asksAuthenticationConfiguration'
diff --git a/library-gen/Stratosphere/Resources/AmazonMQBroker.hs b/library-gen/Stratosphere/Resources/AmazonMQBroker.hs
--- a/library-gen/Stratosphere/Resources/AmazonMQBroker.hs
+++ b/library-gen/Stratosphere/Resources/AmazonMQBroker.hs
@@ -53,25 +53,6 @@
     , (Just . ("Users",) . toJSON) _amazonMQBrokerUsers
     ]
 
-instance FromJSON AmazonMQBroker where
-  parseJSON (Object obj) =
-    AmazonMQBroker <$>
-      fmap (fmap unBool') (obj .: "AutoMinorVersionUpgrade") <*>
-      (obj .: "BrokerName") <*>
-      (obj .:? "Configuration") <*>
-      (obj .: "DeploymentMode") <*>
-      (obj .: "EngineType") <*>
-      (obj .: "EngineVersion") <*>
-      (obj .: "HostInstanceType") <*>
-      (obj .:? "Logs") <*>
-      (obj .:? "MaintenanceWindowStartTime") <*>
-      fmap (fmap unBool') (obj .: "PubliclyAccessible") <*>
-      (obj .:? "SecurityGroups") <*>
-      (obj .:? "SubnetIds") <*>
-      (obj .:? "Tags") <*>
-      (obj .: "Users")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AmazonMQBroker' containing required fields as arguments.
 amazonMQBroker
   :: Val Bool -- ^ 'amqbAutoMinorVersionUpgrade'
diff --git a/library-gen/Stratosphere/Resources/AmazonMQConfiguration.hs b/library-gen/Stratosphere/Resources/AmazonMQConfiguration.hs
--- a/library-gen/Stratosphere/Resources/AmazonMQConfiguration.hs
+++ b/library-gen/Stratosphere/Resources/AmazonMQConfiguration.hs
@@ -33,17 +33,6 @@
     , fmap (("Tags",) . toJSON) _amazonMQConfigurationTags
     ]
 
-instance FromJSON AmazonMQConfiguration where
-  parseJSON (Object obj) =
-    AmazonMQConfiguration <$>
-      (obj .: "Data") <*>
-      (obj .:? "Description") <*>
-      (obj .: "EngineType") <*>
-      (obj .: "EngineVersion") <*>
-      (obj .: "Name") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AmazonMQConfiguration' containing required fields as
 -- arguments.
 amazonMQConfiguration
diff --git a/library-gen/Stratosphere/Resources/AmazonMQConfigurationAssociation.hs b/library-gen/Stratosphere/Resources/AmazonMQConfigurationAssociation.hs
--- a/library-gen/Stratosphere/Resources/AmazonMQConfigurationAssociation.hs
+++ b/library-gen/Stratosphere/Resources/AmazonMQConfigurationAssociation.hs
@@ -25,13 +25,6 @@
     , (Just . ("Configuration",) . toJSON) _amazonMQConfigurationAssociationConfiguration
     ]
 
-instance FromJSON AmazonMQConfigurationAssociation where
-  parseJSON (Object obj) =
-    AmazonMQConfigurationAssociation <$>
-      (obj .: "Broker") <*>
-      (obj .: "Configuration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AmazonMQConfigurationAssociation' containing required
 -- fields as arguments.
 amazonMQConfigurationAssociation
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayAccount.hs b/library-gen/Stratosphere/Resources/ApiGatewayAccount.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayAccount.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayAccount.hs
@@ -23,12 +23,6 @@
     [ fmap (("CloudWatchRoleArn",) . toJSON) _apiGatewayAccountCloudWatchRoleArn
     ]
 
-instance FromJSON ApiGatewayAccount where
-  parseJSON (Object obj) =
-    ApiGatewayAccount <$>
-      (obj .:? "CloudWatchRoleArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayAccount' containing required fields as
 -- arguments.
 apiGatewayAccount
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayApiKey.hs b/library-gen/Stratosphere/Resources/ApiGatewayApiKey.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayApiKey.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayApiKey.hs
@@ -35,18 +35,6 @@
     , fmap (("Value",) . toJSON) _apiGatewayApiKeyValue
     ]
 
-instance FromJSON ApiGatewayApiKey where
-  parseJSON (Object obj) =
-    ApiGatewayApiKey <$>
-      (obj .:? "CustomerId") <*>
-      (obj .:? "Description") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "GenerateDistinctId") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "StageKeys") <*>
-      (obj .:? "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayApiKey' containing required fields as
 -- arguments.
 apiGatewayApiKey
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayAuthorizer.hs b/library-gen/Stratosphere/Resources/ApiGatewayAuthorizer.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayAuthorizer.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayAuthorizer.hs
@@ -41,21 +41,6 @@
     , (Just . ("Type",) . toJSON) _apiGatewayAuthorizerType
     ]
 
-instance FromJSON ApiGatewayAuthorizer where
-  parseJSON (Object obj) =
-    ApiGatewayAuthorizer <$>
-      (obj .:? "AuthType") <*>
-      (obj .:? "AuthorizerCredentials") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "AuthorizerResultTtlInSeconds") <*>
-      (obj .:? "AuthorizerUri") <*>
-      (obj .:? "IdentitySource") <*>
-      (obj .:? "IdentityValidationExpression") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "ProviderARNs") <*>
-      (obj .: "RestApiId") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayAuthorizer' containing required fields as
 -- arguments.
 apiGatewayAuthorizer
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayBasePathMapping.hs b/library-gen/Stratosphere/Resources/ApiGatewayBasePathMapping.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayBasePathMapping.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayBasePathMapping.hs
@@ -29,15 +29,6 @@
     , fmap (("Stage",) . toJSON) _apiGatewayBasePathMappingStage
     ]
 
-instance FromJSON ApiGatewayBasePathMapping where
-  parseJSON (Object obj) =
-    ApiGatewayBasePathMapping <$>
-      (obj .:? "BasePath") <*>
-      (obj .: "DomainName") <*>
-      (obj .:? "RestApiId") <*>
-      (obj .:? "Stage")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayBasePathMapping' containing required fields as
 -- arguments.
 apiGatewayBasePathMapping
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayClientCertificate.hs b/library-gen/Stratosphere/Resources/ApiGatewayClientCertificate.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayClientCertificate.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayClientCertificate.hs
@@ -23,12 +23,6 @@
     [ fmap (("Description",) . toJSON) _apiGatewayClientCertificateDescription
     ]
 
-instance FromJSON ApiGatewayClientCertificate where
-  parseJSON (Object obj) =
-    ApiGatewayClientCertificate <$>
-      (obj .:? "Description")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayClientCertificate' containing required fields
 -- as arguments.
 apiGatewayClientCertificate
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayDeployment.hs b/library-gen/Stratosphere/Resources/ApiGatewayDeployment.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayDeployment.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayDeployment.hs
@@ -32,16 +32,6 @@
     , fmap (("StageName",) . toJSON) _apiGatewayDeploymentStageName
     ]
 
-instance FromJSON ApiGatewayDeployment where
-  parseJSON (Object obj) =
-    ApiGatewayDeployment <$>
-      (obj .:? "DeploymentCanarySettings") <*>
-      (obj .:? "Description") <*>
-      (obj .: "RestApiId") <*>
-      (obj .:? "StageDescription") <*>
-      (obj .:? "StageName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayDeployment' containing required fields as
 -- arguments.
 apiGatewayDeployment
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayDocumentationPart.hs b/library-gen/Stratosphere/Resources/ApiGatewayDocumentationPart.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayDocumentationPart.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayDocumentationPart.hs
@@ -27,14 +27,6 @@
     , (Just . ("RestApiId",) . toJSON) _apiGatewayDocumentationPartRestApiId
     ]
 
-instance FromJSON ApiGatewayDocumentationPart where
-  parseJSON (Object obj) =
-    ApiGatewayDocumentationPart <$>
-      (obj .: "Location") <*>
-      (obj .: "Properties") <*>
-      (obj .: "RestApiId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayDocumentationPart' containing required fields
 -- as arguments.
 apiGatewayDocumentationPart
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayDocumentationVersion.hs b/library-gen/Stratosphere/Resources/ApiGatewayDocumentationVersion.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayDocumentationVersion.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayDocumentationVersion.hs
@@ -27,14 +27,6 @@
     , (Just . ("RestApiId",) . toJSON) _apiGatewayDocumentationVersionRestApiId
     ]
 
-instance FromJSON ApiGatewayDocumentationVersion where
-  parseJSON (Object obj) =
-    ApiGatewayDocumentationVersion <$>
-      (obj .:? "Description") <*>
-      (obj .: "DocumentationVersion") <*>
-      (obj .: "RestApiId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayDocumentationVersion' containing required
 -- fields as arguments.
 apiGatewayDocumentationVersion
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayDomainName.hs b/library-gen/Stratosphere/Resources/ApiGatewayDomainName.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayDomainName.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayDomainName.hs
@@ -29,15 +29,6 @@
     , fmap (("RegionalCertificateArn",) . toJSON) _apiGatewayDomainNameRegionalCertificateArn
     ]
 
-instance FromJSON ApiGatewayDomainName where
-  parseJSON (Object obj) =
-    ApiGatewayDomainName <$>
-      (obj .:? "CertificateArn") <*>
-      (obj .: "DomainName") <*>
-      (obj .:? "EndpointConfiguration") <*>
-      (obj .:? "RegionalCertificateArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayDomainName' containing required fields as
 -- arguments.
 apiGatewayDomainName
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayGatewayResponse.hs b/library-gen/Stratosphere/Resources/ApiGatewayGatewayResponse.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayGatewayResponse.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayGatewayResponse.hs
@@ -31,16 +31,6 @@
     , fmap (("StatusCode",) . toJSON) _apiGatewayGatewayResponseStatusCode
     ]
 
-instance FromJSON ApiGatewayGatewayResponse where
-  parseJSON (Object obj) =
-    ApiGatewayGatewayResponse <$>
-      (obj .:? "ResponseParameters") <*>
-      (obj .:? "ResponseTemplates") <*>
-      (obj .: "ResponseType") <*>
-      (obj .: "RestApiId") <*>
-      (obj .:? "StatusCode")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayGatewayResponse' containing required fields as
 -- arguments.
 apiGatewayGatewayResponse
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayMethod.hs b/library-gen/Stratosphere/Resources/ApiGatewayMethod.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayMethod.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayMethod.hs
@@ -49,24 +49,6 @@
     , (Just . ("RestApiId",) . toJSON) _apiGatewayMethodRestApiId
     ]
 
-instance FromJSON ApiGatewayMethod where
-  parseJSON (Object obj) =
-    ApiGatewayMethod <$>
-      fmap (fmap (fmap unBool')) (obj .:? "ApiKeyRequired") <*>
-      (obj .:? "AuthorizationScopes") <*>
-      (obj .:? "AuthorizationType") <*>
-      (obj .:? "AuthorizerId") <*>
-      (obj .: "HttpMethod") <*>
-      (obj .:? "Integration") <*>
-      (obj .:? "MethodResponses") <*>
-      (obj .:? "OperationName") <*>
-      (obj .:? "RequestModels") <*>
-      (obj .:? "RequestParameters") <*>
-      (obj .:? "RequestValidatorId") <*>
-      (obj .: "ResourceId") <*>
-      (obj .: "RestApiId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayMethod' containing required fields as
 -- arguments.
 apiGatewayMethod
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayModel.hs b/library-gen/Stratosphere/Resources/ApiGatewayModel.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayModel.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayModel.hs
@@ -31,16 +31,6 @@
     , fmap (("Schema",) . toJSON) _apiGatewayModelSchema
     ]
 
-instance FromJSON ApiGatewayModel where
-  parseJSON (Object obj) =
-    ApiGatewayModel <$>
-      (obj .:? "ContentType") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "Name") <*>
-      (obj .: "RestApiId") <*>
-      (obj .:? "Schema")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayModel' containing required fields as
 -- arguments.
 apiGatewayModel
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayRequestValidator.hs b/library-gen/Stratosphere/Resources/ApiGatewayRequestValidator.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayRequestValidator.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayRequestValidator.hs
@@ -29,15 +29,6 @@
     , fmap (("ValidateRequestParameters",) . toJSON . fmap Bool') _apiGatewayRequestValidatorValidateRequestParameters
     ]
 
-instance FromJSON ApiGatewayRequestValidator where
-  parseJSON (Object obj) =
-    ApiGatewayRequestValidator <$>
-      (obj .:? "Name") <*>
-      (obj .: "RestApiId") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ValidateRequestBody") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ValidateRequestParameters")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayRequestValidator' containing required fields
 -- as arguments.
 apiGatewayRequestValidator
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayResource.hs b/library-gen/Stratosphere/Resources/ApiGatewayResource.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayResource.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayResource.hs
@@ -27,14 +27,6 @@
     , (Just . ("RestApiId",) . toJSON) _apiGatewayResourceRestApiId
     ]
 
-instance FromJSON ApiGatewayResource where
-  parseJSON (Object obj) =
-    ApiGatewayResource <$>
-      (obj .: "ParentId") <*>
-      (obj .: "PathPart") <*>
-      (obj .: "RestApiId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayResource' containing required fields as
 -- arguments.
 apiGatewayResource
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayRestApi.hs b/library-gen/Stratosphere/Resources/ApiGatewayRestApi.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayRestApi.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayRestApi.hs
@@ -46,23 +46,6 @@
     , fmap (("Policy",) . toJSON) _apiGatewayRestApiPolicy
     ]
 
-instance FromJSON ApiGatewayRestApi where
-  parseJSON (Object obj) =
-    ApiGatewayRestApi <$>
-      (obj .:? "ApiKeySourceType") <*>
-      (obj .:? "BinaryMediaTypes") <*>
-      (obj .:? "Body") <*>
-      (obj .:? "BodyS3Location") <*>
-      (obj .:? "CloneFrom") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "EndpointConfiguration") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "FailOnWarnings") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MinimumCompressionSize") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Parameters") <*>
-      (obj .:? "Policy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayRestApi' containing required fields as
 -- arguments.
 apiGatewayRestApi
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayStage.hs b/library-gen/Stratosphere/Resources/ApiGatewayStage.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayStage.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayStage.hs
@@ -52,25 +52,6 @@
     , fmap (("Variables",) . toJSON) _apiGatewayStageVariables
     ]
 
-instance FromJSON ApiGatewayStage where
-  parseJSON (Object obj) =
-    ApiGatewayStage <$>
-      (obj .:? "AccessLogSetting") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "CacheClusterEnabled") <*>
-      (obj .:? "CacheClusterSize") <*>
-      (obj .:? "CanarySetting") <*>
-      (obj .:? "ClientCertificateId") <*>
-      (obj .:? "DeploymentId") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "DocumentationVersion") <*>
-      (obj .:? "MethodSettings") <*>
-      (obj .: "RestApiId") <*>
-      (obj .:? "StageName") <*>
-      (obj .:? "Tags") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "TracingEnabled") <*>
-      (obj .:? "Variables")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayStage' containing required fields as
 -- arguments.
 apiGatewayStage
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayUsagePlan.hs b/library-gen/Stratosphere/Resources/ApiGatewayUsagePlan.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayUsagePlan.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayUsagePlan.hs
@@ -33,16 +33,6 @@
     , fmap (("UsagePlanName",) . toJSON) _apiGatewayUsagePlanUsagePlanName
     ]
 
-instance FromJSON ApiGatewayUsagePlan where
-  parseJSON (Object obj) =
-    ApiGatewayUsagePlan <$>
-      (obj .:? "ApiStages") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "Quota") <*>
-      (obj .:? "Throttle") <*>
-      (obj .:? "UsagePlanName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayUsagePlan' containing required fields as
 -- arguments.
 apiGatewayUsagePlan
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayUsagePlanKey.hs b/library-gen/Stratosphere/Resources/ApiGatewayUsagePlanKey.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayUsagePlanKey.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayUsagePlanKey.hs
@@ -27,14 +27,6 @@
     , (Just . ("UsagePlanId",) . toJSON) _apiGatewayUsagePlanKeyUsagePlanId
     ]
 
-instance FromJSON ApiGatewayUsagePlanKey where
-  parseJSON (Object obj) =
-    ApiGatewayUsagePlanKey <$>
-      (obj .: "KeyId") <*>
-      (obj .: "KeyType") <*>
-      (obj .: "UsagePlanId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayUsagePlanKey' containing required fields as
 -- arguments.
 apiGatewayUsagePlanKey
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayV2Api.hs b/library-gen/Stratosphere/Resources/ApiGatewayV2Api.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayV2Api.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayV2Api.hs
@@ -35,18 +35,6 @@
     , fmap (("Version",) . toJSON) _apiGatewayV2ApiVersion
     ]
 
-instance FromJSON ApiGatewayV2Api where
-  parseJSON (Object obj) =
-    ApiGatewayV2Api <$>
-      (obj .:? "ApiKeySelectionExpression") <*>
-      (obj .:? "Description") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DisableSchemaValidation") <*>
-      (obj .: "Name") <*>
-      (obj .: "ProtocolType") <*>
-      (obj .: "RouteSelectionExpression") <*>
-      (obj .:? "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayV2Api' containing required fields as
 -- arguments.
 apiGatewayV2Api
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayV2Authorizer.hs b/library-gen/Stratosphere/Resources/ApiGatewayV2Authorizer.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayV2Authorizer.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayV2Authorizer.hs
@@ -37,19 +37,6 @@
     , (Just . ("Name",) . toJSON) _apiGatewayV2AuthorizerName
     ]
 
-instance FromJSON ApiGatewayV2Authorizer where
-  parseJSON (Object obj) =
-    ApiGatewayV2Authorizer <$>
-      (obj .: "ApiId") <*>
-      (obj .:? "AuthorizerCredentialsArn") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "AuthorizerResultTtlInSeconds") <*>
-      (obj .: "AuthorizerType") <*>
-      (obj .: "AuthorizerUri") <*>
-      (obj .: "IdentitySource") <*>
-      (obj .:? "IdentityValidationExpression") <*>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayV2Authorizer' containing required fields as
 -- arguments.
 apiGatewayV2Authorizer
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayV2Deployment.hs b/library-gen/Stratosphere/Resources/ApiGatewayV2Deployment.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayV2Deployment.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayV2Deployment.hs
@@ -27,14 +27,6 @@
     , fmap (("StageName",) . toJSON) _apiGatewayV2DeploymentStageName
     ]
 
-instance FromJSON ApiGatewayV2Deployment where
-  parseJSON (Object obj) =
-    ApiGatewayV2Deployment <$>
-      (obj .: "ApiId") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "StageName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayV2Deployment' containing required fields as
 -- arguments.
 apiGatewayV2Deployment
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayV2Integration.hs b/library-gen/Stratosphere/Resources/ApiGatewayV2Integration.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayV2Integration.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayV2Integration.hs
@@ -47,24 +47,6 @@
     , fmap (("TimeoutInMillis",) . toJSON . fmap Integer') _apiGatewayV2IntegrationTimeoutInMillis
     ]
 
-instance FromJSON ApiGatewayV2Integration where
-  parseJSON (Object obj) =
-    ApiGatewayV2Integration <$>
-      (obj .: "ApiId") <*>
-      (obj .:? "ConnectionType") <*>
-      (obj .:? "ContentHandlingStrategy") <*>
-      (obj .:? "CredentialsArn") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "IntegrationMethod") <*>
-      (obj .: "IntegrationType") <*>
-      (obj .:? "IntegrationUri") <*>
-      (obj .:? "PassthroughBehavior") <*>
-      (obj .:? "RequestParameters") <*>
-      (obj .:? "RequestTemplates") <*>
-      (obj .:? "TemplateSelectionExpression") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "TimeoutInMillis")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayV2Integration' containing required fields as
 -- arguments.
 apiGatewayV2Integration
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayV2IntegrationResponse.hs b/library-gen/Stratosphere/Resources/ApiGatewayV2IntegrationResponse.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayV2IntegrationResponse.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayV2IntegrationResponse.hs
@@ -35,18 +35,6 @@
     , fmap (("TemplateSelectionExpression",) . toJSON) _apiGatewayV2IntegrationResponseTemplateSelectionExpression
     ]
 
-instance FromJSON ApiGatewayV2IntegrationResponse where
-  parseJSON (Object obj) =
-    ApiGatewayV2IntegrationResponse <$>
-      (obj .: "ApiId") <*>
-      (obj .:? "ContentHandlingStrategy") <*>
-      (obj .: "IntegrationId") <*>
-      (obj .: "IntegrationResponseKey") <*>
-      (obj .:? "ResponseParameters") <*>
-      (obj .:? "ResponseTemplates") <*>
-      (obj .:? "TemplateSelectionExpression")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayV2IntegrationResponse' containing required
 -- fields as arguments.
 apiGatewayV2IntegrationResponse
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayV2Model.hs b/library-gen/Stratosphere/Resources/ApiGatewayV2Model.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayV2Model.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayV2Model.hs
@@ -31,16 +31,6 @@
     , (Just . ("Schema",) . toJSON) _apiGatewayV2ModelSchema
     ]
 
-instance FromJSON ApiGatewayV2Model where
-  parseJSON (Object obj) =
-    ApiGatewayV2Model <$>
-      (obj .: "ApiId") <*>
-      (obj .:? "ContentType") <*>
-      (obj .:? "Description") <*>
-      (obj .: "Name") <*>
-      (obj .: "Schema")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayV2Model' containing required fields as
 -- arguments.
 apiGatewayV2Model
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayV2Route.hs b/library-gen/Stratosphere/Resources/ApiGatewayV2Route.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayV2Route.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayV2Route.hs
@@ -45,23 +45,6 @@
     , fmap (("Target",) . toJSON) _apiGatewayV2RouteTarget
     ]
 
-instance FromJSON ApiGatewayV2Route where
-  parseJSON (Object obj) =
-    ApiGatewayV2Route <$>
-      (obj .: "ApiId") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ApiKeyRequired") <*>
-      (obj .:? "AuthorizationScopes") <*>
-      (obj .:? "AuthorizationType") <*>
-      (obj .:? "AuthorizerId") <*>
-      (obj .:? "ModelSelectionExpression") <*>
-      (obj .:? "OperationName") <*>
-      (obj .:? "RequestModels") <*>
-      (obj .:? "RequestParameters") <*>
-      (obj .: "RouteKey") <*>
-      (obj .:? "RouteResponseSelectionExpression") <*>
-      (obj .:? "Target")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayV2Route' containing required fields as
 -- arguments.
 apiGatewayV2Route
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayV2RouteResponse.hs b/library-gen/Stratosphere/Resources/ApiGatewayV2RouteResponse.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayV2RouteResponse.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayV2RouteResponse.hs
@@ -33,17 +33,6 @@
     , (Just . ("RouteResponseKey",) . toJSON) _apiGatewayV2RouteResponseRouteResponseKey
     ]
 
-instance FromJSON ApiGatewayV2RouteResponse where
-  parseJSON (Object obj) =
-    ApiGatewayV2RouteResponse <$>
-      (obj .: "ApiId") <*>
-      (obj .:? "ModelSelectionExpression") <*>
-      (obj .:? "ResponseModels") <*>
-      (obj .:? "ResponseParameters") <*>
-      (obj .: "RouteId") <*>
-      (obj .: "RouteResponseKey")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayV2RouteResponse' containing required fields as
 -- arguments.
 apiGatewayV2RouteResponse
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayV2Stage.hs b/library-gen/Stratosphere/Resources/ApiGatewayV2Stage.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayV2Stage.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayV2Stage.hs
@@ -40,20 +40,6 @@
     , fmap (("StageVariables",) . toJSON) _apiGatewayV2StageStageVariables
     ]
 
-instance FromJSON ApiGatewayV2Stage where
-  parseJSON (Object obj) =
-    ApiGatewayV2Stage <$>
-      (obj .:? "AccessLogSettings") <*>
-      (obj .: "ApiId") <*>
-      (obj .:? "ClientCertificateId") <*>
-      (obj .:? "DefaultRouteSettings") <*>
-      (obj .: "DeploymentId") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "RouteSettings") <*>
-      (obj .: "StageName") <*>
-      (obj .:? "StageVariables")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayV2Stage' containing required fields as
 -- arguments.
 apiGatewayV2Stage
diff --git a/library-gen/Stratosphere/Resources/ApiGatewayVpcLink.hs b/library-gen/Stratosphere/Resources/ApiGatewayVpcLink.hs
--- a/library-gen/Stratosphere/Resources/ApiGatewayVpcLink.hs
+++ b/library-gen/Stratosphere/Resources/ApiGatewayVpcLink.hs
@@ -27,14 +27,6 @@
     , (Just . ("TargetArns",) . toJSON) _apiGatewayVpcLinkTargetArns
     ]
 
-instance FromJSON ApiGatewayVpcLink where
-  parseJSON (Object obj) =
-    ApiGatewayVpcLink <$>
-      (obj .:? "Description") <*>
-      (obj .: "Name") <*>
-      (obj .: "TargetArns")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApiGatewayVpcLink' containing required fields as
 -- arguments.
 apiGatewayVpcLink
diff --git a/library-gen/Stratosphere/Resources/AppStreamDirectoryConfig.hs b/library-gen/Stratosphere/Resources/AppStreamDirectoryConfig.hs
--- a/library-gen/Stratosphere/Resources/AppStreamDirectoryConfig.hs
+++ b/library-gen/Stratosphere/Resources/AppStreamDirectoryConfig.hs
@@ -27,14 +27,6 @@
     , (Just . ("ServiceAccountCredentials",) . toJSON) _appStreamDirectoryConfigServiceAccountCredentials
     ]
 
-instance FromJSON AppStreamDirectoryConfig where
-  parseJSON (Object obj) =
-    AppStreamDirectoryConfig <$>
-      (obj .: "DirectoryName") <*>
-      (obj .: "OrganizationalUnitDistinguishedNames") <*>
-      (obj .: "ServiceAccountCredentials")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamDirectoryConfig' containing required fields as
 -- arguments.
 appStreamDirectoryConfig
diff --git a/library-gen/Stratosphere/Resources/AppStreamFleet.hs b/library-gen/Stratosphere/Resources/AppStreamFleet.hs
--- a/library-gen/Stratosphere/Resources/AppStreamFleet.hs
+++ b/library-gen/Stratosphere/Resources/AppStreamFleet.hs
@@ -49,24 +49,6 @@
     , fmap (("VpcConfig",) . toJSON) _appStreamFleetVpcConfig
     ]
 
-instance FromJSON AppStreamFleet where
-  parseJSON (Object obj) =
-    AppStreamFleet <$>
-      (obj .: "ComputeCapacity") <*>
-      (obj .:? "Description") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "DisconnectTimeoutInSeconds") <*>
-      (obj .:? "DisplayName") <*>
-      (obj .:? "DomainJoinInfo") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnableDefaultInternetAccess") <*>
-      (obj .:? "FleetType") <*>
-      (obj .:? "ImageArn") <*>
-      (obj .:? "ImageName") <*>
-      (obj .: "InstanceType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MaxUserDurationInSeconds") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "VpcConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamFleet' containing required fields as arguments.
 appStreamFleet
   :: AppStreamFleetComputeCapacity -- ^ 'asfComputeCapacity'
diff --git a/library-gen/Stratosphere/Resources/AppStreamImageBuilder.hs b/library-gen/Stratosphere/Resources/AppStreamImageBuilder.hs
--- a/library-gen/Stratosphere/Resources/AppStreamImageBuilder.hs
+++ b/library-gen/Stratosphere/Resources/AppStreamImageBuilder.hs
@@ -42,21 +42,6 @@
     , fmap (("VpcConfig",) . toJSON) _appStreamImageBuilderVpcConfig
     ]
 
-instance FromJSON AppStreamImageBuilder where
-  parseJSON (Object obj) =
-    AppStreamImageBuilder <$>
-      (obj .:? "AppstreamAgentVersion") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "DisplayName") <*>
-      (obj .:? "DomainJoinInfo") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnableDefaultInternetAccess") <*>
-      (obj .:? "ImageArn") <*>
-      (obj .:? "ImageName") <*>
-      (obj .: "InstanceType") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "VpcConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamImageBuilder' containing required fields as
 -- arguments.
 appStreamImageBuilder
diff --git a/library-gen/Stratosphere/Resources/AppStreamStack.hs b/library-gen/Stratosphere/Resources/AppStreamStack.hs
--- a/library-gen/Stratosphere/Resources/AppStreamStack.hs
+++ b/library-gen/Stratosphere/Resources/AppStreamStack.hs
@@ -43,21 +43,6 @@
     , fmap (("UserSettings",) . toJSON) _appStreamStackUserSettings
     ]
 
-instance FromJSON AppStreamStack where
-  parseJSON (Object obj) =
-    AppStreamStack <$>
-      (obj .:? "ApplicationSettings") <*>
-      (obj .:? "AttributesToDelete") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DeleteStorageConnectors") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "DisplayName") <*>
-      (obj .:? "FeedbackURL") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "RedirectURL") <*>
-      (obj .:? "StorageConnectors") <*>
-      (obj .:? "UserSettings")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamStack' containing required fields as arguments.
 appStreamStack
   :: AppStreamStack
diff --git a/library-gen/Stratosphere/Resources/AppStreamStackFleetAssociation.hs b/library-gen/Stratosphere/Resources/AppStreamStackFleetAssociation.hs
--- a/library-gen/Stratosphere/Resources/AppStreamStackFleetAssociation.hs
+++ b/library-gen/Stratosphere/Resources/AppStreamStackFleetAssociation.hs
@@ -25,13 +25,6 @@
     , (Just . ("StackName",) . toJSON) _appStreamStackFleetAssociationStackName
     ]
 
-instance FromJSON AppStreamStackFleetAssociation where
-  parseJSON (Object obj) =
-    AppStreamStackFleetAssociation <$>
-      (obj .: "FleetName") <*>
-      (obj .: "StackName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamStackFleetAssociation' containing required
 -- fields as arguments.
 appStreamStackFleetAssociation
diff --git a/library-gen/Stratosphere/Resources/AppStreamStackUserAssociation.hs b/library-gen/Stratosphere/Resources/AppStreamStackUserAssociation.hs
--- a/library-gen/Stratosphere/Resources/AppStreamStackUserAssociation.hs
+++ b/library-gen/Stratosphere/Resources/AppStreamStackUserAssociation.hs
@@ -29,15 +29,6 @@
     , (Just . ("UserName",) . toJSON) _appStreamStackUserAssociationUserName
     ]
 
-instance FromJSON AppStreamStackUserAssociation where
-  parseJSON (Object obj) =
-    AppStreamStackUserAssociation <$>
-      (obj .: "AuthenticationType") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "SendEmailNotification") <*>
-      (obj .: "StackName") <*>
-      (obj .: "UserName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamStackUserAssociation' containing required
 -- fields as arguments.
 appStreamStackUserAssociation
diff --git a/library-gen/Stratosphere/Resources/AppStreamUser.hs b/library-gen/Stratosphere/Resources/AppStreamUser.hs
--- a/library-gen/Stratosphere/Resources/AppStreamUser.hs
+++ b/library-gen/Stratosphere/Resources/AppStreamUser.hs
@@ -31,16 +31,6 @@
     , (Just . ("UserName",) . toJSON) _appStreamUserUserName
     ]
 
-instance FromJSON AppStreamUser where
-  parseJSON (Object obj) =
-    AppStreamUser <$>
-      (obj .: "AuthenticationType") <*>
-      (obj .:? "FirstName") <*>
-      (obj .:? "LastName") <*>
-      (obj .:? "MessageAction") <*>
-      (obj .: "UserName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppStreamUser' containing required fields as arguments.
 appStreamUser
   :: Val Text -- ^ 'asuAuthenticationType'
diff --git a/library-gen/Stratosphere/Resources/AppSyncApiKey.hs b/library-gen/Stratosphere/Resources/AppSyncApiKey.hs
--- a/library-gen/Stratosphere/Resources/AppSyncApiKey.hs
+++ b/library-gen/Stratosphere/Resources/AppSyncApiKey.hs
@@ -27,14 +27,6 @@
     , fmap (("Expires",) . toJSON . fmap Double') _appSyncApiKeyExpires
     ]
 
-instance FromJSON AppSyncApiKey where
-  parseJSON (Object obj) =
-    AppSyncApiKey <$>
-      (obj .: "ApiId") <*>
-      (obj .:? "Description") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "Expires")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncApiKey' containing required fields as arguments.
 appSyncApiKey
   :: Val Text -- ^ 'asakApiId'
diff --git a/library-gen/Stratosphere/Resources/AppSyncDataSource.hs b/library-gen/Stratosphere/Resources/AppSyncDataSource.hs
--- a/library-gen/Stratosphere/Resources/AppSyncDataSource.hs
+++ b/library-gen/Stratosphere/Resources/AppSyncDataSource.hs
@@ -45,21 +45,6 @@
     , (Just . ("Type",) . toJSON) _appSyncDataSourceType
     ]
 
-instance FromJSON AppSyncDataSource where
-  parseJSON (Object obj) =
-    AppSyncDataSource <$>
-      (obj .: "ApiId") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "DynamoDBConfig") <*>
-      (obj .:? "ElasticsearchConfig") <*>
-      (obj .:? "HttpConfig") <*>
-      (obj .:? "LambdaConfig") <*>
-      (obj .: "Name") <*>
-      (obj .:? "RelationalDatabaseConfig") <*>
-      (obj .:? "ServiceRoleArn") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncDataSource' containing required fields as
 -- arguments.
 appSyncDataSource
diff --git a/library-gen/Stratosphere/Resources/AppSyncFunctionConfiguration.hs b/library-gen/Stratosphere/Resources/AppSyncFunctionConfiguration.hs
--- a/library-gen/Stratosphere/Resources/AppSyncFunctionConfiguration.hs
+++ b/library-gen/Stratosphere/Resources/AppSyncFunctionConfiguration.hs
@@ -39,20 +39,6 @@
     , fmap (("ResponseMappingTemplateS3Location",) . toJSON) _appSyncFunctionConfigurationResponseMappingTemplateS3Location
     ]
 
-instance FromJSON AppSyncFunctionConfiguration where
-  parseJSON (Object obj) =
-    AppSyncFunctionConfiguration <$>
-      (obj .: "ApiId") <*>
-      (obj .:? "DataSourceName") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "FunctionVersion") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "RequestMappingTemplate") <*>
-      (obj .:? "RequestMappingTemplateS3Location") <*>
-      (obj .:? "ResponseMappingTemplate") <*>
-      (obj .:? "ResponseMappingTemplateS3Location")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncFunctionConfiguration' containing required fields
 -- as arguments.
 appSyncFunctionConfiguration
diff --git a/library-gen/Stratosphere/Resources/AppSyncGraphQLApi.hs b/library-gen/Stratosphere/Resources/AppSyncGraphQLApi.hs
--- a/library-gen/Stratosphere/Resources/AppSyncGraphQLApi.hs
+++ b/library-gen/Stratosphere/Resources/AppSyncGraphQLApi.hs
@@ -33,16 +33,6 @@
     , fmap (("UserPoolConfig",) . toJSON) _appSyncGraphQLApiUserPoolConfig
     ]
 
-instance FromJSON AppSyncGraphQLApi where
-  parseJSON (Object obj) =
-    AppSyncGraphQLApi <$>
-      (obj .: "AuthenticationType") <*>
-      (obj .:? "LogConfig") <*>
-      (obj .: "Name") <*>
-      (obj .:? "OpenIDConnectConfig") <*>
-      (obj .:? "UserPoolConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncGraphQLApi' containing required fields as
 -- arguments.
 appSyncGraphQLApi
diff --git a/library-gen/Stratosphere/Resources/AppSyncGraphQLSchema.hs b/library-gen/Stratosphere/Resources/AppSyncGraphQLSchema.hs
--- a/library-gen/Stratosphere/Resources/AppSyncGraphQLSchema.hs
+++ b/library-gen/Stratosphere/Resources/AppSyncGraphQLSchema.hs
@@ -27,14 +27,6 @@
     , fmap (("DefinitionS3Location",) . toJSON) _appSyncGraphQLSchemaDefinitionS3Location
     ]
 
-instance FromJSON AppSyncGraphQLSchema where
-  parseJSON (Object obj) =
-    AppSyncGraphQLSchema <$>
-      (obj .: "ApiId") <*>
-      (obj .:? "Definition") <*>
-      (obj .:? "DefinitionS3Location")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncGraphQLSchema' containing required fields as
 -- arguments.
 appSyncGraphQLSchema
diff --git a/library-gen/Stratosphere/Resources/AppSyncResolver.hs b/library-gen/Stratosphere/Resources/AppSyncResolver.hs
--- a/library-gen/Stratosphere/Resources/AppSyncResolver.hs
+++ b/library-gen/Stratosphere/Resources/AppSyncResolver.hs
@@ -41,21 +41,6 @@
     , (Just . ("TypeName",) . toJSON) _appSyncResolverTypeName
     ]
 
-instance FromJSON AppSyncResolver where
-  parseJSON (Object obj) =
-    AppSyncResolver <$>
-      (obj .: "ApiId") <*>
-      (obj .:? "DataSourceName") <*>
-      (obj .: "FieldName") <*>
-      (obj .:? "Kind") <*>
-      (obj .:? "PipelineConfig") <*>
-      (obj .:? "RequestMappingTemplate") <*>
-      (obj .:? "RequestMappingTemplateS3Location") <*>
-      (obj .:? "ResponseMappingTemplate") <*>
-      (obj .:? "ResponseMappingTemplateS3Location") <*>
-      (obj .: "TypeName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AppSyncResolver' containing required fields as
 -- arguments.
 appSyncResolver
diff --git a/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalableTarget.hs b/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalableTarget.hs
--- a/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalableTarget.hs
+++ b/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalableTarget.hs
@@ -35,18 +35,6 @@
     , (Just . ("ServiceNamespace",) . toJSON) _applicationAutoScalingScalableTargetServiceNamespace
     ]
 
-instance FromJSON ApplicationAutoScalingScalableTarget where
-  parseJSON (Object obj) =
-    ApplicationAutoScalingScalableTarget <$>
-      fmap (fmap unInteger') (obj .: "MaxCapacity") <*>
-      fmap (fmap unInteger') (obj .: "MinCapacity") <*>
-      (obj .: "ResourceId") <*>
-      (obj .: "RoleARN") <*>
-      (obj .: "ScalableDimension") <*>
-      (obj .:? "ScheduledActions") <*>
-      (obj .: "ServiceNamespace")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApplicationAutoScalingScalableTarget' containing
 -- required fields as arguments.
 applicationAutoScalingScalableTarget
diff --git a/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalingPolicy.hs b/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalingPolicy.hs
--- a/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalingPolicy.hs
+++ b/library-gen/Stratosphere/Resources/ApplicationAutoScalingScalingPolicy.hs
@@ -38,19 +38,6 @@
     , fmap (("TargetTrackingScalingPolicyConfiguration",) . toJSON) _applicationAutoScalingScalingPolicyTargetTrackingScalingPolicyConfiguration
     ]
 
-instance FromJSON ApplicationAutoScalingScalingPolicy where
-  parseJSON (Object obj) =
-    ApplicationAutoScalingScalingPolicy <$>
-      (obj .: "PolicyName") <*>
-      (obj .: "PolicyType") <*>
-      (obj .:? "ResourceId") <*>
-      (obj .:? "ScalableDimension") <*>
-      (obj .:? "ScalingTargetId") <*>
-      (obj .:? "ServiceNamespace") <*>
-      (obj .:? "StepScalingPolicyConfiguration") <*>
-      (obj .:? "TargetTrackingScalingPolicyConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ApplicationAutoScalingScalingPolicy' containing required
 -- fields as arguments.
 applicationAutoScalingScalingPolicy
diff --git a/library-gen/Stratosphere/Resources/AthenaNamedQuery.hs b/library-gen/Stratosphere/Resources/AthenaNamedQuery.hs
--- a/library-gen/Stratosphere/Resources/AthenaNamedQuery.hs
+++ b/library-gen/Stratosphere/Resources/AthenaNamedQuery.hs
@@ -29,15 +29,6 @@
     , (Just . ("QueryString",) . toJSON) _athenaNamedQueryQueryString
     ]
 
-instance FromJSON AthenaNamedQuery where
-  parseJSON (Object obj) =
-    AthenaNamedQuery <$>
-      (obj .: "Database") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "Name") <*>
-      (obj .: "QueryString")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AthenaNamedQuery' containing required fields as
 -- arguments.
 athenaNamedQuery
diff --git a/library-gen/Stratosphere/Resources/AutoScalingAutoScalingGroup.hs b/library-gen/Stratosphere/Resources/AutoScalingAutoScalingGroup.hs
--- a/library-gen/Stratosphere/Resources/AutoScalingAutoScalingGroup.hs
+++ b/library-gen/Stratosphere/Resources/AutoScalingAutoScalingGroup.hs
@@ -70,33 +70,6 @@
     , fmap (("VPCZoneIdentifier",) . toJSON) _autoScalingAutoScalingGroupVPCZoneIdentifier
     ]
 
-instance FromJSON AutoScalingAutoScalingGroup where
-  parseJSON (Object obj) =
-    AutoScalingAutoScalingGroup <$>
-      (obj .:? "AutoScalingGroupName") <*>
-      (obj .:? "AvailabilityZones") <*>
-      (obj .:? "Cooldown") <*>
-      (obj .:? "DesiredCapacity") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "HealthCheckGracePeriod") <*>
-      (obj .:? "HealthCheckType") <*>
-      (obj .:? "InstanceId") <*>
-      (obj .:? "LaunchConfigurationName") <*>
-      (obj .:? "LaunchTemplate") <*>
-      (obj .:? "LifecycleHookSpecificationList") <*>
-      (obj .:? "LoadBalancerNames") <*>
-      (obj .: "MaxSize") <*>
-      (obj .:? "MetricsCollection") <*>
-      (obj .: "MinSize") <*>
-      (obj .:? "MixedInstancesPolicy") <*>
-      (obj .:? "NotificationConfigurations") <*>
-      (obj .:? "PlacementGroup") <*>
-      (obj .:? "ServiceLinkedRoleARN") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "TargetGroupARNs") <*>
-      (obj .:? "TerminationPolicies") <*>
-      (obj .:? "VPCZoneIdentifier")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingAutoScalingGroup' containing required fields
 -- as arguments.
 autoScalingAutoScalingGroup
diff --git a/library-gen/Stratosphere/Resources/AutoScalingLaunchConfiguration.hs b/library-gen/Stratosphere/Resources/AutoScalingLaunchConfiguration.hs
--- a/library-gen/Stratosphere/Resources/AutoScalingLaunchConfiguration.hs
+++ b/library-gen/Stratosphere/Resources/AutoScalingLaunchConfiguration.hs
@@ -57,29 +57,6 @@
     , fmap (("UserData",) . toJSON) _autoScalingLaunchConfigurationUserData
     ]
 
-instance FromJSON AutoScalingLaunchConfiguration where
-  parseJSON (Object obj) =
-    AutoScalingLaunchConfiguration <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AssociatePublicIpAddress") <*>
-      (obj .:? "BlockDeviceMappings") <*>
-      (obj .:? "ClassicLinkVPCId") <*>
-      (obj .:? "ClassicLinkVPCSecurityGroups") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EbsOptimized") <*>
-      (obj .:? "IamInstanceProfile") <*>
-      (obj .: "ImageId") <*>
-      (obj .:? "InstanceId") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "InstanceMonitoring") <*>
-      (obj .: "InstanceType") <*>
-      (obj .:? "KernelId") <*>
-      (obj .:? "KeyName") <*>
-      (obj .:? "LaunchConfigurationName") <*>
-      (obj .:? "PlacementTenancy") <*>
-      (obj .:? "RamDiskId") <*>
-      (obj .:? "SecurityGroups") <*>
-      (obj .:? "SpotPrice") <*>
-      (obj .:? "UserData")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingLaunchConfiguration' containing required
 -- fields as arguments.
 autoScalingLaunchConfiguration
diff --git a/library-gen/Stratosphere/Resources/AutoScalingLifecycleHook.hs b/library-gen/Stratosphere/Resources/AutoScalingLifecycleHook.hs
--- a/library-gen/Stratosphere/Resources/AutoScalingLifecycleHook.hs
+++ b/library-gen/Stratosphere/Resources/AutoScalingLifecycleHook.hs
@@ -37,19 +37,6 @@
     , fmap (("RoleARN",) . toJSON) _autoScalingLifecycleHookRoleARN
     ]
 
-instance FromJSON AutoScalingLifecycleHook where
-  parseJSON (Object obj) =
-    AutoScalingLifecycleHook <$>
-      (obj .: "AutoScalingGroupName") <*>
-      (obj .:? "DefaultResult") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "HeartbeatTimeout") <*>
-      (obj .:? "LifecycleHookName") <*>
-      (obj .: "LifecycleTransition") <*>
-      (obj .:? "NotificationMetadata") <*>
-      (obj .:? "NotificationTargetARN") <*>
-      (obj .:? "RoleARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingLifecycleHook' containing required fields as
 -- arguments.
 autoScalingLifecycleHook
diff --git a/library-gen/Stratosphere/Resources/AutoScalingPlansScalingPlan.hs b/library-gen/Stratosphere/Resources/AutoScalingPlansScalingPlan.hs
--- a/library-gen/Stratosphere/Resources/AutoScalingPlansScalingPlan.hs
+++ b/library-gen/Stratosphere/Resources/AutoScalingPlansScalingPlan.hs
@@ -26,13 +26,6 @@
     , (Just . ("ScalingInstructions",) . toJSON) _autoScalingPlansScalingPlanScalingInstructions
     ]
 
-instance FromJSON AutoScalingPlansScalingPlan where
-  parseJSON (Object obj) =
-    AutoScalingPlansScalingPlan <$>
-      (obj .: "ApplicationSource") <*>
-      (obj .: "ScalingInstructions")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingPlansScalingPlan' containing required fields
 -- as arguments.
 autoScalingPlansScalingPlan
diff --git a/library-gen/Stratosphere/Resources/AutoScalingScalingPolicy.hs b/library-gen/Stratosphere/Resources/AutoScalingScalingPolicy.hs
--- a/library-gen/Stratosphere/Resources/AutoScalingScalingPolicy.hs
+++ b/library-gen/Stratosphere/Resources/AutoScalingScalingPolicy.hs
@@ -42,21 +42,6 @@
     , fmap (("TargetTrackingConfiguration",) . toJSON) _autoScalingScalingPolicyTargetTrackingConfiguration
     ]
 
-instance FromJSON AutoScalingScalingPolicy where
-  parseJSON (Object obj) =
-    AutoScalingScalingPolicy <$>
-      (obj .:? "AdjustmentType") <*>
-      (obj .: "AutoScalingGroupName") <*>
-      (obj .:? "Cooldown") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "EstimatedInstanceWarmup") <*>
-      (obj .:? "MetricAggregationType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MinAdjustmentMagnitude") <*>
-      (obj .:? "PolicyType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ScalingAdjustment") <*>
-      (obj .:? "StepAdjustments") <*>
-      (obj .:? "TargetTrackingConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingScalingPolicy' containing required fields as
 -- arguments.
 autoScalingScalingPolicy
diff --git a/library-gen/Stratosphere/Resources/AutoScalingScheduledAction.hs b/library-gen/Stratosphere/Resources/AutoScalingScheduledAction.hs
--- a/library-gen/Stratosphere/Resources/AutoScalingScheduledAction.hs
+++ b/library-gen/Stratosphere/Resources/AutoScalingScheduledAction.hs
@@ -35,18 +35,6 @@
     , fmap (("StartTime",) . toJSON) _autoScalingScheduledActionStartTime
     ]
 
-instance FromJSON AutoScalingScheduledAction where
-  parseJSON (Object obj) =
-    AutoScalingScheduledAction <$>
-      (obj .: "AutoScalingGroupName") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "DesiredCapacity") <*>
-      (obj .:? "EndTime") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MaxSize") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MinSize") <*>
-      (obj .:? "Recurrence") <*>
-      (obj .:? "StartTime")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingScheduledAction' containing required fields
 -- as arguments.
 autoScalingScheduledAction
diff --git a/library-gen/Stratosphere/Resources/BatchComputeEnvironment.hs b/library-gen/Stratosphere/Resources/BatchComputeEnvironment.hs
--- a/library-gen/Stratosphere/Resources/BatchComputeEnvironment.hs
+++ b/library-gen/Stratosphere/Resources/BatchComputeEnvironment.hs
@@ -31,16 +31,6 @@
     , (Just . ("Type",) . toJSON) _batchComputeEnvironmentType
     ]
 
-instance FromJSON BatchComputeEnvironment where
-  parseJSON (Object obj) =
-    BatchComputeEnvironment <$>
-      (obj .:? "ComputeEnvironmentName") <*>
-      (obj .:? "ComputeResources") <*>
-      (obj .: "ServiceRole") <*>
-      (obj .:? "State") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchComputeEnvironment' containing required fields as
 -- arguments.
 batchComputeEnvironment
diff --git a/library-gen/Stratosphere/Resources/BatchJobDefinition.hs b/library-gen/Stratosphere/Resources/BatchJobDefinition.hs
--- a/library-gen/Stratosphere/Resources/BatchJobDefinition.hs
+++ b/library-gen/Stratosphere/Resources/BatchJobDefinition.hs
@@ -38,18 +38,6 @@
     , (Just . ("Type",) . toJSON) _batchJobDefinitionType
     ]
 
-instance FromJSON BatchJobDefinition where
-  parseJSON (Object obj) =
-    BatchJobDefinition <$>
-      (obj .:? "ContainerProperties") <*>
-      (obj .:? "JobDefinitionName") <*>
-      (obj .:? "NodeProperties") <*>
-      (obj .:? "Parameters") <*>
-      (obj .:? "RetryStrategy") <*>
-      (obj .:? "Timeout") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchJobDefinition' containing required fields as
 -- arguments.
 batchJobDefinition
diff --git a/library-gen/Stratosphere/Resources/BatchJobQueue.hs b/library-gen/Stratosphere/Resources/BatchJobQueue.hs
--- a/library-gen/Stratosphere/Resources/BatchJobQueue.hs
+++ b/library-gen/Stratosphere/Resources/BatchJobQueue.hs
@@ -29,15 +29,6 @@
     , fmap (("State",) . toJSON) _batchJobQueueState
     ]
 
-instance FromJSON BatchJobQueue where
-  parseJSON (Object obj) =
-    BatchJobQueue <$>
-      (obj .: "ComputeEnvironmentOrder") <*>
-      (obj .:? "JobQueueName") <*>
-      fmap (fmap unInteger') (obj .: "Priority") <*>
-      (obj .:? "State")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BatchJobQueue' containing required fields as arguments.
 batchJobQueue
   :: [BatchJobQueueComputeEnvironmentOrder] -- ^ 'bjqComputeEnvironmentOrder'
diff --git a/library-gen/Stratosphere/Resources/BudgetsBudget.hs b/library-gen/Stratosphere/Resources/BudgetsBudget.hs
--- a/library-gen/Stratosphere/Resources/BudgetsBudget.hs
+++ b/library-gen/Stratosphere/Resources/BudgetsBudget.hs
@@ -26,13 +26,6 @@
     , fmap (("NotificationsWithSubscribers",) . toJSON) _budgetsBudgetNotificationsWithSubscribers
     ]
 
-instance FromJSON BudgetsBudget where
-  parseJSON (Object obj) =
-    BudgetsBudget <$>
-      (obj .: "Budget") <*>
-      (obj .:? "NotificationsWithSubscribers")
-  parseJSON _ = mempty
-
 -- | Constructor for 'BudgetsBudget' containing required fields as arguments.
 budgetsBudget
   :: BudgetsBudgetBudgetData -- ^ 'bbBudget'
diff --git a/library-gen/Stratosphere/Resources/CertificateManagerCertificate.hs b/library-gen/Stratosphere/Resources/CertificateManagerCertificate.hs
--- a/library-gen/Stratosphere/Resources/CertificateManagerCertificate.hs
+++ b/library-gen/Stratosphere/Resources/CertificateManagerCertificate.hs
@@ -32,16 +32,6 @@
     , fmap (("ValidationMethod",) . toJSON) _certificateManagerCertificateValidationMethod
     ]
 
-instance FromJSON CertificateManagerCertificate where
-  parseJSON (Object obj) =
-    CertificateManagerCertificate <$>
-      (obj .: "DomainName") <*>
-      (obj .:? "DomainValidationOptions") <*>
-      (obj .:? "SubjectAlternativeNames") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "ValidationMethod")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CertificateManagerCertificate' containing required
 -- fields as arguments.
 certificateManagerCertificate
diff --git a/library-gen/Stratosphere/Resources/Cloud9EnvironmentEC2.hs b/library-gen/Stratosphere/Resources/Cloud9EnvironmentEC2.hs
--- a/library-gen/Stratosphere/Resources/Cloud9EnvironmentEC2.hs
+++ b/library-gen/Stratosphere/Resources/Cloud9EnvironmentEC2.hs
@@ -35,18 +35,6 @@
     , fmap (("SubnetId",) . toJSON) _cloud9EnvironmentEC2SubnetId
     ]
 
-instance FromJSON Cloud9EnvironmentEC2 where
-  parseJSON (Object obj) =
-    Cloud9EnvironmentEC2 <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "AutomaticStopTimeMinutes") <*>
-      (obj .:? "Description") <*>
-      (obj .: "InstanceType") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "OwnerArn") <*>
-      (obj .:? "Repositories") <*>
-      (obj .:? "SubnetId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Cloud9EnvironmentEC2' containing required fields as
 -- arguments.
 cloud9EnvironmentEC2
diff --git a/library-gen/Stratosphere/Resources/CloudFormationCustomResource.hs b/library-gen/Stratosphere/Resources/CloudFormationCustomResource.hs
--- a/library-gen/Stratosphere/Resources/CloudFormationCustomResource.hs
+++ b/library-gen/Stratosphere/Resources/CloudFormationCustomResource.hs
@@ -23,12 +23,6 @@
     [ (Just . ("ServiceToken",) . toJSON) _cloudFormationCustomResourceServiceToken
     ]
 
-instance FromJSON CloudFormationCustomResource where
-  parseJSON (Object obj) =
-    CloudFormationCustomResource <$>
-      (obj .: "ServiceToken")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFormationCustomResource' containing required fields
 -- as arguments.
 cloudFormationCustomResource
diff --git a/library-gen/Stratosphere/Resources/CloudFormationMacro.hs b/library-gen/Stratosphere/Resources/CloudFormationMacro.hs
--- a/library-gen/Stratosphere/Resources/CloudFormationMacro.hs
+++ b/library-gen/Stratosphere/Resources/CloudFormationMacro.hs
@@ -31,16 +31,6 @@
     , (Just . ("Name",) . toJSON) _cloudFormationMacroName
     ]
 
-instance FromJSON CloudFormationMacro where
-  parseJSON (Object obj) =
-    CloudFormationMacro <$>
-      (obj .:? "Description") <*>
-      (obj .: "FunctionName") <*>
-      (obj .:? "LogGroupName") <*>
-      (obj .:? "LogRoleARN") <*>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFormationMacro' containing required fields as
 -- arguments.
 cloudFormationMacro
diff --git a/library-gen/Stratosphere/Resources/CloudFormationStack.hs b/library-gen/Stratosphere/Resources/CloudFormationStack.hs
--- a/library-gen/Stratosphere/Resources/CloudFormationStack.hs
+++ b/library-gen/Stratosphere/Resources/CloudFormationStack.hs
@@ -31,16 +31,6 @@
     , fmap (("TimeoutInMinutes",) . toJSON . fmap Integer') _cloudFormationStackTimeoutInMinutes
     ]
 
-instance FromJSON CloudFormationStack where
-  parseJSON (Object obj) =
-    CloudFormationStack <$>
-      (obj .:? "NotificationARNs") <*>
-      (obj .:? "Parameters") <*>
-      (obj .:? "Tags") <*>
-      (obj .: "TemplateURL") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "TimeoutInMinutes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFormationStack' containing required fields as
 -- arguments.
 cloudFormationStack
diff --git a/library-gen/Stratosphere/Resources/CloudFormationWaitCondition.hs b/library-gen/Stratosphere/Resources/CloudFormationWaitCondition.hs
--- a/library-gen/Stratosphere/Resources/CloudFormationWaitCondition.hs
+++ b/library-gen/Stratosphere/Resources/CloudFormationWaitCondition.hs
@@ -27,14 +27,6 @@
     , fmap (("Timeout",) . toJSON) _cloudFormationWaitConditionTimeout
     ]
 
-instance FromJSON CloudFormationWaitCondition where
-  parseJSON (Object obj) =
-    CloudFormationWaitCondition <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "Count") <*>
-      (obj .:? "Handle") <*>
-      (obj .:? "Timeout")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFormationWaitCondition' containing required fields
 -- as arguments.
 cloudFormationWaitCondition
diff --git a/library-gen/Stratosphere/Resources/CloudFormationWaitConditionHandle.hs b/library-gen/Stratosphere/Resources/CloudFormationWaitConditionHandle.hs
--- a/library-gen/Stratosphere/Resources/CloudFormationWaitConditionHandle.hs
+++ b/library-gen/Stratosphere/Resources/CloudFormationWaitConditionHandle.hs
@@ -19,10 +19,6 @@
 instance ToJSON CloudFormationWaitConditionHandle where
   toJSON _ = toJSON ([] :: [String])
 
-instance FromJSON CloudFormationWaitConditionHandle where
-  parseJSON (Array _) = return CloudFormationWaitConditionHandle
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFormationWaitConditionHandle' containing required
 -- fields as arguments.
 cloudFormationWaitConditionHandle
diff --git a/library-gen/Stratosphere/Resources/CloudFrontCloudFrontOriginAccessIdentity.hs b/library-gen/Stratosphere/Resources/CloudFrontCloudFrontOriginAccessIdentity.hs
--- a/library-gen/Stratosphere/Resources/CloudFrontCloudFrontOriginAccessIdentity.hs
+++ b/library-gen/Stratosphere/Resources/CloudFrontCloudFrontOriginAccessIdentity.hs
@@ -24,12 +24,6 @@
     [ (Just . ("CloudFrontOriginAccessIdentityConfig",) . toJSON) _cloudFrontCloudFrontOriginAccessIdentityCloudFrontOriginAccessIdentityConfig
     ]
 
-instance FromJSON CloudFrontCloudFrontOriginAccessIdentity where
-  parseJSON (Object obj) =
-    CloudFrontCloudFrontOriginAccessIdentity <$>
-      (obj .: "CloudFrontOriginAccessIdentityConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontCloudFrontOriginAccessIdentity' containing
 -- required fields as arguments.
 cloudFrontCloudFrontOriginAccessIdentity
diff --git a/library-gen/Stratosphere/Resources/CloudFrontDistribution.hs b/library-gen/Stratosphere/Resources/CloudFrontDistribution.hs
--- a/library-gen/Stratosphere/Resources/CloudFrontDistribution.hs
+++ b/library-gen/Stratosphere/Resources/CloudFrontDistribution.hs
@@ -26,13 +26,6 @@
     , fmap (("Tags",) . toJSON) _cloudFrontDistributionTags
     ]
 
-instance FromJSON CloudFrontDistribution where
-  parseJSON (Object obj) =
-    CloudFrontDistribution <$>
-      (obj .: "DistributionConfig") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontDistribution' containing required fields as
 -- arguments.
 cloudFrontDistribution
diff --git a/library-gen/Stratosphere/Resources/CloudFrontStreamingDistribution.hs b/library-gen/Stratosphere/Resources/CloudFrontStreamingDistribution.hs
--- a/library-gen/Stratosphere/Resources/CloudFrontStreamingDistribution.hs
+++ b/library-gen/Stratosphere/Resources/CloudFrontStreamingDistribution.hs
@@ -26,13 +26,6 @@
     , (Just . ("Tags",) . toJSON) _cloudFrontStreamingDistributionTags
     ]
 
-instance FromJSON CloudFrontStreamingDistribution where
-  parseJSON (Object obj) =
-    CloudFrontStreamingDistribution <$>
-      (obj .: "StreamingDistributionConfig") <*>
-      (obj .: "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudFrontStreamingDistribution' containing required
 -- fields as arguments.
 cloudFrontStreamingDistribution
diff --git a/library-gen/Stratosphere/Resources/CloudTrailTrail.hs b/library-gen/Stratosphere/Resources/CloudTrailTrail.hs
--- a/library-gen/Stratosphere/Resources/CloudTrailTrail.hs
+++ b/library-gen/Stratosphere/Resources/CloudTrailTrail.hs
@@ -48,24 +48,6 @@
     , fmap (("TrailName",) . toJSON) _cloudTrailTrailTrailName
     ]
 
-instance FromJSON CloudTrailTrail where
-  parseJSON (Object obj) =
-    CloudTrailTrail <$>
-      (obj .:? "CloudWatchLogsLogGroupArn") <*>
-      (obj .:? "CloudWatchLogsRoleArn") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnableLogFileValidation") <*>
-      (obj .:? "EventSelectors") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IncludeGlobalServiceEvents") <*>
-      fmap (fmap unBool') (obj .: "IsLogging") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IsMultiRegionTrail") <*>
-      (obj .:? "KMSKeyId") <*>
-      (obj .: "S3BucketName") <*>
-      (obj .:? "S3KeyPrefix") <*>
-      (obj .:? "SnsTopicName") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "TrailName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudTrailTrail' containing required fields as
 -- arguments.
 cloudTrailTrail
diff --git a/library-gen/Stratosphere/Resources/CloudWatchAlarm.hs b/library-gen/Stratosphere/Resources/CloudWatchAlarm.hs
--- a/library-gen/Stratosphere/Resources/CloudWatchAlarm.hs
+++ b/library-gen/Stratosphere/Resources/CloudWatchAlarm.hs
@@ -62,31 +62,6 @@
     , fmap (("Unit",) . toJSON) _cloudWatchAlarmUnit
     ]
 
-instance FromJSON CloudWatchAlarm where
-  parseJSON (Object obj) =
-    CloudWatchAlarm <$>
-      fmap (fmap (fmap unBool')) (obj .:? "ActionsEnabled") <*>
-      (obj .:? "AlarmActions") <*>
-      (obj .:? "AlarmDescription") <*>
-      (obj .:? "AlarmName") <*>
-      (obj .: "ComparisonOperator") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "DatapointsToAlarm") <*>
-      (obj .:? "Dimensions") <*>
-      (obj .:? "EvaluateLowSampleCountPercentile") <*>
-      fmap (fmap unInteger') (obj .: "EvaluationPeriods") <*>
-      (obj .:? "ExtendedStatistic") <*>
-      (obj .:? "InsufficientDataActions") <*>
-      (obj .:? "MetricName") <*>
-      (obj .:? "Metrics") <*>
-      (obj .:? "Namespace") <*>
-      (obj .:? "OKActions") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Period") <*>
-      (obj .:? "Statistic") <*>
-      fmap (fmap unDouble') (obj .: "Threshold") <*>
-      (obj .:? "TreatMissingData") <*>
-      (obj .:? "Unit")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudWatchAlarm' containing required fields as
 -- arguments.
 cloudWatchAlarm
diff --git a/library-gen/Stratosphere/Resources/CloudWatchDashboard.hs b/library-gen/Stratosphere/Resources/CloudWatchDashboard.hs
--- a/library-gen/Stratosphere/Resources/CloudWatchDashboard.hs
+++ b/library-gen/Stratosphere/Resources/CloudWatchDashboard.hs
@@ -25,13 +25,6 @@
     , fmap (("DashboardName",) . toJSON) _cloudWatchDashboardDashboardName
     ]
 
-instance FromJSON CloudWatchDashboard where
-  parseJSON (Object obj) =
-    CloudWatchDashboard <$>
-      (obj .: "DashboardBody") <*>
-      (obj .:? "DashboardName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CloudWatchDashboard' containing required fields as
 -- arguments.
 cloudWatchDashboard
diff --git a/library-gen/Stratosphere/Resources/CodeBuildProject.hs b/library-gen/Stratosphere/Resources/CodeBuildProject.hs
--- a/library-gen/Stratosphere/Resources/CodeBuildProject.hs
+++ b/library-gen/Stratosphere/Resources/CodeBuildProject.hs
@@ -62,28 +62,6 @@
     , fmap (("VpcConfig",) . toJSON) _codeBuildProjectVpcConfig
     ]
 
-instance FromJSON CodeBuildProject where
-  parseJSON (Object obj) =
-    CodeBuildProject <$>
-      (obj .: "Artifacts") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "BadgeEnabled") <*>
-      (obj .:? "Cache") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "EncryptionKey") <*>
-      (obj .: "Environment") <*>
-      (obj .:? "LogsConfig") <*>
-      (obj .:? "Name") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "QueuedTimeoutInMinutes") <*>
-      (obj .:? "SecondaryArtifacts") <*>
-      (obj .:? "SecondarySources") <*>
-      (obj .: "ServiceRole") <*>
-      (obj .: "Source") <*>
-      (obj .:? "Tags") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "TimeoutInMinutes") <*>
-      (obj .:? "Triggers") <*>
-      (obj .:? "VpcConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeBuildProject' containing required fields as
 -- arguments.
 codeBuildProject
diff --git a/library-gen/Stratosphere/Resources/CodeCommitRepository.hs b/library-gen/Stratosphere/Resources/CodeCommitRepository.hs
--- a/library-gen/Stratosphere/Resources/CodeCommitRepository.hs
+++ b/library-gen/Stratosphere/Resources/CodeCommitRepository.hs
@@ -27,14 +27,6 @@
     , fmap (("Triggers",) . toJSON) _codeCommitRepositoryTriggers
     ]
 
-instance FromJSON CodeCommitRepository where
-  parseJSON (Object obj) =
-    CodeCommitRepository <$>
-      (obj .:? "RepositoryDescription") <*>
-      (obj .: "RepositoryName") <*>
-      (obj .:? "Triggers")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeCommitRepository' containing required fields as
 -- arguments.
 codeCommitRepository
diff --git a/library-gen/Stratosphere/Resources/CodeDeployApplication.hs b/library-gen/Stratosphere/Resources/CodeDeployApplication.hs
--- a/library-gen/Stratosphere/Resources/CodeDeployApplication.hs
+++ b/library-gen/Stratosphere/Resources/CodeDeployApplication.hs
@@ -25,13 +25,6 @@
     , fmap (("ComputePlatform",) . toJSON) _codeDeployApplicationComputePlatform
     ]
 
-instance FromJSON CodeDeployApplication where
-  parseJSON (Object obj) =
-    CodeDeployApplication <$>
-      (obj .:? "ApplicationName") <*>
-      (obj .:? "ComputePlatform")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployApplication' containing required fields as
 -- arguments.
 codeDeployApplication
diff --git a/library-gen/Stratosphere/Resources/CodeDeployDeploymentConfig.hs b/library-gen/Stratosphere/Resources/CodeDeployDeploymentConfig.hs
--- a/library-gen/Stratosphere/Resources/CodeDeployDeploymentConfig.hs
+++ b/library-gen/Stratosphere/Resources/CodeDeployDeploymentConfig.hs
@@ -25,13 +25,6 @@
     , fmap (("MinimumHealthyHosts",) . toJSON) _codeDeployDeploymentConfigMinimumHealthyHosts
     ]
 
-instance FromJSON CodeDeployDeploymentConfig where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentConfig <$>
-      (obj .:? "DeploymentConfigName") <*>
-      (obj .:? "MinimumHealthyHosts")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentConfig' containing required fields
 -- as arguments.
 codeDeployDeploymentConfig
diff --git a/library-gen/Stratosphere/Resources/CodeDeployDeploymentGroup.hs b/library-gen/Stratosphere/Resources/CodeDeployDeploymentGroup.hs
--- a/library-gen/Stratosphere/Resources/CodeDeployDeploymentGroup.hs
+++ b/library-gen/Stratosphere/Resources/CodeDeployDeploymentGroup.hs
@@ -60,26 +60,6 @@
     , fmap (("TriggerConfigurations",) . toJSON) _codeDeployDeploymentGroupTriggerConfigurations
     ]
 
-instance FromJSON CodeDeployDeploymentGroup where
-  parseJSON (Object obj) =
-    CodeDeployDeploymentGroup <$>
-      (obj .:? "AlarmConfiguration") <*>
-      (obj .: "ApplicationName") <*>
-      (obj .:? "AutoRollbackConfiguration") <*>
-      (obj .:? "AutoScalingGroups") <*>
-      (obj .:? "Deployment") <*>
-      (obj .:? "DeploymentConfigName") <*>
-      (obj .:? "DeploymentGroupName") <*>
-      (obj .:? "DeploymentStyle") <*>
-      (obj .:? "Ec2TagFilters") <*>
-      (obj .:? "Ec2TagSet") <*>
-      (obj .:? "LoadBalancerInfo") <*>
-      (obj .:? "OnPremisesInstanceTagFilters") <*>
-      (obj .:? "OnPremisesTagSet") <*>
-      (obj .: "ServiceRoleArn") <*>
-      (obj .:? "TriggerConfigurations")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodeDeployDeploymentGroup' containing required fields as
 -- arguments.
 codeDeployDeploymentGroup
diff --git a/library-gen/Stratosphere/Resources/CodePipelineCustomActionType.hs b/library-gen/Stratosphere/Resources/CodePipelineCustomActionType.hs
--- a/library-gen/Stratosphere/Resources/CodePipelineCustomActionType.hs
+++ b/library-gen/Stratosphere/Resources/CodePipelineCustomActionType.hs
@@ -37,18 +37,6 @@
     , fmap (("Version",) . toJSON) _codePipelineCustomActionTypeVersion
     ]
 
-instance FromJSON CodePipelineCustomActionType where
-  parseJSON (Object obj) =
-    CodePipelineCustomActionType <$>
-      (obj .: "Category") <*>
-      (obj .:? "ConfigurationProperties") <*>
-      (obj .: "InputArtifactDetails") <*>
-      (obj .: "OutputArtifactDetails") <*>
-      (obj .: "Provider") <*>
-      (obj .:? "Settings") <*>
-      (obj .:? "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelineCustomActionType' containing required fields
 -- as arguments.
 codePipelineCustomActionType
diff --git a/library-gen/Stratosphere/Resources/CodePipelinePipeline.hs b/library-gen/Stratosphere/Resources/CodePipelinePipeline.hs
--- a/library-gen/Stratosphere/Resources/CodePipelinePipeline.hs
+++ b/library-gen/Stratosphere/Resources/CodePipelinePipeline.hs
@@ -38,18 +38,6 @@
     , (Just . ("Stages",) . toJSON) _codePipelinePipelineStages
     ]
 
-instance FromJSON CodePipelinePipeline where
-  parseJSON (Object obj) =
-    CodePipelinePipeline <$>
-      (obj .:? "ArtifactStore") <*>
-      (obj .:? "ArtifactStores") <*>
-      (obj .:? "DisableInboundStageTransitions") <*>
-      (obj .:? "Name") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "RestartExecutionOnUpdate") <*>
-      (obj .: "RoleArn") <*>
-      (obj .: "Stages")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelinePipeline' containing required fields as
 -- arguments.
 codePipelinePipeline
diff --git a/library-gen/Stratosphere/Resources/CodePipelineWebhook.hs b/library-gen/Stratosphere/Resources/CodePipelineWebhook.hs
--- a/library-gen/Stratosphere/Resources/CodePipelineWebhook.hs
+++ b/library-gen/Stratosphere/Resources/CodePipelineWebhook.hs
@@ -38,19 +38,6 @@
     , (Just . ("TargetPipelineVersion",) . toJSON . fmap Integer') _codePipelineWebhookTargetPipelineVersion
     ]
 
-instance FromJSON CodePipelineWebhook where
-  parseJSON (Object obj) =
-    CodePipelineWebhook <$>
-      (obj .: "Authentication") <*>
-      (obj .: "AuthenticationConfiguration") <*>
-      (obj .: "Filters") <*>
-      (obj .:? "Name") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "RegisterWithThirdParty") <*>
-      (obj .: "TargetAction") <*>
-      (obj .: "TargetPipeline") <*>
-      fmap (fmap unInteger') (obj .: "TargetPipelineVersion")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CodePipelineWebhook' containing required fields as
 -- arguments.
 codePipelineWebhook
diff --git a/library-gen/Stratosphere/Resources/CognitoIdentityPool.hs b/library-gen/Stratosphere/Resources/CognitoIdentityPool.hs
--- a/library-gen/Stratosphere/Resources/CognitoIdentityPool.hs
+++ b/library-gen/Stratosphere/Resources/CognitoIdentityPool.hs
@@ -43,21 +43,6 @@
     , fmap (("SupportedLoginProviders",) . toJSON) _cognitoIdentityPoolSupportedLoginProviders
     ]
 
-instance FromJSON CognitoIdentityPool where
-  parseJSON (Object obj) =
-    CognitoIdentityPool <$>
-      fmap (fmap unBool') (obj .: "AllowUnauthenticatedIdentities") <*>
-      (obj .:? "CognitoEvents") <*>
-      (obj .:? "CognitoIdentityProviders") <*>
-      (obj .:? "CognitoStreams") <*>
-      (obj .:? "DeveloperProviderName") <*>
-      (obj .:? "IdentityPoolName") <*>
-      (obj .:? "OpenIdConnectProviderARNs") <*>
-      (obj .:? "PushSync") <*>
-      (obj .:? "SamlProviderARNs") <*>
-      (obj .:? "SupportedLoginProviders")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoIdentityPool' containing required fields as
 -- arguments.
 cognitoIdentityPool
diff --git a/library-gen/Stratosphere/Resources/CognitoIdentityPoolRoleAttachment.hs b/library-gen/Stratosphere/Resources/CognitoIdentityPoolRoleAttachment.hs
--- a/library-gen/Stratosphere/Resources/CognitoIdentityPoolRoleAttachment.hs
+++ b/library-gen/Stratosphere/Resources/CognitoIdentityPoolRoleAttachment.hs
@@ -27,14 +27,6 @@
     , fmap (("Roles",) . toJSON) _cognitoIdentityPoolRoleAttachmentRoles
     ]
 
-instance FromJSON CognitoIdentityPoolRoleAttachment where
-  parseJSON (Object obj) =
-    CognitoIdentityPoolRoleAttachment <$>
-      (obj .: "IdentityPoolId") <*>
-      (obj .:? "RoleMappings") <*>
-      (obj .:? "Roles")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoIdentityPoolRoleAttachment' containing required
 -- fields as arguments.
 cognitoIdentityPoolRoleAttachment
diff --git a/library-gen/Stratosphere/Resources/CognitoUserPool.hs b/library-gen/Stratosphere/Resources/CognitoUserPool.hs
--- a/library-gen/Stratosphere/Resources/CognitoUserPool.hs
+++ b/library-gen/Stratosphere/Resources/CognitoUserPool.hs
@@ -61,28 +61,6 @@
     , fmap (("UsernameAttributes",) . toJSON) _cognitoUserPoolUsernameAttributes
     ]
 
-instance FromJSON CognitoUserPool where
-  parseJSON (Object obj) =
-    CognitoUserPool <$>
-      (obj .:? "AdminCreateUserConfig") <*>
-      (obj .:? "AliasAttributes") <*>
-      (obj .:? "AutoVerifiedAttributes") <*>
-      (obj .:? "DeviceConfiguration") <*>
-      (obj .:? "EmailConfiguration") <*>
-      (obj .:? "EmailVerificationMessage") <*>
-      (obj .:? "EmailVerificationSubject") <*>
-      (obj .:? "LambdaConfig") <*>
-      (obj .:? "MfaConfiguration") <*>
-      (obj .:? "Policies") <*>
-      (obj .:? "Schema") <*>
-      (obj .:? "SmsAuthenticationMessage") <*>
-      (obj .:? "SmsConfiguration") <*>
-      (obj .:? "SmsVerificationMessage") <*>
-      (obj .:? "UserPoolName") <*>
-      (obj .:? "UserPoolTags") <*>
-      (obj .:? "UsernameAttributes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPool' containing required fields as
 -- arguments.
 cognitoUserPool
diff --git a/library-gen/Stratosphere/Resources/CognitoUserPoolClient.hs b/library-gen/Stratosphere/Resources/CognitoUserPoolClient.hs
--- a/library-gen/Stratosphere/Resources/CognitoUserPoolClient.hs
+++ b/library-gen/Stratosphere/Resources/CognitoUserPoolClient.hs
@@ -35,18 +35,6 @@
     , fmap (("WriteAttributes",) . toJSON) _cognitoUserPoolClientWriteAttributes
     ]
 
-instance FromJSON CognitoUserPoolClient where
-  parseJSON (Object obj) =
-    CognitoUserPoolClient <$>
-      (obj .:? "ClientName") <*>
-      (obj .:? "ExplicitAuthFlows") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "GenerateSecret") <*>
-      (obj .:? "ReadAttributes") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "RefreshTokenValidity") <*>
-      (obj .: "UserPoolId") <*>
-      (obj .:? "WriteAttributes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolClient' containing required fields as
 -- arguments.
 cognitoUserPoolClient
diff --git a/library-gen/Stratosphere/Resources/CognitoUserPoolGroup.hs b/library-gen/Stratosphere/Resources/CognitoUserPoolGroup.hs
--- a/library-gen/Stratosphere/Resources/CognitoUserPoolGroup.hs
+++ b/library-gen/Stratosphere/Resources/CognitoUserPoolGroup.hs
@@ -31,16 +31,6 @@
     , (Just . ("UserPoolId",) . toJSON) _cognitoUserPoolGroupUserPoolId
     ]
 
-instance FromJSON CognitoUserPoolGroup where
-  parseJSON (Object obj) =
-    CognitoUserPoolGroup <$>
-      (obj .:? "Description") <*>
-      (obj .:? "GroupName") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "Precedence") <*>
-      (obj .:? "RoleArn") <*>
-      (obj .: "UserPoolId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolGroup' containing required fields as
 -- arguments.
 cognitoUserPoolGroup
diff --git a/library-gen/Stratosphere/Resources/CognitoUserPoolUser.hs b/library-gen/Stratosphere/Resources/CognitoUserPoolUser.hs
--- a/library-gen/Stratosphere/Resources/CognitoUserPoolUser.hs
+++ b/library-gen/Stratosphere/Resources/CognitoUserPoolUser.hs
@@ -35,18 +35,6 @@
     , fmap (("ValidationData",) . toJSON) _cognitoUserPoolUserValidationData
     ]
 
-instance FromJSON CognitoUserPoolUser where
-  parseJSON (Object obj) =
-    CognitoUserPoolUser <$>
-      (obj .:? "DesiredDeliveryMediums") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ForceAliasCreation") <*>
-      (obj .:? "MessageAction") <*>
-      (obj .:? "UserAttributes") <*>
-      (obj .: "UserPoolId") <*>
-      (obj .:? "Username") <*>
-      (obj .:? "ValidationData")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolUser' containing required fields as
 -- arguments.
 cognitoUserPoolUser
diff --git a/library-gen/Stratosphere/Resources/CognitoUserPoolUserToGroupAttachment.hs b/library-gen/Stratosphere/Resources/CognitoUserPoolUserToGroupAttachment.hs
--- a/library-gen/Stratosphere/Resources/CognitoUserPoolUserToGroupAttachment.hs
+++ b/library-gen/Stratosphere/Resources/CognitoUserPoolUserToGroupAttachment.hs
@@ -27,14 +27,6 @@
     , (Just . ("Username",) . toJSON) _cognitoUserPoolUserToGroupAttachmentUsername
     ]
 
-instance FromJSON CognitoUserPoolUserToGroupAttachment where
-  parseJSON (Object obj) =
-    CognitoUserPoolUserToGroupAttachment <$>
-      (obj .: "GroupName") <*>
-      (obj .: "UserPoolId") <*>
-      (obj .: "Username")
-  parseJSON _ = mempty
-
 -- | Constructor for 'CognitoUserPoolUserToGroupAttachment' containing
 -- required fields as arguments.
 cognitoUserPoolUserToGroupAttachment
diff --git a/library-gen/Stratosphere/Resources/ConfigAggregationAuthorization.hs b/library-gen/Stratosphere/Resources/ConfigAggregationAuthorization.hs
--- a/library-gen/Stratosphere/Resources/ConfigAggregationAuthorization.hs
+++ b/library-gen/Stratosphere/Resources/ConfigAggregationAuthorization.hs
@@ -25,13 +25,6 @@
     , (Just . ("AuthorizedAwsRegion",) . toJSON) _configAggregationAuthorizationAuthorizedAwsRegion
     ]
 
-instance FromJSON ConfigAggregationAuthorization where
-  parseJSON (Object obj) =
-    ConfigAggregationAuthorization <$>
-      (obj .: "AuthorizedAccountId") <*>
-      (obj .: "AuthorizedAwsRegion")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ConfigAggregationAuthorization' containing required
 -- fields as arguments.
 configAggregationAuthorization
diff --git a/library-gen/Stratosphere/Resources/ConfigConfigRule.hs b/library-gen/Stratosphere/Resources/ConfigConfigRule.hs
--- a/library-gen/Stratosphere/Resources/ConfigConfigRule.hs
+++ b/library-gen/Stratosphere/Resources/ConfigConfigRule.hs
@@ -34,17 +34,6 @@
     , (Just . ("Source",) . toJSON) _configConfigRuleSource
     ]
 
-instance FromJSON ConfigConfigRule where
-  parseJSON (Object obj) =
-    ConfigConfigRule <$>
-      (obj .:? "ConfigRuleName") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "InputParameters") <*>
-      (obj .:? "MaximumExecutionFrequency") <*>
-      (obj .:? "Scope") <*>
-      (obj .: "Source")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ConfigConfigRule' containing required fields as
 -- arguments.
 configConfigRule
diff --git a/library-gen/Stratosphere/Resources/ConfigConfigurationAggregator.hs b/library-gen/Stratosphere/Resources/ConfigConfigurationAggregator.hs
--- a/library-gen/Stratosphere/Resources/ConfigConfigurationAggregator.hs
+++ b/library-gen/Stratosphere/Resources/ConfigConfigurationAggregator.hs
@@ -28,14 +28,6 @@
     , fmap (("OrganizationAggregationSource",) . toJSON) _configConfigurationAggregatorOrganizationAggregationSource
     ]
 
-instance FromJSON ConfigConfigurationAggregator where
-  parseJSON (Object obj) =
-    ConfigConfigurationAggregator <$>
-      (obj .:? "AccountAggregationSources") <*>
-      (obj .: "ConfigurationAggregatorName") <*>
-      (obj .:? "OrganizationAggregationSource")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ConfigConfigurationAggregator' containing required
 -- fields as arguments.
 configConfigurationAggregator
diff --git a/library-gen/Stratosphere/Resources/ConfigConfigurationRecorder.hs b/library-gen/Stratosphere/Resources/ConfigConfigurationRecorder.hs
--- a/library-gen/Stratosphere/Resources/ConfigConfigurationRecorder.hs
+++ b/library-gen/Stratosphere/Resources/ConfigConfigurationRecorder.hs
@@ -27,14 +27,6 @@
     , (Just . ("RoleARN",) . toJSON) _configConfigurationRecorderRoleARN
     ]
 
-instance FromJSON ConfigConfigurationRecorder where
-  parseJSON (Object obj) =
-    ConfigConfigurationRecorder <$>
-      (obj .:? "Name") <*>
-      (obj .:? "RecordingGroup") <*>
-      (obj .: "RoleARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ConfigConfigurationRecorder' containing required fields
 -- as arguments.
 configConfigurationRecorder
diff --git a/library-gen/Stratosphere/Resources/ConfigDeliveryChannel.hs b/library-gen/Stratosphere/Resources/ConfigDeliveryChannel.hs
--- a/library-gen/Stratosphere/Resources/ConfigDeliveryChannel.hs
+++ b/library-gen/Stratosphere/Resources/ConfigDeliveryChannel.hs
@@ -31,16 +31,6 @@
     , fmap (("SnsTopicARN",) . toJSON) _configDeliveryChannelSnsTopicARN
     ]
 
-instance FromJSON ConfigDeliveryChannel where
-  parseJSON (Object obj) =
-    ConfigDeliveryChannel <$>
-      (obj .:? "ConfigSnapshotDeliveryProperties") <*>
-      (obj .:? "Name") <*>
-      (obj .: "S3BucketName") <*>
-      (obj .:? "S3KeyPrefix") <*>
-      (obj .:? "SnsTopicARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ConfigDeliveryChannel' containing required fields as
 -- arguments.
 configDeliveryChannel
diff --git a/library-gen/Stratosphere/Resources/DAXCluster.hs b/library-gen/Stratosphere/Resources/DAXCluster.hs
--- a/library-gen/Stratosphere/Resources/DAXCluster.hs
+++ b/library-gen/Stratosphere/Resources/DAXCluster.hs
@@ -47,24 +47,6 @@
     , fmap (("Tags",) . toJSON) _dAXClusterTags
     ]
 
-instance FromJSON DAXCluster where
-  parseJSON (Object obj) =
-    DAXCluster <$>
-      (obj .:? "AvailabilityZones") <*>
-      (obj .:? "ClusterName") <*>
-      (obj .:? "Description") <*>
-      (obj .: "IAMRoleARN") <*>
-      (obj .: "NodeType") <*>
-      (obj .:? "NotificationTopicARN") <*>
-      (obj .:? "ParameterGroupName") <*>
-      (obj .:? "PreferredMaintenanceWindow") <*>
-      fmap (fmap unInteger') (obj .: "ReplicationFactor") <*>
-      (obj .:? "SSESpecification") <*>
-      (obj .:? "SecurityGroupIds") <*>
-      (obj .:? "SubnetGroupName") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DAXCluster' containing required fields as arguments.
 daxCluster
   :: Val Text -- ^ 'daxcIAMRoleARN'
diff --git a/library-gen/Stratosphere/Resources/DAXParameterGroup.hs b/library-gen/Stratosphere/Resources/DAXParameterGroup.hs
--- a/library-gen/Stratosphere/Resources/DAXParameterGroup.hs
+++ b/library-gen/Stratosphere/Resources/DAXParameterGroup.hs
@@ -27,14 +27,6 @@
     , fmap (("ParameterNameValues",) . toJSON) _dAXParameterGroupParameterNameValues
     ]
 
-instance FromJSON DAXParameterGroup where
-  parseJSON (Object obj) =
-    DAXParameterGroup <$>
-      (obj .:? "Description") <*>
-      (obj .:? "ParameterGroupName") <*>
-      (obj .:? "ParameterNameValues")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DAXParameterGroup' containing required fields as
 -- arguments.
 daxParameterGroup
diff --git a/library-gen/Stratosphere/Resources/DAXSubnetGroup.hs b/library-gen/Stratosphere/Resources/DAXSubnetGroup.hs
--- a/library-gen/Stratosphere/Resources/DAXSubnetGroup.hs
+++ b/library-gen/Stratosphere/Resources/DAXSubnetGroup.hs
@@ -27,14 +27,6 @@
     , (Just . ("SubnetIds",) . toJSON) _dAXSubnetGroupSubnetIds
     ]
 
-instance FromJSON DAXSubnetGroup where
-  parseJSON (Object obj) =
-    DAXSubnetGroup <$>
-      (obj .:? "Description") <*>
-      (obj .:? "SubnetGroupName") <*>
-      (obj .: "SubnetIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DAXSubnetGroup' containing required fields as arguments.
 daxSubnetGroup
   :: ValList Text -- ^ 'daxsgSubnetIds'
diff --git a/library-gen/Stratosphere/Resources/DLMLifecyclePolicy.hs b/library-gen/Stratosphere/Resources/DLMLifecyclePolicy.hs
--- a/library-gen/Stratosphere/Resources/DLMLifecyclePolicy.hs
+++ b/library-gen/Stratosphere/Resources/DLMLifecyclePolicy.hs
@@ -29,15 +29,6 @@
     , fmap (("State",) . toJSON) _dLMLifecyclePolicyState
     ]
 
-instance FromJSON DLMLifecyclePolicy where
-  parseJSON (Object obj) =
-    DLMLifecyclePolicy <$>
-      (obj .:? "Description") <*>
-      (obj .:? "ExecutionRoleArn") <*>
-      (obj .:? "PolicyDetails") <*>
-      (obj .:? "State")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DLMLifecyclePolicy' containing required fields as
 -- arguments.
 dlmLifecyclePolicy
diff --git a/library-gen/Stratosphere/Resources/DMSCertificate.hs b/library-gen/Stratosphere/Resources/DMSCertificate.hs
--- a/library-gen/Stratosphere/Resources/DMSCertificate.hs
+++ b/library-gen/Stratosphere/Resources/DMSCertificate.hs
@@ -27,14 +27,6 @@
     , fmap (("CertificateWallet",) . toJSON) _dMSCertificateCertificateWallet
     ]
 
-instance FromJSON DMSCertificate where
-  parseJSON (Object obj) =
-    DMSCertificate <$>
-      (obj .:? "CertificateIdentifier") <*>
-      (obj .:? "CertificatePem") <*>
-      (obj .:? "CertificateWallet")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DMSCertificate' containing required fields as arguments.
 dmsCertificate
   :: DMSCertificate
diff --git a/library-gen/Stratosphere/Resources/DMSEndpoint.hs b/library-gen/Stratosphere/Resources/DMSEndpoint.hs
--- a/library-gen/Stratosphere/Resources/DMSEndpoint.hs
+++ b/library-gen/Stratosphere/Resources/DMSEndpoint.hs
@@ -62,29 +62,6 @@
     , fmap (("Username",) . toJSON) _dMSEndpointUsername
     ]
 
-instance FromJSON DMSEndpoint where
-  parseJSON (Object obj) =
-    DMSEndpoint <$>
-      (obj .:? "CertificateArn") <*>
-      (obj .:? "DatabaseName") <*>
-      (obj .:? "DynamoDbSettings") <*>
-      (obj .:? "ElasticsearchSettings") <*>
-      (obj .:? "EndpointIdentifier") <*>
-      (obj .: "EndpointType") <*>
-      (obj .: "EngineName") <*>
-      (obj .:? "ExtraConnectionAttributes") <*>
-      (obj .:? "KinesisSettings") <*>
-      (obj .:? "KmsKeyId") <*>
-      (obj .:? "MongoDbSettings") <*>
-      (obj .:? "Password") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Port") <*>
-      (obj .:? "S3Settings") <*>
-      (obj .:? "ServerName") <*>
-      (obj .:? "SslMode") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "Username")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DMSEndpoint' containing required fields as arguments.
 dmsEndpoint
   :: Val Text -- ^ 'dmseEndpointType'
diff --git a/library-gen/Stratosphere/Resources/DMSEventSubscription.hs b/library-gen/Stratosphere/Resources/DMSEventSubscription.hs
--- a/library-gen/Stratosphere/Resources/DMSEventSubscription.hs
+++ b/library-gen/Stratosphere/Resources/DMSEventSubscription.hs
@@ -35,18 +35,6 @@
     , fmap (("Tags",) . toJSON) _dMSEventSubscriptionTags
     ]
 
-instance FromJSON DMSEventSubscription where
-  parseJSON (Object obj) =
-    DMSEventSubscription <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      (obj .:? "EventCategories") <*>
-      (obj .: "SnsTopicArn") <*>
-      (obj .:? "SourceIds") <*>
-      (obj .:? "SourceType") <*>
-      (obj .:? "SubscriptionName") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DMSEventSubscription' containing required fields as
 -- arguments.
 dmsEventSubscription
diff --git a/library-gen/Stratosphere/Resources/DMSReplicationInstance.hs b/library-gen/Stratosphere/Resources/DMSReplicationInstance.hs
--- a/library-gen/Stratosphere/Resources/DMSReplicationInstance.hs
+++ b/library-gen/Stratosphere/Resources/DMSReplicationInstance.hs
@@ -49,25 +49,6 @@
     , fmap (("VpcSecurityGroupIds",) . toJSON) _dMSReplicationInstanceVpcSecurityGroupIds
     ]
 
-instance FromJSON DMSReplicationInstance where
-  parseJSON (Object obj) =
-    DMSReplicationInstance <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "AllocatedStorage") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "AllowMajorVersionUpgrade") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "AutoMinorVersionUpgrade") <*>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .:? "EngineVersion") <*>
-      (obj .:? "KmsKeyId") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "MultiAZ") <*>
-      (obj .:? "PreferredMaintenanceWindow") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "PubliclyAccessible") <*>
-      (obj .: "ReplicationInstanceClass") <*>
-      (obj .:? "ReplicationInstanceIdentifier") <*>
-      (obj .:? "ReplicationSubnetGroupIdentifier") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "VpcSecurityGroupIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DMSReplicationInstance' containing required fields as
 -- arguments.
 dmsReplicationInstance
diff --git a/library-gen/Stratosphere/Resources/DMSReplicationSubnetGroup.hs b/library-gen/Stratosphere/Resources/DMSReplicationSubnetGroup.hs
--- a/library-gen/Stratosphere/Resources/DMSReplicationSubnetGroup.hs
+++ b/library-gen/Stratosphere/Resources/DMSReplicationSubnetGroup.hs
@@ -29,15 +29,6 @@
     , fmap (("Tags",) . toJSON) _dMSReplicationSubnetGroupTags
     ]
 
-instance FromJSON DMSReplicationSubnetGroup where
-  parseJSON (Object obj) =
-    DMSReplicationSubnetGroup <$>
-      (obj .: "ReplicationSubnetGroupDescription") <*>
-      (obj .:? "ReplicationSubnetGroupIdentifier") <*>
-      (obj .: "SubnetIds") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DMSReplicationSubnetGroup' containing required fields as
 -- arguments.
 dmsReplicationSubnetGroup
diff --git a/library-gen/Stratosphere/Resources/DMSReplicationTask.hs b/library-gen/Stratosphere/Resources/DMSReplicationTask.hs
--- a/library-gen/Stratosphere/Resources/DMSReplicationTask.hs
+++ b/library-gen/Stratosphere/Resources/DMSReplicationTask.hs
@@ -39,20 +39,6 @@
     , (Just . ("TargetEndpointArn",) . toJSON) _dMSReplicationTaskTargetEndpointArn
     ]
 
-instance FromJSON DMSReplicationTask where
-  parseJSON (Object obj) =
-    DMSReplicationTask <$>
-      fmap (fmap (fmap unDouble')) (obj .:? "CdcStartTime") <*>
-      (obj .: "MigrationType") <*>
-      (obj .: "ReplicationInstanceArn") <*>
-      (obj .:? "ReplicationTaskIdentifier") <*>
-      (obj .:? "ReplicationTaskSettings") <*>
-      (obj .: "SourceEndpointArn") <*>
-      (obj .: "TableMappings") <*>
-      (obj .:? "Tags") <*>
-      (obj .: "TargetEndpointArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DMSReplicationTask' containing required fields as
 -- arguments.
 dmsReplicationTask
diff --git a/library-gen/Stratosphere/Resources/DataPipelinePipeline.hs b/library-gen/Stratosphere/Resources/DataPipelinePipeline.hs
--- a/library-gen/Stratosphere/Resources/DataPipelinePipeline.hs
+++ b/library-gen/Stratosphere/Resources/DataPipelinePipeline.hs
@@ -38,18 +38,6 @@
     , fmap (("PipelineTags",) . toJSON) _dataPipelinePipelinePipelineTags
     ]
 
-instance FromJSON DataPipelinePipeline where
-  parseJSON (Object obj) =
-    DataPipelinePipeline <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Activate") <*>
-      (obj .:? "Description") <*>
-      (obj .: "Name") <*>
-      (obj .: "ParameterObjects") <*>
-      (obj .:? "ParameterValues") <*>
-      (obj .:? "PipelineObjects") <*>
-      (obj .:? "PipelineTags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DataPipelinePipeline' containing required fields as
 -- arguments.
 dataPipelinePipeline
diff --git a/library-gen/Stratosphere/Resources/DirectoryServiceMicrosoftAD.hs b/library-gen/Stratosphere/Resources/DirectoryServiceMicrosoftAD.hs
--- a/library-gen/Stratosphere/Resources/DirectoryServiceMicrosoftAD.hs
+++ b/library-gen/Stratosphere/Resources/DirectoryServiceMicrosoftAD.hs
@@ -35,18 +35,6 @@
     , (Just . ("VpcSettings",) . toJSON) _directoryServiceMicrosoftADVpcSettings
     ]
 
-instance FromJSON DirectoryServiceMicrosoftAD where
-  parseJSON (Object obj) =
-    DirectoryServiceMicrosoftAD <$>
-      fmap (fmap (fmap unBool')) (obj .:? "CreateAlias") <*>
-      (obj .:? "Edition") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnableSso") <*>
-      (obj .: "Name") <*>
-      (obj .: "Password") <*>
-      (obj .:? "ShortName") <*>
-      (obj .: "VpcSettings")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DirectoryServiceMicrosoftAD' containing required fields
 -- as arguments.
 directoryServiceMicrosoftAD
diff --git a/library-gen/Stratosphere/Resources/DirectoryServiceSimpleAD.hs b/library-gen/Stratosphere/Resources/DirectoryServiceSimpleAD.hs
--- a/library-gen/Stratosphere/Resources/DirectoryServiceSimpleAD.hs
+++ b/library-gen/Stratosphere/Resources/DirectoryServiceSimpleAD.hs
@@ -37,19 +37,6 @@
     , (Just . ("VpcSettings",) . toJSON) _directoryServiceSimpleADVpcSettings
     ]
 
-instance FromJSON DirectoryServiceSimpleAD where
-  parseJSON (Object obj) =
-    DirectoryServiceSimpleAD <$>
-      fmap (fmap (fmap unBool')) (obj .:? "CreateAlias") <*>
-      (obj .:? "Description") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnableSso") <*>
-      (obj .: "Name") <*>
-      (obj .: "Password") <*>
-      (obj .:? "ShortName") <*>
-      (obj .: "Size") <*>
-      (obj .: "VpcSettings")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DirectoryServiceSimpleAD' containing required fields as
 -- arguments.
 directoryServiceSimpleAD
diff --git a/library-gen/Stratosphere/Resources/DocDBDBCluster.hs b/library-gen/Stratosphere/Resources/DocDBDBCluster.hs
--- a/library-gen/Stratosphere/Resources/DocDBDBCluster.hs
+++ b/library-gen/Stratosphere/Resources/DocDBDBCluster.hs
@@ -53,27 +53,6 @@
     , fmap (("VpcSecurityGroupIds",) . toJSON) _docDBDBClusterVpcSecurityGroupIds
     ]
 
-instance FromJSON DocDBDBCluster where
-  parseJSON (Object obj) =
-    DocDBDBCluster <$>
-      (obj .:? "AvailabilityZones") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "BackupRetentionPeriod") <*>
-      (obj .:? "DBClusterIdentifier") <*>
-      (obj .:? "DBClusterParameterGroupName") <*>
-      (obj .:? "DBSubnetGroupName") <*>
-      (obj .:? "EngineVersion") <*>
-      (obj .:? "KmsKeyId") <*>
-      (obj .:? "MasterUserPassword") <*>
-      (obj .:? "MasterUsername") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Port") <*>
-      (obj .:? "PreferredBackupWindow") <*>
-      (obj .:? "PreferredMaintenanceWindow") <*>
-      (obj .:? "SnapshotIdentifier") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "StorageEncrypted") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "VpcSecurityGroupIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DocDBDBCluster' containing required fields as arguments.
 docDBDBCluster
   :: DocDBDBCluster
diff --git a/library-gen/Stratosphere/Resources/DocDBDBClusterParameterGroup.hs b/library-gen/Stratosphere/Resources/DocDBDBClusterParameterGroup.hs
--- a/library-gen/Stratosphere/Resources/DocDBDBClusterParameterGroup.hs
+++ b/library-gen/Stratosphere/Resources/DocDBDBClusterParameterGroup.hs
@@ -31,16 +31,6 @@
     , fmap (("Tags",) . toJSON) _docDBDBClusterParameterGroupTags
     ]
 
-instance FromJSON DocDBDBClusterParameterGroup where
-  parseJSON (Object obj) =
-    DocDBDBClusterParameterGroup <$>
-      (obj .: "Description") <*>
-      (obj .: "Family") <*>
-      (obj .:? "Name") <*>
-      (obj .: "Parameters") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DocDBDBClusterParameterGroup' containing required fields
 -- as arguments.
 docDBDBClusterParameterGroup
diff --git a/library-gen/Stratosphere/Resources/DocDBDBInstance.hs b/library-gen/Stratosphere/Resources/DocDBDBInstance.hs
--- a/library-gen/Stratosphere/Resources/DocDBDBInstance.hs
+++ b/library-gen/Stratosphere/Resources/DocDBDBInstance.hs
@@ -35,18 +35,6 @@
     , fmap (("Tags",) . toJSON) _docDBDBInstanceTags
     ]
 
-instance FromJSON DocDBDBInstance where
-  parseJSON (Object obj) =
-    DocDBDBInstance <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AutoMinorVersionUpgrade") <*>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .: "DBClusterIdentifier") <*>
-      (obj .: "DBInstanceClass") <*>
-      (obj .:? "DBInstanceIdentifier") <*>
-      (obj .:? "PreferredMaintenanceWindow") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DocDBDBInstance' containing required fields as
 -- arguments.
 docDBDBInstance
diff --git a/library-gen/Stratosphere/Resources/DocDBDBSubnetGroup.hs b/library-gen/Stratosphere/Resources/DocDBDBSubnetGroup.hs
--- a/library-gen/Stratosphere/Resources/DocDBDBSubnetGroup.hs
+++ b/library-gen/Stratosphere/Resources/DocDBDBSubnetGroup.hs
@@ -29,15 +29,6 @@
     , fmap (("Tags",) . toJSON) _docDBDBSubnetGroupTags
     ]
 
-instance FromJSON DocDBDBSubnetGroup where
-  parseJSON (Object obj) =
-    DocDBDBSubnetGroup <$>
-      (obj .: "DBSubnetGroupDescription") <*>
-      (obj .:? "DBSubnetGroupName") <*>
-      (obj .: "SubnetIds") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DocDBDBSubnetGroup' containing required fields as
 -- arguments.
 docDBDBSubnetGroup
diff --git a/library-gen/Stratosphere/Resources/DynamoDBTable.hs b/library-gen/Stratosphere/Resources/DynamoDBTable.hs
--- a/library-gen/Stratosphere/Resources/DynamoDBTable.hs
+++ b/library-gen/Stratosphere/Resources/DynamoDBTable.hs
@@ -54,23 +54,6 @@
     , fmap (("TimeToLiveSpecification",) . toJSON) _dynamoDBTableTimeToLiveSpecification
     ]
 
-instance FromJSON DynamoDBTable where
-  parseJSON (Object obj) =
-    DynamoDBTable <$>
-      (obj .:? "AttributeDefinitions") <*>
-      (obj .:? "BillingMode") <*>
-      (obj .:? "GlobalSecondaryIndexes") <*>
-      (obj .: "KeySchema") <*>
-      (obj .:? "LocalSecondaryIndexes") <*>
-      (obj .:? "PointInTimeRecoverySpecification") <*>
-      (obj .:? "ProvisionedThroughput") <*>
-      (obj .:? "SSESpecification") <*>
-      (obj .:? "StreamSpecification") <*>
-      (obj .:? "TableName") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "TimeToLiveSpecification")
-  parseJSON _ = mempty
-
 -- | Constructor for 'DynamoDBTable' containing required fields as arguments.
 dynamoDBTable
   :: [DynamoDBTableKeySchema] -- ^ 'ddbtKeySchema'
diff --git a/library-gen/Stratosphere/Resources/EC2CustomerGateway.hs b/library-gen/Stratosphere/Resources/EC2CustomerGateway.hs
--- a/library-gen/Stratosphere/Resources/EC2CustomerGateway.hs
+++ b/library-gen/Stratosphere/Resources/EC2CustomerGateway.hs
@@ -29,15 +29,6 @@
     , (Just . ("Type",) . toJSON) _eC2CustomerGatewayType
     ]
 
-instance FromJSON EC2CustomerGateway where
-  parseJSON (Object obj) =
-    EC2CustomerGateway <$>
-      fmap (fmap unInteger') (obj .: "BgpAsn") <*>
-      (obj .: "IpAddress") <*>
-      (obj .:? "Tags") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2CustomerGateway' containing required fields as
 -- arguments.
 ec2CustomerGateway
diff --git a/library-gen/Stratosphere/Resources/EC2DHCPOptions.hs b/library-gen/Stratosphere/Resources/EC2DHCPOptions.hs
--- a/library-gen/Stratosphere/Resources/EC2DHCPOptions.hs
+++ b/library-gen/Stratosphere/Resources/EC2DHCPOptions.hs
@@ -33,17 +33,6 @@
     , fmap (("Tags",) . toJSON) _eC2DHCPOptionsTags
     ]
 
-instance FromJSON EC2DHCPOptions where
-  parseJSON (Object obj) =
-    EC2DHCPOptions <$>
-      (obj .:? "DomainName") <*>
-      (obj .:? "DomainNameServers") <*>
-      (obj .:? "NetbiosNameServers") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "NetbiosNodeType") <*>
-      (obj .:? "NtpServers") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2DHCPOptions' containing required fields as arguments.
 ec2DHCPOptions
   :: EC2DHCPOptions
diff --git a/library-gen/Stratosphere/Resources/EC2EC2Fleet.hs b/library-gen/Stratosphere/Resources/EC2EC2Fleet.hs
--- a/library-gen/Stratosphere/Resources/EC2EC2Fleet.hs
+++ b/library-gen/Stratosphere/Resources/EC2EC2Fleet.hs
@@ -47,22 +47,6 @@
     , fmap (("ValidUntil",) . toJSON) _eC2EC2FleetValidUntil
     ]
 
-instance FromJSON EC2EC2Fleet where
-  parseJSON (Object obj) =
-    EC2EC2Fleet <$>
-      (obj .:? "ExcessCapacityTerminationPolicy") <*>
-      (obj .: "LaunchTemplateConfigs") <*>
-      (obj .:? "OnDemandOptions") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ReplaceUnhealthyInstances") <*>
-      (obj .:? "SpotOptions") <*>
-      (obj .:? "TagSpecifications") <*>
-      (obj .: "TargetCapacitySpecification") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "TerminateInstancesWithExpiration") <*>
-      (obj .:? "Type") <*>
-      (obj .:? "ValidFrom") <*>
-      (obj .:? "ValidUntil")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2EC2Fleet' containing required fields as arguments.
 ec2EC2Fleet
   :: [EC2EC2FleetFleetLaunchTemplateConfigRequest] -- ^ 'ececfLaunchTemplateConfigs'
diff --git a/library-gen/Stratosphere/Resources/EC2EIP.hs b/library-gen/Stratosphere/Resources/EC2EIP.hs
--- a/library-gen/Stratosphere/Resources/EC2EIP.hs
+++ b/library-gen/Stratosphere/Resources/EC2EIP.hs
@@ -27,14 +27,6 @@
     , fmap (("PublicIpv4Pool",) . toJSON) _eC2EIPPublicIpv4Pool
     ]
 
-instance FromJSON EC2EIP where
-  parseJSON (Object obj) =
-    EC2EIP <$>
-      (obj .:? "Domain") <*>
-      (obj .:? "InstanceId") <*>
-      (obj .:? "PublicIpv4Pool")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2EIP' containing required fields as arguments.
 ec2EIP
   :: EC2EIP
diff --git a/library-gen/Stratosphere/Resources/EC2EIPAssociation.hs b/library-gen/Stratosphere/Resources/EC2EIPAssociation.hs
--- a/library-gen/Stratosphere/Resources/EC2EIPAssociation.hs
+++ b/library-gen/Stratosphere/Resources/EC2EIPAssociation.hs
@@ -31,16 +31,6 @@
     , fmap (("PrivateIpAddress",) . toJSON) _eC2EIPAssociationPrivateIpAddress
     ]
 
-instance FromJSON EC2EIPAssociation where
-  parseJSON (Object obj) =
-    EC2EIPAssociation <$>
-      (obj .:? "AllocationId") <*>
-      (obj .:? "EIP") <*>
-      (obj .:? "InstanceId") <*>
-      (obj .:? "NetworkInterfaceId") <*>
-      (obj .:? "PrivateIpAddress")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2EIPAssociation' containing required fields as
 -- arguments.
 ec2EIPAssociation
diff --git a/library-gen/Stratosphere/Resources/EC2EgressOnlyInternetGateway.hs b/library-gen/Stratosphere/Resources/EC2EgressOnlyInternetGateway.hs
--- a/library-gen/Stratosphere/Resources/EC2EgressOnlyInternetGateway.hs
+++ b/library-gen/Stratosphere/Resources/EC2EgressOnlyInternetGateway.hs
@@ -23,12 +23,6 @@
     [ (Just . ("VpcId",) . toJSON) _eC2EgressOnlyInternetGatewayVpcId
     ]
 
-instance FromJSON EC2EgressOnlyInternetGateway where
-  parseJSON (Object obj) =
-    EC2EgressOnlyInternetGateway <$>
-      (obj .: "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2EgressOnlyInternetGateway' containing required fields
 -- as arguments.
 ec2EgressOnlyInternetGateway
diff --git a/library-gen/Stratosphere/Resources/EC2FlowLog.hs b/library-gen/Stratosphere/Resources/EC2FlowLog.hs
--- a/library-gen/Stratosphere/Resources/EC2FlowLog.hs
+++ b/library-gen/Stratosphere/Resources/EC2FlowLog.hs
@@ -35,18 +35,6 @@
     , (Just . ("TrafficType",) . toJSON) _eC2FlowLogTrafficType
     ]
 
-instance FromJSON EC2FlowLog where
-  parseJSON (Object obj) =
-    EC2FlowLog <$>
-      (obj .:? "DeliverLogsPermissionArn") <*>
-      (obj .:? "LogDestination") <*>
-      (obj .:? "LogDestinationType") <*>
-      (obj .:? "LogGroupName") <*>
-      (obj .: "ResourceId") <*>
-      (obj .: "ResourceType") <*>
-      (obj .: "TrafficType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2FlowLog' containing required fields as arguments.
 ec2FlowLog
   :: Val Text -- ^ 'ecflResourceId'
diff --git a/library-gen/Stratosphere/Resources/EC2Host.hs b/library-gen/Stratosphere/Resources/EC2Host.hs
--- a/library-gen/Stratosphere/Resources/EC2Host.hs
+++ b/library-gen/Stratosphere/Resources/EC2Host.hs
@@ -27,14 +27,6 @@
     , (Just . ("InstanceType",) . toJSON) _eC2HostInstanceType
     ]
 
-instance FromJSON EC2Host where
-  parseJSON (Object obj) =
-    EC2Host <$>
-      (obj .:? "AutoPlacement") <*>
-      (obj .: "AvailabilityZone") <*>
-      (obj .: "InstanceType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2Host' containing required fields as arguments.
 ec2Host
   :: Val Text -- ^ 'echAvailabilityZone'
diff --git a/library-gen/Stratosphere/Resources/EC2Instance.hs b/library-gen/Stratosphere/Resources/EC2Instance.hs
--- a/library-gen/Stratosphere/Resources/EC2Instance.hs
+++ b/library-gen/Stratosphere/Resources/EC2Instance.hs
@@ -99,45 +99,6 @@
     , fmap (("Volumes",) . toJSON) _eC2InstanceVolumes
     ]
 
-instance FromJSON EC2Instance where
-  parseJSON (Object obj) =
-    EC2Instance <$>
-      (obj .:? "AdditionalInfo") <*>
-      (obj .:? "Affinity") <*>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .:? "BlockDeviceMappings") <*>
-      (obj .:? "CreditSpecification") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DisableApiTermination") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EbsOptimized") <*>
-      (obj .:? "ElasticGpuSpecifications") <*>
-      (obj .:? "ElasticInferenceAccelerators") <*>
-      (obj .:? "HostId") <*>
-      (obj .:? "IamInstanceProfile") <*>
-      (obj .:? "ImageId") <*>
-      (obj .:? "InstanceInitiatedShutdownBehavior") <*>
-      (obj .:? "InstanceType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Ipv6AddressCount") <*>
-      (obj .:? "Ipv6Addresses") <*>
-      (obj .:? "KernelId") <*>
-      (obj .:? "KeyName") <*>
-      (obj .:? "LaunchTemplate") <*>
-      (obj .:? "LicenseSpecifications") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Monitoring") <*>
-      (obj .:? "NetworkInterfaces") <*>
-      (obj .:? "PlacementGroupName") <*>
-      (obj .:? "PrivateIpAddress") <*>
-      (obj .:? "RamdiskId") <*>
-      (obj .:? "SecurityGroupIds") <*>
-      (obj .:? "SecurityGroups") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "SourceDestCheck") <*>
-      (obj .:? "SsmAssociations") <*>
-      (obj .:? "SubnetId") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "Tenancy") <*>
-      (obj .:? "UserData") <*>
-      (obj .:? "Volumes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2Instance' containing required fields as arguments.
 ec2Instance
   :: EC2Instance
diff --git a/library-gen/Stratosphere/Resources/EC2InternetGateway.hs b/library-gen/Stratosphere/Resources/EC2InternetGateway.hs
--- a/library-gen/Stratosphere/Resources/EC2InternetGateway.hs
+++ b/library-gen/Stratosphere/Resources/EC2InternetGateway.hs
@@ -23,12 +23,6 @@
     [ fmap (("Tags",) . toJSON) _eC2InternetGatewayTags
     ]
 
-instance FromJSON EC2InternetGateway where
-  parseJSON (Object obj) =
-    EC2InternetGateway <$>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2InternetGateway' containing required fields as
 -- arguments.
 ec2InternetGateway
diff --git a/library-gen/Stratosphere/Resources/EC2LaunchTemplate.hs b/library-gen/Stratosphere/Resources/EC2LaunchTemplate.hs
--- a/library-gen/Stratosphere/Resources/EC2LaunchTemplate.hs
+++ b/library-gen/Stratosphere/Resources/EC2LaunchTemplate.hs
@@ -25,13 +25,6 @@
     , fmap (("LaunchTemplateName",) . toJSON) _eC2LaunchTemplateLaunchTemplateName
     ]
 
-instance FromJSON EC2LaunchTemplate where
-  parseJSON (Object obj) =
-    EC2LaunchTemplate <$>
-      (obj .:? "LaunchTemplateData") <*>
-      (obj .:? "LaunchTemplateName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2LaunchTemplate' containing required fields as
 -- arguments.
 ec2LaunchTemplate
diff --git a/library-gen/Stratosphere/Resources/EC2NatGateway.hs b/library-gen/Stratosphere/Resources/EC2NatGateway.hs
--- a/library-gen/Stratosphere/Resources/EC2NatGateway.hs
+++ b/library-gen/Stratosphere/Resources/EC2NatGateway.hs
@@ -27,14 +27,6 @@
     , fmap (("Tags",) . toJSON) _eC2NatGatewayTags
     ]
 
-instance FromJSON EC2NatGateway where
-  parseJSON (Object obj) =
-    EC2NatGateway <$>
-      (obj .: "AllocationId") <*>
-      (obj .: "SubnetId") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2NatGateway' containing required fields as arguments.
 ec2NatGateway
   :: Val Text -- ^ 'ecngAllocationId'
diff --git a/library-gen/Stratosphere/Resources/EC2NetworkAcl.hs b/library-gen/Stratosphere/Resources/EC2NetworkAcl.hs
--- a/library-gen/Stratosphere/Resources/EC2NetworkAcl.hs
+++ b/library-gen/Stratosphere/Resources/EC2NetworkAcl.hs
@@ -25,13 +25,6 @@
     , (Just . ("VpcId",) . toJSON) _eC2NetworkAclVpcId
     ]
 
-instance FromJSON EC2NetworkAcl where
-  parseJSON (Object obj) =
-    EC2NetworkAcl <$>
-      (obj .:? "Tags") <*>
-      (obj .: "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2NetworkAcl' containing required fields as arguments.
 ec2NetworkAcl
   :: Val Text -- ^ 'ecnaVpcId'
diff --git a/library-gen/Stratosphere/Resources/EC2NetworkAclEntry.hs b/library-gen/Stratosphere/Resources/EC2NetworkAclEntry.hs
--- a/library-gen/Stratosphere/Resources/EC2NetworkAclEntry.hs
+++ b/library-gen/Stratosphere/Resources/EC2NetworkAclEntry.hs
@@ -40,20 +40,6 @@
     , (Just . ("RuleNumber",) . toJSON . fmap Integer') _eC2NetworkAclEntryRuleNumber
     ]
 
-instance FromJSON EC2NetworkAclEntry where
-  parseJSON (Object obj) =
-    EC2NetworkAclEntry <$>
-      (obj .: "CidrBlock") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Egress") <*>
-      (obj .:? "Icmp") <*>
-      (obj .:? "Ipv6CidrBlock") <*>
-      (obj .: "NetworkAclId") <*>
-      (obj .:? "PortRange") <*>
-      fmap (fmap unInteger') (obj .: "Protocol") <*>
-      (obj .: "RuleAction") <*>
-      fmap (fmap unInteger') (obj .: "RuleNumber")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2NetworkAclEntry' containing required fields as
 -- arguments.
 ec2NetworkAclEntry
diff --git a/library-gen/Stratosphere/Resources/EC2NetworkInterface.hs b/library-gen/Stratosphere/Resources/EC2NetworkInterface.hs
--- a/library-gen/Stratosphere/Resources/EC2NetworkInterface.hs
+++ b/library-gen/Stratosphere/Resources/EC2NetworkInterface.hs
@@ -45,22 +45,6 @@
     , fmap (("Tags",) . toJSON) _eC2NetworkInterfaceTags
     ]
 
-instance FromJSON EC2NetworkInterface where
-  parseJSON (Object obj) =
-    EC2NetworkInterface <$>
-      (obj .:? "Description") <*>
-      (obj .:? "GroupSet") <*>
-      (obj .:? "InterfaceType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Ipv6AddressCount") <*>
-      (obj .:? "Ipv6Addresses") <*>
-      (obj .:? "PrivateIpAddress") <*>
-      (obj .:? "PrivateIpAddresses") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SecondaryPrivateIpAddressCount") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "SourceDestCheck") <*>
-      (obj .: "SubnetId") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2NetworkInterface' containing required fields as
 -- arguments.
 ec2NetworkInterface
diff --git a/library-gen/Stratosphere/Resources/EC2NetworkInterfaceAttachment.hs b/library-gen/Stratosphere/Resources/EC2NetworkInterfaceAttachment.hs
--- a/library-gen/Stratosphere/Resources/EC2NetworkInterfaceAttachment.hs
+++ b/library-gen/Stratosphere/Resources/EC2NetworkInterfaceAttachment.hs
@@ -29,15 +29,6 @@
     , (Just . ("NetworkInterfaceId",) . toJSON) _eC2NetworkInterfaceAttachmentNetworkInterfaceId
     ]
 
-instance FromJSON EC2NetworkInterfaceAttachment where
-  parseJSON (Object obj) =
-    EC2NetworkInterfaceAttachment <$>
-      fmap (fmap (fmap unBool')) (obj .:? "DeleteOnTermination") <*>
-      (obj .: "DeviceIndex") <*>
-      (obj .: "InstanceId") <*>
-      (obj .: "NetworkInterfaceId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2NetworkInterfaceAttachment' containing required
 -- fields as arguments.
 ec2NetworkInterfaceAttachment
diff --git a/library-gen/Stratosphere/Resources/EC2NetworkInterfacePermission.hs b/library-gen/Stratosphere/Resources/EC2NetworkInterfacePermission.hs
--- a/library-gen/Stratosphere/Resources/EC2NetworkInterfacePermission.hs
+++ b/library-gen/Stratosphere/Resources/EC2NetworkInterfacePermission.hs
@@ -27,14 +27,6 @@
     , (Just . ("Permission",) . toJSON) _eC2NetworkInterfacePermissionPermission
     ]
 
-instance FromJSON EC2NetworkInterfacePermission where
-  parseJSON (Object obj) =
-    EC2NetworkInterfacePermission <$>
-      (obj .: "AwsAccountId") <*>
-      (obj .: "NetworkInterfaceId") <*>
-      (obj .: "Permission")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2NetworkInterfacePermission' containing required
 -- fields as arguments.
 ec2NetworkInterfacePermission
diff --git a/library-gen/Stratosphere/Resources/EC2PlacementGroup.hs b/library-gen/Stratosphere/Resources/EC2PlacementGroup.hs
--- a/library-gen/Stratosphere/Resources/EC2PlacementGroup.hs
+++ b/library-gen/Stratosphere/Resources/EC2PlacementGroup.hs
@@ -23,12 +23,6 @@
     [ fmap (("Strategy",) . toJSON) _eC2PlacementGroupStrategy
     ]
 
-instance FromJSON EC2PlacementGroup where
-  parseJSON (Object obj) =
-    EC2PlacementGroup <$>
-      (obj .:? "Strategy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2PlacementGroup' containing required fields as
 -- arguments.
 ec2PlacementGroup
diff --git a/library-gen/Stratosphere/Resources/EC2Route.hs b/library-gen/Stratosphere/Resources/EC2Route.hs
--- a/library-gen/Stratosphere/Resources/EC2Route.hs
+++ b/library-gen/Stratosphere/Resources/EC2Route.hs
@@ -39,20 +39,6 @@
     , fmap (("VpcPeeringConnectionId",) . toJSON) _eC2RouteVpcPeeringConnectionId
     ]
 
-instance FromJSON EC2Route where
-  parseJSON (Object obj) =
-    EC2Route <$>
-      (obj .:? "DestinationCidrBlock") <*>
-      (obj .:? "DestinationIpv6CidrBlock") <*>
-      (obj .:? "EgressOnlyInternetGatewayId") <*>
-      (obj .:? "GatewayId") <*>
-      (obj .:? "InstanceId") <*>
-      (obj .:? "NatGatewayId") <*>
-      (obj .:? "NetworkInterfaceId") <*>
-      (obj .: "RouteTableId") <*>
-      (obj .:? "VpcPeeringConnectionId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2Route' containing required fields as arguments.
 ec2Route
   :: Val Text -- ^ 'ecrRouteTableId'
diff --git a/library-gen/Stratosphere/Resources/EC2RouteTable.hs b/library-gen/Stratosphere/Resources/EC2RouteTable.hs
--- a/library-gen/Stratosphere/Resources/EC2RouteTable.hs
+++ b/library-gen/Stratosphere/Resources/EC2RouteTable.hs
@@ -25,13 +25,6 @@
     , (Just . ("VpcId",) . toJSON) _eC2RouteTableVpcId
     ]
 
-instance FromJSON EC2RouteTable where
-  parseJSON (Object obj) =
-    EC2RouteTable <$>
-      (obj .:? "Tags") <*>
-      (obj .: "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2RouteTable' containing required fields as arguments.
 ec2RouteTable
   :: Val Text -- ^ 'ecrtVpcId'
diff --git a/library-gen/Stratosphere/Resources/EC2SecurityGroup.hs b/library-gen/Stratosphere/Resources/EC2SecurityGroup.hs
--- a/library-gen/Stratosphere/Resources/EC2SecurityGroup.hs
+++ b/library-gen/Stratosphere/Resources/EC2SecurityGroup.hs
@@ -35,17 +35,6 @@
     , fmap (("VpcId",) . toJSON) _eC2SecurityGroupVpcId
     ]
 
-instance FromJSON EC2SecurityGroup where
-  parseJSON (Object obj) =
-    EC2SecurityGroup <$>
-      (obj .: "GroupDescription") <*>
-      (obj .:? "GroupName") <*>
-      (obj .:? "SecurityGroupEgress") <*>
-      (obj .:? "SecurityGroupIngress") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SecurityGroup' containing required fields as
 -- arguments.
 ec2SecurityGroup
diff --git a/library-gen/Stratosphere/Resources/EC2SecurityGroupEgress.hs b/library-gen/Stratosphere/Resources/EC2SecurityGroupEgress.hs
--- a/library-gen/Stratosphere/Resources/EC2SecurityGroupEgress.hs
+++ b/library-gen/Stratosphere/Resources/EC2SecurityGroupEgress.hs
@@ -39,20 +39,6 @@
     , fmap (("ToPort",) . toJSON . fmap Integer') _eC2SecurityGroupEgressToPort
     ]
 
-instance FromJSON EC2SecurityGroupEgress where
-  parseJSON (Object obj) =
-    EC2SecurityGroupEgress <$>
-      (obj .:? "CidrIp") <*>
-      (obj .:? "CidrIpv6") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "DestinationPrefixListId") <*>
-      (obj .:? "DestinationSecurityGroupId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "FromPort") <*>
-      (obj .: "GroupId") <*>
-      (obj .: "IpProtocol") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ToPort")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SecurityGroupEgress' containing required fields as
 -- arguments.
 ec2SecurityGroupEgress
diff --git a/library-gen/Stratosphere/Resources/EC2SecurityGroupIngress.hs b/library-gen/Stratosphere/Resources/EC2SecurityGroupIngress.hs
--- a/library-gen/Stratosphere/Resources/EC2SecurityGroupIngress.hs
+++ b/library-gen/Stratosphere/Resources/EC2SecurityGroupIngress.hs
@@ -45,23 +45,6 @@
     , fmap (("ToPort",) . toJSON . fmap Integer') _eC2SecurityGroupIngressToPort
     ]
 
-instance FromJSON EC2SecurityGroupIngress where
-  parseJSON (Object obj) =
-    EC2SecurityGroupIngress <$>
-      (obj .:? "CidrIp") <*>
-      (obj .:? "CidrIpv6") <*>
-      (obj .:? "Description") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "FromPort") <*>
-      (obj .:? "GroupId") <*>
-      (obj .:? "GroupName") <*>
-      (obj .: "IpProtocol") <*>
-      (obj .:? "SourcePrefixListId") <*>
-      (obj .:? "SourceSecurityGroupId") <*>
-      (obj .:? "SourceSecurityGroupName") <*>
-      (obj .:? "SourceSecurityGroupOwnerId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ToPort")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SecurityGroupIngress' containing required fields as
 -- arguments.
 ec2SecurityGroupIngress
diff --git a/library-gen/Stratosphere/Resources/EC2SpotFleet.hs b/library-gen/Stratosphere/Resources/EC2SpotFleet.hs
--- a/library-gen/Stratosphere/Resources/EC2SpotFleet.hs
+++ b/library-gen/Stratosphere/Resources/EC2SpotFleet.hs
@@ -23,12 +23,6 @@
     [ (Just . ("SpotFleetRequestConfigData",) . toJSON) _eC2SpotFleetSpotFleetRequestConfigData
     ]
 
-instance FromJSON EC2SpotFleet where
-  parseJSON (Object obj) =
-    EC2SpotFleet <$>
-      (obj .: "SpotFleetRequestConfigData")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SpotFleet' containing required fields as arguments.
 ec2SpotFleet
   :: EC2SpotFleetSpotFleetRequestConfigData -- ^ 'ecsfSpotFleetRequestConfigData'
diff --git a/library-gen/Stratosphere/Resources/EC2Subnet.hs b/library-gen/Stratosphere/Resources/EC2Subnet.hs
--- a/library-gen/Stratosphere/Resources/EC2Subnet.hs
+++ b/library-gen/Stratosphere/Resources/EC2Subnet.hs
@@ -35,18 +35,6 @@
     , (Just . ("VpcId",) . toJSON) _eC2SubnetVpcId
     ]
 
-instance FromJSON EC2Subnet where
-  parseJSON (Object obj) =
-    EC2Subnet <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AssignIpv6AddressOnCreation") <*>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .: "CidrBlock") <*>
-      (obj .:? "Ipv6CidrBlock") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "MapPublicIpOnLaunch") <*>
-      (obj .:? "Tags") <*>
-      (obj .: "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2Subnet' containing required fields as arguments.
 ec2Subnet
   :: Val Text -- ^ 'ecsCidrBlock'
diff --git a/library-gen/Stratosphere/Resources/EC2SubnetCidrBlock.hs b/library-gen/Stratosphere/Resources/EC2SubnetCidrBlock.hs
--- a/library-gen/Stratosphere/Resources/EC2SubnetCidrBlock.hs
+++ b/library-gen/Stratosphere/Resources/EC2SubnetCidrBlock.hs
@@ -25,13 +25,6 @@
     , (Just . ("SubnetId",) . toJSON) _eC2SubnetCidrBlockSubnetId
     ]
 
-instance FromJSON EC2SubnetCidrBlock where
-  parseJSON (Object obj) =
-    EC2SubnetCidrBlock <$>
-      (obj .: "Ipv6CidrBlock") <*>
-      (obj .: "SubnetId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SubnetCidrBlock' containing required fields as
 -- arguments.
 ec2SubnetCidrBlock
diff --git a/library-gen/Stratosphere/Resources/EC2SubnetNetworkAclAssociation.hs b/library-gen/Stratosphere/Resources/EC2SubnetNetworkAclAssociation.hs
--- a/library-gen/Stratosphere/Resources/EC2SubnetNetworkAclAssociation.hs
+++ b/library-gen/Stratosphere/Resources/EC2SubnetNetworkAclAssociation.hs
@@ -25,13 +25,6 @@
     , (Just . ("SubnetId",) . toJSON) _eC2SubnetNetworkAclAssociationSubnetId
     ]
 
-instance FromJSON EC2SubnetNetworkAclAssociation where
-  parseJSON (Object obj) =
-    EC2SubnetNetworkAclAssociation <$>
-      (obj .: "NetworkAclId") <*>
-      (obj .: "SubnetId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SubnetNetworkAclAssociation' containing required
 -- fields as arguments.
 ec2SubnetNetworkAclAssociation
diff --git a/library-gen/Stratosphere/Resources/EC2SubnetRouteTableAssociation.hs b/library-gen/Stratosphere/Resources/EC2SubnetRouteTableAssociation.hs
--- a/library-gen/Stratosphere/Resources/EC2SubnetRouteTableAssociation.hs
+++ b/library-gen/Stratosphere/Resources/EC2SubnetRouteTableAssociation.hs
@@ -25,13 +25,6 @@
     , (Just . ("SubnetId",) . toJSON) _eC2SubnetRouteTableAssociationSubnetId
     ]
 
-instance FromJSON EC2SubnetRouteTableAssociation where
-  parseJSON (Object obj) =
-    EC2SubnetRouteTableAssociation <$>
-      (obj .: "RouteTableId") <*>
-      (obj .: "SubnetId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2SubnetRouteTableAssociation' containing required
 -- fields as arguments.
 ec2SubnetRouteTableAssociation
diff --git a/library-gen/Stratosphere/Resources/EC2TransitGateway.hs b/library-gen/Stratosphere/Resources/EC2TransitGateway.hs
--- a/library-gen/Stratosphere/Resources/EC2TransitGateway.hs
+++ b/library-gen/Stratosphere/Resources/EC2TransitGateway.hs
@@ -37,19 +37,6 @@
     , fmap (("VpnEcmpSupport",) . toJSON) _eC2TransitGatewayVpnEcmpSupport
     ]
 
-instance FromJSON EC2TransitGateway where
-  parseJSON (Object obj) =
-    EC2TransitGateway <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "AmazonSideAsn") <*>
-      (obj .:? "AutoAcceptSharedAttachments") <*>
-      (obj .:? "DefaultRouteTableAssociation") <*>
-      (obj .:? "DefaultRouteTablePropagation") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "DnsSupport") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "VpnEcmpSupport")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2TransitGateway' containing required fields as
 -- arguments.
 ec2TransitGateway
diff --git a/library-gen/Stratosphere/Resources/EC2TransitGatewayAttachment.hs b/library-gen/Stratosphere/Resources/EC2TransitGatewayAttachment.hs
--- a/library-gen/Stratosphere/Resources/EC2TransitGatewayAttachment.hs
+++ b/library-gen/Stratosphere/Resources/EC2TransitGatewayAttachment.hs
@@ -29,15 +29,6 @@
     , (Just . ("VpcId",) . toJSON) _eC2TransitGatewayAttachmentVpcId
     ]
 
-instance FromJSON EC2TransitGatewayAttachment where
-  parseJSON (Object obj) =
-    EC2TransitGatewayAttachment <$>
-      (obj .: "SubnetIds") <*>
-      (obj .:? "Tags") <*>
-      (obj .: "TransitGatewayId") <*>
-      (obj .: "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2TransitGatewayAttachment' containing required fields
 -- as arguments.
 ec2TransitGatewayAttachment
diff --git a/library-gen/Stratosphere/Resources/EC2TransitGatewayRoute.hs b/library-gen/Stratosphere/Resources/EC2TransitGatewayRoute.hs
--- a/library-gen/Stratosphere/Resources/EC2TransitGatewayRoute.hs
+++ b/library-gen/Stratosphere/Resources/EC2TransitGatewayRoute.hs
@@ -29,15 +29,6 @@
     , (Just . ("TransitGatewayRouteTableId",) . toJSON) _eC2TransitGatewayRouteTransitGatewayRouteTableId
     ]
 
-instance FromJSON EC2TransitGatewayRoute where
-  parseJSON (Object obj) =
-    EC2TransitGatewayRoute <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Blackhole") <*>
-      (obj .:? "DestinationCidrBlock") <*>
-      (obj .:? "TransitGatewayAttachmentId") <*>
-      (obj .: "TransitGatewayRouteTableId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2TransitGatewayRoute' containing required fields as
 -- arguments.
 ec2TransitGatewayRoute
diff --git a/library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTable.hs b/library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTable.hs
--- a/library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTable.hs
+++ b/library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTable.hs
@@ -25,13 +25,6 @@
     , (Just . ("TransitGatewayId",) . toJSON) _eC2TransitGatewayRouteTableTransitGatewayId
     ]
 
-instance FromJSON EC2TransitGatewayRouteTable where
-  parseJSON (Object obj) =
-    EC2TransitGatewayRouteTable <$>
-      (obj .:? "Tags") <*>
-      (obj .: "TransitGatewayId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2TransitGatewayRouteTable' containing required fields
 -- as arguments.
 ec2TransitGatewayRouteTable
diff --git a/library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTableAssociation.hs b/library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTableAssociation.hs
--- a/library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTableAssociation.hs
+++ b/library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTableAssociation.hs
@@ -26,13 +26,6 @@
     , (Just . ("TransitGatewayRouteTableId",) . toJSON) _eC2TransitGatewayRouteTableAssociationTransitGatewayRouteTableId
     ]
 
-instance FromJSON EC2TransitGatewayRouteTableAssociation where
-  parseJSON (Object obj) =
-    EC2TransitGatewayRouteTableAssociation <$>
-      (obj .: "TransitGatewayAttachmentId") <*>
-      (obj .: "TransitGatewayRouteTableId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2TransitGatewayRouteTableAssociation' containing
 -- required fields as arguments.
 ec2TransitGatewayRouteTableAssociation
diff --git a/library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTablePropagation.hs b/library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTablePropagation.hs
--- a/library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTablePropagation.hs
+++ b/library-gen/Stratosphere/Resources/EC2TransitGatewayRouteTablePropagation.hs
@@ -26,13 +26,6 @@
     , (Just . ("TransitGatewayRouteTableId",) . toJSON) _eC2TransitGatewayRouteTablePropagationTransitGatewayRouteTableId
     ]
 
-instance FromJSON EC2TransitGatewayRouteTablePropagation where
-  parseJSON (Object obj) =
-    EC2TransitGatewayRouteTablePropagation <$>
-      (obj .: "TransitGatewayAttachmentId") <*>
-      (obj .: "TransitGatewayRouteTableId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2TransitGatewayRouteTablePropagation' containing
 -- required fields as arguments.
 ec2TransitGatewayRouteTablePropagation
diff --git a/library-gen/Stratosphere/Resources/EC2TrunkInterfaceAssociation.hs b/library-gen/Stratosphere/Resources/EC2TrunkInterfaceAssociation.hs
--- a/library-gen/Stratosphere/Resources/EC2TrunkInterfaceAssociation.hs
+++ b/library-gen/Stratosphere/Resources/EC2TrunkInterfaceAssociation.hs
@@ -29,15 +29,6 @@
     , fmap (("VLANId",) . toJSON . fmap Integer') _eC2TrunkInterfaceAssociationVLANId
     ]
 
-instance FromJSON EC2TrunkInterfaceAssociation where
-  parseJSON (Object obj) =
-    EC2TrunkInterfaceAssociation <$>
-      (obj .: "BranchInterfaceId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "GREKey") <*>
-      (obj .: "TrunkInterfaceId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "VLANId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2TrunkInterfaceAssociation' containing required fields
 -- as arguments.
 ec2TrunkInterfaceAssociation
diff --git a/library-gen/Stratosphere/Resources/EC2VPC.hs b/library-gen/Stratosphere/Resources/EC2VPC.hs
--- a/library-gen/Stratosphere/Resources/EC2VPC.hs
+++ b/library-gen/Stratosphere/Resources/EC2VPC.hs
@@ -31,16 +31,6 @@
     , fmap (("Tags",) . toJSON) _eC2VPCTags
     ]
 
-instance FromJSON EC2VPC where
-  parseJSON (Object obj) =
-    EC2VPC <$>
-      (obj .: "CidrBlock") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnableDnsHostnames") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnableDnsSupport") <*>
-      (obj .:? "InstanceTenancy") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VPC' containing required fields as arguments.
 ec2VPC
   :: Val Text -- ^ 'ecvpcCidrBlock'
diff --git a/library-gen/Stratosphere/Resources/EC2VPCCidrBlock.hs b/library-gen/Stratosphere/Resources/EC2VPCCidrBlock.hs
--- a/library-gen/Stratosphere/Resources/EC2VPCCidrBlock.hs
+++ b/library-gen/Stratosphere/Resources/EC2VPCCidrBlock.hs
@@ -27,14 +27,6 @@
     , (Just . ("VpcId",) . toJSON) _eC2VPCCidrBlockVpcId
     ]
 
-instance FromJSON EC2VPCCidrBlock where
-  parseJSON (Object obj) =
-    EC2VPCCidrBlock <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AmazonProvidedIpv6CidrBlock") <*>
-      (obj .:? "CidrBlock") <*>
-      (obj .: "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VPCCidrBlock' containing required fields as
 -- arguments.
 ec2VPCCidrBlock
diff --git a/library-gen/Stratosphere/Resources/EC2VPCDHCPOptionsAssociation.hs b/library-gen/Stratosphere/Resources/EC2VPCDHCPOptionsAssociation.hs
--- a/library-gen/Stratosphere/Resources/EC2VPCDHCPOptionsAssociation.hs
+++ b/library-gen/Stratosphere/Resources/EC2VPCDHCPOptionsAssociation.hs
@@ -25,13 +25,6 @@
     , (Just . ("VpcId",) . toJSON) _eC2VPCDHCPOptionsAssociationVpcId
     ]
 
-instance FromJSON EC2VPCDHCPOptionsAssociation where
-  parseJSON (Object obj) =
-    EC2VPCDHCPOptionsAssociation <$>
-      (obj .: "DhcpOptionsId") <*>
-      (obj .: "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VPCDHCPOptionsAssociation' containing required fields
 -- as arguments.
 ec2VPCDHCPOptionsAssociation
diff --git a/library-gen/Stratosphere/Resources/EC2VPCEndpoint.hs b/library-gen/Stratosphere/Resources/EC2VPCEndpoint.hs
--- a/library-gen/Stratosphere/Resources/EC2VPCEndpoint.hs
+++ b/library-gen/Stratosphere/Resources/EC2VPCEndpoint.hs
@@ -37,19 +37,6 @@
     , (Just . ("VpcId",) . toJSON) _eC2VPCEndpointVpcId
     ]
 
-instance FromJSON EC2VPCEndpoint where
-  parseJSON (Object obj) =
-    EC2VPCEndpoint <$>
-      (obj .:? "PolicyDocument") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "PrivateDnsEnabled") <*>
-      (obj .:? "RouteTableIds") <*>
-      (obj .:? "SecurityGroupIds") <*>
-      (obj .: "ServiceName") <*>
-      (obj .:? "SubnetIds") <*>
-      (obj .:? "VpcEndpointType") <*>
-      (obj .: "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VPCEndpoint' containing required fields as arguments.
 ec2VPCEndpoint
   :: Val Text -- ^ 'ecvpceServiceName'
diff --git a/library-gen/Stratosphere/Resources/EC2VPCEndpointConnectionNotification.hs b/library-gen/Stratosphere/Resources/EC2VPCEndpointConnectionNotification.hs
--- a/library-gen/Stratosphere/Resources/EC2VPCEndpointConnectionNotification.hs
+++ b/library-gen/Stratosphere/Resources/EC2VPCEndpointConnectionNotification.hs
@@ -29,15 +29,6 @@
     , fmap (("VPCEndpointId",) . toJSON) _eC2VPCEndpointConnectionNotificationVPCEndpointId
     ]
 
-instance FromJSON EC2VPCEndpointConnectionNotification where
-  parseJSON (Object obj) =
-    EC2VPCEndpointConnectionNotification <$>
-      (obj .: "ConnectionEvents") <*>
-      (obj .: "ConnectionNotificationArn") <*>
-      (obj .:? "ServiceId") <*>
-      (obj .:? "VPCEndpointId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VPCEndpointConnectionNotification' containing
 -- required fields as arguments.
 ec2VPCEndpointConnectionNotification
diff --git a/library-gen/Stratosphere/Resources/EC2VPCEndpointServicePermissions.hs b/library-gen/Stratosphere/Resources/EC2VPCEndpointServicePermissions.hs
--- a/library-gen/Stratosphere/Resources/EC2VPCEndpointServicePermissions.hs
+++ b/library-gen/Stratosphere/Resources/EC2VPCEndpointServicePermissions.hs
@@ -25,13 +25,6 @@
     , (Just . ("ServiceId",) . toJSON) _eC2VPCEndpointServicePermissionsServiceId
     ]
 
-instance FromJSON EC2VPCEndpointServicePermissions where
-  parseJSON (Object obj) =
-    EC2VPCEndpointServicePermissions <$>
-      (obj .:? "AllowedPrincipals") <*>
-      (obj .: "ServiceId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VPCEndpointServicePermissions' containing required
 -- fields as arguments.
 ec2VPCEndpointServicePermissions
diff --git a/library-gen/Stratosphere/Resources/EC2VPCGatewayAttachment.hs b/library-gen/Stratosphere/Resources/EC2VPCGatewayAttachment.hs
--- a/library-gen/Stratosphere/Resources/EC2VPCGatewayAttachment.hs
+++ b/library-gen/Stratosphere/Resources/EC2VPCGatewayAttachment.hs
@@ -27,14 +27,6 @@
     , fmap (("VpnGatewayId",) . toJSON) _eC2VPCGatewayAttachmentVpnGatewayId
     ]
 
-instance FromJSON EC2VPCGatewayAttachment where
-  parseJSON (Object obj) =
-    EC2VPCGatewayAttachment <$>
-      (obj .:? "InternetGatewayId") <*>
-      (obj .: "VpcId") <*>
-      (obj .:? "VpnGatewayId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VPCGatewayAttachment' containing required fields as
 -- arguments.
 ec2VPCGatewayAttachment
diff --git a/library-gen/Stratosphere/Resources/EC2VPCPeeringConnection.hs b/library-gen/Stratosphere/Resources/EC2VPCPeeringConnection.hs
--- a/library-gen/Stratosphere/Resources/EC2VPCPeeringConnection.hs
+++ b/library-gen/Stratosphere/Resources/EC2VPCPeeringConnection.hs
@@ -33,17 +33,6 @@
     , (Just . ("VpcId",) . toJSON) _eC2VPCPeeringConnectionVpcId
     ]
 
-instance FromJSON EC2VPCPeeringConnection where
-  parseJSON (Object obj) =
-    EC2VPCPeeringConnection <$>
-      (obj .:? "PeerOwnerId") <*>
-      (obj .:? "PeerRegion") <*>
-      (obj .:? "PeerRoleArn") <*>
-      (obj .: "PeerVpcId") <*>
-      (obj .:? "Tags") <*>
-      (obj .: "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VPCPeeringConnection' containing required fields as
 -- arguments.
 ec2VPCPeeringConnection
diff --git a/library-gen/Stratosphere/Resources/EC2VPNConnection.hs b/library-gen/Stratosphere/Resources/EC2VPNConnection.hs
--- a/library-gen/Stratosphere/Resources/EC2VPNConnection.hs
+++ b/library-gen/Stratosphere/Resources/EC2VPNConnection.hs
@@ -34,17 +34,6 @@
     , fmap (("VpnTunnelOptionsSpecifications",) . toJSON) _eC2VPNConnectionVpnTunnelOptionsSpecifications
     ]
 
-instance FromJSON EC2VPNConnection where
-  parseJSON (Object obj) =
-    EC2VPNConnection <$>
-      (obj .: "CustomerGatewayId") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "StaticRoutesOnly") <*>
-      (obj .:? "Tags") <*>
-      (obj .: "Type") <*>
-      (obj .: "VpnGatewayId") <*>
-      (obj .:? "VpnTunnelOptionsSpecifications")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VPNConnection' containing required fields as
 -- arguments.
 ec2VPNConnection
diff --git a/library-gen/Stratosphere/Resources/EC2VPNConnectionRoute.hs b/library-gen/Stratosphere/Resources/EC2VPNConnectionRoute.hs
--- a/library-gen/Stratosphere/Resources/EC2VPNConnectionRoute.hs
+++ b/library-gen/Stratosphere/Resources/EC2VPNConnectionRoute.hs
@@ -25,13 +25,6 @@
     , (Just . ("VpnConnectionId",) . toJSON) _eC2VPNConnectionRouteVpnConnectionId
     ]
 
-instance FromJSON EC2VPNConnectionRoute where
-  parseJSON (Object obj) =
-    EC2VPNConnectionRoute <$>
-      (obj .: "DestinationCidrBlock") <*>
-      (obj .: "VpnConnectionId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VPNConnectionRoute' containing required fields as
 -- arguments.
 ec2VPNConnectionRoute
diff --git a/library-gen/Stratosphere/Resources/EC2VPNGateway.hs b/library-gen/Stratosphere/Resources/EC2VPNGateway.hs
--- a/library-gen/Stratosphere/Resources/EC2VPNGateway.hs
+++ b/library-gen/Stratosphere/Resources/EC2VPNGateway.hs
@@ -27,14 +27,6 @@
     , (Just . ("Type",) . toJSON) _eC2VPNGatewayType
     ]
 
-instance FromJSON EC2VPNGateway where
-  parseJSON (Object obj) =
-    EC2VPNGateway <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "AmazonSideAsn") <*>
-      (obj .:? "Tags") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VPNGateway' containing required fields as arguments.
 ec2VPNGateway
   :: Val Text -- ^ 'ecvpngType'
diff --git a/library-gen/Stratosphere/Resources/EC2VPNGatewayRoutePropagation.hs b/library-gen/Stratosphere/Resources/EC2VPNGatewayRoutePropagation.hs
--- a/library-gen/Stratosphere/Resources/EC2VPNGatewayRoutePropagation.hs
+++ b/library-gen/Stratosphere/Resources/EC2VPNGatewayRoutePropagation.hs
@@ -25,13 +25,6 @@
     , (Just . ("VpnGatewayId",) . toJSON) _eC2VPNGatewayRoutePropagationVpnGatewayId
     ]
 
-instance FromJSON EC2VPNGatewayRoutePropagation where
-  parseJSON (Object obj) =
-    EC2VPNGatewayRoutePropagation <$>
-      (obj .: "RouteTableIds") <*>
-      (obj .: "VpnGatewayId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VPNGatewayRoutePropagation' containing required
 -- fields as arguments.
 ec2VPNGatewayRoutePropagation
diff --git a/library-gen/Stratosphere/Resources/EC2Volume.hs b/library-gen/Stratosphere/Resources/EC2Volume.hs
--- a/library-gen/Stratosphere/Resources/EC2Volume.hs
+++ b/library-gen/Stratosphere/Resources/EC2Volume.hs
@@ -39,20 +39,6 @@
     , fmap (("VolumeType",) . toJSON) _eC2VolumeVolumeType
     ]
 
-instance FromJSON EC2Volume where
-  parseJSON (Object obj) =
-    EC2Volume <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AutoEnableIO") <*>
-      (obj .: "AvailabilityZone") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Encrypted") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Iops") <*>
-      (obj .:? "KmsKeyId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Size") <*>
-      (obj .:? "SnapshotId") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "VolumeType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2Volume' containing required fields as arguments.
 ec2Volume
   :: Val Text -- ^ 'ecvAvailabilityZone'
diff --git a/library-gen/Stratosphere/Resources/EC2VolumeAttachment.hs b/library-gen/Stratosphere/Resources/EC2VolumeAttachment.hs
--- a/library-gen/Stratosphere/Resources/EC2VolumeAttachment.hs
+++ b/library-gen/Stratosphere/Resources/EC2VolumeAttachment.hs
@@ -27,14 +27,6 @@
     , (Just . ("VolumeId",) . toJSON) _eC2VolumeAttachmentVolumeId
     ]
 
-instance FromJSON EC2VolumeAttachment where
-  parseJSON (Object obj) =
-    EC2VolumeAttachment <$>
-      (obj .: "Device") <*>
-      (obj .: "InstanceId") <*>
-      (obj .: "VolumeId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EC2VolumeAttachment' containing required fields as
 -- arguments.
 ec2VolumeAttachment
diff --git a/library-gen/Stratosphere/Resources/ECRRepository.hs b/library-gen/Stratosphere/Resources/ECRRepository.hs
--- a/library-gen/Stratosphere/Resources/ECRRepository.hs
+++ b/library-gen/Stratosphere/Resources/ECRRepository.hs
@@ -27,14 +27,6 @@
     , fmap (("RepositoryPolicyText",) . toJSON) _eCRRepositoryRepositoryPolicyText
     ]
 
-instance FromJSON ECRRepository where
-  parseJSON (Object obj) =
-    ECRRepository <$>
-      (obj .:? "LifecyclePolicy") <*>
-      (obj .:? "RepositoryName") <*>
-      (obj .:? "RepositoryPolicyText")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECRRepository' containing required fields as arguments.
 ecrRepository
   :: ECRRepository
diff --git a/library-gen/Stratosphere/Resources/ECSCluster.hs b/library-gen/Stratosphere/Resources/ECSCluster.hs
--- a/library-gen/Stratosphere/Resources/ECSCluster.hs
+++ b/library-gen/Stratosphere/Resources/ECSCluster.hs
@@ -23,12 +23,6 @@
     [ fmap (("ClusterName",) . toJSON) _eCSClusterClusterName
     ]
 
-instance FromJSON ECSCluster where
-  parseJSON (Object obj) =
-    ECSCluster <$>
-      (obj .:? "ClusterName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSCluster' containing required fields as arguments.
 ecsCluster
   :: ECSCluster
diff --git a/library-gen/Stratosphere/Resources/ECSService.hs b/library-gen/Stratosphere/Resources/ECSService.hs
--- a/library-gen/Stratosphere/Resources/ECSService.hs
+++ b/library-gen/Stratosphere/Resources/ECSService.hs
@@ -56,26 +56,6 @@
     , (Just . ("TaskDefinition",) . toJSON) _eCSServiceTaskDefinition
     ]
 
-instance FromJSON ECSService where
-  parseJSON (Object obj) =
-    ECSService <$>
-      (obj .:? "Cluster") <*>
-      (obj .:? "DeploymentConfiguration") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "DesiredCount") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "HealthCheckGracePeriodSeconds") <*>
-      (obj .:? "LaunchType") <*>
-      (obj .:? "LoadBalancers") <*>
-      (obj .:? "NetworkConfiguration") <*>
-      (obj .:? "PlacementConstraints") <*>
-      (obj .:? "PlacementStrategies") <*>
-      (obj .:? "PlatformVersion") <*>
-      (obj .:? "Role") <*>
-      (obj .:? "SchedulingStrategy") <*>
-      (obj .:? "ServiceName") <*>
-      (obj .:? "ServiceRegistries") <*>
-      (obj .: "TaskDefinition")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSService' containing required fields as arguments.
 ecsService
   :: Val Text -- ^ 'ecssTaskDefinition'
diff --git a/library-gen/Stratosphere/Resources/ECSTaskDefinition.hs b/library-gen/Stratosphere/Resources/ECSTaskDefinition.hs
--- a/library-gen/Stratosphere/Resources/ECSTaskDefinition.hs
+++ b/library-gen/Stratosphere/Resources/ECSTaskDefinition.hs
@@ -43,21 +43,6 @@
     , fmap (("Volumes",) . toJSON) _eCSTaskDefinitionVolumes
     ]
 
-instance FromJSON ECSTaskDefinition where
-  parseJSON (Object obj) =
-    ECSTaskDefinition <$>
-      (obj .:? "ContainerDefinitions") <*>
-      (obj .:? "Cpu") <*>
-      (obj .:? "ExecutionRoleArn") <*>
-      (obj .:? "Family") <*>
-      (obj .:? "Memory") <*>
-      (obj .:? "NetworkMode") <*>
-      (obj .:? "PlacementConstraints") <*>
-      (obj .:? "RequiresCompatibilities") <*>
-      (obj .:? "TaskRoleArn") <*>
-      (obj .:? "Volumes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ECSTaskDefinition' containing required fields as
 -- arguments.
 ecsTaskDefinition
diff --git a/library-gen/Stratosphere/Resources/EFSFileSystem.hs b/library-gen/Stratosphere/Resources/EFSFileSystem.hs
--- a/library-gen/Stratosphere/Resources/EFSFileSystem.hs
+++ b/library-gen/Stratosphere/Resources/EFSFileSystem.hs
@@ -33,17 +33,6 @@
     , fmap (("ThroughputMode",) . toJSON) _eFSFileSystemThroughputMode
     ]
 
-instance FromJSON EFSFileSystem where
-  parseJSON (Object obj) =
-    EFSFileSystem <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Encrypted") <*>
-      (obj .:? "FileSystemTags") <*>
-      (obj .:? "KmsKeyId") <*>
-      (obj .:? "PerformanceMode") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "ProvisionedThroughputInMibps") <*>
-      (obj .:? "ThroughputMode")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EFSFileSystem' containing required fields as arguments.
 efsFileSystem
   :: EFSFileSystem
diff --git a/library-gen/Stratosphere/Resources/EFSMountTarget.hs b/library-gen/Stratosphere/Resources/EFSMountTarget.hs
--- a/library-gen/Stratosphere/Resources/EFSMountTarget.hs
+++ b/library-gen/Stratosphere/Resources/EFSMountTarget.hs
@@ -29,15 +29,6 @@
     , (Just . ("SubnetId",) . toJSON) _eFSMountTargetSubnetId
     ]
 
-instance FromJSON EFSMountTarget where
-  parseJSON (Object obj) =
-    EFSMountTarget <$>
-      (obj .: "FileSystemId") <*>
-      (obj .:? "IpAddress") <*>
-      (obj .: "SecurityGroups") <*>
-      (obj .: "SubnetId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EFSMountTarget' containing required fields as arguments.
 efsMountTarget
   :: Val Text -- ^ 'efsmtFileSystemId'
diff --git a/library-gen/Stratosphere/Resources/EKSCluster.hs b/library-gen/Stratosphere/Resources/EKSCluster.hs
--- a/library-gen/Stratosphere/Resources/EKSCluster.hs
+++ b/library-gen/Stratosphere/Resources/EKSCluster.hs
@@ -29,15 +29,6 @@
     , fmap (("Version",) . toJSON) _eKSClusterVersion
     ]
 
-instance FromJSON EKSCluster where
-  parseJSON (Object obj) =
-    EKSCluster <$>
-      (obj .:? "Name") <*>
-      (obj .: "ResourcesVpcConfig") <*>
-      (obj .: "RoleArn") <*>
-      (obj .:? "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EKSCluster' containing required fields as arguments.
 eksCluster
   :: EKSClusterResourcesVpcConfig -- ^ 'ekscResourcesVpcConfig'
diff --git a/library-gen/Stratosphere/Resources/EMRCluster.hs b/library-gen/Stratosphere/Resources/EMRCluster.hs
--- a/library-gen/Stratosphere/Resources/EMRCluster.hs
+++ b/library-gen/Stratosphere/Resources/EMRCluster.hs
@@ -65,30 +65,6 @@
     , fmap (("VisibleToAllUsers",) . toJSON . fmap Bool') _eMRClusterVisibleToAllUsers
     ]
 
-instance FromJSON EMRCluster where
-  parseJSON (Object obj) =
-    EMRCluster <$>
-      (obj .:? "AdditionalInfo") <*>
-      (obj .:? "Applications") <*>
-      (obj .:? "AutoScalingRole") <*>
-      (obj .:? "BootstrapActions") <*>
-      (obj .:? "Configurations") <*>
-      (obj .:? "CustomAmiId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "EbsRootVolumeSize") <*>
-      (obj .: "Instances") <*>
-      (obj .: "JobFlowRole") <*>
-      (obj .:? "KerberosAttributes") <*>
-      (obj .:? "LogUri") <*>
-      (obj .: "Name") <*>
-      (obj .:? "ReleaseLabel") <*>
-      (obj .:? "ScaleDownBehavior") <*>
-      (obj .:? "SecurityConfiguration") <*>
-      (obj .: "ServiceRole") <*>
-      (obj .:? "Steps") <*>
-      (obj .:? "Tags") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "VisibleToAllUsers")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRCluster' containing required fields as arguments.
 emrCluster
   :: EMRClusterJobFlowInstancesConfig -- ^ 'emrcInstances'
diff --git a/library-gen/Stratosphere/Resources/EMRInstanceFleetConfig.hs b/library-gen/Stratosphere/Resources/EMRInstanceFleetConfig.hs
--- a/library-gen/Stratosphere/Resources/EMRInstanceFleetConfig.hs
+++ b/library-gen/Stratosphere/Resources/EMRInstanceFleetConfig.hs
@@ -36,18 +36,6 @@
     , fmap (("TargetSpotCapacity",) . toJSON . fmap Integer') _eMRInstanceFleetConfigTargetSpotCapacity
     ]
 
-instance FromJSON EMRInstanceFleetConfig where
-  parseJSON (Object obj) =
-    EMRInstanceFleetConfig <$>
-      (obj .: "ClusterId") <*>
-      (obj .: "InstanceFleetType") <*>
-      (obj .:? "InstanceTypeConfigs") <*>
-      (obj .:? "LaunchSpecifications") <*>
-      (obj .:? "Name") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "TargetOnDemandCapacity") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "TargetSpotCapacity")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceFleetConfig' containing required fields as
 -- arguments.
 emrInstanceFleetConfig
diff --git a/library-gen/Stratosphere/Resources/EMRInstanceGroupConfig.hs b/library-gen/Stratosphere/Resources/EMRInstanceGroupConfig.hs
--- a/library-gen/Stratosphere/Resources/EMRInstanceGroupConfig.hs
+++ b/library-gen/Stratosphere/Resources/EMRInstanceGroupConfig.hs
@@ -43,21 +43,6 @@
     , fmap (("Name",) . toJSON) _eMRInstanceGroupConfigName
     ]
 
-instance FromJSON EMRInstanceGroupConfig where
-  parseJSON (Object obj) =
-    EMRInstanceGroupConfig <$>
-      (obj .:? "AutoScalingPolicy") <*>
-      (obj .:? "BidPrice") <*>
-      (obj .:? "Configurations") <*>
-      (obj .:? "EbsConfiguration") <*>
-      fmap (fmap unInteger') (obj .: "InstanceCount") <*>
-      (obj .: "InstanceRole") <*>
-      (obj .: "InstanceType") <*>
-      (obj .: "JobFlowId") <*>
-      (obj .:? "Market") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRInstanceGroupConfig' containing required fields as
 -- arguments.
 emrInstanceGroupConfig
diff --git a/library-gen/Stratosphere/Resources/EMRSecurityConfiguration.hs b/library-gen/Stratosphere/Resources/EMRSecurityConfiguration.hs
--- a/library-gen/Stratosphere/Resources/EMRSecurityConfiguration.hs
+++ b/library-gen/Stratosphere/Resources/EMRSecurityConfiguration.hs
@@ -25,13 +25,6 @@
     , (Just . ("SecurityConfiguration",) . toJSON) _eMRSecurityConfigurationSecurityConfiguration
     ]
 
-instance FromJSON EMRSecurityConfiguration where
-  parseJSON (Object obj) =
-    EMRSecurityConfiguration <$>
-      (obj .:? "Name") <*>
-      (obj .: "SecurityConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRSecurityConfiguration' containing required fields as
 -- arguments.
 emrSecurityConfiguration
diff --git a/library-gen/Stratosphere/Resources/EMRStep.hs b/library-gen/Stratosphere/Resources/EMRStep.hs
--- a/library-gen/Stratosphere/Resources/EMRStep.hs
+++ b/library-gen/Stratosphere/Resources/EMRStep.hs
@@ -29,15 +29,6 @@
     , (Just . ("Name",) . toJSON) _eMRStepName
     ]
 
-instance FromJSON EMRStep where
-  parseJSON (Object obj) =
-    EMRStep <$>
-      (obj .: "ActionOnFailure") <*>
-      (obj .: "HadoopJarStep") <*>
-      (obj .: "JobFlowId") <*>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EMRStep' containing required fields as arguments.
 emrStep
   :: Val Text -- ^ 'emrsActionOnFailure'
diff --git a/library-gen/Stratosphere/Resources/ElastiCacheCacheCluster.hs b/library-gen/Stratosphere/Resources/ElastiCacheCacheCluster.hs
--- a/library-gen/Stratosphere/Resources/ElastiCacheCacheCluster.hs
+++ b/library-gen/Stratosphere/Resources/ElastiCacheCacheCluster.hs
@@ -63,32 +63,6 @@
     , fmap (("VpcSecurityGroupIds",) . toJSON) _elastiCacheCacheClusterVpcSecurityGroupIds
     ]
 
-instance FromJSON ElastiCacheCacheCluster where
-  parseJSON (Object obj) =
-    ElastiCacheCacheCluster <$>
-      (obj .:? "AZMode") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "AutoMinorVersionUpgrade") <*>
-      (obj .: "CacheNodeType") <*>
-      (obj .:? "CacheParameterGroupName") <*>
-      (obj .:? "CacheSecurityGroupNames") <*>
-      (obj .:? "CacheSubnetGroupName") <*>
-      (obj .:? "ClusterName") <*>
-      (obj .: "Engine") <*>
-      (obj .:? "EngineVersion") <*>
-      (obj .:? "NotificationTopicArn") <*>
-      fmap (fmap unInteger') (obj .: "NumCacheNodes") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Port") <*>
-      (obj .:? "PreferredAvailabilityZone") <*>
-      (obj .:? "PreferredAvailabilityZones") <*>
-      (obj .:? "PreferredMaintenanceWindow") <*>
-      (obj .:? "SnapshotArns") <*>
-      (obj .:? "SnapshotName") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SnapshotRetentionLimit") <*>
-      (obj .:? "SnapshotWindow") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "VpcSecurityGroupIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElastiCacheCacheCluster' containing required fields as
 -- arguments.
 elastiCacheCacheCluster
diff --git a/library-gen/Stratosphere/Resources/ElastiCacheParameterGroup.hs b/library-gen/Stratosphere/Resources/ElastiCacheParameterGroup.hs
--- a/library-gen/Stratosphere/Resources/ElastiCacheParameterGroup.hs
+++ b/library-gen/Stratosphere/Resources/ElastiCacheParameterGroup.hs
@@ -27,14 +27,6 @@
     , fmap (("Properties",) . toJSON) _elastiCacheParameterGroupProperties
     ]
 
-instance FromJSON ElastiCacheParameterGroup where
-  parseJSON (Object obj) =
-    ElastiCacheParameterGroup <$>
-      (obj .: "CacheParameterGroupFamily") <*>
-      (obj .: "Description") <*>
-      (obj .:? "Properties")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElastiCacheParameterGroup' containing required fields as
 -- arguments.
 elastiCacheParameterGroup
diff --git a/library-gen/Stratosphere/Resources/ElastiCacheReplicationGroup.hs b/library-gen/Stratosphere/Resources/ElastiCacheReplicationGroup.hs
--- a/library-gen/Stratosphere/Resources/ElastiCacheReplicationGroup.hs
+++ b/library-gen/Stratosphere/Resources/ElastiCacheReplicationGroup.hs
@@ -80,40 +80,6 @@
     , fmap (("TransitEncryptionEnabled",) . toJSON . fmap Bool') _elastiCacheReplicationGroupTransitEncryptionEnabled
     ]
 
-instance FromJSON ElastiCacheReplicationGroup where
-  parseJSON (Object obj) =
-    ElastiCacheReplicationGroup <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AtRestEncryptionEnabled") <*>
-      (obj .:? "AuthToken") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "AutoMinorVersionUpgrade") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "AutomaticFailoverEnabled") <*>
-      (obj .:? "CacheNodeType") <*>
-      (obj .:? "CacheParameterGroupName") <*>
-      (obj .:? "CacheSecurityGroupNames") <*>
-      (obj .:? "CacheSubnetGroupName") <*>
-      (obj .:? "Engine") <*>
-      (obj .:? "EngineVersion") <*>
-      (obj .:? "NodeGroupConfiguration") <*>
-      (obj .:? "NotificationTopicArn") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "NumCacheClusters") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "NumNodeGroups") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Port") <*>
-      (obj .:? "PreferredCacheClusterAZs") <*>
-      (obj .:? "PreferredMaintenanceWindow") <*>
-      (obj .:? "PrimaryClusterId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ReplicasPerNodeGroup") <*>
-      (obj .: "ReplicationGroupDescription") <*>
-      (obj .:? "ReplicationGroupId") <*>
-      (obj .:? "SecurityGroupIds") <*>
-      (obj .:? "SnapshotArns") <*>
-      (obj .:? "SnapshotName") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "SnapshotRetentionLimit") <*>
-      (obj .:? "SnapshotWindow") <*>
-      (obj .:? "SnapshottingClusterId") <*>
-      (obj .:? "Tags") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "TransitEncryptionEnabled")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElastiCacheReplicationGroup' containing required fields
 -- as arguments.
 elastiCacheReplicationGroup
diff --git a/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroup.hs b/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroup.hs
--- a/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroup.hs
+++ b/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroup.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Description",) . toJSON) _elastiCacheSecurityGroupDescription
     ]
 
-instance FromJSON ElastiCacheSecurityGroup where
-  parseJSON (Object obj) =
-    ElastiCacheSecurityGroup <$>
-      (obj .: "Description")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElastiCacheSecurityGroup' containing required fields as
 -- arguments.
 elastiCacheSecurityGroup
diff --git a/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroupIngress.hs b/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroupIngress.hs
--- a/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroupIngress.hs
+++ b/library-gen/Stratosphere/Resources/ElastiCacheSecurityGroupIngress.hs
@@ -27,14 +27,6 @@
     , fmap (("EC2SecurityGroupOwnerId",) . toJSON) _elastiCacheSecurityGroupIngressEC2SecurityGroupOwnerId
     ]
 
-instance FromJSON ElastiCacheSecurityGroupIngress where
-  parseJSON (Object obj) =
-    ElastiCacheSecurityGroupIngress <$>
-      (obj .: "CacheSecurityGroupName") <*>
-      (obj .: "EC2SecurityGroupName") <*>
-      (obj .:? "EC2SecurityGroupOwnerId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElastiCacheSecurityGroupIngress' containing required
 -- fields as arguments.
 elastiCacheSecurityGroupIngress
diff --git a/library-gen/Stratosphere/Resources/ElastiCacheSubnetGroup.hs b/library-gen/Stratosphere/Resources/ElastiCacheSubnetGroup.hs
--- a/library-gen/Stratosphere/Resources/ElastiCacheSubnetGroup.hs
+++ b/library-gen/Stratosphere/Resources/ElastiCacheSubnetGroup.hs
@@ -27,14 +27,6 @@
     , (Just . ("SubnetIds",) . toJSON) _elastiCacheSubnetGroupSubnetIds
     ]
 
-instance FromJSON ElastiCacheSubnetGroup where
-  parseJSON (Object obj) =
-    ElastiCacheSubnetGroup <$>
-      (obj .:? "CacheSubnetGroupName") <*>
-      (obj .: "Description") <*>
-      (obj .: "SubnetIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElastiCacheSubnetGroup' containing required fields as
 -- arguments.
 elastiCacheSubnetGroup
diff --git a/library-gen/Stratosphere/Resources/ElasticBeanstalkApplication.hs b/library-gen/Stratosphere/Resources/ElasticBeanstalkApplication.hs
--- a/library-gen/Stratosphere/Resources/ElasticBeanstalkApplication.hs
+++ b/library-gen/Stratosphere/Resources/ElasticBeanstalkApplication.hs
@@ -27,14 +27,6 @@
     , fmap (("ResourceLifecycleConfig",) . toJSON) _elasticBeanstalkApplicationResourceLifecycleConfig
     ]
 
-instance FromJSON ElasticBeanstalkApplication where
-  parseJSON (Object obj) =
-    ElasticBeanstalkApplication <$>
-      (obj .:? "ApplicationName") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "ResourceLifecycleConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticBeanstalkApplication' containing required fields
 -- as arguments.
 elasticBeanstalkApplication
diff --git a/library-gen/Stratosphere/Resources/ElasticBeanstalkApplicationVersion.hs b/library-gen/Stratosphere/Resources/ElasticBeanstalkApplicationVersion.hs
--- a/library-gen/Stratosphere/Resources/ElasticBeanstalkApplicationVersion.hs
+++ b/library-gen/Stratosphere/Resources/ElasticBeanstalkApplicationVersion.hs
@@ -27,14 +27,6 @@
     , (Just . ("SourceBundle",) . toJSON) _elasticBeanstalkApplicationVersionSourceBundle
     ]
 
-instance FromJSON ElasticBeanstalkApplicationVersion where
-  parseJSON (Object obj) =
-    ElasticBeanstalkApplicationVersion <$>
-      (obj .: "ApplicationName") <*>
-      (obj .:? "Description") <*>
-      (obj .: "SourceBundle")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticBeanstalkApplicationVersion' containing required
 -- fields as arguments.
 elasticBeanstalkApplicationVersion
diff --git a/library-gen/Stratosphere/Resources/ElasticBeanstalkConfigurationTemplate.hs b/library-gen/Stratosphere/Resources/ElasticBeanstalkConfigurationTemplate.hs
--- a/library-gen/Stratosphere/Resources/ElasticBeanstalkConfigurationTemplate.hs
+++ b/library-gen/Stratosphere/Resources/ElasticBeanstalkConfigurationTemplate.hs
@@ -37,18 +37,6 @@
     , fmap (("SourceConfiguration",) . toJSON) _elasticBeanstalkConfigurationTemplateSourceConfiguration
     ]
 
-instance FromJSON ElasticBeanstalkConfigurationTemplate where
-  parseJSON (Object obj) =
-    ElasticBeanstalkConfigurationTemplate <$>
-      (obj .: "ApplicationName") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "EnvironmentId") <*>
-      (obj .:? "OptionSettings") <*>
-      (obj .:? "PlatformArn") <*>
-      (obj .:? "SolutionStackName") <*>
-      (obj .:? "SourceConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticBeanstalkConfigurationTemplate' containing
 -- required fields as arguments.
 elasticBeanstalkConfigurationTemplate
diff --git a/library-gen/Stratosphere/Resources/ElasticBeanstalkEnvironment.hs b/library-gen/Stratosphere/Resources/ElasticBeanstalkEnvironment.hs
--- a/library-gen/Stratosphere/Resources/ElasticBeanstalkEnvironment.hs
+++ b/library-gen/Stratosphere/Resources/ElasticBeanstalkEnvironment.hs
@@ -45,22 +45,6 @@
     , fmap (("VersionLabel",) . toJSON) _elasticBeanstalkEnvironmentVersionLabel
     ]
 
-instance FromJSON ElasticBeanstalkEnvironment where
-  parseJSON (Object obj) =
-    ElasticBeanstalkEnvironment <$>
-      (obj .: "ApplicationName") <*>
-      (obj .:? "CNAMEPrefix") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "EnvironmentName") <*>
-      (obj .:? "OptionSettings") <*>
-      (obj .:? "PlatformArn") <*>
-      (obj .:? "SolutionStackName") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "TemplateName") <*>
-      (obj .:? "Tier") <*>
-      (obj .:? "VersionLabel")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticBeanstalkEnvironment' containing required fields
 -- as arguments.
 elasticBeanstalkEnvironment
diff --git a/library-gen/Stratosphere/Resources/ElasticLoadBalancingLoadBalancer.hs b/library-gen/Stratosphere/Resources/ElasticLoadBalancingLoadBalancer.hs
--- a/library-gen/Stratosphere/Resources/ElasticLoadBalancingLoadBalancer.hs
+++ b/library-gen/Stratosphere/Resources/ElasticLoadBalancingLoadBalancer.hs
@@ -61,27 +61,6 @@
     , fmap (("Tags",) . toJSON) _elasticLoadBalancingLoadBalancerTags
     ]
 
-instance FromJSON ElasticLoadBalancingLoadBalancer where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingLoadBalancer <$>
-      (obj .:? "AccessLoggingPolicy") <*>
-      (obj .:? "AppCookieStickinessPolicy") <*>
-      (obj .:? "AvailabilityZones") <*>
-      (obj .:? "ConnectionDrainingPolicy") <*>
-      (obj .:? "ConnectionSettings") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "CrossZone") <*>
-      (obj .:? "HealthCheck") <*>
-      (obj .:? "Instances") <*>
-      (obj .:? "LBCookieStickinessPolicy") <*>
-      (obj .: "Listeners") <*>
-      (obj .:? "LoadBalancerName") <*>
-      (obj .:? "Policies") <*>
-      (obj .:? "Scheme") <*>
-      (obj .:? "SecurityGroups") <*>
-      (obj .:? "Subnets") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingLoadBalancer' containing required
 -- fields as arguments.
 elasticLoadBalancingLoadBalancer
diff --git a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2Listener.hs b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2Listener.hs
--- a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2Listener.hs
+++ b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2Listener.hs
@@ -34,17 +34,6 @@
     , fmap (("SslPolicy",) . toJSON) _elasticLoadBalancingV2ListenerSslPolicy
     ]
 
-instance FromJSON ElasticLoadBalancingV2Listener where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2Listener <$>
-      (obj .:? "Certificates") <*>
-      (obj .: "DefaultActions") <*>
-      (obj .: "LoadBalancerArn") <*>
-      fmap (fmap unInteger') (obj .: "Port") <*>
-      (obj .: "Protocol") <*>
-      (obj .:? "SslPolicy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2Listener' containing required
 -- fields as arguments.
 elasticLoadBalancingV2Listener
diff --git a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerCertificateResource.hs b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerCertificateResource.hs
--- a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerCertificateResource.hs
+++ b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerCertificateResource.hs
@@ -27,13 +27,6 @@
     , (Just . ("ListenerArn",) . toJSON) _elasticLoadBalancingV2ListenerCertificateResourceListenerArn
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerCertificateResource where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerCertificateResource <$>
-      (obj .: "Certificates") <*>
-      (obj .: "ListenerArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2ListenerCertificateResource'
 -- containing required fields as arguments.
 elasticLoadBalancingV2ListenerCertificateResource
diff --git a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerRule.hs b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerRule.hs
--- a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerRule.hs
+++ b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2ListenerRule.hs
@@ -30,15 +30,6 @@
     , (Just . ("Priority",) . toJSON . fmap Integer') _elasticLoadBalancingV2ListenerRulePriority
     ]
 
-instance FromJSON ElasticLoadBalancingV2ListenerRule where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2ListenerRule <$>
-      (obj .: "Actions") <*>
-      (obj .: "Conditions") <*>
-      (obj .: "ListenerArn") <*>
-      fmap (fmap unInteger') (obj .: "Priority")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2ListenerRule' containing required
 -- fields as arguments.
 elasticLoadBalancingV2ListenerRule
diff --git a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2LoadBalancer.hs b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2LoadBalancer.hs
--- a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2LoadBalancer.hs
+++ b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2LoadBalancer.hs
@@ -41,20 +41,6 @@
     , fmap (("Type",) . toJSON) _elasticLoadBalancingV2LoadBalancerType
     ]
 
-instance FromJSON ElasticLoadBalancingV2LoadBalancer where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2LoadBalancer <$>
-      (obj .:? "IpAddressType") <*>
-      (obj .:? "LoadBalancerAttributes") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Scheme") <*>
-      (obj .:? "SecurityGroups") <*>
-      (obj .:? "SubnetMappings") <*>
-      (obj .:? "Subnets") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2LoadBalancer' containing required
 -- fields as arguments.
 elasticLoadBalancingV2LoadBalancer
diff --git a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2TargetGroup.hs b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2TargetGroup.hs
--- a/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2TargetGroup.hs
+++ b/library-gen/Stratosphere/Resources/ElasticLoadBalancingV2TargetGroup.hs
@@ -58,28 +58,6 @@
     , fmap (("VpcId",) . toJSON) _elasticLoadBalancingV2TargetGroupVpcId
     ]
 
-instance FromJSON ElasticLoadBalancingV2TargetGroup where
-  parseJSON (Object obj) =
-    ElasticLoadBalancingV2TargetGroup <$>
-      fmap (fmap (fmap unBool')) (obj .:? "HealthCheckEnabled") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "HealthCheckIntervalSeconds") <*>
-      (obj .:? "HealthCheckPath") <*>
-      (obj .:? "HealthCheckPort") <*>
-      (obj .:? "HealthCheckProtocol") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "HealthCheckTimeoutSeconds") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "HealthyThresholdCount") <*>
-      (obj .:? "Matcher") <*>
-      (obj .:? "Name") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Port") <*>
-      (obj .:? "Protocol") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "TargetGroupAttributes") <*>
-      (obj .:? "TargetType") <*>
-      (obj .:? "Targets") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "UnhealthyThresholdCount") <*>
-      (obj .:? "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticLoadBalancingV2TargetGroup' containing required
 -- fields as arguments.
 elasticLoadBalancingV2TargetGroup
diff --git a/library-gen/Stratosphere/Resources/ElasticsearchDomain.hs b/library-gen/Stratosphere/Resources/ElasticsearchDomain.hs
--- a/library-gen/Stratosphere/Resources/ElasticsearchDomain.hs
+++ b/library-gen/Stratosphere/Resources/ElasticsearchDomain.hs
@@ -49,22 +49,6 @@
     , fmap (("VPCOptions",) . toJSON) _elasticsearchDomainVPCOptions
     ]
 
-instance FromJSON ElasticsearchDomain where
-  parseJSON (Object obj) =
-    ElasticsearchDomain <$>
-      (obj .:? "AccessPolicies") <*>
-      (obj .:? "AdvancedOptions") <*>
-      (obj .:? "DomainName") <*>
-      (obj .:? "EBSOptions") <*>
-      (obj .:? "ElasticsearchClusterConfig") <*>
-      (obj .:? "ElasticsearchVersion") <*>
-      (obj .:? "EncryptionAtRestOptions") <*>
-      (obj .:? "NodeToNodeEncryptionOptions") <*>
-      (obj .:? "SnapshotOptions") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "VPCOptions")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ElasticsearchDomain' containing required fields as
 -- arguments.
 elasticsearchDomain
diff --git a/library-gen/Stratosphere/Resources/EventsEventBusPolicy.hs b/library-gen/Stratosphere/Resources/EventsEventBusPolicy.hs
--- a/library-gen/Stratosphere/Resources/EventsEventBusPolicy.hs
+++ b/library-gen/Stratosphere/Resources/EventsEventBusPolicy.hs
@@ -29,15 +29,6 @@
     , (Just . ("StatementId",) . toJSON) _eventsEventBusPolicyStatementId
     ]
 
-instance FromJSON EventsEventBusPolicy where
-  parseJSON (Object obj) =
-    EventsEventBusPolicy <$>
-      (obj .: "Action") <*>
-      (obj .:? "Condition") <*>
-      (obj .: "Principal") <*>
-      (obj .: "StatementId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EventsEventBusPolicy' containing required fields as
 -- arguments.
 eventsEventBusPolicy
diff --git a/library-gen/Stratosphere/Resources/EventsRule.hs b/library-gen/Stratosphere/Resources/EventsRule.hs
--- a/library-gen/Stratosphere/Resources/EventsRule.hs
+++ b/library-gen/Stratosphere/Resources/EventsRule.hs
@@ -36,18 +36,6 @@
     , fmap (("Targets",) . toJSON) _eventsRuleTargets
     ]
 
-instance FromJSON EventsRule where
-  parseJSON (Object obj) =
-    EventsRule <$>
-      (obj .:? "Description") <*>
-      (obj .:? "EventPattern") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "RoleArn") <*>
-      (obj .:? "ScheduleExpression") <*>
-      (obj .:? "State") <*>
-      (obj .:? "Targets")
-  parseJSON _ = mempty
-
 -- | Constructor for 'EventsRule' containing required fields as arguments.
 eventsRule
   :: EventsRule
diff --git a/library-gen/Stratosphere/Resources/FSxFileSystem.hs b/library-gen/Stratosphere/Resources/FSxFileSystem.hs
--- a/library-gen/Stratosphere/Resources/FSxFileSystem.hs
+++ b/library-gen/Stratosphere/Resources/FSxFileSystem.hs
@@ -41,20 +41,6 @@
     , fmap (("WindowsConfiguration",) . toJSON) _fSxFileSystemWindowsConfiguration
     ]
 
-instance FromJSON FSxFileSystem where
-  parseJSON (Object obj) =
-    FSxFileSystem <$>
-      (obj .:? "BackupId") <*>
-      (obj .:? "FileSystemType") <*>
-      (obj .:? "KmsKeyId") <*>
-      (obj .:? "LustreConfiguration") <*>
-      (obj .:? "SecurityGroupIds") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "StorageCapacity") <*>
-      (obj .:? "SubnetIds") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "WindowsConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'FSxFileSystem' containing required fields as arguments.
 fSxFileSystem
   :: FSxFileSystem
diff --git a/library-gen/Stratosphere/Resources/GameLiftAlias.hs b/library-gen/Stratosphere/Resources/GameLiftAlias.hs
--- a/library-gen/Stratosphere/Resources/GameLiftAlias.hs
+++ b/library-gen/Stratosphere/Resources/GameLiftAlias.hs
@@ -27,14 +27,6 @@
     , (Just . ("RoutingStrategy",) . toJSON) _gameLiftAliasRoutingStrategy
     ]
 
-instance FromJSON GameLiftAlias where
-  parseJSON (Object obj) =
-    GameLiftAlias <$>
-      (obj .:? "Description") <*>
-      (obj .: "Name") <*>
-      (obj .: "RoutingStrategy")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GameLiftAlias' containing required fields as arguments.
 gameLiftAlias
   :: Val Text -- ^ 'glaName'
diff --git a/library-gen/Stratosphere/Resources/GameLiftBuild.hs b/library-gen/Stratosphere/Resources/GameLiftBuild.hs
--- a/library-gen/Stratosphere/Resources/GameLiftBuild.hs
+++ b/library-gen/Stratosphere/Resources/GameLiftBuild.hs
@@ -27,14 +27,6 @@
     , fmap (("Version",) . toJSON) _gameLiftBuildVersion
     ]
 
-instance FromJSON GameLiftBuild where
-  parseJSON (Object obj) =
-    GameLiftBuild <$>
-      (obj .:? "Name") <*>
-      (obj .:? "StorageLocation") <*>
-      (obj .:? "Version")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GameLiftBuild' containing required fields as arguments.
 gameLiftBuild
   :: GameLiftBuild
diff --git a/library-gen/Stratosphere/Resources/GameLiftFleet.hs b/library-gen/Stratosphere/Resources/GameLiftFleet.hs
--- a/library-gen/Stratosphere/Resources/GameLiftFleet.hs
+++ b/library-gen/Stratosphere/Resources/GameLiftFleet.hs
@@ -43,22 +43,6 @@
     , (Just . ("ServerLaunchPath",) . toJSON) _gameLiftFleetServerLaunchPath
     ]
 
-instance FromJSON GameLiftFleet where
-  parseJSON (Object obj) =
-    GameLiftFleet <$>
-      (obj .: "BuildId") <*>
-      (obj .:? "Description") <*>
-      fmap (fmap unInteger') (obj .: "DesiredEC2Instances") <*>
-      (obj .:? "EC2InboundPermissions") <*>
-      (obj .: "EC2InstanceType") <*>
-      (obj .:? "LogPaths") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MaxSize") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MinSize") <*>
-      (obj .: "Name") <*>
-      (obj .:? "ServerLaunchParameters") <*>
-      (obj .: "ServerLaunchPath")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GameLiftFleet' containing required fields as arguments.
 gameLiftFleet
   :: Val Text -- ^ 'glfBuildId'
diff --git a/library-gen/Stratosphere/Resources/GlueClassifier.hs b/library-gen/Stratosphere/Resources/GlueClassifier.hs
--- a/library-gen/Stratosphere/Resources/GlueClassifier.hs
+++ b/library-gen/Stratosphere/Resources/GlueClassifier.hs
@@ -29,14 +29,6 @@
     , fmap (("XMLClassifier",) . toJSON) _glueClassifierXMLClassifier
     ]
 
-instance FromJSON GlueClassifier where
-  parseJSON (Object obj) =
-    GlueClassifier <$>
-      (obj .:? "GrokClassifier") <*>
-      (obj .:? "JsonClassifier") <*>
-      (obj .:? "XMLClassifier")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueClassifier' containing required fields as arguments.
 glueClassifier
   :: GlueClassifier
diff --git a/library-gen/Stratosphere/Resources/GlueConnection.hs b/library-gen/Stratosphere/Resources/GlueConnection.hs
--- a/library-gen/Stratosphere/Resources/GlueConnection.hs
+++ b/library-gen/Stratosphere/Resources/GlueConnection.hs
@@ -25,13 +25,6 @@
     , (Just . ("ConnectionInput",) . toJSON) _glueConnectionConnectionInput
     ]
 
-instance FromJSON GlueConnection where
-  parseJSON (Object obj) =
-    GlueConnection <$>
-      (obj .: "CatalogId") <*>
-      (obj .: "ConnectionInput")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueConnection' containing required fields as arguments.
 glueConnection
   :: Val Text -- ^ 'gcCatalogId'
diff --git a/library-gen/Stratosphere/Resources/GlueCrawler.hs b/library-gen/Stratosphere/Resources/GlueCrawler.hs
--- a/library-gen/Stratosphere/Resources/GlueCrawler.hs
+++ b/library-gen/Stratosphere/Resources/GlueCrawler.hs
@@ -43,21 +43,6 @@
     , (Just . ("Targets",) . toJSON) _glueCrawlerTargets
     ]
 
-instance FromJSON GlueCrawler where
-  parseJSON (Object obj) =
-    GlueCrawler <$>
-      (obj .:? "Classifiers") <*>
-      (obj .:? "Configuration") <*>
-      (obj .: "DatabaseName") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "Name") <*>
-      (obj .: "Role") <*>
-      (obj .:? "Schedule") <*>
-      (obj .:? "SchemaChangePolicy") <*>
-      (obj .:? "TablePrefix") <*>
-      (obj .: "Targets")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueCrawler' containing required fields as arguments.
 glueCrawler
   :: Val Text -- ^ 'gcDatabaseName'
diff --git a/library-gen/Stratosphere/Resources/GlueDatabase.hs b/library-gen/Stratosphere/Resources/GlueDatabase.hs
--- a/library-gen/Stratosphere/Resources/GlueDatabase.hs
+++ b/library-gen/Stratosphere/Resources/GlueDatabase.hs
@@ -25,13 +25,6 @@
     , (Just . ("DatabaseInput",) . toJSON) _glueDatabaseDatabaseInput
     ]
 
-instance FromJSON GlueDatabase where
-  parseJSON (Object obj) =
-    GlueDatabase <$>
-      (obj .: "CatalogId") <*>
-      (obj .: "DatabaseInput")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueDatabase' containing required fields as arguments.
 glueDatabase
   :: Val Text -- ^ 'gdCatalogId'
diff --git a/library-gen/Stratosphere/Resources/GlueDevEndpoint.hs b/library-gen/Stratosphere/Resources/GlueDevEndpoint.hs
--- a/library-gen/Stratosphere/Resources/GlueDevEndpoint.hs
+++ b/library-gen/Stratosphere/Resources/GlueDevEndpoint.hs
@@ -37,19 +37,6 @@
     , fmap (("SubnetId",) . toJSON) _glueDevEndpointSubnetId
     ]
 
-instance FromJSON GlueDevEndpoint where
-  parseJSON (Object obj) =
-    GlueDevEndpoint <$>
-      (obj .:? "EndpointName") <*>
-      (obj .:? "ExtraJarsS3Path") <*>
-      (obj .:? "ExtraPythonLibsS3Path") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "NumberOfNodes") <*>
-      (obj .: "PublicKey") <*>
-      (obj .: "RoleArn") <*>
-      (obj .:? "SecurityGroupIds") <*>
-      (obj .:? "SubnetId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueDevEndpoint' containing required fields as
 -- arguments.
 glueDevEndpoint
diff --git a/library-gen/Stratosphere/Resources/GlueJob.hs b/library-gen/Stratosphere/Resources/GlueJob.hs
--- a/library-gen/Stratosphere/Resources/GlueJob.hs
+++ b/library-gen/Stratosphere/Resources/GlueJob.hs
@@ -43,21 +43,6 @@
     , (Just . ("Role",) . toJSON) _glueJobRole
     ]
 
-instance FromJSON GlueJob where
-  parseJSON (Object obj) =
-    GlueJob <$>
-      fmap (fmap (fmap unDouble')) (obj .:? "AllocatedCapacity") <*>
-      (obj .: "Command") <*>
-      (obj .:? "Connections") <*>
-      (obj .:? "DefaultArguments") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "ExecutionProperty") <*>
-      (obj .:? "LogUri") <*>
-      fmap (fmap (fmap unDouble')) (obj .:? "MaxRetries") <*>
-      (obj .:? "Name") <*>
-      (obj .: "Role")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueJob' containing required fields as arguments.
 glueJob
   :: GlueJobJobCommand -- ^ 'gjCommand'
diff --git a/library-gen/Stratosphere/Resources/GluePartition.hs b/library-gen/Stratosphere/Resources/GluePartition.hs
--- a/library-gen/Stratosphere/Resources/GluePartition.hs
+++ b/library-gen/Stratosphere/Resources/GluePartition.hs
@@ -29,15 +29,6 @@
     , (Just . ("TableName",) . toJSON) _gluePartitionTableName
     ]
 
-instance FromJSON GluePartition where
-  parseJSON (Object obj) =
-    GluePartition <$>
-      (obj .: "CatalogId") <*>
-      (obj .: "DatabaseName") <*>
-      (obj .: "PartitionInput") <*>
-      (obj .: "TableName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GluePartition' containing required fields as arguments.
 gluePartition
   :: Val Text -- ^ 'gpCatalogId'
diff --git a/library-gen/Stratosphere/Resources/GlueTable.hs b/library-gen/Stratosphere/Resources/GlueTable.hs
--- a/library-gen/Stratosphere/Resources/GlueTable.hs
+++ b/library-gen/Stratosphere/Resources/GlueTable.hs
@@ -27,14 +27,6 @@
     , (Just . ("TableInput",) . toJSON) _glueTableTableInput
     ]
 
-instance FromJSON GlueTable where
-  parseJSON (Object obj) =
-    GlueTable <$>
-      (obj .: "CatalogId") <*>
-      (obj .: "DatabaseName") <*>
-      (obj .: "TableInput")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueTable' containing required fields as arguments.
 glueTable
   :: Val Text -- ^ 'gtCatalogId'
diff --git a/library-gen/Stratosphere/Resources/GlueTrigger.hs b/library-gen/Stratosphere/Resources/GlueTrigger.hs
--- a/library-gen/Stratosphere/Resources/GlueTrigger.hs
+++ b/library-gen/Stratosphere/Resources/GlueTrigger.hs
@@ -34,17 +34,6 @@
     , (Just . ("Type",) . toJSON) _glueTriggerType
     ]
 
-instance FromJSON GlueTrigger where
-  parseJSON (Object obj) =
-    GlueTrigger <$>
-      (obj .: "Actions") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Predicate") <*>
-      (obj .:? "Schedule") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GlueTrigger' containing required fields as arguments.
 glueTrigger
   :: [GlueTriggerAction] -- ^ 'gtActions'
diff --git a/library-gen/Stratosphere/Resources/GuardDutyDetector.hs b/library-gen/Stratosphere/Resources/GuardDutyDetector.hs
--- a/library-gen/Stratosphere/Resources/GuardDutyDetector.hs
+++ b/library-gen/Stratosphere/Resources/GuardDutyDetector.hs
@@ -25,13 +25,6 @@
     , fmap (("FindingPublishingFrequency",) . toJSON) _guardDutyDetectorFindingPublishingFrequency
     ]
 
-instance FromJSON GuardDutyDetector where
-  parseJSON (Object obj) =
-    GuardDutyDetector <$>
-      fmap (fmap unBool') (obj .: "Enable") <*>
-      (obj .:? "FindingPublishingFrequency")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GuardDutyDetector' containing required fields as
 -- arguments.
 guardDutyDetector
diff --git a/library-gen/Stratosphere/Resources/GuardDutyFilter.hs b/library-gen/Stratosphere/Resources/GuardDutyFilter.hs
--- a/library-gen/Stratosphere/Resources/GuardDutyFilter.hs
+++ b/library-gen/Stratosphere/Resources/GuardDutyFilter.hs
@@ -33,17 +33,6 @@
     , (Just . ("Rank",) . toJSON . fmap Integer') _guardDutyFilterRank
     ]
 
-instance FromJSON GuardDutyFilter where
-  parseJSON (Object obj) =
-    GuardDutyFilter <$>
-      (obj .: "Action") <*>
-      (obj .: "Description") <*>
-      (obj .: "DetectorId") <*>
-      (obj .: "FindingCriteria") <*>
-      (obj .:? "Name") <*>
-      fmap (fmap unInteger') (obj .: "Rank")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GuardDutyFilter' containing required fields as
 -- arguments.
 guardDutyFilter
diff --git a/library-gen/Stratosphere/Resources/GuardDutyIPSet.hs b/library-gen/Stratosphere/Resources/GuardDutyIPSet.hs
--- a/library-gen/Stratosphere/Resources/GuardDutyIPSet.hs
+++ b/library-gen/Stratosphere/Resources/GuardDutyIPSet.hs
@@ -31,16 +31,6 @@
     , fmap (("Name",) . toJSON) _guardDutyIPSetName
     ]
 
-instance FromJSON GuardDutyIPSet where
-  parseJSON (Object obj) =
-    GuardDutyIPSet <$>
-      fmap (fmap unBool') (obj .: "Activate") <*>
-      (obj .: "DetectorId") <*>
-      (obj .: "Format") <*>
-      (obj .: "Location") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GuardDutyIPSet' containing required fields as arguments.
 guardDutyIPSet
   :: Val Bool -- ^ 'gdipsActivate'
diff --git a/library-gen/Stratosphere/Resources/GuardDutyMaster.hs b/library-gen/Stratosphere/Resources/GuardDutyMaster.hs
--- a/library-gen/Stratosphere/Resources/GuardDutyMaster.hs
+++ b/library-gen/Stratosphere/Resources/GuardDutyMaster.hs
@@ -27,14 +27,6 @@
     , (Just . ("MasterId",) . toJSON) _guardDutyMasterMasterId
     ]
 
-instance FromJSON GuardDutyMaster where
-  parseJSON (Object obj) =
-    GuardDutyMaster <$>
-      (obj .: "DetectorId") <*>
-      (obj .:? "InvitationId") <*>
-      (obj .: "MasterId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GuardDutyMaster' containing required fields as
 -- arguments.
 guardDutyMaster
diff --git a/library-gen/Stratosphere/Resources/GuardDutyMember.hs b/library-gen/Stratosphere/Resources/GuardDutyMember.hs
--- a/library-gen/Stratosphere/Resources/GuardDutyMember.hs
+++ b/library-gen/Stratosphere/Resources/GuardDutyMember.hs
@@ -33,17 +33,6 @@
     , fmap (("Status",) . toJSON) _guardDutyMemberStatus
     ]
 
-instance FromJSON GuardDutyMember where
-  parseJSON (Object obj) =
-    GuardDutyMember <$>
-      (obj .: "DetectorId") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DisableEmailNotification") <*>
-      (obj .: "Email") <*>
-      (obj .: "MemberId") <*>
-      (obj .:? "Message") <*>
-      (obj .:? "Status")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GuardDutyMember' containing required fields as
 -- arguments.
 guardDutyMember
diff --git a/library-gen/Stratosphere/Resources/GuardDutyThreatIntelSet.hs b/library-gen/Stratosphere/Resources/GuardDutyThreatIntelSet.hs
--- a/library-gen/Stratosphere/Resources/GuardDutyThreatIntelSet.hs
+++ b/library-gen/Stratosphere/Resources/GuardDutyThreatIntelSet.hs
@@ -31,16 +31,6 @@
     , fmap (("Name",) . toJSON) _guardDutyThreatIntelSetName
     ]
 
-instance FromJSON GuardDutyThreatIntelSet where
-  parseJSON (Object obj) =
-    GuardDutyThreatIntelSet <$>
-      fmap (fmap unBool') (obj .: "Activate") <*>
-      (obj .: "DetectorId") <*>
-      (obj .: "Format") <*>
-      (obj .: "Location") <*>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'GuardDutyThreatIntelSet' containing required fields as
 -- arguments.
 guardDutyThreatIntelSet
diff --git a/library-gen/Stratosphere/Resources/IAMAccessKey.hs b/library-gen/Stratosphere/Resources/IAMAccessKey.hs
--- a/library-gen/Stratosphere/Resources/IAMAccessKey.hs
+++ b/library-gen/Stratosphere/Resources/IAMAccessKey.hs
@@ -27,14 +27,6 @@
     , (Just . ("UserName",) . toJSON) _iAMAccessKeyUserName
     ]
 
-instance FromJSON IAMAccessKey where
-  parseJSON (Object obj) =
-    IAMAccessKey <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "Serial") <*>
-      (obj .:? "Status") <*>
-      (obj .: "UserName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IAMAccessKey' containing required fields as arguments.
 iamAccessKey
   :: Val Text -- ^ 'iamakUserName'
diff --git a/library-gen/Stratosphere/Resources/IAMGroup.hs b/library-gen/Stratosphere/Resources/IAMGroup.hs
--- a/library-gen/Stratosphere/Resources/IAMGroup.hs
+++ b/library-gen/Stratosphere/Resources/IAMGroup.hs
@@ -29,15 +29,6 @@
     , fmap (("Policies",) . toJSON) _iAMGroupPolicies
     ]
 
-instance FromJSON IAMGroup where
-  parseJSON (Object obj) =
-    IAMGroup <$>
-      (obj .:? "GroupName") <*>
-      (obj .:? "ManagedPolicyArns") <*>
-      (obj .:? "Path") <*>
-      (obj .:? "Policies")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IAMGroup' containing required fields as arguments.
 iamGroup
   :: IAMGroup
diff --git a/library-gen/Stratosphere/Resources/IAMInstanceProfile.hs b/library-gen/Stratosphere/Resources/IAMInstanceProfile.hs
--- a/library-gen/Stratosphere/Resources/IAMInstanceProfile.hs
+++ b/library-gen/Stratosphere/Resources/IAMInstanceProfile.hs
@@ -27,14 +27,6 @@
     , (Just . ("Roles",) . toJSON) _iAMInstanceProfileRoles
     ]
 
-instance FromJSON IAMInstanceProfile where
-  parseJSON (Object obj) =
-    IAMInstanceProfile <$>
-      (obj .:? "InstanceProfileName") <*>
-      (obj .:? "Path") <*>
-      (obj .: "Roles")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IAMInstanceProfile' containing required fields as
 -- arguments.
 iamInstanceProfile
diff --git a/library-gen/Stratosphere/Resources/IAMManagedPolicy.hs b/library-gen/Stratosphere/Resources/IAMManagedPolicy.hs
--- a/library-gen/Stratosphere/Resources/IAMManagedPolicy.hs
+++ b/library-gen/Stratosphere/Resources/IAMManagedPolicy.hs
@@ -35,18 +35,6 @@
     , fmap (("Users",) . toJSON) _iAMManagedPolicyUsers
     ]
 
-instance FromJSON IAMManagedPolicy where
-  parseJSON (Object obj) =
-    IAMManagedPolicy <$>
-      (obj .:? "Description") <*>
-      (obj .:? "Groups") <*>
-      (obj .:? "ManagedPolicyName") <*>
-      (obj .:? "Path") <*>
-      (obj .: "PolicyDocument") <*>
-      (obj .:? "Roles") <*>
-      (obj .:? "Users")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IAMManagedPolicy' containing required fields as
 -- arguments.
 iamManagedPolicy
diff --git a/library-gen/Stratosphere/Resources/IAMPolicy.hs b/library-gen/Stratosphere/Resources/IAMPolicy.hs
--- a/library-gen/Stratosphere/Resources/IAMPolicy.hs
+++ b/library-gen/Stratosphere/Resources/IAMPolicy.hs
@@ -31,16 +31,6 @@
     , fmap (("Users",) . toJSON) _iAMPolicyUsers
     ]
 
-instance FromJSON IAMPolicy where
-  parseJSON (Object obj) =
-    IAMPolicy <$>
-      (obj .:? "Groups") <*>
-      (obj .: "PolicyDocument") <*>
-      (obj .: "PolicyName") <*>
-      (obj .:? "Roles") <*>
-      (obj .:? "Users")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IAMPolicy' containing required fields as arguments.
 iamPolicy
   :: Object -- ^ 'iampPolicyDocument'
diff --git a/library-gen/Stratosphere/Resources/IAMRole.hs b/library-gen/Stratosphere/Resources/IAMRole.hs
--- a/library-gen/Stratosphere/Resources/IAMRole.hs
+++ b/library-gen/Stratosphere/Resources/IAMRole.hs
@@ -35,18 +35,6 @@
     , fmap (("RoleName",) . toJSON) _iAMRoleRoleName
     ]
 
-instance FromJSON IAMRole where
-  parseJSON (Object obj) =
-    IAMRole <$>
-      (obj .: "AssumeRolePolicyDocument") <*>
-      (obj .:? "ManagedPolicyArns") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MaxSessionDuration") <*>
-      (obj .:? "Path") <*>
-      (obj .:? "PermissionsBoundary") <*>
-      (obj .:? "Policies") <*>
-      (obj .:? "RoleName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IAMRole' containing required fields as arguments.
 iamRole
   :: Object -- ^ 'iamrAssumeRolePolicyDocument'
diff --git a/library-gen/Stratosphere/Resources/IAMServiceLinkedRole.hs b/library-gen/Stratosphere/Resources/IAMServiceLinkedRole.hs
--- a/library-gen/Stratosphere/Resources/IAMServiceLinkedRole.hs
+++ b/library-gen/Stratosphere/Resources/IAMServiceLinkedRole.hs
@@ -27,14 +27,6 @@
     , fmap (("Description",) . toJSON) _iAMServiceLinkedRoleDescription
     ]
 
-instance FromJSON IAMServiceLinkedRole where
-  parseJSON (Object obj) =
-    IAMServiceLinkedRole <$>
-      (obj .: "AWSServiceName") <*>
-      (obj .:? "CustomSuffix") <*>
-      (obj .:? "Description")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IAMServiceLinkedRole' containing required fields as
 -- arguments.
 iamServiceLinkedRole
diff --git a/library-gen/Stratosphere/Resources/IAMUser.hs b/library-gen/Stratosphere/Resources/IAMUser.hs
--- a/library-gen/Stratosphere/Resources/IAMUser.hs
+++ b/library-gen/Stratosphere/Resources/IAMUser.hs
@@ -36,18 +36,6 @@
     , fmap (("UserName",) . toJSON) _iAMUserUserName
     ]
 
-instance FromJSON IAMUser where
-  parseJSON (Object obj) =
-    IAMUser <$>
-      (obj .:? "Groups") <*>
-      (obj .:? "LoginProfile") <*>
-      (obj .:? "ManagedPolicyArns") <*>
-      (obj .:? "Path") <*>
-      (obj .:? "PermissionsBoundary") <*>
-      (obj .:? "Policies") <*>
-      (obj .:? "UserName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IAMUser' containing required fields as arguments.
 iamUser
   :: IAMUser
diff --git a/library-gen/Stratosphere/Resources/IAMUserToGroupAddition.hs b/library-gen/Stratosphere/Resources/IAMUserToGroupAddition.hs
--- a/library-gen/Stratosphere/Resources/IAMUserToGroupAddition.hs
+++ b/library-gen/Stratosphere/Resources/IAMUserToGroupAddition.hs
@@ -25,13 +25,6 @@
     , (Just . ("Users",) . toJSON) _iAMUserToGroupAdditionUsers
     ]
 
-instance FromJSON IAMUserToGroupAddition where
-  parseJSON (Object obj) =
-    IAMUserToGroupAddition <$>
-      (obj .: "GroupName") <*>
-      (obj .: "Users")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IAMUserToGroupAddition' containing required fields as
 -- arguments.
 iamUserToGroupAddition
diff --git a/library-gen/Stratosphere/Resources/InspectorAssessmentTarget.hs b/library-gen/Stratosphere/Resources/InspectorAssessmentTarget.hs
--- a/library-gen/Stratosphere/Resources/InspectorAssessmentTarget.hs
+++ b/library-gen/Stratosphere/Resources/InspectorAssessmentTarget.hs
@@ -25,13 +25,6 @@
     , fmap (("ResourceGroupArn",) . toJSON) _inspectorAssessmentTargetResourceGroupArn
     ]
 
-instance FromJSON InspectorAssessmentTarget where
-  parseJSON (Object obj) =
-    InspectorAssessmentTarget <$>
-      (obj .:? "AssessmentTargetName") <*>
-      (obj .:? "ResourceGroupArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'InspectorAssessmentTarget' containing required fields as
 -- arguments.
 inspectorAssessmentTarget
diff --git a/library-gen/Stratosphere/Resources/InspectorAssessmentTemplate.hs b/library-gen/Stratosphere/Resources/InspectorAssessmentTemplate.hs
--- a/library-gen/Stratosphere/Resources/InspectorAssessmentTemplate.hs
+++ b/library-gen/Stratosphere/Resources/InspectorAssessmentTemplate.hs
@@ -31,16 +31,6 @@
     , fmap (("UserAttributesForFindings",) . toJSON) _inspectorAssessmentTemplateUserAttributesForFindings
     ]
 
-instance FromJSON InspectorAssessmentTemplate where
-  parseJSON (Object obj) =
-    InspectorAssessmentTemplate <$>
-      (obj .: "AssessmentTargetArn") <*>
-      (obj .:? "AssessmentTemplateName") <*>
-      fmap (fmap unInteger') (obj .: "DurationInSeconds") <*>
-      (obj .: "RulesPackageArns") <*>
-      (obj .:? "UserAttributesForFindings")
-  parseJSON _ = mempty
-
 -- | Constructor for 'InspectorAssessmentTemplate' containing required fields
 -- as arguments.
 inspectorAssessmentTemplate
diff --git a/library-gen/Stratosphere/Resources/InspectorResourceGroup.hs b/library-gen/Stratosphere/Resources/InspectorResourceGroup.hs
--- a/library-gen/Stratosphere/Resources/InspectorResourceGroup.hs
+++ b/library-gen/Stratosphere/Resources/InspectorResourceGroup.hs
@@ -23,12 +23,6 @@
     [ (Just . ("ResourceGroupTags",) . toJSON) _inspectorResourceGroupResourceGroupTags
     ]
 
-instance FromJSON InspectorResourceGroup where
-  parseJSON (Object obj) =
-    InspectorResourceGroup <$>
-      (obj .: "ResourceGroupTags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'InspectorResourceGroup' containing required fields as
 -- arguments.
 inspectorResourceGroup
diff --git a/library-gen/Stratosphere/Resources/IoT1ClickDevice.hs b/library-gen/Stratosphere/Resources/IoT1ClickDevice.hs
--- a/library-gen/Stratosphere/Resources/IoT1ClickDevice.hs
+++ b/library-gen/Stratosphere/Resources/IoT1ClickDevice.hs
@@ -25,13 +25,6 @@
     , (Just . ("Enabled",) . toJSON . fmap Bool') _ioT1ClickDeviceEnabled
     ]
 
-instance FromJSON IoT1ClickDevice where
-  parseJSON (Object obj) =
-    IoT1ClickDevice <$>
-      (obj .: "DeviceId") <*>
-      fmap (fmap unBool') (obj .: "Enabled")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoT1ClickDevice' containing required fields as
 -- arguments.
 ioT1ClickDevice
diff --git a/library-gen/Stratosphere/Resources/IoT1ClickPlacement.hs b/library-gen/Stratosphere/Resources/IoT1ClickPlacement.hs
--- a/library-gen/Stratosphere/Resources/IoT1ClickPlacement.hs
+++ b/library-gen/Stratosphere/Resources/IoT1ClickPlacement.hs
@@ -29,15 +29,6 @@
     , (Just . ("ProjectName",) . toJSON) _ioT1ClickPlacementProjectName
     ]
 
-instance FromJSON IoT1ClickPlacement where
-  parseJSON (Object obj) =
-    IoT1ClickPlacement <$>
-      (obj .:? "AssociatedDevices") <*>
-      (obj .:? "Attributes") <*>
-      (obj .:? "PlacementName") <*>
-      (obj .: "ProjectName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoT1ClickPlacement' containing required fields as
 -- arguments.
 ioT1ClickPlacement
diff --git a/library-gen/Stratosphere/Resources/IoT1ClickProject.hs b/library-gen/Stratosphere/Resources/IoT1ClickProject.hs
--- a/library-gen/Stratosphere/Resources/IoT1ClickProject.hs
+++ b/library-gen/Stratosphere/Resources/IoT1ClickProject.hs
@@ -27,14 +27,6 @@
     , fmap (("ProjectName",) . toJSON) _ioT1ClickProjectProjectName
     ]
 
-instance FromJSON IoT1ClickProject where
-  parseJSON (Object obj) =
-    IoT1ClickProject <$>
-      (obj .:? "Description") <*>
-      (obj .: "PlacementTemplate") <*>
-      (obj .:? "ProjectName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoT1ClickProject' containing required fields as
 -- arguments.
 ioT1ClickProject
diff --git a/library-gen/Stratosphere/Resources/IoTAnalyticsChannel.hs b/library-gen/Stratosphere/Resources/IoTAnalyticsChannel.hs
--- a/library-gen/Stratosphere/Resources/IoTAnalyticsChannel.hs
+++ b/library-gen/Stratosphere/Resources/IoTAnalyticsChannel.hs
@@ -28,14 +28,6 @@
     , fmap (("Tags",) . toJSON) _ioTAnalyticsChannelTags
     ]
 
-instance FromJSON IoTAnalyticsChannel where
-  parseJSON (Object obj) =
-    IoTAnalyticsChannel <$>
-      (obj .:? "ChannelName") <*>
-      (obj .:? "RetentionPeriod") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsChannel' containing required fields as
 -- arguments.
 ioTAnalyticsChannel
diff --git a/library-gen/Stratosphere/Resources/IoTAnalyticsDataset.hs b/library-gen/Stratosphere/Resources/IoTAnalyticsDataset.hs
--- a/library-gen/Stratosphere/Resources/IoTAnalyticsDataset.hs
+++ b/library-gen/Stratosphere/Resources/IoTAnalyticsDataset.hs
@@ -34,16 +34,6 @@
     , fmap (("Triggers",) . toJSON) _ioTAnalyticsDatasetTriggers
     ]
 
-instance FromJSON IoTAnalyticsDataset where
-  parseJSON (Object obj) =
-    IoTAnalyticsDataset <$>
-      (obj .: "Actions") <*>
-      (obj .:? "DatasetName") <*>
-      (obj .:? "RetentionPeriod") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "Triggers")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDataset' containing required fields as
 -- arguments.
 ioTAnalyticsDataset
diff --git a/library-gen/Stratosphere/Resources/IoTAnalyticsDatastore.hs b/library-gen/Stratosphere/Resources/IoTAnalyticsDatastore.hs
--- a/library-gen/Stratosphere/Resources/IoTAnalyticsDatastore.hs
+++ b/library-gen/Stratosphere/Resources/IoTAnalyticsDatastore.hs
@@ -28,14 +28,6 @@
     , fmap (("Tags",) . toJSON) _ioTAnalyticsDatastoreTags
     ]
 
-instance FromJSON IoTAnalyticsDatastore where
-  parseJSON (Object obj) =
-    IoTAnalyticsDatastore <$>
-      (obj .:? "DatastoreName") <*>
-      (obj .:? "RetentionPeriod") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsDatastore' containing required fields as
 -- arguments.
 ioTAnalyticsDatastore
diff --git a/library-gen/Stratosphere/Resources/IoTAnalyticsPipeline.hs b/library-gen/Stratosphere/Resources/IoTAnalyticsPipeline.hs
--- a/library-gen/Stratosphere/Resources/IoTAnalyticsPipeline.hs
+++ b/library-gen/Stratosphere/Resources/IoTAnalyticsPipeline.hs
@@ -28,14 +28,6 @@
     , fmap (("Tags",) . toJSON) _ioTAnalyticsPipelineTags
     ]
 
-instance FromJSON IoTAnalyticsPipeline where
-  parseJSON (Object obj) =
-    IoTAnalyticsPipeline <$>
-      (obj .: "PipelineActivities") <*>
-      (obj .:? "PipelineName") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTAnalyticsPipeline' containing required fields as
 -- arguments.
 ioTAnalyticsPipeline
diff --git a/library-gen/Stratosphere/Resources/IoTCertificate.hs b/library-gen/Stratosphere/Resources/IoTCertificate.hs
--- a/library-gen/Stratosphere/Resources/IoTCertificate.hs
+++ b/library-gen/Stratosphere/Resources/IoTCertificate.hs
@@ -25,13 +25,6 @@
     , (Just . ("Status",) . toJSON) _ioTCertificateStatus
     ]
 
-instance FromJSON IoTCertificate where
-  parseJSON (Object obj) =
-    IoTCertificate <$>
-      (obj .: "CertificateSigningRequest") <*>
-      (obj .: "Status")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTCertificate' containing required fields as arguments.
 ioTCertificate
   :: Val Text -- ^ 'itcCertificateSigningRequest'
diff --git a/library-gen/Stratosphere/Resources/IoTPolicy.hs b/library-gen/Stratosphere/Resources/IoTPolicy.hs
--- a/library-gen/Stratosphere/Resources/IoTPolicy.hs
+++ b/library-gen/Stratosphere/Resources/IoTPolicy.hs
@@ -25,13 +25,6 @@
     , fmap (("PolicyName",) . toJSON) _ioTPolicyPolicyName
     ]
 
-instance FromJSON IoTPolicy where
-  parseJSON (Object obj) =
-    IoTPolicy <$>
-      (obj .: "PolicyDocument") <*>
-      (obj .:? "PolicyName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTPolicy' containing required fields as arguments.
 ioTPolicy
   :: Object -- ^ 'itpPolicyDocument'
diff --git a/library-gen/Stratosphere/Resources/IoTPolicyPrincipalAttachment.hs b/library-gen/Stratosphere/Resources/IoTPolicyPrincipalAttachment.hs
--- a/library-gen/Stratosphere/Resources/IoTPolicyPrincipalAttachment.hs
+++ b/library-gen/Stratosphere/Resources/IoTPolicyPrincipalAttachment.hs
@@ -25,13 +25,6 @@
     , (Just . ("Principal",) . toJSON) _ioTPolicyPrincipalAttachmentPrincipal
     ]
 
-instance FromJSON IoTPolicyPrincipalAttachment where
-  parseJSON (Object obj) =
-    IoTPolicyPrincipalAttachment <$>
-      (obj .: "PolicyName") <*>
-      (obj .: "Principal")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTPolicyPrincipalAttachment' containing required fields
 -- as arguments.
 ioTPolicyPrincipalAttachment
diff --git a/library-gen/Stratosphere/Resources/IoTThing.hs b/library-gen/Stratosphere/Resources/IoTThing.hs
--- a/library-gen/Stratosphere/Resources/IoTThing.hs
+++ b/library-gen/Stratosphere/Resources/IoTThing.hs
@@ -25,13 +25,6 @@
     , fmap (("ThingName",) . toJSON) _ioTThingThingName
     ]
 
-instance FromJSON IoTThing where
-  parseJSON (Object obj) =
-    IoTThing <$>
-      (obj .:? "AttributePayload") <*>
-      (obj .:? "ThingName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTThing' containing required fields as arguments.
 ioTThing
   :: IoTThing
diff --git a/library-gen/Stratosphere/Resources/IoTThingPrincipalAttachment.hs b/library-gen/Stratosphere/Resources/IoTThingPrincipalAttachment.hs
--- a/library-gen/Stratosphere/Resources/IoTThingPrincipalAttachment.hs
+++ b/library-gen/Stratosphere/Resources/IoTThingPrincipalAttachment.hs
@@ -25,13 +25,6 @@
     , (Just . ("ThingName",) . toJSON) _ioTThingPrincipalAttachmentThingName
     ]
 
-instance FromJSON IoTThingPrincipalAttachment where
-  parseJSON (Object obj) =
-    IoTThingPrincipalAttachment <$>
-      (obj .: "Principal") <*>
-      (obj .: "ThingName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTThingPrincipalAttachment' containing required fields
 -- as arguments.
 ioTThingPrincipalAttachment
diff --git a/library-gen/Stratosphere/Resources/IoTTopicRule.hs b/library-gen/Stratosphere/Resources/IoTTopicRule.hs
--- a/library-gen/Stratosphere/Resources/IoTTopicRule.hs
+++ b/library-gen/Stratosphere/Resources/IoTTopicRule.hs
@@ -25,13 +25,6 @@
     , (Just . ("TopicRulePayload",) . toJSON) _ioTTopicRuleTopicRulePayload
     ]
 
-instance FromJSON IoTTopicRule where
-  parseJSON (Object obj) =
-    IoTTopicRule <$>
-      (obj .:? "RuleName") <*>
-      (obj .: "TopicRulePayload")
-  parseJSON _ = mempty
-
 -- | Constructor for 'IoTTopicRule' containing required fields as arguments.
 ioTTopicRule
   :: IoTTopicRuleTopicRulePayload -- ^ 'ittrTopicRulePayload'
diff --git a/library-gen/Stratosphere/Resources/KMSAlias.hs b/library-gen/Stratosphere/Resources/KMSAlias.hs
--- a/library-gen/Stratosphere/Resources/KMSAlias.hs
+++ b/library-gen/Stratosphere/Resources/KMSAlias.hs
@@ -25,13 +25,6 @@
     , (Just . ("TargetKeyId",) . toJSON) _kMSAliasTargetKeyId
     ]
 
-instance FromJSON KMSAlias where
-  parseJSON (Object obj) =
-    KMSAlias <$>
-      (obj .: "AliasName") <*>
-      (obj .: "TargetKeyId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KMSAlias' containing required fields as arguments.
 kmsAlias
   :: Val Text -- ^ 'kmsaAliasName'
diff --git a/library-gen/Stratosphere/Resources/KMSKey.hs b/library-gen/Stratosphere/Resources/KMSKey.hs
--- a/library-gen/Stratosphere/Resources/KMSKey.hs
+++ b/library-gen/Stratosphere/Resources/KMSKey.hs
@@ -35,18 +35,6 @@
     , fmap (("Tags",) . toJSON) _kMSKeyTags
     ]
 
-instance FromJSON KMSKey where
-  parseJSON (Object obj) =
-    KMSKey <$>
-      (obj .:? "Description") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnableKeyRotation") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      (obj .: "KeyPolicy") <*>
-      (obj .:? "KeyUsage") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "PendingWindowInDays") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KMSKey' containing required fields as arguments.
 kmsKey
   :: Object -- ^ 'kmskKeyPolicy'
diff --git a/library-gen/Stratosphere/Resources/KinesisAnalyticsApplication.hs b/library-gen/Stratosphere/Resources/KinesisAnalyticsApplication.hs
--- a/library-gen/Stratosphere/Resources/KinesisAnalyticsApplication.hs
+++ b/library-gen/Stratosphere/Resources/KinesisAnalyticsApplication.hs
@@ -29,15 +29,6 @@
     , (Just . ("Inputs",) . toJSON) _kinesisAnalyticsApplicationInputs
     ]
 
-instance FromJSON KinesisAnalyticsApplication where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplication <$>
-      (obj .:? "ApplicationCode") <*>
-      (obj .:? "ApplicationDescription") <*>
-      (obj .:? "ApplicationName") <*>
-      (obj .: "Inputs")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplication' containing required fields
 -- as arguments.
 kinesisAnalyticsApplication
diff --git a/library-gen/Stratosphere/Resources/KinesisAnalyticsApplicationOutput.hs b/library-gen/Stratosphere/Resources/KinesisAnalyticsApplicationOutput.hs
--- a/library-gen/Stratosphere/Resources/KinesisAnalyticsApplicationOutput.hs
+++ b/library-gen/Stratosphere/Resources/KinesisAnalyticsApplicationOutput.hs
@@ -25,13 +25,6 @@
     , (Just . ("Output",) . toJSON) _kinesisAnalyticsApplicationOutputOutput
     ]
 
-instance FromJSON KinesisAnalyticsApplicationOutput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationOutput <$>
-      (obj .: "ApplicationName") <*>
-      (obj .: "Output")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationOutput' containing required
 -- fields as arguments.
 kinesisAnalyticsApplicationOutput
diff --git a/library-gen/Stratosphere/Resources/KinesisAnalyticsApplicationReferenceDataSource.hs b/library-gen/Stratosphere/Resources/KinesisAnalyticsApplicationReferenceDataSource.hs
--- a/library-gen/Stratosphere/Resources/KinesisAnalyticsApplicationReferenceDataSource.hs
+++ b/library-gen/Stratosphere/Resources/KinesisAnalyticsApplicationReferenceDataSource.hs
@@ -27,13 +27,6 @@
     , (Just . ("ReferenceDataSource",) . toJSON) _kinesisAnalyticsApplicationReferenceDataSourceReferenceDataSource
     ]
 
-instance FromJSON KinesisAnalyticsApplicationReferenceDataSource where
-  parseJSON (Object obj) =
-    KinesisAnalyticsApplicationReferenceDataSource <$>
-      (obj .: "ApplicationName") <*>
-      (obj .: "ReferenceDataSource")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsApplicationReferenceDataSource'
 -- containing required fields as arguments.
 kinesisAnalyticsApplicationReferenceDataSource
diff --git a/library-gen/Stratosphere/Resources/KinesisAnalyticsV2Application.hs b/library-gen/Stratosphere/Resources/KinesisAnalyticsV2Application.hs
--- a/library-gen/Stratosphere/Resources/KinesisAnalyticsV2Application.hs
+++ b/library-gen/Stratosphere/Resources/KinesisAnalyticsV2Application.hs
@@ -31,16 +31,6 @@
     , (Just . ("ServiceExecutionRole",) . toJSON) _kinesisAnalyticsV2ApplicationServiceExecutionRole
     ]
 
-instance FromJSON KinesisAnalyticsV2Application where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2Application <$>
-      (obj .:? "ApplicationConfiguration") <*>
-      (obj .:? "ApplicationDescription") <*>
-      (obj .:? "ApplicationName") <*>
-      (obj .: "RuntimeEnvironment") <*>
-      (obj .: "ServiceExecutionRole")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2Application' containing required
 -- fields as arguments.
 kinesisAnalyticsV2Application
diff --git a/library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationCloudWatchLoggingOption.hs b/library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationCloudWatchLoggingOption.hs
--- a/library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationCloudWatchLoggingOption.hs
+++ b/library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationCloudWatchLoggingOption.hs
@@ -27,13 +27,6 @@
     , (Just . ("CloudWatchLoggingOption",) . toJSON) _kinesisAnalyticsV2ApplicationCloudWatchLoggingOptionCloudWatchLoggingOption
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationCloudWatchLoggingOption where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationCloudWatchLoggingOption <$>
-      (obj .: "ApplicationName") <*>
-      (obj .: "CloudWatchLoggingOption")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationCloudWatchLoggingOption'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationCloudWatchLoggingOption
diff --git a/library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationOutput.hs b/library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationOutput.hs
--- a/library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationOutput.hs
+++ b/library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationOutput.hs
@@ -25,13 +25,6 @@
     , (Just . ("Output",) . toJSON) _kinesisAnalyticsV2ApplicationOutputOutput
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationOutput where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationOutput <$>
-      (obj .: "ApplicationName") <*>
-      (obj .: "Output")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationOutput' containing required
 -- fields as arguments.
 kinesisAnalyticsV2ApplicationOutput
diff --git a/library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationReferenceDataSource.hs b/library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationReferenceDataSource.hs
--- a/library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationReferenceDataSource.hs
+++ b/library-gen/Stratosphere/Resources/KinesisAnalyticsV2ApplicationReferenceDataSource.hs
@@ -27,13 +27,6 @@
     , (Just . ("ReferenceDataSource",) . toJSON) _kinesisAnalyticsV2ApplicationReferenceDataSourceReferenceDataSource
     ]
 
-instance FromJSON KinesisAnalyticsV2ApplicationReferenceDataSource where
-  parseJSON (Object obj) =
-    KinesisAnalyticsV2ApplicationReferenceDataSource <$>
-      (obj .: "ApplicationName") <*>
-      (obj .: "ReferenceDataSource")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisAnalyticsV2ApplicationReferenceDataSource'
 -- containing required fields as arguments.
 kinesisAnalyticsV2ApplicationReferenceDataSource
diff --git a/library-gen/Stratosphere/Resources/KinesisFirehoseDeliveryStream.hs b/library-gen/Stratosphere/Resources/KinesisFirehoseDeliveryStream.hs
--- a/library-gen/Stratosphere/Resources/KinesisFirehoseDeliveryStream.hs
+++ b/library-gen/Stratosphere/Resources/KinesisFirehoseDeliveryStream.hs
@@ -42,19 +42,6 @@
     , fmap (("SplunkDestinationConfiguration",) . toJSON) _kinesisFirehoseDeliveryStreamSplunkDestinationConfiguration
     ]
 
-instance FromJSON KinesisFirehoseDeliveryStream where
-  parseJSON (Object obj) =
-    KinesisFirehoseDeliveryStream <$>
-      (obj .:? "DeliveryStreamName") <*>
-      (obj .:? "DeliveryStreamType") <*>
-      (obj .:? "ElasticsearchDestinationConfiguration") <*>
-      (obj .:? "ExtendedS3DestinationConfiguration") <*>
-      (obj .:? "KinesisStreamSourceConfiguration") <*>
-      (obj .:? "RedshiftDestinationConfiguration") <*>
-      (obj .:? "S3DestinationConfiguration") <*>
-      (obj .:? "SplunkDestinationConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisFirehoseDeliveryStream' containing required
 -- fields as arguments.
 kinesisFirehoseDeliveryStream
diff --git a/library-gen/Stratosphere/Resources/KinesisStream.hs b/library-gen/Stratosphere/Resources/KinesisStream.hs
--- a/library-gen/Stratosphere/Resources/KinesisStream.hs
+++ b/library-gen/Stratosphere/Resources/KinesisStream.hs
@@ -32,16 +32,6 @@
     , fmap (("Tags",) . toJSON) _kinesisStreamTags
     ]
 
-instance FromJSON KinesisStream where
-  parseJSON (Object obj) =
-    KinesisStream <$>
-      (obj .:? "Name") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "RetentionPeriodHours") <*>
-      fmap (fmap unInteger') (obj .: "ShardCount") <*>
-      (obj .:? "StreamEncryption") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisStream' containing required fields as arguments.
 kinesisStream
   :: Val Integer -- ^ 'ksShardCount'
diff --git a/library-gen/Stratosphere/Resources/KinesisStreamConsumer.hs b/library-gen/Stratosphere/Resources/KinesisStreamConsumer.hs
--- a/library-gen/Stratosphere/Resources/KinesisStreamConsumer.hs
+++ b/library-gen/Stratosphere/Resources/KinesisStreamConsumer.hs
@@ -25,13 +25,6 @@
     , (Just . ("StreamARN",) . toJSON) _kinesisStreamConsumerStreamARN
     ]
 
-instance FromJSON KinesisStreamConsumer where
-  parseJSON (Object obj) =
-    KinesisStreamConsumer <$>
-      (obj .: "ConsumerName") <*>
-      (obj .: "StreamARN")
-  parseJSON _ = mempty
-
 -- | Constructor for 'KinesisStreamConsumer' containing required fields as
 -- arguments.
 kinesisStreamConsumer
diff --git a/library-gen/Stratosphere/Resources/LambdaAlias.hs b/library-gen/Stratosphere/Resources/LambdaAlias.hs
--- a/library-gen/Stratosphere/Resources/LambdaAlias.hs
+++ b/library-gen/Stratosphere/Resources/LambdaAlias.hs
@@ -31,16 +31,6 @@
     , fmap (("RoutingConfig",) . toJSON) _lambdaAliasRoutingConfig
     ]
 
-instance FromJSON LambdaAlias where
-  parseJSON (Object obj) =
-    LambdaAlias <$>
-      (obj .:? "Description") <*>
-      (obj .: "FunctionName") <*>
-      (obj .: "FunctionVersion") <*>
-      (obj .: "Name") <*>
-      (obj .:? "RoutingConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaAlias' containing required fields as arguments.
 lambdaAlias
   :: Val Text -- ^ 'laFunctionName'
diff --git a/library-gen/Stratosphere/Resources/LambdaEventSourceMapping.hs b/library-gen/Stratosphere/Resources/LambdaEventSourceMapping.hs
--- a/library-gen/Stratosphere/Resources/LambdaEventSourceMapping.hs
+++ b/library-gen/Stratosphere/Resources/LambdaEventSourceMapping.hs
@@ -31,16 +31,6 @@
     , fmap (("StartingPosition",) . toJSON) _lambdaEventSourceMappingStartingPosition
     ]
 
-instance FromJSON LambdaEventSourceMapping where
-  parseJSON (Object obj) =
-    LambdaEventSourceMapping <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "BatchSize") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      (obj .: "EventSourceArn") <*>
-      (obj .: "FunctionName") <*>
-      (obj .:? "StartingPosition")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaEventSourceMapping' containing required fields as
 -- arguments.
 lambdaEventSourceMapping
diff --git a/library-gen/Stratosphere/Resources/LambdaFunction.hs b/library-gen/Stratosphere/Resources/LambdaFunction.hs
--- a/library-gen/Stratosphere/Resources/LambdaFunction.hs
+++ b/library-gen/Stratosphere/Resources/LambdaFunction.hs
@@ -59,27 +59,6 @@
     , fmap (("VpcConfig",) . toJSON) _lambdaFunctionVpcConfig
     ]
 
-instance FromJSON LambdaFunction where
-  parseJSON (Object obj) =
-    LambdaFunction <$>
-      (obj .: "Code") <*>
-      (obj .:? "DeadLetterConfig") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "Environment") <*>
-      (obj .:? "FunctionName") <*>
-      (obj .: "Handler") <*>
-      (obj .:? "KmsKeyArn") <*>
-      (obj .:? "Layers") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MemorySize") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ReservedConcurrentExecutions") <*>
-      (obj .: "Role") <*>
-      (obj .: "Runtime") <*>
-      (obj .:? "Tags") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Timeout") <*>
-      (obj .:? "TracingConfig") <*>
-      (obj .:? "VpcConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaFunction' containing required fields as arguments.
 lambdaFunction
   :: LambdaFunctionCode -- ^ 'lfCode'
diff --git a/library-gen/Stratosphere/Resources/LambdaLayerVersion.hs b/library-gen/Stratosphere/Resources/LambdaLayerVersion.hs
--- a/library-gen/Stratosphere/Resources/LambdaLayerVersion.hs
+++ b/library-gen/Stratosphere/Resources/LambdaLayerVersion.hs
@@ -31,16 +31,6 @@
     , fmap (("LicenseInfo",) . toJSON) _lambdaLayerVersionLicenseInfo
     ]
 
-instance FromJSON LambdaLayerVersion where
-  parseJSON (Object obj) =
-    LambdaLayerVersion <$>
-      (obj .:? "CompatibleRuntimes") <*>
-      (obj .: "Content") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "LayerName") <*>
-      (obj .:? "LicenseInfo")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaLayerVersion' containing required fields as
 -- arguments.
 lambdaLayerVersion
diff --git a/library-gen/Stratosphere/Resources/LambdaLayerVersionPermission.hs b/library-gen/Stratosphere/Resources/LambdaLayerVersionPermission.hs
--- a/library-gen/Stratosphere/Resources/LambdaLayerVersionPermission.hs
+++ b/library-gen/Stratosphere/Resources/LambdaLayerVersionPermission.hs
@@ -29,15 +29,6 @@
     , (Just . ("Principal",) . toJSON) _lambdaLayerVersionPermissionPrincipal
     ]
 
-instance FromJSON LambdaLayerVersionPermission where
-  parseJSON (Object obj) =
-    LambdaLayerVersionPermission <$>
-      (obj .: "Action") <*>
-      (obj .: "LayerVersionArn") <*>
-      (obj .:? "OrganizationId") <*>
-      (obj .: "Principal")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaLayerVersionPermission' containing required fields
 -- as arguments.
 lambdaLayerVersionPermission
diff --git a/library-gen/Stratosphere/Resources/LambdaPermission.hs b/library-gen/Stratosphere/Resources/LambdaPermission.hs
--- a/library-gen/Stratosphere/Resources/LambdaPermission.hs
+++ b/library-gen/Stratosphere/Resources/LambdaPermission.hs
@@ -33,17 +33,6 @@
     , fmap (("SourceArn",) . toJSON) _lambdaPermissionSourceArn
     ]
 
-instance FromJSON LambdaPermission where
-  parseJSON (Object obj) =
-    LambdaPermission <$>
-      (obj .: "Action") <*>
-      (obj .:? "EventSourceToken") <*>
-      (obj .: "FunctionName") <*>
-      (obj .: "Principal") <*>
-      (obj .:? "SourceAccount") <*>
-      (obj .:? "SourceArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaPermission' containing required fields as
 -- arguments.
 lambdaPermission
diff --git a/library-gen/Stratosphere/Resources/LambdaVersion.hs b/library-gen/Stratosphere/Resources/LambdaVersion.hs
--- a/library-gen/Stratosphere/Resources/LambdaVersion.hs
+++ b/library-gen/Stratosphere/Resources/LambdaVersion.hs
@@ -27,14 +27,6 @@
     , (Just . ("FunctionName",) . toJSON) _lambdaVersionFunctionName
     ]
 
-instance FromJSON LambdaVersion where
-  parseJSON (Object obj) =
-    LambdaVersion <$>
-      (obj .:? "CodeSha256") <*>
-      (obj .:? "Description") <*>
-      (obj .: "FunctionName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LambdaVersion' containing required fields as arguments.
 lambdaVersion
   :: Val Text -- ^ 'lvFunctionName'
diff --git a/library-gen/Stratosphere/Resources/LogsDestination.hs b/library-gen/Stratosphere/Resources/LogsDestination.hs
--- a/library-gen/Stratosphere/Resources/LogsDestination.hs
+++ b/library-gen/Stratosphere/Resources/LogsDestination.hs
@@ -29,15 +29,6 @@
     , (Just . ("TargetArn",) . toJSON) _logsDestinationTargetArn
     ]
 
-instance FromJSON LogsDestination where
-  parseJSON (Object obj) =
-    LogsDestination <$>
-      (obj .: "DestinationName") <*>
-      (obj .: "DestinationPolicy") <*>
-      (obj .: "RoleArn") <*>
-      (obj .: "TargetArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LogsDestination' containing required fields as
 -- arguments.
 logsDestination
diff --git a/library-gen/Stratosphere/Resources/LogsLogGroup.hs b/library-gen/Stratosphere/Resources/LogsLogGroup.hs
--- a/library-gen/Stratosphere/Resources/LogsLogGroup.hs
+++ b/library-gen/Stratosphere/Resources/LogsLogGroup.hs
@@ -25,13 +25,6 @@
     , fmap (("RetentionInDays",) . toJSON . fmap Integer') _logsLogGroupRetentionInDays
     ]
 
-instance FromJSON LogsLogGroup where
-  parseJSON (Object obj) =
-    LogsLogGroup <$>
-      (obj .:? "LogGroupName") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "RetentionInDays")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LogsLogGroup' containing required fields as arguments.
 logsLogGroup
   :: LogsLogGroup
diff --git a/library-gen/Stratosphere/Resources/LogsLogStream.hs b/library-gen/Stratosphere/Resources/LogsLogStream.hs
--- a/library-gen/Stratosphere/Resources/LogsLogStream.hs
+++ b/library-gen/Stratosphere/Resources/LogsLogStream.hs
@@ -25,13 +25,6 @@
     , fmap (("LogStreamName",) . toJSON) _logsLogStreamLogStreamName
     ]
 
-instance FromJSON LogsLogStream where
-  parseJSON (Object obj) =
-    LogsLogStream <$>
-      (obj .: "LogGroupName") <*>
-      (obj .:? "LogStreamName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LogsLogStream' containing required fields as arguments.
 logsLogStream
   :: Val Text -- ^ 'llsLogGroupName'
diff --git a/library-gen/Stratosphere/Resources/LogsMetricFilter.hs b/library-gen/Stratosphere/Resources/LogsMetricFilter.hs
--- a/library-gen/Stratosphere/Resources/LogsMetricFilter.hs
+++ b/library-gen/Stratosphere/Resources/LogsMetricFilter.hs
@@ -27,14 +27,6 @@
     , (Just . ("MetricTransformations",) . toJSON) _logsMetricFilterMetricTransformations
     ]
 
-instance FromJSON LogsMetricFilter where
-  parseJSON (Object obj) =
-    LogsMetricFilter <$>
-      (obj .: "FilterPattern") <*>
-      (obj .: "LogGroupName") <*>
-      (obj .: "MetricTransformations")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LogsMetricFilter' containing required fields as
 -- arguments.
 logsMetricFilter
diff --git a/library-gen/Stratosphere/Resources/LogsSubscriptionFilter.hs b/library-gen/Stratosphere/Resources/LogsSubscriptionFilter.hs
--- a/library-gen/Stratosphere/Resources/LogsSubscriptionFilter.hs
+++ b/library-gen/Stratosphere/Resources/LogsSubscriptionFilter.hs
@@ -29,15 +29,6 @@
     , fmap (("RoleArn",) . toJSON) _logsSubscriptionFilterRoleArn
     ]
 
-instance FromJSON LogsSubscriptionFilter where
-  parseJSON (Object obj) =
-    LogsSubscriptionFilter <$>
-      (obj .: "DestinationArn") <*>
-      (obj .: "FilterPattern") <*>
-      (obj .: "LogGroupName") <*>
-      (obj .:? "RoleArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'LogsSubscriptionFilter' containing required fields as
 -- arguments.
 logsSubscriptionFilter
diff --git a/library-gen/Stratosphere/Resources/NeptuneDBCluster.hs b/library-gen/Stratosphere/Resources/NeptuneDBCluster.hs
--- a/library-gen/Stratosphere/Resources/NeptuneDBCluster.hs
+++ b/library-gen/Stratosphere/Resources/NeptuneDBCluster.hs
@@ -49,25 +49,6 @@
     , fmap (("VpcSecurityGroupIds",) . toJSON) _neptuneDBClusterVpcSecurityGroupIds
     ]
 
-instance FromJSON NeptuneDBCluster where
-  parseJSON (Object obj) =
-    NeptuneDBCluster <$>
-      (obj .:? "AvailabilityZones") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "BackupRetentionPeriod") <*>
-      (obj .:? "DBClusterIdentifier") <*>
-      (obj .:? "DBClusterParameterGroupName") <*>
-      (obj .:? "DBSubnetGroupName") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "IamAuthEnabled") <*>
-      (obj .:? "KmsKeyId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Port") <*>
-      (obj .:? "PreferredBackupWindow") <*>
-      (obj .:? "PreferredMaintenanceWindow") <*>
-      (obj .:? "SnapshotIdentifier") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "StorageEncrypted") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "VpcSecurityGroupIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'NeptuneDBCluster' containing required fields as
 -- arguments.
 neptuneDBCluster
diff --git a/library-gen/Stratosphere/Resources/NeptuneDBClusterParameterGroup.hs b/library-gen/Stratosphere/Resources/NeptuneDBClusterParameterGroup.hs
--- a/library-gen/Stratosphere/Resources/NeptuneDBClusterParameterGroup.hs
+++ b/library-gen/Stratosphere/Resources/NeptuneDBClusterParameterGroup.hs
@@ -31,16 +31,6 @@
     , fmap (("Tags",) . toJSON) _neptuneDBClusterParameterGroupTags
     ]
 
-instance FromJSON NeptuneDBClusterParameterGroup where
-  parseJSON (Object obj) =
-    NeptuneDBClusterParameterGroup <$>
-      (obj .: "Description") <*>
-      (obj .: "Family") <*>
-      (obj .:? "Name") <*>
-      (obj .: "Parameters") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'NeptuneDBClusterParameterGroup' containing required
 -- fields as arguments.
 neptuneDBClusterParameterGroup
diff --git a/library-gen/Stratosphere/Resources/NeptuneDBInstance.hs b/library-gen/Stratosphere/Resources/NeptuneDBInstance.hs
--- a/library-gen/Stratosphere/Resources/NeptuneDBInstance.hs
+++ b/library-gen/Stratosphere/Resources/NeptuneDBInstance.hs
@@ -43,22 +43,6 @@
     , fmap (("Tags",) . toJSON) _neptuneDBInstanceTags
     ]
 
-instance FromJSON NeptuneDBInstance where
-  parseJSON (Object obj) =
-    NeptuneDBInstance <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AllowMajorVersionUpgrade") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "AutoMinorVersionUpgrade") <*>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .:? "DBClusterIdentifier") <*>
-      (obj .: "DBInstanceClass") <*>
-      (obj .:? "DBInstanceIdentifier") <*>
-      (obj .:? "DBParameterGroupName") <*>
-      (obj .:? "DBSnapshotIdentifier") <*>
-      (obj .:? "DBSubnetGroupName") <*>
-      (obj .:? "PreferredMaintenanceWindow") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'NeptuneDBInstance' containing required fields as
 -- arguments.
 neptuneDBInstance
diff --git a/library-gen/Stratosphere/Resources/NeptuneDBParameterGroup.hs b/library-gen/Stratosphere/Resources/NeptuneDBParameterGroup.hs
--- a/library-gen/Stratosphere/Resources/NeptuneDBParameterGroup.hs
+++ b/library-gen/Stratosphere/Resources/NeptuneDBParameterGroup.hs
@@ -31,16 +31,6 @@
     , fmap (("Tags",) . toJSON) _neptuneDBParameterGroupTags
     ]
 
-instance FromJSON NeptuneDBParameterGroup where
-  parseJSON (Object obj) =
-    NeptuneDBParameterGroup <$>
-      (obj .: "Description") <*>
-      (obj .: "Family") <*>
-      (obj .:? "Name") <*>
-      (obj .: "Parameters") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'NeptuneDBParameterGroup' containing required fields as
 -- arguments.
 neptuneDBParameterGroup
diff --git a/library-gen/Stratosphere/Resources/NeptuneDBSubnetGroup.hs b/library-gen/Stratosphere/Resources/NeptuneDBSubnetGroup.hs
--- a/library-gen/Stratosphere/Resources/NeptuneDBSubnetGroup.hs
+++ b/library-gen/Stratosphere/Resources/NeptuneDBSubnetGroup.hs
@@ -29,15 +29,6 @@
     , fmap (("Tags",) . toJSON) _neptuneDBSubnetGroupTags
     ]
 
-instance FromJSON NeptuneDBSubnetGroup where
-  parseJSON (Object obj) =
-    NeptuneDBSubnetGroup <$>
-      (obj .: "DBSubnetGroupDescription") <*>
-      (obj .:? "DBSubnetGroupName") <*>
-      (obj .: "SubnetIds") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'NeptuneDBSubnetGroup' containing required fields as
 -- arguments.
 neptuneDBSubnetGroup
diff --git a/library-gen/Stratosphere/Resources/OpsWorksApp.hs b/library-gen/Stratosphere/Resources/OpsWorksApp.hs
--- a/library-gen/Stratosphere/Resources/OpsWorksApp.hs
+++ b/library-gen/Stratosphere/Resources/OpsWorksApp.hs
@@ -48,23 +48,6 @@
     , (Just . ("Type",) . toJSON) _opsWorksAppType
     ]
 
-instance FromJSON OpsWorksApp where
-  parseJSON (Object obj) =
-    OpsWorksApp <$>
-      (obj .:? "AppSource") <*>
-      (obj .:? "Attributes") <*>
-      (obj .:? "DataSources") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "Domains") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnableSsl") <*>
-      (obj .:? "Environment") <*>
-      (obj .: "Name") <*>
-      (obj .:? "Shortname") <*>
-      (obj .:? "SslConfiguration") <*>
-      (obj .: "StackId") <*>
-      (obj .: "Type")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksApp' containing required fields as arguments.
 opsWorksApp
   :: Val Text -- ^ 'owaName'
diff --git a/library-gen/Stratosphere/Resources/OpsWorksCMServer.hs b/library-gen/Stratosphere/Resources/OpsWorksCMServer.hs
--- a/library-gen/Stratosphere/Resources/OpsWorksCMServer.hs
+++ b/library-gen/Stratosphere/Resources/OpsWorksCMServer.hs
@@ -55,28 +55,6 @@
     , fmap (("SubnetIds",) . toJSON) _opsWorksCMServerSubnetIds
     ]
 
-instance FromJSON OpsWorksCMServer where
-  parseJSON (Object obj) =
-    OpsWorksCMServer <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AssociatePublicIpAddress") <*>
-      (obj .:? "BackupId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "BackupRetentionCount") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DisableAutomatedBackup") <*>
-      (obj .:? "Engine") <*>
-      (obj .:? "EngineAttributes") <*>
-      (obj .:? "EngineModel") <*>
-      (obj .:? "EngineVersion") <*>
-      (obj .: "InstanceProfileArn") <*>
-      (obj .: "InstanceType") <*>
-      (obj .:? "KeyPair") <*>
-      (obj .:? "PreferredBackupWindow") <*>
-      (obj .:? "PreferredMaintenanceWindow") <*>
-      (obj .:? "SecurityGroupIds") <*>
-      (obj .:? "ServerName") <*>
-      (obj .: "ServiceRoleArn") <*>
-      (obj .:? "SubnetIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksCMServer' containing required fields as
 -- arguments.
 opsWorksCMServer
diff --git a/library-gen/Stratosphere/Resources/OpsWorksElasticLoadBalancerAttachment.hs b/library-gen/Stratosphere/Resources/OpsWorksElasticLoadBalancerAttachment.hs
--- a/library-gen/Stratosphere/Resources/OpsWorksElasticLoadBalancerAttachment.hs
+++ b/library-gen/Stratosphere/Resources/OpsWorksElasticLoadBalancerAttachment.hs
@@ -26,13 +26,6 @@
     , (Just . ("LayerId",) . toJSON) _opsWorksElasticLoadBalancerAttachmentLayerId
     ]
 
-instance FromJSON OpsWorksElasticLoadBalancerAttachment where
-  parseJSON (Object obj) =
-    OpsWorksElasticLoadBalancerAttachment <$>
-      (obj .: "ElasticLoadBalancerName") <*>
-      (obj .: "LayerId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksElasticLoadBalancerAttachment' containing
 -- required fields as arguments.
 opsWorksElasticLoadBalancerAttachment
diff --git a/library-gen/Stratosphere/Resources/OpsWorksInstance.hs b/library-gen/Stratosphere/Resources/OpsWorksInstance.hs
--- a/library-gen/Stratosphere/Resources/OpsWorksInstance.hs
+++ b/library-gen/Stratosphere/Resources/OpsWorksInstance.hs
@@ -64,32 +64,6 @@
     , fmap (("Volumes",) . toJSON) _opsWorksInstanceVolumes
     ]
 
-instance FromJSON OpsWorksInstance where
-  parseJSON (Object obj) =
-    OpsWorksInstance <$>
-      (obj .:? "AgentVersion") <*>
-      (obj .:? "AmiId") <*>
-      (obj .:? "Architecture") <*>
-      (obj .:? "AutoScalingType") <*>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .:? "BlockDeviceMappings") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EbsOptimized") <*>
-      (obj .:? "ElasticIps") <*>
-      (obj .:? "Hostname") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "InstallUpdatesOnBoot") <*>
-      (obj .: "InstanceType") <*>
-      (obj .: "LayerIds") <*>
-      (obj .:? "Os") <*>
-      (obj .:? "RootDeviceType") <*>
-      (obj .:? "SshKeyName") <*>
-      (obj .: "StackId") <*>
-      (obj .:? "SubnetId") <*>
-      (obj .:? "Tenancy") <*>
-      (obj .:? "TimeBasedAutoScaling") <*>
-      (obj .:? "VirtualizationType") <*>
-      (obj .:? "Volumes")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksInstance' containing required fields as
 -- arguments.
 opsWorksInstance
diff --git a/library-gen/Stratosphere/Resources/OpsWorksLayer.hs b/library-gen/Stratosphere/Resources/OpsWorksLayer.hs
--- a/library-gen/Stratosphere/Resources/OpsWorksLayer.hs
+++ b/library-gen/Stratosphere/Resources/OpsWorksLayer.hs
@@ -63,30 +63,6 @@
     , fmap (("VolumeConfigurations",) . toJSON) _opsWorksLayerVolumeConfigurations
     ]
 
-instance FromJSON OpsWorksLayer where
-  parseJSON (Object obj) =
-    OpsWorksLayer <$>
-      (obj .:? "Attributes") <*>
-      fmap (fmap unBool') (obj .: "AutoAssignElasticIps") <*>
-      fmap (fmap unBool') (obj .: "AutoAssignPublicIps") <*>
-      (obj .:? "CustomInstanceProfileArn") <*>
-      (obj .:? "CustomJson") <*>
-      (obj .:? "CustomRecipes") <*>
-      (obj .:? "CustomSecurityGroupIds") <*>
-      fmap (fmap unBool') (obj .: "EnableAutoHealing") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "InstallUpdatesOnBoot") <*>
-      (obj .:? "LifecycleEventConfiguration") <*>
-      (obj .:? "LoadBasedAutoScaling") <*>
-      (obj .: "Name") <*>
-      (obj .:? "Packages") <*>
-      (obj .: "Shortname") <*>
-      (obj .: "StackId") <*>
-      (obj .:? "Tags") <*>
-      (obj .: "Type") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "UseEbsOptimizedInstances") <*>
-      (obj .:? "VolumeConfigurations")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksLayer' containing required fields as arguments.
 opsWorksLayer
   :: Val Bool -- ^ 'owlAutoAssignElasticIps'
diff --git a/library-gen/Stratosphere/Resources/OpsWorksStack.hs b/library-gen/Stratosphere/Resources/OpsWorksStack.hs
--- a/library-gen/Stratosphere/Resources/OpsWorksStack.hs
+++ b/library-gen/Stratosphere/Resources/OpsWorksStack.hs
@@ -76,36 +76,6 @@
     , fmap (("VpcId",) . toJSON) _opsWorksStackVpcId
     ]
 
-instance FromJSON OpsWorksStack where
-  parseJSON (Object obj) =
-    OpsWorksStack <$>
-      (obj .:? "AgentVersion") <*>
-      (obj .:? "Attributes") <*>
-      (obj .:? "ChefConfiguration") <*>
-      (obj .:? "CloneAppIds") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ClonePermissions") <*>
-      (obj .:? "ConfigurationManager") <*>
-      (obj .:? "CustomCookbooksSource") <*>
-      (obj .:? "CustomJson") <*>
-      (obj .:? "DefaultAvailabilityZone") <*>
-      (obj .: "DefaultInstanceProfileArn") <*>
-      (obj .:? "DefaultOs") <*>
-      (obj .:? "DefaultRootDeviceType") <*>
-      (obj .:? "DefaultSshKeyName") <*>
-      (obj .:? "DefaultSubnetId") <*>
-      (obj .:? "EcsClusterArn") <*>
-      (obj .:? "ElasticIps") <*>
-      (obj .:? "HostnameTheme") <*>
-      (obj .: "Name") <*>
-      (obj .:? "RdsDbInstances") <*>
-      (obj .: "ServiceRoleArn") <*>
-      (obj .:? "SourceStackId") <*>
-      (obj .:? "Tags") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "UseCustomCookbooks") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "UseOpsworksSecurityGroups") <*>
-      (obj .:? "VpcId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksStack' containing required fields as arguments.
 opsWorksStack
   :: Val Text -- ^ 'owsDefaultInstanceProfileArn'
diff --git a/library-gen/Stratosphere/Resources/OpsWorksUserProfile.hs b/library-gen/Stratosphere/Resources/OpsWorksUserProfile.hs
--- a/library-gen/Stratosphere/Resources/OpsWorksUserProfile.hs
+++ b/library-gen/Stratosphere/Resources/OpsWorksUserProfile.hs
@@ -29,15 +29,6 @@
     , fmap (("SshUsername",) . toJSON) _opsWorksUserProfileSshUsername
     ]
 
-instance FromJSON OpsWorksUserProfile where
-  parseJSON (Object obj) =
-    OpsWorksUserProfile <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AllowSelfManagement") <*>
-      (obj .: "IamUserArn") <*>
-      (obj .:? "SshPublicKey") <*>
-      (obj .:? "SshUsername")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksUserProfile' containing required fields as
 -- arguments.
 opsWorksUserProfile
diff --git a/library-gen/Stratosphere/Resources/OpsWorksVolume.hs b/library-gen/Stratosphere/Resources/OpsWorksVolume.hs
--- a/library-gen/Stratosphere/Resources/OpsWorksVolume.hs
+++ b/library-gen/Stratosphere/Resources/OpsWorksVolume.hs
@@ -29,15 +29,6 @@
     , (Just . ("StackId",) . toJSON) _opsWorksVolumeStackId
     ]
 
-instance FromJSON OpsWorksVolume where
-  parseJSON (Object obj) =
-    OpsWorksVolume <$>
-      (obj .: "Ec2VolumeId") <*>
-      (obj .:? "MountPoint") <*>
-      (obj .:? "Name") <*>
-      (obj .: "StackId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'OpsWorksVolume' containing required fields as arguments.
 opsWorksVolume
   :: Val Text -- ^ 'owvEc2VolumeId'
diff --git a/library-gen/Stratosphere/Resources/RAMResourceShare.hs b/library-gen/Stratosphere/Resources/RAMResourceShare.hs
--- a/library-gen/Stratosphere/Resources/RAMResourceShare.hs
+++ b/library-gen/Stratosphere/Resources/RAMResourceShare.hs
@@ -31,16 +31,6 @@
     , fmap (("Tags",) . toJSON) _rAMResourceShareTags
     ]
 
-instance FromJSON RAMResourceShare where
-  parseJSON (Object obj) =
-    RAMResourceShare <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AllowExternalPrincipals") <*>
-      (obj .: "Name") <*>
-      (obj .:? "Principals") <*>
-      (obj .:? "ResourceArns") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RAMResourceShare' containing required fields as
 -- arguments.
 ramResourceShare
diff --git a/library-gen/Stratosphere/Resources/RDSDBCluster.hs b/library-gen/Stratosphere/Resources/RDSDBCluster.hs
--- a/library-gen/Stratosphere/Resources/RDSDBCluster.hs
+++ b/library-gen/Stratosphere/Resources/RDSDBCluster.hs
@@ -74,37 +74,6 @@
     , fmap (("VpcSecurityGroupIds",) . toJSON) _rDSDBClusterVpcSecurityGroupIds
     ]
 
-instance FromJSON RDSDBCluster where
-  parseJSON (Object obj) =
-    RDSDBCluster <$>
-      (obj .:? "AvailabilityZones") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "BacktrackWindow") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "BackupRetentionPeriod") <*>
-      (obj .:? "DBClusterIdentifier") <*>
-      (obj .:? "DBClusterParameterGroupName") <*>
-      (obj .:? "DBSubnetGroupName") <*>
-      (obj .:? "DatabaseName") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DeletionProtection") <*>
-      (obj .:? "EnableCloudwatchLogsExports") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnableIAMDatabaseAuthentication") <*>
-      (obj .: "Engine") <*>
-      (obj .:? "EngineMode") <*>
-      (obj .:? "EngineVersion") <*>
-      (obj .:? "KmsKeyId") <*>
-      (obj .:? "MasterUserPassword") <*>
-      (obj .:? "MasterUsername") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Port") <*>
-      (obj .:? "PreferredBackupWindow") <*>
-      (obj .:? "PreferredMaintenanceWindow") <*>
-      (obj .:? "ReplicationSourceIdentifier") <*>
-      (obj .:? "ScalingConfiguration") <*>
-      (obj .:? "SnapshotIdentifier") <*>
-      (obj .:? "SourceRegion") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "StorageEncrypted") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "VpcSecurityGroupIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSDBCluster' containing required fields as arguments.
 rdsdbCluster
   :: Val Text -- ^ 'rdsdbcEngine'
diff --git a/library-gen/Stratosphere/Resources/RDSDBClusterParameterGroup.hs b/library-gen/Stratosphere/Resources/RDSDBClusterParameterGroup.hs
--- a/library-gen/Stratosphere/Resources/RDSDBClusterParameterGroup.hs
+++ b/library-gen/Stratosphere/Resources/RDSDBClusterParameterGroup.hs
@@ -29,15 +29,6 @@
     , fmap (("Tags",) . toJSON) _rDSDBClusterParameterGroupTags
     ]
 
-instance FromJSON RDSDBClusterParameterGroup where
-  parseJSON (Object obj) =
-    RDSDBClusterParameterGroup <$>
-      (obj .: "Description") <*>
-      (obj .: "Family") <*>
-      (obj .: "Parameters") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSDBClusterParameterGroup' containing required fields
 -- as arguments.
 rdsdbClusterParameterGroup
diff --git a/library-gen/Stratosphere/Resources/RDSDBInstance.hs b/library-gen/Stratosphere/Resources/RDSDBInstance.hs
--- a/library-gen/Stratosphere/Resources/RDSDBInstance.hs
+++ b/library-gen/Stratosphere/Resources/RDSDBInstance.hs
@@ -120,60 +120,6 @@
     , fmap (("VPCSecurityGroups",) . toJSON) _rDSDBInstanceVPCSecurityGroups
     ]
 
-instance FromJSON RDSDBInstance where
-  parseJSON (Object obj) =
-    RDSDBInstance <$>
-      (obj .:? "AllocatedStorage") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "AllowMajorVersionUpgrade") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "AutoMinorVersionUpgrade") <*>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .:? "BackupRetentionPeriod") <*>
-      (obj .:? "CharacterSetName") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "CopyTagsToSnapshot") <*>
-      (obj .:? "DBClusterIdentifier") <*>
-      (obj .: "DBInstanceClass") <*>
-      (obj .:? "DBInstanceIdentifier") <*>
-      (obj .:? "DBName") <*>
-      (obj .:? "DBParameterGroupName") <*>
-      (obj .:? "DBSecurityGroups") <*>
-      (obj .:? "DBSnapshotIdentifier") <*>
-      (obj .:? "DBSubnetGroupName") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DeleteAutomatedBackups") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "DeletionProtection") <*>
-      (obj .:? "Domain") <*>
-      (obj .:? "DomainIAMRoleName") <*>
-      (obj .:? "EnableCloudwatchLogsExports") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnableIAMDatabaseAuthentication") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "EnablePerformanceInsights") <*>
-      (obj .:? "Engine") <*>
-      (obj .:? "EngineVersion") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Iops") <*>
-      (obj .:? "KmsKeyId") <*>
-      (obj .:? "LicenseModel") <*>
-      (obj .:? "MasterUserPassword") <*>
-      (obj .:? "MasterUsername") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MonitoringInterval") <*>
-      (obj .:? "MonitoringRoleArn") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "MultiAZ") <*>
-      (obj .:? "OptionGroupName") <*>
-      (obj .:? "PerformanceInsightsKMSKeyId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "PerformanceInsightsRetentionPeriod") <*>
-      (obj .:? "Port") <*>
-      (obj .:? "PreferredBackupWindow") <*>
-      (obj .:? "PreferredMaintenanceWindow") <*>
-      (obj .:? "ProcessorFeatures") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "PromotionTier") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "PubliclyAccessible") <*>
-      (obj .:? "SourceDBInstanceIdentifier") <*>
-      (obj .:? "SourceRegion") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "StorageEncrypted") <*>
-      (obj .:? "StorageType") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "Timezone") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "UseDefaultProcessorFeatures") <*>
-      (obj .:? "VPCSecurityGroups")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSDBInstance' containing required fields as arguments.
 rdsdbInstance
   :: Val Text -- ^ 'rdsdbiDBInstanceClass'
diff --git a/library-gen/Stratosphere/Resources/RDSDBParameterGroup.hs b/library-gen/Stratosphere/Resources/RDSDBParameterGroup.hs
--- a/library-gen/Stratosphere/Resources/RDSDBParameterGroup.hs
+++ b/library-gen/Stratosphere/Resources/RDSDBParameterGroup.hs
@@ -29,15 +29,6 @@
     , fmap (("Tags",) . toJSON) _rDSDBParameterGroupTags
     ]
 
-instance FromJSON RDSDBParameterGroup where
-  parseJSON (Object obj) =
-    RDSDBParameterGroup <$>
-      (obj .: "Description") <*>
-      (obj .: "Family") <*>
-      (obj .:? "Parameters") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSDBParameterGroup' containing required fields as
 -- arguments.
 rdsdbParameterGroup
diff --git a/library-gen/Stratosphere/Resources/RDSDBSecurityGroup.hs b/library-gen/Stratosphere/Resources/RDSDBSecurityGroup.hs
--- a/library-gen/Stratosphere/Resources/RDSDBSecurityGroup.hs
+++ b/library-gen/Stratosphere/Resources/RDSDBSecurityGroup.hs
@@ -30,15 +30,6 @@
     , fmap (("Tags",) . toJSON) _rDSDBSecurityGroupTags
     ]
 
-instance FromJSON RDSDBSecurityGroup where
-  parseJSON (Object obj) =
-    RDSDBSecurityGroup <$>
-      (obj .: "DBSecurityGroupIngress") <*>
-      (obj .:? "EC2VpcId") <*>
-      (obj .: "GroupDescription") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSDBSecurityGroup' containing required fields as
 -- arguments.
 rdsdbSecurityGroup
diff --git a/library-gen/Stratosphere/Resources/RDSDBSecurityGroupIngress.hs b/library-gen/Stratosphere/Resources/RDSDBSecurityGroupIngress.hs
--- a/library-gen/Stratosphere/Resources/RDSDBSecurityGroupIngress.hs
+++ b/library-gen/Stratosphere/Resources/RDSDBSecurityGroupIngress.hs
@@ -31,16 +31,6 @@
     , fmap (("EC2SecurityGroupOwnerId",) . toJSON) _rDSDBSecurityGroupIngressEC2SecurityGroupOwnerId
     ]
 
-instance FromJSON RDSDBSecurityGroupIngress where
-  parseJSON (Object obj) =
-    RDSDBSecurityGroupIngress <$>
-      (obj .:? "CIDRIP") <*>
-      (obj .: "DBSecurityGroupName") <*>
-      (obj .:? "EC2SecurityGroupId") <*>
-      (obj .:? "EC2SecurityGroupName") <*>
-      (obj .:? "EC2SecurityGroupOwnerId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSDBSecurityGroupIngress' containing required fields as
 -- arguments.
 rdsdbSecurityGroupIngress
diff --git a/library-gen/Stratosphere/Resources/RDSDBSubnetGroup.hs b/library-gen/Stratosphere/Resources/RDSDBSubnetGroup.hs
--- a/library-gen/Stratosphere/Resources/RDSDBSubnetGroup.hs
+++ b/library-gen/Stratosphere/Resources/RDSDBSubnetGroup.hs
@@ -29,15 +29,6 @@
     , fmap (("Tags",) . toJSON) _rDSDBSubnetGroupTags
     ]
 
-instance FromJSON RDSDBSubnetGroup where
-  parseJSON (Object obj) =
-    RDSDBSubnetGroup <$>
-      (obj .: "DBSubnetGroupDescription") <*>
-      (obj .:? "DBSubnetGroupName") <*>
-      (obj .: "SubnetIds") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSDBSubnetGroup' containing required fields as
 -- arguments.
 rdsdbSubnetGroup
diff --git a/library-gen/Stratosphere/Resources/RDSEventSubscription.hs b/library-gen/Stratosphere/Resources/RDSEventSubscription.hs
--- a/library-gen/Stratosphere/Resources/RDSEventSubscription.hs
+++ b/library-gen/Stratosphere/Resources/RDSEventSubscription.hs
@@ -31,16 +31,6 @@
     , fmap (("SourceType",) . toJSON) _rDSEventSubscriptionSourceType
     ]
 
-instance FromJSON RDSEventSubscription where
-  parseJSON (Object obj) =
-    RDSEventSubscription <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Enabled") <*>
-      (obj .:? "EventCategories") <*>
-      (obj .: "SnsTopicArn") <*>
-      (obj .:? "SourceIds") <*>
-      (obj .:? "SourceType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSEventSubscription' containing required fields as
 -- arguments.
 rdsEventSubscription
diff --git a/library-gen/Stratosphere/Resources/RDSOptionGroup.hs b/library-gen/Stratosphere/Resources/RDSOptionGroup.hs
--- a/library-gen/Stratosphere/Resources/RDSOptionGroup.hs
+++ b/library-gen/Stratosphere/Resources/RDSOptionGroup.hs
@@ -32,16 +32,6 @@
     , fmap (("Tags",) . toJSON) _rDSOptionGroupTags
     ]
 
-instance FromJSON RDSOptionGroup where
-  parseJSON (Object obj) =
-    RDSOptionGroup <$>
-      (obj .: "EngineName") <*>
-      (obj .: "MajorEngineVersion") <*>
-      (obj .: "OptionConfigurations") <*>
-      (obj .: "OptionGroupDescription") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RDSOptionGroup' containing required fields as arguments.
 rdsOptionGroup
   :: Val Text -- ^ 'rdsogEngineName'
diff --git a/library-gen/Stratosphere/Resources/RedshiftCluster.hs b/library-gen/Stratosphere/Resources/RedshiftCluster.hs
--- a/library-gen/Stratosphere/Resources/RedshiftCluster.hs
+++ b/library-gen/Stratosphere/Resources/RedshiftCluster.hs
@@ -80,40 +80,6 @@
     , fmap (("VpcSecurityGroupIds",) . toJSON) _redshiftClusterVpcSecurityGroupIds
     ]
 
-instance FromJSON RedshiftCluster where
-  parseJSON (Object obj) =
-    RedshiftCluster <$>
-      fmap (fmap (fmap unBool')) (obj .:? "AllowVersionUpgrade") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "AutomatedSnapshotRetentionPeriod") <*>
-      (obj .:? "AvailabilityZone") <*>
-      (obj .:? "ClusterIdentifier") <*>
-      (obj .:? "ClusterParameterGroupName") <*>
-      (obj .:? "ClusterSecurityGroups") <*>
-      (obj .:? "ClusterSubnetGroupName") <*>
-      (obj .: "ClusterType") <*>
-      (obj .:? "ClusterVersion") <*>
-      (obj .: "DBName") <*>
-      (obj .:? "ElasticIp") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "Encrypted") <*>
-      (obj .:? "HsmClientCertificateIdentifier") <*>
-      (obj .:? "HsmConfigurationIdentifier") <*>
-      (obj .:? "IamRoles") <*>
-      (obj .:? "KmsKeyId") <*>
-      (obj .:? "LoggingProperties") <*>
-      (obj .: "MasterUserPassword") <*>
-      (obj .: "MasterUsername") <*>
-      (obj .: "NodeType") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "NumberOfNodes") <*>
-      (obj .:? "OwnerAccount") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Port") <*>
-      (obj .:? "PreferredMaintenanceWindow") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "PubliclyAccessible") <*>
-      (obj .:? "SnapshotClusterIdentifier") <*>
-      (obj .:? "SnapshotIdentifier") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "VpcSecurityGroupIds")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RedshiftCluster' containing required fields as
 -- arguments.
 redshiftCluster
diff --git a/library-gen/Stratosphere/Resources/RedshiftClusterParameterGroup.hs b/library-gen/Stratosphere/Resources/RedshiftClusterParameterGroup.hs
--- a/library-gen/Stratosphere/Resources/RedshiftClusterParameterGroup.hs
+++ b/library-gen/Stratosphere/Resources/RedshiftClusterParameterGroup.hs
@@ -30,15 +30,6 @@
     , fmap (("Tags",) . toJSON) _redshiftClusterParameterGroupTags
     ]
 
-instance FromJSON RedshiftClusterParameterGroup where
-  parseJSON (Object obj) =
-    RedshiftClusterParameterGroup <$>
-      (obj .: "Description") <*>
-      (obj .: "ParameterGroupFamily") <*>
-      (obj .:? "Parameters") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RedshiftClusterParameterGroup' containing required
 -- fields as arguments.
 redshiftClusterParameterGroup
diff --git a/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroup.hs b/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroup.hs
--- a/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroup.hs
+++ b/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroup.hs
@@ -25,13 +25,6 @@
     , fmap (("Tags",) . toJSON) _redshiftClusterSecurityGroupTags
     ]
 
-instance FromJSON RedshiftClusterSecurityGroup where
-  parseJSON (Object obj) =
-    RedshiftClusterSecurityGroup <$>
-      (obj .: "Description") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RedshiftClusterSecurityGroup' containing required fields
 -- as arguments.
 redshiftClusterSecurityGroup
diff --git a/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroupIngress.hs b/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroupIngress.hs
--- a/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroupIngress.hs
+++ b/library-gen/Stratosphere/Resources/RedshiftClusterSecurityGroupIngress.hs
@@ -29,15 +29,6 @@
     , fmap (("EC2SecurityGroupOwnerId",) . toJSON) _redshiftClusterSecurityGroupIngressEC2SecurityGroupOwnerId
     ]
 
-instance FromJSON RedshiftClusterSecurityGroupIngress where
-  parseJSON (Object obj) =
-    RedshiftClusterSecurityGroupIngress <$>
-      (obj .:? "CIDRIP") <*>
-      (obj .: "ClusterSecurityGroupName") <*>
-      (obj .:? "EC2SecurityGroupName") <*>
-      (obj .:? "EC2SecurityGroupOwnerId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RedshiftClusterSecurityGroupIngress' containing required
 -- fields as arguments.
 redshiftClusterSecurityGroupIngress
diff --git a/library-gen/Stratosphere/Resources/RedshiftClusterSubnetGroup.hs b/library-gen/Stratosphere/Resources/RedshiftClusterSubnetGroup.hs
--- a/library-gen/Stratosphere/Resources/RedshiftClusterSubnetGroup.hs
+++ b/library-gen/Stratosphere/Resources/RedshiftClusterSubnetGroup.hs
@@ -27,14 +27,6 @@
     , fmap (("Tags",) . toJSON) _redshiftClusterSubnetGroupTags
     ]
 
-instance FromJSON RedshiftClusterSubnetGroup where
-  parseJSON (Object obj) =
-    RedshiftClusterSubnetGroup <$>
-      (obj .: "Description") <*>
-      (obj .: "SubnetIds") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RedshiftClusterSubnetGroup' containing required fields
 -- as arguments.
 redshiftClusterSubnetGroup
diff --git a/library-gen/Stratosphere/Resources/RoboMakerFleet.hs b/library-gen/Stratosphere/Resources/RoboMakerFleet.hs
--- a/library-gen/Stratosphere/Resources/RoboMakerFleet.hs
+++ b/library-gen/Stratosphere/Resources/RoboMakerFleet.hs
@@ -25,13 +25,6 @@
     , fmap (("Tags",) . toJSON) _roboMakerFleetTags
     ]
 
-instance FromJSON RoboMakerFleet where
-  parseJSON (Object obj) =
-    RoboMakerFleet <$>
-      (obj .:? "Name") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RoboMakerFleet' containing required fields as arguments.
 roboMakerFleet
   :: RoboMakerFleet
diff --git a/library-gen/Stratosphere/Resources/RoboMakerRobot.hs b/library-gen/Stratosphere/Resources/RoboMakerRobot.hs
--- a/library-gen/Stratosphere/Resources/RoboMakerRobot.hs
+++ b/library-gen/Stratosphere/Resources/RoboMakerRobot.hs
@@ -31,16 +31,6 @@
     , fmap (("Tags",) . toJSON) _roboMakerRobotTags
     ]
 
-instance FromJSON RoboMakerRobot where
-  parseJSON (Object obj) =
-    RoboMakerRobot <$>
-      (obj .: "Architecture") <*>
-      (obj .:? "Fleet") <*>
-      (obj .: "GreengrassGroupId") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RoboMakerRobot' containing required fields as arguments.
 roboMakerRobot
   :: Val Text -- ^ 'rmrArchitecture'
diff --git a/library-gen/Stratosphere/Resources/RoboMakerRobotApplication.hs b/library-gen/Stratosphere/Resources/RoboMakerRobotApplication.hs
--- a/library-gen/Stratosphere/Resources/RoboMakerRobotApplication.hs
+++ b/library-gen/Stratosphere/Resources/RoboMakerRobotApplication.hs
@@ -32,16 +32,6 @@
     , fmap (("Tags",) . toJSON) _roboMakerRobotApplicationTags
     ]
 
-instance FromJSON RoboMakerRobotApplication where
-  parseJSON (Object obj) =
-    RoboMakerRobotApplication <$>
-      (obj .:? "CurrentRevisionId") <*>
-      (obj .:? "Name") <*>
-      (obj .: "RobotSoftwareSuite") <*>
-      (obj .: "Sources") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RoboMakerRobotApplication' containing required fields as
 -- arguments.
 roboMakerRobotApplication
diff --git a/library-gen/Stratosphere/Resources/RoboMakerRobotApplicationVersion.hs b/library-gen/Stratosphere/Resources/RoboMakerRobotApplicationVersion.hs
--- a/library-gen/Stratosphere/Resources/RoboMakerRobotApplicationVersion.hs
+++ b/library-gen/Stratosphere/Resources/RoboMakerRobotApplicationVersion.hs
@@ -25,13 +25,6 @@
     , fmap (("CurrentRevisionId",) . toJSON) _roboMakerRobotApplicationVersionCurrentRevisionId
     ]
 
-instance FromJSON RoboMakerRobotApplicationVersion where
-  parseJSON (Object obj) =
-    RoboMakerRobotApplicationVersion <$>
-      (obj .: "Application") <*>
-      (obj .:? "CurrentRevisionId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RoboMakerRobotApplicationVersion' containing required
 -- fields as arguments.
 roboMakerRobotApplicationVersion
diff --git a/library-gen/Stratosphere/Resources/RoboMakerSimulationApplication.hs b/library-gen/Stratosphere/Resources/RoboMakerSimulationApplication.hs
--- a/library-gen/Stratosphere/Resources/RoboMakerSimulationApplication.hs
+++ b/library-gen/Stratosphere/Resources/RoboMakerSimulationApplication.hs
@@ -38,18 +38,6 @@
     , fmap (("Tags",) . toJSON) _roboMakerSimulationApplicationTags
     ]
 
-instance FromJSON RoboMakerSimulationApplication where
-  parseJSON (Object obj) =
-    RoboMakerSimulationApplication <$>
-      (obj .:? "CurrentRevisionId") <*>
-      (obj .:? "Name") <*>
-      (obj .: "RenderingEngine") <*>
-      (obj .: "RobotSoftwareSuite") <*>
-      (obj .: "SimulationSoftwareSuite") <*>
-      (obj .: "Sources") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RoboMakerSimulationApplication' containing required
 -- fields as arguments.
 roboMakerSimulationApplication
diff --git a/library-gen/Stratosphere/Resources/RoboMakerSimulationApplicationVersion.hs b/library-gen/Stratosphere/Resources/RoboMakerSimulationApplicationVersion.hs
--- a/library-gen/Stratosphere/Resources/RoboMakerSimulationApplicationVersion.hs
+++ b/library-gen/Stratosphere/Resources/RoboMakerSimulationApplicationVersion.hs
@@ -26,13 +26,6 @@
     , fmap (("CurrentRevisionId",) . toJSON) _roboMakerSimulationApplicationVersionCurrentRevisionId
     ]
 
-instance FromJSON RoboMakerSimulationApplicationVersion where
-  parseJSON (Object obj) =
-    RoboMakerSimulationApplicationVersion <$>
-      (obj .: "Application") <*>
-      (obj .:? "CurrentRevisionId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'RoboMakerSimulationApplicationVersion' containing
 -- required fields as arguments.
 roboMakerSimulationApplicationVersion
diff --git a/library-gen/Stratosphere/Resources/Route53HealthCheck.hs b/library-gen/Stratosphere/Resources/Route53HealthCheck.hs
--- a/library-gen/Stratosphere/Resources/Route53HealthCheck.hs
+++ b/library-gen/Stratosphere/Resources/Route53HealthCheck.hs
@@ -26,13 +26,6 @@
     , fmap (("HealthCheckTags",) . toJSON) _route53HealthCheckHealthCheckTags
     ]
 
-instance FromJSON Route53HealthCheck where
-  parseJSON (Object obj) =
-    Route53HealthCheck <$>
-      (obj .: "HealthCheckConfig") <*>
-      (obj .:? "HealthCheckTags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53HealthCheck' containing required fields as
 -- arguments.
 route53HealthCheck
diff --git a/library-gen/Stratosphere/Resources/Route53HostedZone.hs b/library-gen/Stratosphere/Resources/Route53HostedZone.hs
--- a/library-gen/Stratosphere/Resources/Route53HostedZone.hs
+++ b/library-gen/Stratosphere/Resources/Route53HostedZone.hs
@@ -34,16 +34,6 @@
     , fmap (("VPCs",) . toJSON) _route53HostedZoneVPCs
     ]
 
-instance FromJSON Route53HostedZone where
-  parseJSON (Object obj) =
-    Route53HostedZone <$>
-      (obj .:? "HostedZoneConfig") <*>
-      (obj .:? "HostedZoneTags") <*>
-      (obj .: "Name") <*>
-      (obj .:? "QueryLoggingConfig") <*>
-      (obj .:? "VPCs")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53HostedZone' containing required fields as
 -- arguments.
 route53HostedZone
diff --git a/library-gen/Stratosphere/Resources/Route53RecordSet.hs b/library-gen/Stratosphere/Resources/Route53RecordSet.hs
--- a/library-gen/Stratosphere/Resources/Route53RecordSet.hs
+++ b/library-gen/Stratosphere/Resources/Route53RecordSet.hs
@@ -52,26 +52,6 @@
     , fmap (("Weight",) . toJSON . fmap Integer') _route53RecordSetWeight
     ]
 
-instance FromJSON Route53RecordSet where
-  parseJSON (Object obj) =
-    Route53RecordSet <$>
-      (obj .:? "AliasTarget") <*>
-      (obj .:? "Comment") <*>
-      (obj .:? "Failover") <*>
-      (obj .:? "GeoLocation") <*>
-      (obj .:? "HealthCheckId") <*>
-      (obj .:? "HostedZoneId") <*>
-      (obj .:? "HostedZoneName") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "MultiValueAnswer") <*>
-      (obj .: "Name") <*>
-      (obj .:? "Region") <*>
-      (obj .:? "ResourceRecords") <*>
-      (obj .:? "SetIdentifier") <*>
-      (obj .:? "TTL") <*>
-      (obj .: "Type") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "Weight")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53RecordSet' containing required fields as
 -- arguments.
 route53RecordSet
diff --git a/library-gen/Stratosphere/Resources/Route53RecordSetGroup.hs b/library-gen/Stratosphere/Resources/Route53RecordSetGroup.hs
--- a/library-gen/Stratosphere/Resources/Route53RecordSetGroup.hs
+++ b/library-gen/Stratosphere/Resources/Route53RecordSetGroup.hs
@@ -29,15 +29,6 @@
     , fmap (("RecordSets",) . toJSON) _route53RecordSetGroupRecordSets
     ]
 
-instance FromJSON Route53RecordSetGroup where
-  parseJSON (Object obj) =
-    Route53RecordSetGroup <$>
-      (obj .:? "Comment") <*>
-      (obj .:? "HostedZoneId") <*>
-      (obj .:? "HostedZoneName") <*>
-      (obj .:? "RecordSets")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53RecordSetGroup' containing required fields as
 -- arguments.
 route53RecordSetGroup
diff --git a/library-gen/Stratosphere/Resources/Route53ResolverResolverEndpoint.hs b/library-gen/Stratosphere/Resources/Route53ResolverResolverEndpoint.hs
--- a/library-gen/Stratosphere/Resources/Route53ResolverResolverEndpoint.hs
+++ b/library-gen/Stratosphere/Resources/Route53ResolverResolverEndpoint.hs
@@ -32,16 +32,6 @@
     , fmap (("Tags",) . toJSON) _route53ResolverResolverEndpointTags
     ]
 
-instance FromJSON Route53ResolverResolverEndpoint where
-  parseJSON (Object obj) =
-    Route53ResolverResolverEndpoint <$>
-      (obj .: "Direction") <*>
-      (obj .: "IpAddresses") <*>
-      (obj .:? "Name") <*>
-      (obj .: "SecurityGroupIds") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53ResolverResolverEndpoint' containing required
 -- fields as arguments.
 route53ResolverResolverEndpoint
diff --git a/library-gen/Stratosphere/Resources/Route53ResolverResolverRule.hs b/library-gen/Stratosphere/Resources/Route53ResolverResolverRule.hs
--- a/library-gen/Stratosphere/Resources/Route53ResolverResolverRule.hs
+++ b/library-gen/Stratosphere/Resources/Route53ResolverResolverRule.hs
@@ -34,17 +34,6 @@
     , fmap (("TargetIps",) . toJSON) _route53ResolverResolverRuleTargetIps
     ]
 
-instance FromJSON Route53ResolverResolverRule where
-  parseJSON (Object obj) =
-    Route53ResolverResolverRule <$>
-      (obj .: "DomainName") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "ResolverEndpointId") <*>
-      (obj .: "RuleType") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "TargetIps")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53ResolverResolverRule' containing required fields
 -- as arguments.
 route53ResolverResolverRule
diff --git a/library-gen/Stratosphere/Resources/Route53ResolverResolverRuleAssociation.hs b/library-gen/Stratosphere/Resources/Route53ResolverResolverRuleAssociation.hs
--- a/library-gen/Stratosphere/Resources/Route53ResolverResolverRuleAssociation.hs
+++ b/library-gen/Stratosphere/Resources/Route53ResolverResolverRuleAssociation.hs
@@ -28,14 +28,6 @@
     , (Just . ("VPCId",) . toJSON) _route53ResolverResolverRuleAssociationVPCId
     ]
 
-instance FromJSON Route53ResolverResolverRuleAssociation where
-  parseJSON (Object obj) =
-    Route53ResolverResolverRuleAssociation <$>
-      (obj .:? "Name") <*>
-      (obj .: "ResolverRuleId") <*>
-      (obj .: "VPCId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'Route53ResolverResolverRuleAssociation' containing
 -- required fields as arguments.
 route53ResolverResolverRuleAssociation
diff --git a/library-gen/Stratosphere/Resources/S3Bucket.hs b/library-gen/Stratosphere/Resources/S3Bucket.hs
--- a/library-gen/Stratosphere/Resources/S3Bucket.hs
+++ b/library-gen/Stratosphere/Resources/S3Bucket.hs
@@ -67,27 +67,6 @@
     , fmap (("WebsiteConfiguration",) . toJSON) _s3BucketWebsiteConfiguration
     ]
 
-instance FromJSON S3Bucket where
-  parseJSON (Object obj) =
-    S3Bucket <$>
-      (obj .:? "AccelerateConfiguration") <*>
-      (obj .:? "AccessControl") <*>
-      (obj .:? "AnalyticsConfigurations") <*>
-      (obj .:? "BucketEncryption") <*>
-      (obj .:? "BucketName") <*>
-      (obj .:? "CorsConfiguration") <*>
-      (obj .:? "InventoryConfigurations") <*>
-      (obj .:? "LifecycleConfiguration") <*>
-      (obj .:? "LoggingConfiguration") <*>
-      (obj .:? "MetricsConfigurations") <*>
-      (obj .:? "NotificationConfiguration") <*>
-      (obj .:? "PublicAccessBlockConfiguration") <*>
-      (obj .:? "ReplicationConfiguration") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "VersioningConfiguration") <*>
-      (obj .:? "WebsiteConfiguration")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3Bucket' containing required fields as arguments.
 s3Bucket
   :: S3Bucket
diff --git a/library-gen/Stratosphere/Resources/S3BucketPolicy.hs b/library-gen/Stratosphere/Resources/S3BucketPolicy.hs
--- a/library-gen/Stratosphere/Resources/S3BucketPolicy.hs
+++ b/library-gen/Stratosphere/Resources/S3BucketPolicy.hs
@@ -25,13 +25,6 @@
     , (Just . ("PolicyDocument",) . toJSON) _s3BucketPolicyPolicyDocument
     ]
 
-instance FromJSON S3BucketPolicy where
-  parseJSON (Object obj) =
-    S3BucketPolicy <$>
-      (obj .: "Bucket") <*>
-      (obj .: "PolicyDocument")
-  parseJSON _ = mempty
-
 -- | Constructor for 'S3BucketPolicy' containing required fields as arguments.
 s3BucketPolicy
   :: Val Text -- ^ 'sbpBucket'
diff --git a/library-gen/Stratosphere/Resources/SDBDomain.hs b/library-gen/Stratosphere/Resources/SDBDomain.hs
--- a/library-gen/Stratosphere/Resources/SDBDomain.hs
+++ b/library-gen/Stratosphere/Resources/SDBDomain.hs
@@ -23,12 +23,6 @@
     [ fmap (("Description",) . toJSON) _sDBDomainDescription
     ]
 
-instance FromJSON SDBDomain where
-  parseJSON (Object obj) =
-    SDBDomain <$>
-      (obj .:? "Description")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SDBDomain' containing required fields as arguments.
 sdbDomain
   :: SDBDomain
diff --git a/library-gen/Stratosphere/Resources/SESConfigurationSet.hs b/library-gen/Stratosphere/Resources/SESConfigurationSet.hs
--- a/library-gen/Stratosphere/Resources/SESConfigurationSet.hs
+++ b/library-gen/Stratosphere/Resources/SESConfigurationSet.hs
@@ -23,12 +23,6 @@
     [ fmap (("Name",) . toJSON) _sESConfigurationSetName
     ]
 
-instance FromJSON SESConfigurationSet where
-  parseJSON (Object obj) =
-    SESConfigurationSet <$>
-      (obj .:? "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESConfigurationSet' containing required fields as
 -- arguments.
 sesConfigurationSet
diff --git a/library-gen/Stratosphere/Resources/SESConfigurationSetEventDestination.hs b/library-gen/Stratosphere/Resources/SESConfigurationSetEventDestination.hs
--- a/library-gen/Stratosphere/Resources/SESConfigurationSetEventDestination.hs
+++ b/library-gen/Stratosphere/Resources/SESConfigurationSetEventDestination.hs
@@ -25,13 +25,6 @@
     , (Just . ("EventDestination",) . toJSON) _sESConfigurationSetEventDestinationEventDestination
     ]
 
-instance FromJSON SESConfigurationSetEventDestination where
-  parseJSON (Object obj) =
-    SESConfigurationSetEventDestination <$>
-      (obj .: "ConfigurationSetName") <*>
-      (obj .: "EventDestination")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESConfigurationSetEventDestination' containing required
 -- fields as arguments.
 sesConfigurationSetEventDestination
diff --git a/library-gen/Stratosphere/Resources/SESReceiptFilter.hs b/library-gen/Stratosphere/Resources/SESReceiptFilter.hs
--- a/library-gen/Stratosphere/Resources/SESReceiptFilter.hs
+++ b/library-gen/Stratosphere/Resources/SESReceiptFilter.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Filter",) . toJSON) _sESReceiptFilterFilter
     ]
 
-instance FromJSON SESReceiptFilter where
-  parseJSON (Object obj) =
-    SESReceiptFilter <$>
-      (obj .: "Filter")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptFilter' containing required fields as
 -- arguments.
 sesReceiptFilter
diff --git a/library-gen/Stratosphere/Resources/SESReceiptRule.hs b/library-gen/Stratosphere/Resources/SESReceiptRule.hs
--- a/library-gen/Stratosphere/Resources/SESReceiptRule.hs
+++ b/library-gen/Stratosphere/Resources/SESReceiptRule.hs
@@ -27,14 +27,6 @@
     , (Just . ("RuleSetName",) . toJSON) _sESReceiptRuleRuleSetName
     ]
 
-instance FromJSON SESReceiptRule where
-  parseJSON (Object obj) =
-    SESReceiptRule <$>
-      (obj .:? "After") <*>
-      (obj .: "Rule") <*>
-      (obj .: "RuleSetName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptRule' containing required fields as arguments.
 sesReceiptRule
   :: SESReceiptRuleRule -- ^ 'sesrrRule'
diff --git a/library-gen/Stratosphere/Resources/SESReceiptRuleSet.hs b/library-gen/Stratosphere/Resources/SESReceiptRuleSet.hs
--- a/library-gen/Stratosphere/Resources/SESReceiptRuleSet.hs
+++ b/library-gen/Stratosphere/Resources/SESReceiptRuleSet.hs
@@ -23,12 +23,6 @@
     [ fmap (("RuleSetName",) . toJSON) _sESReceiptRuleSetRuleSetName
     ]
 
-instance FromJSON SESReceiptRuleSet where
-  parseJSON (Object obj) =
-    SESReceiptRuleSet <$>
-      (obj .:? "RuleSetName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESReceiptRuleSet' containing required fields as
 -- arguments.
 sesReceiptRuleSet
diff --git a/library-gen/Stratosphere/Resources/SESTemplate.hs b/library-gen/Stratosphere/Resources/SESTemplate.hs
--- a/library-gen/Stratosphere/Resources/SESTemplate.hs
+++ b/library-gen/Stratosphere/Resources/SESTemplate.hs
@@ -23,12 +23,6 @@
     [ fmap (("Template",) . toJSON) _sESTemplateTemplate
     ]
 
-instance FromJSON SESTemplate where
-  parseJSON (Object obj) =
-    SESTemplate <$>
-      (obj .:? "Template")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SESTemplate' containing required fields as arguments.
 sesTemplate
   :: SESTemplate
diff --git a/library-gen/Stratosphere/Resources/SNSSubscription.hs b/library-gen/Stratosphere/Resources/SNSSubscription.hs
--- a/library-gen/Stratosphere/Resources/SNSSubscription.hs
+++ b/library-gen/Stratosphere/Resources/SNSSubscription.hs
@@ -35,18 +35,6 @@
     , (Just . ("TopicArn",) . toJSON) _sNSSubscriptionTopicArn
     ]
 
-instance FromJSON SNSSubscription where
-  parseJSON (Object obj) =
-    SNSSubscription <$>
-      (obj .:? "DeliveryPolicy") <*>
-      (obj .:? "Endpoint") <*>
-      (obj .:? "FilterPolicy") <*>
-      (obj .: "Protocol") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "RawMessageDelivery") <*>
-      (obj .:? "Region") <*>
-      (obj .: "TopicArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SNSSubscription' containing required fields as
 -- arguments.
 snsSubscription
diff --git a/library-gen/Stratosphere/Resources/SNSTopic.hs b/library-gen/Stratosphere/Resources/SNSTopic.hs
--- a/library-gen/Stratosphere/Resources/SNSTopic.hs
+++ b/library-gen/Stratosphere/Resources/SNSTopic.hs
@@ -29,15 +29,6 @@
     , fmap (("TopicName",) . toJSON) _sNSTopicTopicName
     ]
 
-instance FromJSON SNSTopic where
-  parseJSON (Object obj) =
-    SNSTopic <$>
-      (obj .:? "DisplayName") <*>
-      (obj .:? "KmsMasterKeyId") <*>
-      (obj .:? "Subscription") <*>
-      (obj .:? "TopicName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SNSTopic' containing required fields as arguments.
 snsTopic
   :: SNSTopic
diff --git a/library-gen/Stratosphere/Resources/SNSTopicPolicy.hs b/library-gen/Stratosphere/Resources/SNSTopicPolicy.hs
--- a/library-gen/Stratosphere/Resources/SNSTopicPolicy.hs
+++ b/library-gen/Stratosphere/Resources/SNSTopicPolicy.hs
@@ -25,13 +25,6 @@
     , (Just . ("Topics",) . toJSON) _sNSTopicPolicyTopics
     ]
 
-instance FromJSON SNSTopicPolicy where
-  parseJSON (Object obj) =
-    SNSTopicPolicy <$>
-      (obj .: "PolicyDocument") <*>
-      (obj .: "Topics")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SNSTopicPolicy' containing required fields as arguments.
 snsTopicPolicy
   :: Object -- ^ 'snstpPolicyDocument'
diff --git a/library-gen/Stratosphere/Resources/SQSQueue.hs b/library-gen/Stratosphere/Resources/SQSQueue.hs
--- a/library-gen/Stratosphere/Resources/SQSQueue.hs
+++ b/library-gen/Stratosphere/Resources/SQSQueue.hs
@@ -45,23 +45,6 @@
     , fmap (("VisibilityTimeout",) . toJSON . fmap Integer') _sQSQueueVisibilityTimeout
     ]
 
-instance FromJSON SQSQueue where
-  parseJSON (Object obj) =
-    SQSQueue <$>
-      fmap (fmap (fmap unBool')) (obj .:? "ContentBasedDeduplication") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "DelaySeconds") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "FifoQueue") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "KmsDataKeyReusePeriodSeconds") <*>
-      (obj .:? "KmsMasterKeyId") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MaximumMessageSize") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MessageRetentionPeriod") <*>
-      (obj .:? "QueueName") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "ReceiveMessageWaitTimeSeconds") <*>
-      (obj .:? "RedrivePolicy") <*>
-      (obj .:? "Tags") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "VisibilityTimeout")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SQSQueue' containing required fields as arguments.
 sqsQueue
   :: SQSQueue
diff --git a/library-gen/Stratosphere/Resources/SQSQueuePolicy.hs b/library-gen/Stratosphere/Resources/SQSQueuePolicy.hs
--- a/library-gen/Stratosphere/Resources/SQSQueuePolicy.hs
+++ b/library-gen/Stratosphere/Resources/SQSQueuePolicy.hs
@@ -25,13 +25,6 @@
     , (Just . ("Queues",) . toJSON) _sQSQueuePolicyQueues
     ]
 
-instance FromJSON SQSQueuePolicy where
-  parseJSON (Object obj) =
-    SQSQueuePolicy <$>
-      (obj .: "PolicyDocument") <*>
-      (obj .: "Queues")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SQSQueuePolicy' containing required fields as arguments.
 sqsQueuePolicy
   :: Object -- ^ 'sqsqpPolicyDocument'
diff --git a/library-gen/Stratosphere/Resources/SSMAssociation.hs b/library-gen/Stratosphere/Resources/SSMAssociation.hs
--- a/library-gen/Stratosphere/Resources/SSMAssociation.hs
+++ b/library-gen/Stratosphere/Resources/SSMAssociation.hs
@@ -39,19 +39,6 @@
     , fmap (("Targets",) . toJSON) _sSMAssociationTargets
     ]
 
-instance FromJSON SSMAssociation where
-  parseJSON (Object obj) =
-    SSMAssociation <$>
-      (obj .:? "AssociationName") <*>
-      (obj .:? "DocumentVersion") <*>
-      (obj .:? "InstanceId") <*>
-      (obj .: "Name") <*>
-      (obj .:? "OutputLocation") <*>
-      (obj .:? "Parameters") <*>
-      (obj .:? "ScheduleExpression") <*>
-      (obj .:? "Targets")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMAssociation' containing required fields as arguments.
 ssmAssociation
   :: Val Text -- ^ 'ssmaName'
diff --git a/library-gen/Stratosphere/Resources/SSMDocument.hs b/library-gen/Stratosphere/Resources/SSMDocument.hs
--- a/library-gen/Stratosphere/Resources/SSMDocument.hs
+++ b/library-gen/Stratosphere/Resources/SSMDocument.hs
@@ -27,14 +27,6 @@
     , fmap (("Tags",) . toJSON) _sSMDocumentTags
     ]
 
-instance FromJSON SSMDocument where
-  parseJSON (Object obj) =
-    SSMDocument <$>
-      (obj .: "Content") <*>
-      (obj .:? "DocumentType") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMDocument' containing required fields as arguments.
 ssmDocument
   :: Object -- ^ 'ssmdContent'
diff --git a/library-gen/Stratosphere/Resources/SSMMaintenanceWindow.hs b/library-gen/Stratosphere/Resources/SSMMaintenanceWindow.hs
--- a/library-gen/Stratosphere/Resources/SSMMaintenanceWindow.hs
+++ b/library-gen/Stratosphere/Resources/SSMMaintenanceWindow.hs
@@ -41,21 +41,6 @@
     , fmap (("Tags",) . toJSON) _sSMMaintenanceWindowTags
     ]
 
-instance FromJSON SSMMaintenanceWindow where
-  parseJSON (Object obj) =
-    SSMMaintenanceWindow <$>
-      fmap (fmap unBool') (obj .: "AllowUnassociatedTargets") <*>
-      fmap (fmap unInteger') (obj .: "Cutoff") <*>
-      (obj .:? "Description") <*>
-      fmap (fmap unInteger') (obj .: "Duration") <*>
-      (obj .:? "EndDate") <*>
-      (obj .: "Name") <*>
-      (obj .: "Schedule") <*>
-      (obj .:? "ScheduleTimezone") <*>
-      (obj .:? "StartDate") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMMaintenanceWindow' containing required fields as
 -- arguments.
 ssmMaintenanceWindow
diff --git a/library-gen/Stratosphere/Resources/SSMMaintenanceWindowTask.hs b/library-gen/Stratosphere/Resources/SSMMaintenanceWindowTask.hs
--- a/library-gen/Stratosphere/Resources/SSMMaintenanceWindowTask.hs
+++ b/library-gen/Stratosphere/Resources/SSMMaintenanceWindowTask.hs
@@ -49,24 +49,6 @@
     , fmap (("WindowId",) . toJSON) _sSMMaintenanceWindowTaskWindowId
     ]
 
-instance FromJSON SSMMaintenanceWindowTask where
-  parseJSON (Object obj) =
-    SSMMaintenanceWindowTask <$>
-      (obj .:? "Description") <*>
-      (obj .:? "LoggingInfo") <*>
-      (obj .: "MaxConcurrency") <*>
-      (obj .: "MaxErrors") <*>
-      (obj .:? "Name") <*>
-      fmap (fmap unInteger') (obj .: "Priority") <*>
-      (obj .: "ServiceRoleArn") <*>
-      (obj .: "Targets") <*>
-      (obj .: "TaskArn") <*>
-      (obj .:? "TaskInvocationParameters") <*>
-      (obj .:? "TaskParameters") <*>
-      (obj .: "TaskType") <*>
-      (obj .:? "WindowId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMMaintenanceWindowTask' containing required fields as
 -- arguments.
 ssmMaintenanceWindowTask
diff --git a/library-gen/Stratosphere/Resources/SSMParameter.hs b/library-gen/Stratosphere/Resources/SSMParameter.hs
--- a/library-gen/Stratosphere/Resources/SSMParameter.hs
+++ b/library-gen/Stratosphere/Resources/SSMParameter.hs
@@ -31,16 +31,6 @@
     , (Just . ("Value",) . toJSON) _sSMParameterValue
     ]
 
-instance FromJSON SSMParameter where
-  parseJSON (Object obj) =
-    SSMParameter <$>
-      (obj .:? "AllowedPattern") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "Name") <*>
-      (obj .: "Type") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMParameter' containing required fields as arguments.
 ssmParameter
   :: Val Text -- ^ 'ssmpType'
diff --git a/library-gen/Stratosphere/Resources/SSMPatchBaseline.hs b/library-gen/Stratosphere/Resources/SSMPatchBaseline.hs
--- a/library-gen/Stratosphere/Resources/SSMPatchBaseline.hs
+++ b/library-gen/Stratosphere/Resources/SSMPatchBaseline.hs
@@ -47,23 +47,6 @@
     , fmap (("Sources",) . toJSON) _sSMPatchBaselineSources
     ]
 
-instance FromJSON SSMPatchBaseline where
-  parseJSON (Object obj) =
-    SSMPatchBaseline <$>
-      (obj .:? "ApprovalRules") <*>
-      (obj .:? "ApprovedPatches") <*>
-      (obj .:? "ApprovedPatchesComplianceLevel") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "ApprovedPatchesEnableNonSecurity") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "GlobalFilters") <*>
-      (obj .: "Name") <*>
-      (obj .:? "OperatingSystem") <*>
-      (obj .:? "PatchGroups") <*>
-      (obj .:? "RejectedPatches") <*>
-      (obj .:? "RejectedPatchesAction") <*>
-      (obj .:? "Sources")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMPatchBaseline' containing required fields as
 -- arguments.
 ssmPatchBaseline
diff --git a/library-gen/Stratosphere/Resources/SSMResourceDataSync.hs b/library-gen/Stratosphere/Resources/SSMResourceDataSync.hs
--- a/library-gen/Stratosphere/Resources/SSMResourceDataSync.hs
+++ b/library-gen/Stratosphere/Resources/SSMResourceDataSync.hs
@@ -33,17 +33,6 @@
     , (Just . ("SyncName",) . toJSON) _sSMResourceDataSyncSyncName
     ]
 
-instance FromJSON SSMResourceDataSync where
-  parseJSON (Object obj) =
-    SSMResourceDataSync <$>
-      (obj .: "BucketName") <*>
-      (obj .:? "BucketPrefix") <*>
-      (obj .: "BucketRegion") <*>
-      (obj .:? "KMSKeyArn") <*>
-      (obj .: "SyncFormat") <*>
-      (obj .: "SyncName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SSMResourceDataSync' containing required fields as
 -- arguments.
 ssmResourceDataSync
diff --git a/library-gen/Stratosphere/Resources/SageMakerEndpoint.hs b/library-gen/Stratosphere/Resources/SageMakerEndpoint.hs
--- a/library-gen/Stratosphere/Resources/SageMakerEndpoint.hs
+++ b/library-gen/Stratosphere/Resources/SageMakerEndpoint.hs
@@ -27,14 +27,6 @@
     , fmap (("Tags",) . toJSON) _sageMakerEndpointTags
     ]
 
-instance FromJSON SageMakerEndpoint where
-  parseJSON (Object obj) =
-    SageMakerEndpoint <$>
-      (obj .: "EndpointConfigName") <*>
-      (obj .:? "EndpointName") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SageMakerEndpoint' containing required fields as
 -- arguments.
 sageMakerEndpoint
diff --git a/library-gen/Stratosphere/Resources/SageMakerEndpointConfig.hs b/library-gen/Stratosphere/Resources/SageMakerEndpointConfig.hs
--- a/library-gen/Stratosphere/Resources/SageMakerEndpointConfig.hs
+++ b/library-gen/Stratosphere/Resources/SageMakerEndpointConfig.hs
@@ -30,15 +30,6 @@
     , fmap (("Tags",) . toJSON) _sageMakerEndpointConfigTags
     ]
 
-instance FromJSON SageMakerEndpointConfig where
-  parseJSON (Object obj) =
-    SageMakerEndpointConfig <$>
-      (obj .:? "EndpointConfigName") <*>
-      (obj .:? "KmsKeyId") <*>
-      (obj .: "ProductionVariants") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SageMakerEndpointConfig' containing required fields as
 -- arguments.
 sageMakerEndpointConfig
diff --git a/library-gen/Stratosphere/Resources/SageMakerModel.hs b/library-gen/Stratosphere/Resources/SageMakerModel.hs
--- a/library-gen/Stratosphere/Resources/SageMakerModel.hs
+++ b/library-gen/Stratosphere/Resources/SageMakerModel.hs
@@ -35,17 +35,6 @@
     , fmap (("VpcConfig",) . toJSON) _sageMakerModelVpcConfig
     ]
 
-instance FromJSON SageMakerModel where
-  parseJSON (Object obj) =
-    SageMakerModel <$>
-      (obj .:? "Containers") <*>
-      (obj .: "ExecutionRoleArn") <*>
-      (obj .:? "ModelName") <*>
-      (obj .:? "PrimaryContainer") <*>
-      (obj .:? "Tags") <*>
-      (obj .:? "VpcConfig")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SageMakerModel' containing required fields as arguments.
 sageMakerModel
   :: Val Text -- ^ 'smmExecutionRoleArn'
diff --git a/library-gen/Stratosphere/Resources/SageMakerNotebookInstance.hs b/library-gen/Stratosphere/Resources/SageMakerNotebookInstance.hs
--- a/library-gen/Stratosphere/Resources/SageMakerNotebookInstance.hs
+++ b/library-gen/Stratosphere/Resources/SageMakerNotebookInstance.hs
@@ -41,21 +41,6 @@
     , fmap (("VolumeSizeInGB",) . toJSON . fmap Integer') _sageMakerNotebookInstanceVolumeSizeInGB
     ]
 
-instance FromJSON SageMakerNotebookInstance where
-  parseJSON (Object obj) =
-    SageMakerNotebookInstance <$>
-      (obj .:? "DirectInternetAccess") <*>
-      (obj .: "InstanceType") <*>
-      (obj .:? "KmsKeyId") <*>
-      (obj .:? "LifecycleConfigName") <*>
-      (obj .:? "NotebookInstanceName") <*>
-      (obj .: "RoleArn") <*>
-      (obj .:? "SecurityGroupIds") <*>
-      (obj .:? "SubnetId") <*>
-      (obj .:? "Tags") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "VolumeSizeInGB")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SageMakerNotebookInstance' containing required fields as
 -- arguments.
 sageMakerNotebookInstance
diff --git a/library-gen/Stratosphere/Resources/SageMakerNotebookInstanceLifecycleConfig.hs b/library-gen/Stratosphere/Resources/SageMakerNotebookInstanceLifecycleConfig.hs
--- a/library-gen/Stratosphere/Resources/SageMakerNotebookInstanceLifecycleConfig.hs
+++ b/library-gen/Stratosphere/Resources/SageMakerNotebookInstanceLifecycleConfig.hs
@@ -28,14 +28,6 @@
     , fmap (("OnStart",) . toJSON) _sageMakerNotebookInstanceLifecycleConfigOnStart
     ]
 
-instance FromJSON SageMakerNotebookInstanceLifecycleConfig where
-  parseJSON (Object obj) =
-    SageMakerNotebookInstanceLifecycleConfig <$>
-      (obj .:? "NotebookInstanceLifecycleConfigName") <*>
-      (obj .:? "OnCreate") <*>
-      (obj .:? "OnStart")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SageMakerNotebookInstanceLifecycleConfig' containing
 -- required fields as arguments.
 sageMakerNotebookInstanceLifecycleConfig
diff --git a/library-gen/Stratosphere/Resources/SecretsManagerResourcePolicy.hs b/library-gen/Stratosphere/Resources/SecretsManagerResourcePolicy.hs
--- a/library-gen/Stratosphere/Resources/SecretsManagerResourcePolicy.hs
+++ b/library-gen/Stratosphere/Resources/SecretsManagerResourcePolicy.hs
@@ -25,13 +25,6 @@
     , (Just . ("SecretId",) . toJSON) _secretsManagerResourcePolicySecretId
     ]
 
-instance FromJSON SecretsManagerResourcePolicy where
-  parseJSON (Object obj) =
-    SecretsManagerResourcePolicy <$>
-      (obj .: "ResourcePolicy") <*>
-      (obj .: "SecretId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SecretsManagerResourcePolicy' containing required fields
 -- as arguments.
 secretsManagerResourcePolicy
diff --git a/library-gen/Stratosphere/Resources/SecretsManagerRotationSchedule.hs b/library-gen/Stratosphere/Resources/SecretsManagerRotationSchedule.hs
--- a/library-gen/Stratosphere/Resources/SecretsManagerRotationSchedule.hs
+++ b/library-gen/Stratosphere/Resources/SecretsManagerRotationSchedule.hs
@@ -27,14 +27,6 @@
     , (Just . ("SecretId",) . toJSON) _secretsManagerRotationScheduleSecretId
     ]
 
-instance FromJSON SecretsManagerRotationSchedule where
-  parseJSON (Object obj) =
-    SecretsManagerRotationSchedule <$>
-      (obj .:? "RotationLambdaARN") <*>
-      (obj .:? "RotationRules") <*>
-      (obj .: "SecretId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SecretsManagerRotationSchedule' containing required
 -- fields as arguments.
 secretsManagerRotationSchedule
diff --git a/library-gen/Stratosphere/Resources/SecretsManagerSecret.hs b/library-gen/Stratosphere/Resources/SecretsManagerSecret.hs
--- a/library-gen/Stratosphere/Resources/SecretsManagerSecret.hs
+++ b/library-gen/Stratosphere/Resources/SecretsManagerSecret.hs
@@ -34,17 +34,6 @@
     , fmap (("Tags",) . toJSON) _secretsManagerSecretTags
     ]
 
-instance FromJSON SecretsManagerSecret where
-  parseJSON (Object obj) =
-    SecretsManagerSecret <$>
-      (obj .:? "Description") <*>
-      (obj .:? "GenerateSecretString") <*>
-      (obj .:? "KmsKeyId") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "SecretString") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SecretsManagerSecret' containing required fields as
 -- arguments.
 secretsManagerSecret
diff --git a/library-gen/Stratosphere/Resources/SecretsManagerSecretTargetAttachment.hs b/library-gen/Stratosphere/Resources/SecretsManagerSecretTargetAttachment.hs
--- a/library-gen/Stratosphere/Resources/SecretsManagerSecretTargetAttachment.hs
+++ b/library-gen/Stratosphere/Resources/SecretsManagerSecretTargetAttachment.hs
@@ -27,14 +27,6 @@
     , (Just . ("TargetType",) . toJSON) _secretsManagerSecretTargetAttachmentTargetType
     ]
 
-instance FromJSON SecretsManagerSecretTargetAttachment where
-  parseJSON (Object obj) =
-    SecretsManagerSecretTargetAttachment <$>
-      (obj .: "SecretId") <*>
-      (obj .: "TargetId") <*>
-      (obj .: "TargetType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'SecretsManagerSecretTargetAttachment' containing
 -- required fields as arguments.
 secretsManagerSecretTargetAttachment
diff --git a/library-gen/Stratosphere/Resources/ServiceCatalogAcceptedPortfolioShare.hs b/library-gen/Stratosphere/Resources/ServiceCatalogAcceptedPortfolioShare.hs
--- a/library-gen/Stratosphere/Resources/ServiceCatalogAcceptedPortfolioShare.hs
+++ b/library-gen/Stratosphere/Resources/ServiceCatalogAcceptedPortfolioShare.hs
@@ -25,13 +25,6 @@
     , (Just . ("PortfolioId",) . toJSON) _serviceCatalogAcceptedPortfolioSharePortfolioId
     ]
 
-instance FromJSON ServiceCatalogAcceptedPortfolioShare where
-  parseJSON (Object obj) =
-    ServiceCatalogAcceptedPortfolioShare <$>
-      (obj .:? "AcceptLanguage") <*>
-      (obj .: "PortfolioId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceCatalogAcceptedPortfolioShare' containing
 -- required fields as arguments.
 serviceCatalogAcceptedPortfolioShare
diff --git a/library-gen/Stratosphere/Resources/ServiceCatalogCloudFormationProduct.hs b/library-gen/Stratosphere/Resources/ServiceCatalogCloudFormationProduct.hs
--- a/library-gen/Stratosphere/Resources/ServiceCatalogCloudFormationProduct.hs
+++ b/library-gen/Stratosphere/Resources/ServiceCatalogCloudFormationProduct.hs
@@ -42,21 +42,6 @@
     , fmap (("Tags",) . toJSON) _serviceCatalogCloudFormationProductTags
     ]
 
-instance FromJSON ServiceCatalogCloudFormationProduct where
-  parseJSON (Object obj) =
-    ServiceCatalogCloudFormationProduct <$>
-      (obj .:? "AcceptLanguage") <*>
-      (obj .:? "Description") <*>
-      (obj .:? "Distributor") <*>
-      (obj .: "Name") <*>
-      (obj .: "Owner") <*>
-      (obj .: "ProvisioningArtifactParameters") <*>
-      (obj .:? "SupportDescription") <*>
-      (obj .:? "SupportEmail") <*>
-      (obj .:? "SupportUrl") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceCatalogCloudFormationProduct' containing required
 -- fields as arguments.
 serviceCatalogCloudFormationProduct
diff --git a/library-gen/Stratosphere/Resources/ServiceCatalogCloudFormationProvisionedProduct.hs b/library-gen/Stratosphere/Resources/ServiceCatalogCloudFormationProvisionedProduct.hs
--- a/library-gen/Stratosphere/Resources/ServiceCatalogCloudFormationProvisionedProduct.hs
+++ b/library-gen/Stratosphere/Resources/ServiceCatalogCloudFormationProvisionedProduct.hs
@@ -44,21 +44,6 @@
     , fmap (("Tags",) . toJSON) _serviceCatalogCloudFormationProvisionedProductTags
     ]
 
-instance FromJSON ServiceCatalogCloudFormationProvisionedProduct where
-  parseJSON (Object obj) =
-    ServiceCatalogCloudFormationProvisionedProduct <$>
-      (obj .:? "AcceptLanguage") <*>
-      (obj .:? "NotificationArns") <*>
-      (obj .:? "PathId") <*>
-      (obj .:? "ProductId") <*>
-      (obj .:? "ProductName") <*>
-      (obj .:? "ProvisionedProductName") <*>
-      (obj .:? "ProvisioningArtifactId") <*>
-      (obj .:? "ProvisioningArtifactName") <*>
-      (obj .:? "ProvisioningParameters") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceCatalogCloudFormationProvisionedProduct'
 -- containing required fields as arguments.
 serviceCatalogCloudFormationProvisionedProduct
diff --git a/library-gen/Stratosphere/Resources/ServiceCatalogLaunchNotificationConstraint.hs b/library-gen/Stratosphere/Resources/ServiceCatalogLaunchNotificationConstraint.hs
--- a/library-gen/Stratosphere/Resources/ServiceCatalogLaunchNotificationConstraint.hs
+++ b/library-gen/Stratosphere/Resources/ServiceCatalogLaunchNotificationConstraint.hs
@@ -32,16 +32,6 @@
     , (Just . ("ProductId",) . toJSON) _serviceCatalogLaunchNotificationConstraintProductId
     ]
 
-instance FromJSON ServiceCatalogLaunchNotificationConstraint where
-  parseJSON (Object obj) =
-    ServiceCatalogLaunchNotificationConstraint <$>
-      (obj .:? "AcceptLanguage") <*>
-      (obj .:? "Description") <*>
-      (obj .: "NotificationArns") <*>
-      (obj .: "PortfolioId") <*>
-      (obj .: "ProductId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceCatalogLaunchNotificationConstraint' containing
 -- required fields as arguments.
 serviceCatalogLaunchNotificationConstraint
diff --git a/library-gen/Stratosphere/Resources/ServiceCatalogLaunchRoleConstraint.hs b/library-gen/Stratosphere/Resources/ServiceCatalogLaunchRoleConstraint.hs
--- a/library-gen/Stratosphere/Resources/ServiceCatalogLaunchRoleConstraint.hs
+++ b/library-gen/Stratosphere/Resources/ServiceCatalogLaunchRoleConstraint.hs
@@ -31,16 +31,6 @@
     , (Just . ("RoleArn",) . toJSON) _serviceCatalogLaunchRoleConstraintRoleArn
     ]
 
-instance FromJSON ServiceCatalogLaunchRoleConstraint where
-  parseJSON (Object obj) =
-    ServiceCatalogLaunchRoleConstraint <$>
-      (obj .:? "AcceptLanguage") <*>
-      (obj .:? "Description") <*>
-      (obj .: "PortfolioId") <*>
-      (obj .: "ProductId") <*>
-      (obj .: "RoleArn")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceCatalogLaunchRoleConstraint' containing required
 -- fields as arguments.
 serviceCatalogLaunchRoleConstraint
diff --git a/library-gen/Stratosphere/Resources/ServiceCatalogLaunchTemplateConstraint.hs b/library-gen/Stratosphere/Resources/ServiceCatalogLaunchTemplateConstraint.hs
--- a/library-gen/Stratosphere/Resources/ServiceCatalogLaunchTemplateConstraint.hs
+++ b/library-gen/Stratosphere/Resources/ServiceCatalogLaunchTemplateConstraint.hs
@@ -32,16 +32,6 @@
     , (Just . ("Rules",) . toJSON) _serviceCatalogLaunchTemplateConstraintRules
     ]
 
-instance FromJSON ServiceCatalogLaunchTemplateConstraint where
-  parseJSON (Object obj) =
-    ServiceCatalogLaunchTemplateConstraint <$>
-      (obj .:? "AcceptLanguage") <*>
-      (obj .:? "Description") <*>
-      (obj .: "PortfolioId") <*>
-      (obj .: "ProductId") <*>
-      (obj .: "Rules")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceCatalogLaunchTemplateConstraint' containing
 -- required fields as arguments.
 serviceCatalogLaunchTemplateConstraint
diff --git a/library-gen/Stratosphere/Resources/ServiceCatalogPortfolio.hs b/library-gen/Stratosphere/Resources/ServiceCatalogPortfolio.hs
--- a/library-gen/Stratosphere/Resources/ServiceCatalogPortfolio.hs
+++ b/library-gen/Stratosphere/Resources/ServiceCatalogPortfolio.hs
@@ -31,16 +31,6 @@
     , fmap (("Tags",) . toJSON) _serviceCatalogPortfolioTags
     ]
 
-instance FromJSON ServiceCatalogPortfolio where
-  parseJSON (Object obj) =
-    ServiceCatalogPortfolio <$>
-      (obj .:? "AcceptLanguage") <*>
-      (obj .:? "Description") <*>
-      (obj .: "DisplayName") <*>
-      (obj .: "ProviderName") <*>
-      (obj .:? "Tags")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceCatalogPortfolio' containing required fields as
 -- arguments.
 serviceCatalogPortfolio
diff --git a/library-gen/Stratosphere/Resources/ServiceCatalogPortfolioPrincipalAssociation.hs b/library-gen/Stratosphere/Resources/ServiceCatalogPortfolioPrincipalAssociation.hs
--- a/library-gen/Stratosphere/Resources/ServiceCatalogPortfolioPrincipalAssociation.hs
+++ b/library-gen/Stratosphere/Resources/ServiceCatalogPortfolioPrincipalAssociation.hs
@@ -31,15 +31,6 @@
     , (Just . ("PrincipalType",) . toJSON) _serviceCatalogPortfolioPrincipalAssociationPrincipalType
     ]
 
-instance FromJSON ServiceCatalogPortfolioPrincipalAssociation where
-  parseJSON (Object obj) =
-    ServiceCatalogPortfolioPrincipalAssociation <$>
-      (obj .:? "AcceptLanguage") <*>
-      (obj .: "PortfolioId") <*>
-      (obj .: "PrincipalARN") <*>
-      (obj .: "PrincipalType")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceCatalogPortfolioPrincipalAssociation' containing
 -- required fields as arguments.
 serviceCatalogPortfolioPrincipalAssociation
diff --git a/library-gen/Stratosphere/Resources/ServiceCatalogPortfolioProductAssociation.hs b/library-gen/Stratosphere/Resources/ServiceCatalogPortfolioProductAssociation.hs
--- a/library-gen/Stratosphere/Resources/ServiceCatalogPortfolioProductAssociation.hs
+++ b/library-gen/Stratosphere/Resources/ServiceCatalogPortfolioProductAssociation.hs
@@ -30,15 +30,6 @@
     , fmap (("SourcePortfolioId",) . toJSON) _serviceCatalogPortfolioProductAssociationSourcePortfolioId
     ]
 
-instance FromJSON ServiceCatalogPortfolioProductAssociation where
-  parseJSON (Object obj) =
-    ServiceCatalogPortfolioProductAssociation <$>
-      (obj .:? "AcceptLanguage") <*>
-      (obj .: "PortfolioId") <*>
-      (obj .: "ProductId") <*>
-      (obj .:? "SourcePortfolioId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceCatalogPortfolioProductAssociation' containing
 -- required fields as arguments.
 serviceCatalogPortfolioProductAssociation
diff --git a/library-gen/Stratosphere/Resources/ServiceCatalogPortfolioShare.hs b/library-gen/Stratosphere/Resources/ServiceCatalogPortfolioShare.hs
--- a/library-gen/Stratosphere/Resources/ServiceCatalogPortfolioShare.hs
+++ b/library-gen/Stratosphere/Resources/ServiceCatalogPortfolioShare.hs
@@ -27,14 +27,6 @@
     , (Just . ("PortfolioId",) . toJSON) _serviceCatalogPortfolioSharePortfolioId
     ]
 
-instance FromJSON ServiceCatalogPortfolioShare where
-  parseJSON (Object obj) =
-    ServiceCatalogPortfolioShare <$>
-      (obj .:? "AcceptLanguage") <*>
-      (obj .: "AccountId") <*>
-      (obj .: "PortfolioId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceCatalogPortfolioShare' containing required fields
 -- as arguments.
 serviceCatalogPortfolioShare
diff --git a/library-gen/Stratosphere/Resources/ServiceCatalogTagOption.hs b/library-gen/Stratosphere/Resources/ServiceCatalogTagOption.hs
--- a/library-gen/Stratosphere/Resources/ServiceCatalogTagOption.hs
+++ b/library-gen/Stratosphere/Resources/ServiceCatalogTagOption.hs
@@ -27,14 +27,6 @@
     , (Just . ("Value",) . toJSON) _serviceCatalogTagOptionValue
     ]
 
-instance FromJSON ServiceCatalogTagOption where
-  parseJSON (Object obj) =
-    ServiceCatalogTagOption <$>
-      fmap (fmap (fmap unBool')) (obj .:? "Active") <*>
-      (obj .: "Key") <*>
-      (obj .: "Value")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceCatalogTagOption' containing required fields as
 -- arguments.
 serviceCatalogTagOption
diff --git a/library-gen/Stratosphere/Resources/ServiceCatalogTagOptionAssociation.hs b/library-gen/Stratosphere/Resources/ServiceCatalogTagOptionAssociation.hs
--- a/library-gen/Stratosphere/Resources/ServiceCatalogTagOptionAssociation.hs
+++ b/library-gen/Stratosphere/Resources/ServiceCatalogTagOptionAssociation.hs
@@ -25,13 +25,6 @@
     , (Just . ("TagOptionId",) . toJSON) _serviceCatalogTagOptionAssociationTagOptionId
     ]
 
-instance FromJSON ServiceCatalogTagOptionAssociation where
-  parseJSON (Object obj) =
-    ServiceCatalogTagOptionAssociation <$>
-      (obj .: "ResourceId") <*>
-      (obj .: "TagOptionId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceCatalogTagOptionAssociation' containing required
 -- fields as arguments.
 serviceCatalogTagOptionAssociation
diff --git a/library-gen/Stratosphere/Resources/ServiceDiscoveryHttpNamespace.hs b/library-gen/Stratosphere/Resources/ServiceDiscoveryHttpNamespace.hs
--- a/library-gen/Stratosphere/Resources/ServiceDiscoveryHttpNamespace.hs
+++ b/library-gen/Stratosphere/Resources/ServiceDiscoveryHttpNamespace.hs
@@ -25,13 +25,6 @@
     , (Just . ("Name",) . toJSON) _serviceDiscoveryHttpNamespaceName
     ]
 
-instance FromJSON ServiceDiscoveryHttpNamespace where
-  parseJSON (Object obj) =
-    ServiceDiscoveryHttpNamespace <$>
-      (obj .:? "Description") <*>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceDiscoveryHttpNamespace' containing required
 -- fields as arguments.
 serviceDiscoveryHttpNamespace
diff --git a/library-gen/Stratosphere/Resources/ServiceDiscoveryInstance.hs b/library-gen/Stratosphere/Resources/ServiceDiscoveryInstance.hs
--- a/library-gen/Stratosphere/Resources/ServiceDiscoveryInstance.hs
+++ b/library-gen/Stratosphere/Resources/ServiceDiscoveryInstance.hs
@@ -27,14 +27,6 @@
     , (Just . ("ServiceId",) . toJSON) _serviceDiscoveryInstanceServiceId
     ]
 
-instance FromJSON ServiceDiscoveryInstance where
-  parseJSON (Object obj) =
-    ServiceDiscoveryInstance <$>
-      (obj .: "InstanceAttributes") <*>
-      (obj .:? "InstanceId") <*>
-      (obj .: "ServiceId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceDiscoveryInstance' containing required fields as
 -- arguments.
 serviceDiscoveryInstance
diff --git a/library-gen/Stratosphere/Resources/ServiceDiscoveryPrivateDnsNamespace.hs b/library-gen/Stratosphere/Resources/ServiceDiscoveryPrivateDnsNamespace.hs
--- a/library-gen/Stratosphere/Resources/ServiceDiscoveryPrivateDnsNamespace.hs
+++ b/library-gen/Stratosphere/Resources/ServiceDiscoveryPrivateDnsNamespace.hs
@@ -27,14 +27,6 @@
     , (Just . ("Vpc",) . toJSON) _serviceDiscoveryPrivateDnsNamespaceVpc
     ]
 
-instance FromJSON ServiceDiscoveryPrivateDnsNamespace where
-  parseJSON (Object obj) =
-    ServiceDiscoveryPrivateDnsNamespace <$>
-      (obj .:? "Description") <*>
-      (obj .: "Name") <*>
-      (obj .: "Vpc")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceDiscoveryPrivateDnsNamespace' containing required
 -- fields as arguments.
 serviceDiscoveryPrivateDnsNamespace
diff --git a/library-gen/Stratosphere/Resources/ServiceDiscoveryPublicDnsNamespace.hs b/library-gen/Stratosphere/Resources/ServiceDiscoveryPublicDnsNamespace.hs
--- a/library-gen/Stratosphere/Resources/ServiceDiscoveryPublicDnsNamespace.hs
+++ b/library-gen/Stratosphere/Resources/ServiceDiscoveryPublicDnsNamespace.hs
@@ -25,13 +25,6 @@
     , (Just . ("Name",) . toJSON) _serviceDiscoveryPublicDnsNamespaceName
     ]
 
-instance FromJSON ServiceDiscoveryPublicDnsNamespace where
-  parseJSON (Object obj) =
-    ServiceDiscoveryPublicDnsNamespace <$>
-      (obj .:? "Description") <*>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceDiscoveryPublicDnsNamespace' containing required
 -- fields as arguments.
 serviceDiscoveryPublicDnsNamespace
diff --git a/library-gen/Stratosphere/Resources/ServiceDiscoveryService.hs b/library-gen/Stratosphere/Resources/ServiceDiscoveryService.hs
--- a/library-gen/Stratosphere/Resources/ServiceDiscoveryService.hs
+++ b/library-gen/Stratosphere/Resources/ServiceDiscoveryService.hs
@@ -35,17 +35,6 @@
     , fmap (("NamespaceId",) . toJSON) _serviceDiscoveryServiceNamespaceId
     ]
 
-instance FromJSON ServiceDiscoveryService where
-  parseJSON (Object obj) =
-    ServiceDiscoveryService <$>
-      (obj .:? "Description") <*>
-      (obj .:? "DnsConfig") <*>
-      (obj .:? "HealthCheckConfig") <*>
-      (obj .:? "HealthCheckCustomConfig") <*>
-      (obj .:? "Name") <*>
-      (obj .:? "NamespaceId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ServiceDiscoveryService' containing required fields as
 -- arguments.
 serviceDiscoveryService
diff --git a/library-gen/Stratosphere/Resources/StepFunctionsActivity.hs b/library-gen/Stratosphere/Resources/StepFunctionsActivity.hs
--- a/library-gen/Stratosphere/Resources/StepFunctionsActivity.hs
+++ b/library-gen/Stratosphere/Resources/StepFunctionsActivity.hs
@@ -23,12 +23,6 @@
     [ (Just . ("Name",) . toJSON) _stepFunctionsActivityName
     ]
 
-instance FromJSON StepFunctionsActivity where
-  parseJSON (Object obj) =
-    StepFunctionsActivity <$>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'StepFunctionsActivity' containing required fields as
 -- arguments.
 stepFunctionsActivity
diff --git a/library-gen/Stratosphere/Resources/StepFunctionsStateMachine.hs b/library-gen/Stratosphere/Resources/StepFunctionsStateMachine.hs
--- a/library-gen/Stratosphere/Resources/StepFunctionsStateMachine.hs
+++ b/library-gen/Stratosphere/Resources/StepFunctionsStateMachine.hs
@@ -27,14 +27,6 @@
     , fmap (("StateMachineName",) . toJSON) _stepFunctionsStateMachineStateMachineName
     ]
 
-instance FromJSON StepFunctionsStateMachine where
-  parseJSON (Object obj) =
-    StepFunctionsStateMachine <$>
-      (obj .: "DefinitionString") <*>
-      (obj .: "RoleArn") <*>
-      (obj .:? "StateMachineName")
-  parseJSON _ = mempty
-
 -- | Constructor for 'StepFunctionsStateMachine' containing required fields as
 -- arguments.
 stepFunctionsStateMachine
diff --git a/library-gen/Stratosphere/Resources/WAFByteMatchSet.hs b/library-gen/Stratosphere/Resources/WAFByteMatchSet.hs
--- a/library-gen/Stratosphere/Resources/WAFByteMatchSet.hs
+++ b/library-gen/Stratosphere/Resources/WAFByteMatchSet.hs
@@ -25,13 +25,6 @@
     , (Just . ("Name",) . toJSON) _wAFByteMatchSetName
     ]
 
-instance FromJSON WAFByteMatchSet where
-  parseJSON (Object obj) =
-    WAFByteMatchSet <$>
-      (obj .:? "ByteMatchTuples") <*>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFByteMatchSet' containing required fields as
 -- arguments.
 wafByteMatchSet
diff --git a/library-gen/Stratosphere/Resources/WAFIPSet.hs b/library-gen/Stratosphere/Resources/WAFIPSet.hs
--- a/library-gen/Stratosphere/Resources/WAFIPSet.hs
+++ b/library-gen/Stratosphere/Resources/WAFIPSet.hs
@@ -25,13 +25,6 @@
     , (Just . ("Name",) . toJSON) _wAFIPSetName
     ]
 
-instance FromJSON WAFIPSet where
-  parseJSON (Object obj) =
-    WAFIPSet <$>
-      (obj .:? "IPSetDescriptors") <*>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFIPSet' containing required fields as arguments.
 wafipSet
   :: Val Text -- ^ 'wafipsName'
diff --git a/library-gen/Stratosphere/Resources/WAFRegionalByteMatchSet.hs b/library-gen/Stratosphere/Resources/WAFRegionalByteMatchSet.hs
--- a/library-gen/Stratosphere/Resources/WAFRegionalByteMatchSet.hs
+++ b/library-gen/Stratosphere/Resources/WAFRegionalByteMatchSet.hs
@@ -25,13 +25,6 @@
     , (Just . ("Name",) . toJSON) _wAFRegionalByteMatchSetName
     ]
 
-instance FromJSON WAFRegionalByteMatchSet where
-  parseJSON (Object obj) =
-    WAFRegionalByteMatchSet <$>
-      (obj .:? "ByteMatchTuples") <*>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalByteMatchSet' containing required fields as
 -- arguments.
 wafRegionalByteMatchSet
diff --git a/library-gen/Stratosphere/Resources/WAFRegionalIPSet.hs b/library-gen/Stratosphere/Resources/WAFRegionalIPSet.hs
--- a/library-gen/Stratosphere/Resources/WAFRegionalIPSet.hs
+++ b/library-gen/Stratosphere/Resources/WAFRegionalIPSet.hs
@@ -25,13 +25,6 @@
     , (Just . ("Name",) . toJSON) _wAFRegionalIPSetName
     ]
 
-instance FromJSON WAFRegionalIPSet where
-  parseJSON (Object obj) =
-    WAFRegionalIPSet <$>
-      (obj .:? "IPSetDescriptors") <*>
-      (obj .: "Name")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalIPSet' containing required fields as
 -- arguments.
 wafRegionalIPSet
diff --git a/library-gen/Stratosphere/Resources/WAFRegionalRule.hs b/library-gen/Stratosphere/Resources/WAFRegionalRule.hs
--- a/library-gen/Stratosphere/Resources/WAFRegionalRule.hs
+++ b/library-gen/Stratosphere/Resources/WAFRegionalRule.hs
@@ -27,14 +27,6 @@
     , fmap (("Predicates",) . toJSON) _wAFRegionalRulePredicates
     ]
 
-instance FromJSON WAFRegionalRule where
-  parseJSON (Object obj) =
-    WAFRegionalRule <$>
-      (obj .: "MetricName") <*>
-      (obj .: "Name") <*>
-      (obj .:? "Predicates")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalRule' containing required fields as
 -- arguments.
 wafRegionalRule
diff --git a/library-gen/Stratosphere/Resources/WAFRegionalSizeConstraintSet.hs b/library-gen/Stratosphere/Resources/WAFRegionalSizeConstraintSet.hs
--- a/library-gen/Stratosphere/Resources/WAFRegionalSizeConstraintSet.hs
+++ b/library-gen/Stratosphere/Resources/WAFRegionalSizeConstraintSet.hs
@@ -25,13 +25,6 @@
     , fmap (("SizeConstraints",) . toJSON) _wAFRegionalSizeConstraintSetSizeConstraints
     ]
 
-instance FromJSON WAFRegionalSizeConstraintSet where
-  parseJSON (Object obj) =
-    WAFRegionalSizeConstraintSet <$>
-      (obj .: "Name") <*>
-      (obj .:? "SizeConstraints")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalSizeConstraintSet' containing required fields
 -- as arguments.
 wafRegionalSizeConstraintSet
diff --git a/library-gen/Stratosphere/Resources/WAFRegionalSqlInjectionMatchSet.hs b/library-gen/Stratosphere/Resources/WAFRegionalSqlInjectionMatchSet.hs
--- a/library-gen/Stratosphere/Resources/WAFRegionalSqlInjectionMatchSet.hs
+++ b/library-gen/Stratosphere/Resources/WAFRegionalSqlInjectionMatchSet.hs
@@ -25,13 +25,6 @@
     , fmap (("SqlInjectionMatchTuples",) . toJSON) _wAFRegionalSqlInjectionMatchSetSqlInjectionMatchTuples
     ]
 
-instance FromJSON WAFRegionalSqlInjectionMatchSet where
-  parseJSON (Object obj) =
-    WAFRegionalSqlInjectionMatchSet <$>
-      (obj .: "Name") <*>
-      (obj .:? "SqlInjectionMatchTuples")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalSqlInjectionMatchSet' containing required
 -- fields as arguments.
 wafRegionalSqlInjectionMatchSet
diff --git a/library-gen/Stratosphere/Resources/WAFRegionalWebACL.hs b/library-gen/Stratosphere/Resources/WAFRegionalWebACL.hs
--- a/library-gen/Stratosphere/Resources/WAFRegionalWebACL.hs
+++ b/library-gen/Stratosphere/Resources/WAFRegionalWebACL.hs
@@ -30,15 +30,6 @@
     , fmap (("Rules",) . toJSON) _wAFRegionalWebACLRules
     ]
 
-instance FromJSON WAFRegionalWebACL where
-  parseJSON (Object obj) =
-    WAFRegionalWebACL <$>
-      (obj .: "DefaultAction") <*>
-      (obj .: "MetricName") <*>
-      (obj .: "Name") <*>
-      (obj .:? "Rules")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalWebACL' containing required fields as
 -- arguments.
 wafRegionalWebACL
diff --git a/library-gen/Stratosphere/Resources/WAFRegionalWebACLAssociation.hs b/library-gen/Stratosphere/Resources/WAFRegionalWebACLAssociation.hs
--- a/library-gen/Stratosphere/Resources/WAFRegionalWebACLAssociation.hs
+++ b/library-gen/Stratosphere/Resources/WAFRegionalWebACLAssociation.hs
@@ -25,13 +25,6 @@
     , (Just . ("WebACLId",) . toJSON) _wAFRegionalWebACLAssociationWebACLId
     ]
 
-instance FromJSON WAFRegionalWebACLAssociation where
-  parseJSON (Object obj) =
-    WAFRegionalWebACLAssociation <$>
-      (obj .: "ResourceArn") <*>
-      (obj .: "WebACLId")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalWebACLAssociation' containing required fields
 -- as arguments.
 wafRegionalWebACLAssociation
diff --git a/library-gen/Stratosphere/Resources/WAFRegionalXssMatchSet.hs b/library-gen/Stratosphere/Resources/WAFRegionalXssMatchSet.hs
--- a/library-gen/Stratosphere/Resources/WAFRegionalXssMatchSet.hs
+++ b/library-gen/Stratosphere/Resources/WAFRegionalXssMatchSet.hs
@@ -25,13 +25,6 @@
     , fmap (("XssMatchTuples",) . toJSON) _wAFRegionalXssMatchSetXssMatchTuples
     ]
 
-instance FromJSON WAFRegionalXssMatchSet where
-  parseJSON (Object obj) =
-    WAFRegionalXssMatchSet <$>
-      (obj .: "Name") <*>
-      (obj .:? "XssMatchTuples")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRegionalXssMatchSet' containing required fields as
 -- arguments.
 wafRegionalXssMatchSet
diff --git a/library-gen/Stratosphere/Resources/WAFRule.hs b/library-gen/Stratosphere/Resources/WAFRule.hs
--- a/library-gen/Stratosphere/Resources/WAFRule.hs
+++ b/library-gen/Stratosphere/Resources/WAFRule.hs
@@ -27,14 +27,6 @@
     , fmap (("Predicates",) . toJSON) _wAFRulePredicates
     ]
 
-instance FromJSON WAFRule where
-  parseJSON (Object obj) =
-    WAFRule <$>
-      (obj .: "MetricName") <*>
-      (obj .: "Name") <*>
-      (obj .:? "Predicates")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFRule' containing required fields as arguments.
 wafRule
   :: Val Text -- ^ 'wafrMetricName'
diff --git a/library-gen/Stratosphere/Resources/WAFSizeConstraintSet.hs b/library-gen/Stratosphere/Resources/WAFSizeConstraintSet.hs
--- a/library-gen/Stratosphere/Resources/WAFSizeConstraintSet.hs
+++ b/library-gen/Stratosphere/Resources/WAFSizeConstraintSet.hs
@@ -25,13 +25,6 @@
     , (Just . ("SizeConstraints",) . toJSON) _wAFSizeConstraintSetSizeConstraints
     ]
 
-instance FromJSON WAFSizeConstraintSet where
-  parseJSON (Object obj) =
-    WAFSizeConstraintSet <$>
-      (obj .: "Name") <*>
-      (obj .: "SizeConstraints")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFSizeConstraintSet' containing required fields as
 -- arguments.
 wafSizeConstraintSet
diff --git a/library-gen/Stratosphere/Resources/WAFSqlInjectionMatchSet.hs b/library-gen/Stratosphere/Resources/WAFSqlInjectionMatchSet.hs
--- a/library-gen/Stratosphere/Resources/WAFSqlInjectionMatchSet.hs
+++ b/library-gen/Stratosphere/Resources/WAFSqlInjectionMatchSet.hs
@@ -25,13 +25,6 @@
     , fmap (("SqlInjectionMatchTuples",) . toJSON) _wAFSqlInjectionMatchSetSqlInjectionMatchTuples
     ]
 
-instance FromJSON WAFSqlInjectionMatchSet where
-  parseJSON (Object obj) =
-    WAFSqlInjectionMatchSet <$>
-      (obj .: "Name") <*>
-      (obj .:? "SqlInjectionMatchTuples")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFSqlInjectionMatchSet' containing required fields as
 -- arguments.
 wafSqlInjectionMatchSet
diff --git a/library-gen/Stratosphere/Resources/WAFWebACL.hs b/library-gen/Stratosphere/Resources/WAFWebACL.hs
--- a/library-gen/Stratosphere/Resources/WAFWebACL.hs
+++ b/library-gen/Stratosphere/Resources/WAFWebACL.hs
@@ -30,15 +30,6 @@
     , fmap (("Rules",) . toJSON) _wAFWebACLRules
     ]
 
-instance FromJSON WAFWebACL where
-  parseJSON (Object obj) =
-    WAFWebACL <$>
-      (obj .: "DefaultAction") <*>
-      (obj .: "MetricName") <*>
-      (obj .: "Name") <*>
-      (obj .:? "Rules")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFWebACL' containing required fields as arguments.
 wafWebACL
   :: WAFWebACLWafAction -- ^ 'wafwaclDefaultAction'
diff --git a/library-gen/Stratosphere/Resources/WAFXssMatchSet.hs b/library-gen/Stratosphere/Resources/WAFXssMatchSet.hs
--- a/library-gen/Stratosphere/Resources/WAFXssMatchSet.hs
+++ b/library-gen/Stratosphere/Resources/WAFXssMatchSet.hs
@@ -25,13 +25,6 @@
     , (Just . ("XssMatchTuples",) . toJSON) _wAFXssMatchSetXssMatchTuples
     ]
 
-instance FromJSON WAFXssMatchSet where
-  parseJSON (Object obj) =
-    WAFXssMatchSet <$>
-      (obj .: "Name") <*>
-      (obj .: "XssMatchTuples")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WAFXssMatchSet' containing required fields as arguments.
 wafXssMatchSet
   :: Val Text -- ^ 'wafxmsName'
diff --git a/library-gen/Stratosphere/Resources/WorkSpacesWorkspace.hs b/library-gen/Stratosphere/Resources/WorkSpacesWorkspace.hs
--- a/library-gen/Stratosphere/Resources/WorkSpacesWorkspace.hs
+++ b/library-gen/Stratosphere/Resources/WorkSpacesWorkspace.hs
@@ -38,19 +38,6 @@
     , fmap (("WorkspaceProperties",) . toJSON) _workSpacesWorkspaceWorkspaceProperties
     ]
 
-instance FromJSON WorkSpacesWorkspace where
-  parseJSON (Object obj) =
-    WorkSpacesWorkspace <$>
-      (obj .: "BundleId") <*>
-      (obj .: "DirectoryId") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "RootVolumeEncryptionEnabled") <*>
-      (obj .:? "Tags") <*>
-      (obj .: "UserName") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "UserVolumeEncryptionEnabled") <*>
-      (obj .:? "VolumeEncryptionKey") <*>
-      (obj .:? "WorkspaceProperties")
-  parseJSON _ = mempty
-
 -- | Constructor for 'WorkSpacesWorkspace' containing required fields as
 -- arguments.
 workSpacesWorkspace
diff --git a/library/Stratosphere/Helpers.hs b/library/Stratosphere/Helpers.hs
--- a/library/Stratosphere/Helpers.hs
+++ b/library/Stratosphere/Helpers.hs
@@ -5,15 +5,12 @@
        , modTemplateJSONField
        , NamedItem (..)
        , namedItemToJSON
-       , namedItemFromJSON
        ) where
 
 import Control.Lens (set)
 import Control.Lens.TH
 import Data.Aeson
-import Data.Aeson.Types (Parser)
 import Data.Char (isUpper, toLower)
-import qualified Data.HashMap.Strict as HM
 import Data.List (stripPrefix)
 import Data.Maybe (maybeToList)
 import qualified Data.Text as T
@@ -54,14 +51,7 @@
 class NamedItem a where
   itemName :: a -> T.Text
   nameToJSON :: a -> Value
-  nameParseJSON :: T.Text -> Object -> Parser a
 
 namedItemToJSON :: (NamedItem a) => [a] -> Value
 namedItemToJSON xs =
     object $ fmap (\x -> itemName x .= nameToJSON x) xs
-
-namedItemFromJSON :: (NamedItem a) => Value -> Parser [a]
-namedItemFromJSON v = do
-    objs <- parseJSON v :: Parser (HM.HashMap T.Text Value)
-    sequence [withObject "NamedItem" (nameParseJSON n) obj |
-              (n, obj) <- HM.toList objs]
diff --git a/library/Stratosphere/Outputs.hs b/library/Stratosphere/Outputs.hs
--- a/library/Stratosphere/Outputs.hs
+++ b/library/Stratosphere/Outputs.hs
@@ -30,7 +30,6 @@
 
 import Control.Lens hiding ((.=))
 import Data.Aeson
-import Data.Aeson.Types (Parser)
 import Data.Maybe (catMaybes)
 import Data.Semigroup (Semigroup)
 import Data.Text (Text)
@@ -50,12 +49,6 @@
     [ "Name" .= outputExportName
     ]
 
-instance FromJSON OutputExport where
-  parseJSON (Object o) =
-    OutputExport <$>
-      o .: "Name"
-  parseJSON _ = mempty
-
 -- | See 'output' for a convenient constructor.
 data Output =
   Output
@@ -98,13 +91,6 @@
   , maybeField "Export" _outputExport
   ]
 
-outputFromJSON :: Text -> Object -> Parser Output
-outputFromJSON n o =
-  Output n
-  <$> o .:? "Description"
-  <*> o .: "Value"
-  <*> o .:? "Export"
-
 -- | Wrapper around a list of 'Output's to we can modify the aeson instances.
 newtype Outputs = Outputs { unOutputs :: [Output] }
   deriving (Show, Eq, Semigroup, Monoid)
@@ -117,10 +103,6 @@
 instance NamedItem Output where
   itemName = _outputName
   nameToJSON = outputToJSON
-  nameParseJSON = outputFromJSON
 
 instance ToJSON Outputs where
   toJSON = namedItemToJSON . unOutputs
-
-instance FromJSON Outputs where
-  parseJSON v = Outputs <$> namedItemFromJSON v
diff --git a/library/Stratosphere/Parameters.hs b/library/Stratosphere/Parameters.hs
--- a/library/Stratosphere/Parameters.hs
+++ b/library/Stratosphere/Parameters.hs
@@ -23,7 +23,6 @@
 
 import Control.Lens hiding ((.=))
 import Data.Aeson
-import Data.Aeson.Types (Parser)
 import Data.Maybe (catMaybes)
 import Data.Semigroup (Semigroup)
 import qualified Data.Text as T
@@ -89,21 +88,6 @@
   , maybeField "ConstraintDescription" _parameterConstraintDescription
   ]
 
-parameterFromJSON :: T.Text -> Object -> Parser Parameter
-parameterFromJSON n o =
-  Parameter n
-  <$> o .:  "Type"
-  <*> o .:? "Default"
-  <*> o .:? "NoEcho"
-  <*> o .:? "AllowedValues"
-  <*> o .:? "AllowedPattern"
-  <*> fmap (fmap unInteger') (o .:? "MaxLength")
-  <*> fmap (fmap unInteger') (o .:? "MinLength")
-  <*> fmap (fmap unInteger') (o .:? "MaxValue")
-  <*> fmap (fmap unInteger') (o .:? "MinValue")
-  <*> o .:? "Description"
-  <*> o .:? "ConstraintDescription"
-
 -- | Constructor for 'Parameter' with required arguments.
 parameter
   :: T.Text -- ^ Name
@@ -138,10 +122,6 @@
 instance NamedItem Parameter where
   itemName = _parameterName
   nameToJSON = parameterToJSON
-  nameParseJSON = parameterFromJSON
 
 instance ToJSON Parameters where
   toJSON = namedItemToJSON . unParameters
-
-instance FromJSON Parameters where
-  parseJSON v = Parameters <$> namedItemFromJSON v
diff --git a/library/Stratosphere/ResourceAttributes/AutoScalingReplacingUpdatePolicy.hs b/library/Stratosphere/ResourceAttributes/AutoScalingReplacingUpdatePolicy.hs
--- a/library/Stratosphere/ResourceAttributes/AutoScalingReplacingUpdatePolicy.hs
+++ b/library/Stratosphere/ResourceAttributes/AutoScalingReplacingUpdatePolicy.hs
@@ -24,12 +24,6 @@
     [ fmap (("WillReplace",) . toJSON . fmap Bool') _autoScalingReplacingUpdatePolicyWillReplace
     ]
 
-instance FromJSON AutoScalingReplacingUpdatePolicy where
-  parseJSON (Object obj) =
-    AutoScalingReplacingUpdatePolicy <$>
-      fmap (fmap (fmap unBool')) (obj .:? "WillReplace")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingReplacingUpdatePolicy' containing required fields
 -- as arguments.
 autoScalingReplacingUpdatePolicy
diff --git a/library/Stratosphere/ResourceAttributes/AutoScalingRollingUpdatePolicy.hs b/library/Stratosphere/ResourceAttributes/AutoScalingRollingUpdatePolicy.hs
--- a/library/Stratosphere/ResourceAttributes/AutoScalingRollingUpdatePolicy.hs
+++ b/library/Stratosphere/ResourceAttributes/AutoScalingRollingUpdatePolicy.hs
@@ -34,17 +34,6 @@
     , fmap (("WaitOnResourceSignals",) . toJSON . fmap Bool') _autoScalingRollingUpdatePolicyWaitOnResourceSignals
     ]
 
-instance FromJSON AutoScalingRollingUpdatePolicy where
-  parseJSON (Object obj) =
-    AutoScalingRollingUpdatePolicy <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "MaxBatchSize") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MinInstancesInService") <*>
-      fmap (fmap (fmap unInteger')) (obj .:? "MinSuccessfulInstancesPercent") <*>
-      (obj .:? "PauseTime") <*>
-      (obj .:? "SuspendProcesses") <*>
-      fmap (fmap (fmap unBool')) (obj .:? "WaitOnResourceSignals")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingRollingUpdatePolicy' containing required fields as
 -- arguments.
 autoScalingRollingUpdatePolicy
diff --git a/library/Stratosphere/ResourceAttributes/AutoScalingScheduledActionPolicy.hs b/library/Stratosphere/ResourceAttributes/AutoScalingScheduledActionPolicy.hs
--- a/library/Stratosphere/ResourceAttributes/AutoScalingScheduledActionPolicy.hs
+++ b/library/Stratosphere/ResourceAttributes/AutoScalingScheduledActionPolicy.hs
@@ -37,12 +37,6 @@
     [ fmap (("IgnoreUnmodifiedGroupSizeProperties",) . toJSON . fmap Bool') _autoScalingScheduledActionPolicyIgnoreUnmodifiedGroupSizeProperties
     ]
 
-instance FromJSON AutoScalingScheduledActionPolicy where
-  parseJSON (Object obj) =
-    AutoScalingScheduledActionPolicy <$>
-      fmap (fmap (fmap unBool')) (obj .:? "IgnoreUnmodifiedGroupSizeProperties")
-  parseJSON _ = mempty
-
 -- | Constructor for 'AutoScalingScheduledActionPolicy' containing required fields
 -- as arguments.
 autoScalingScheduledActionPolicy
diff --git a/library/Stratosphere/ResourceAttributes/CreationPolicy.hs b/library/Stratosphere/ResourceAttributes/CreationPolicy.hs
--- a/library/Stratosphere/ResourceAttributes/CreationPolicy.hs
+++ b/library/Stratosphere/ResourceAttributes/CreationPolicy.hs
@@ -36,9 +36,6 @@
 instance ToJSON CreationPolicy where
   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
 
-instance FromJSON CreationPolicy where
-  parseJSON = genericParseJSON defaultOptions { fieldLabelModifier = Prelude.drop 15, omitNothingFields = True }
-
 -- | Constructor for 'CreationPolicy' containing required fields as arguments.
 creationPolicy
   :: ResourceSignal -- ^ 'cpResourceSignal'
diff --git a/library/Stratosphere/ResourceAttributes/ResourceSignal.hs b/library/Stratosphere/ResourceAttributes/ResourceSignal.hs
--- a/library/Stratosphere/ResourceAttributes/ResourceSignal.hs
+++ b/library/Stratosphere/ResourceAttributes/ResourceSignal.hs
@@ -25,13 +25,6 @@
     , fmap (("Timeout",) . toJSON) _resourceSignalTimeout
     ]
 
-instance FromJSON ResourceSignal where
-  parseJSON (Object obj) =
-    ResourceSignal <$>
-      fmap (fmap (fmap unInteger')) (obj .:? "Count") <*>
-      (obj .:? "Timeout")
-  parseJSON _ = mempty
-
 -- | Constructor for 'ResourceSignal' containing required fields as arguments.
 resourceSignal
   :: ResourceSignal
diff --git a/library/Stratosphere/ResourceAttributes/UpdatePolicy.hs b/library/Stratosphere/ResourceAttributes/UpdatePolicy.hs
--- a/library/Stratosphere/ResourceAttributes/UpdatePolicy.hs
+++ b/library/Stratosphere/ResourceAttributes/UpdatePolicy.hs
@@ -27,9 +27,6 @@
 instance ToJSON UpdatePolicy where
   toJSON = genericToJSON defaultOptions { fieldLabelModifier = Prelude.drop 13, omitNothingFields = True }
 
-instance FromJSON UpdatePolicy where
-  parseJSON = genericParseJSON defaultOptions { fieldLabelModifier = Prelude.drop 13, omitNothingFields = True }
-
 -- | Constructor for 'UpdatePolicy' containing required fields as arguments.
 updatePolicy
   :: UpdatePolicy
diff --git a/library/Stratosphere/Template.hs b/library/Stratosphere/Template.hs
--- a/library/Stratosphere/Template.hs
+++ b/library/Stratosphere/Template.hs
@@ -82,8 +82,8 @@
   } deriving (Show, Eq)
 
 
-$(deriveJSON defaultOptions { fieldLabelModifier = modTemplateJSONField
-                            , omitNothingFields = True } ''Template)
+$(deriveToJSON defaultOptions { fieldLabelModifier = modTemplateJSONField
+                              , omitNothingFields = True } ''Template)
 $(makeLenses ''Template)
 
 -- | Convenient constructor for 'Template' with required arguments.
diff --git a/library/Stratosphere/Types.hs b/library/Stratosphere/Types.hs
--- a/library/Stratosphere/Types.hs
+++ b/library/Stratosphere/Types.hs
@@ -26,14 +26,14 @@
   ) where
 
 import Data.Aeson
-import Data.Text (Text, unpack)
+import Data.Text (Text)
 import GHC.Generics
 
 
 data EnabledState
   = ENABLED
   | DISABLED
-  deriving (Show, Read, Eq, Generic, FromJSON, ToJSON)
+  deriving (Show, Read, Eq, Generic, ToJSON)
 
 -- https://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-apigateway-authorizer.html#cfn-apigateway-authorizer-type
 data AuthorizerType
@@ -41,24 +41,16 @@
   | 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)
+  deriving (Show, Read, Eq, Generic, ToJSON)
 
 data HttpMethod
   = GET
@@ -67,13 +59,13 @@
   | HEAD
   | DELETE
   | OPTIONS
-  deriving (Show, Read, Eq, Generic, FromJSON, ToJSON)
+  deriving (Show, Read, Eq, Generic, ToJSON)
 
 data LoggingLevel
   = OFF
   | ERROR
   | INFO
-  deriving (Show, Read, Eq, Generic, FromJSON, ToJSON)
+  deriving (Show, Read, Eq, Generic, ToJSON)
 
 data ApiBackendType
   = HTTP
@@ -81,25 +73,24 @@
   | MOCK
   | HTTP_PROXY
   | AWS_PROXY
-  deriving (Show, Read, Eq, Generic, FromJSON, ToJSON)
+  deriving (Show, Read, Eq, Generic, ToJSON)
 
 data Period
   = DAY
   | WEEK
   | MONTH
-  deriving (Show, Read, Eq, Generic, FromJSON, ToJSON)
+  deriving (Show, Read, Eq, Generic, ToJSON)
 
 data AttributeType
   = S
   | N
   | B
-  deriving (Show, Read, Eq, Generic, FromJSON, ToJSON)
+  deriving (Show, Read, Eq, Generic, ToJSON)
 
 data KeyType
   = HASH
   | RANGE
-  deriving (Show, Read, Eq, Generic, FromJSON, ToJSON)
-
+  deriving (Show, Read, Eq, Generic, ToJSON)
 
 data ProjectionType
   = ProjectKeysOnly
@@ -107,26 +98,17 @@
   | ProjectAll
   deriving (Show, Read, Eq, Generic)
 
-instance FromJSON ProjectionType where
-  parseJSON = withText "ProjectionType" parse
-    where
-      parse "KEYS_ONLY"     = pure ProjectKeysOnly
-      parse "INCLUDE"       = pure ProjectIncluded
-      parse "ALL"           = pure ProjectAll
-      parse projectionType  = fail ("Unexpected projection type " ++ unpack projectionType)
-
 instance ToJSON ProjectionType where
   toJSON ProjectKeysOnly = String "KEYS_ONLY"
   toJSON ProjectIncluded = String "INCLUDE"
   toJSON ProjectAll      = String "ALL"
 
-
 data StreamViewType
   = KEYS_ONLY
   | NEW_IMAGE
   | OLD_IMAGE
   | NEW_AND_OLD_IMAGES
-  deriving (Show, Read, Eq, Generic, FromJSON, ToJSON)
+  deriving (Show, Read, Eq, Generic, ToJSON)
 
 data SNSProtocol
   = SnsHttp
@@ -139,20 +121,6 @@
   | SnsLambda
   deriving (Show, Read, Eq, Generic)
 
-
-instance FromJSON SNSProtocol where
-  parseJSON = withText "SNSProtocol" parse
-    where
-      parse "http"        = pure SnsHttp
-      parse "https"       = pure SnsHttps
-      parse "email"       = pure SnsEmail
-      parse "email-json"  = pure SnsEmailJson
-      parse "sms"         = pure SnsSms
-      parse "sqs"         = pure SnsSqs
-      parse "application" = pure SnsApplication
-      parse "lambda"      = pure SnsLambda
-      parse protocol = fail ("Unexpected SNS protocol " ++ unpack protocol)
-
 instance ToJSON SNSProtocol where
   toJSON SnsHttp        = String "http"
   toJSON SnsHttps       = String "https"
@@ -184,22 +152,6 @@
   | OtherRuntime Text
   deriving (Show, Read, Eq, Generic)
 
-instance FromJSON Runtime where
-  parseJSON = withText "Runtime" parse
-    where
-      parse "nodejs" = pure NodeJS
-      parse "nodejs4.3" = pure NodeJS43
-      parse "nodejs4.3-edge" = pure NodeJS43Edge
-      parse "nodejs6.10" = pure NodeJS610
-      parse "nodejs8.10" = pure NodeJS810
-      parse "java8" = pure Java8
-      parse "python2.7" = pure Python27
-      parse "python3.6" = pure Python36
-      parse "dotnetcore1.0" = pure DotNetCore10
-      parse "dotnetcore2.0" = pure DotNetCore20
-      parse "go1.x" = pure Go1X
-      parse runtime = pure $ OtherRuntime runtime
-
 instance ToJSON Runtime where
   toJSON NodeJS = String "nodejs"
   toJSON NodeJS43 = String "nodejs4.3"
@@ -220,7 +172,7 @@
   = WHEN_NO_MATCH
   | WHEN_NO_TEMPLATES
   | NEVER
-  deriving (Show, Read, Eq, Generic, FromJSON, ToJSON)
+  deriving (Show, Read, Eq, Generic, ToJSON)
 
 -- | Amazon S3 supports a set of predefined grants, known as canned ACLs. Each
 -- canned ACL has a predefined a set of grantees and permissions. The following
@@ -236,7 +188,7 @@
   | Private
   | PublicRead
   | PublicReadWrite
-  deriving (Show, Read, Eq, Generic, FromJSON, ToJSON)
+  deriving (Show, Read, Eq, Generic, ToJSON)
 
 -- | See:
 -- http://docs.aws.amazon.com/firehose/latest/APIReference/API_S3DestinationConfiguration.html
@@ -254,17 +206,6 @@
   toJSON KFS3Zip          = String "ZIP"
   toJSON KFS3Snappy       = String "SNAPPY"
 
-
-instance FromJSON KinesisFirehoseS3CompressionFormat where
-  parseJSON = withText "KinesisFirehoseS3CompressionFormat" parse
-    where
-      parse "UNCOMPRESSED" = pure KFS3Uncompressed
-      parse "GZIP"         = pure KFS3Gzip
-      parse "ZIP"          = pure KFS3Zip
-      parse "SNAPPY"       = pure KFS3Snappy
-      parse fmt            = fail ("Unexpected compression format " ++ unpack fmt)
-
-
 -- | See:
 -- http://docs.aws.amazon.com/firehose/latest/APIReference/API_ElasticsearchDestinationConfiguration.html
 data KinesisFirehoseElasticsearchS3BackupMode
@@ -277,15 +218,6 @@
   toJSON KFS3FailedDocumentsOnly = String "FailedDocumentsOnly"
   toJSON KFS3AllDocuments        = String "AllDocuments"
 
-
-instance FromJSON KinesisFirehoseElasticsearchS3BackupMode where
-  parseJSON = withText "KinesisFirehoseElasticsearchS3BackupMode" parse
-    where
-      parse "FailedDocumentsOnly" = pure KFS3FailedDocumentsOnly
-      parse "AllDocuments"        = pure KFS3AllDocuments
-      parse t                     = fail ("Unexpected S3 backup mode " ++ unpack t)
-
-
 -- | See:
 -- http://docs.aws.amazon.com/firehose/latest/APIReference/API_EncryptionConfiguration.html
 data KinesisFirehoseNoEncryptionConfig = KinesisFirehoseNoEncryptionConfig
@@ -294,10 +226,3 @@
 
 instance ToJSON KinesisFirehoseNoEncryptionConfig where
   toJSON _ = String "NoEncryption"
-
-
-instance FromJSON KinesisFirehoseNoEncryptionConfig where
-  parseJSON = withText "KinesisFirehoseNoEncryptionConfig" parse
-    where
-      parse "NoEncryption" = pure KinesisFirehoseNoEncryptionConfig
-      parse t              = fail ("Unexpected no encryption config value " ++ unpack t)
diff --git a/library/Stratosphere/Values.hs b/library/Stratosphere/Values.hs
--- a/library/Stratosphere/Values.hs
+++ b/library/Stratosphere/Values.hs
@@ -18,13 +18,13 @@
 
 import Data.Aeson
 import Data.HashMap.Strict (HashMap)
-import qualified Data.HashMap.Strict as HM
 import Data.String (IsString (..))
 import Data.Text (Text)
-import Text.Read (readMaybe)
 import GHC.Exts (IsList(..))
 
--- GADTs are cool, but I couldn't get this to work with FromJSON
+-- GADTs are cool, but I couldn't get this to work with FromJSON. Now that we
+-- don't have FromJSON though, we can revisit this.
+
 -- data Val a where
 --   Literal :: a -> Val a
 --   Ref :: Text -> Val a
@@ -88,31 +88,6 @@
 mkFunc :: Text -> [Value] -> Value
 mkFunc name args = object [(name, Array $ fromList args)]
 
-instance (FromJSON a) => FromJSON (Val a) where
-  parseJSON (Object o) =
-    case HM.toList o of
-      [] -> fail "Empty object as Val"
-      [("Ref", o')] -> Ref <$> parseJSON o'
-      [("Fn::If", o')] -> (\(i, x, y) -> If i x y) <$> parseJSON o'
-      [("Fn::And", o')] -> (\(x, y) -> And (unBool' <$> x) (unBool' <$> y)) <$> parseJSON o'
-      [("Fn::Equals", o')] -> uncurry Equals <$> parseJSON o'
-      [("Fn::Or", o')] -> (\(x, y) -> Or (unBool' <$> x) (unBool' <$> y)) <$> parseJSON o'
-      [("Fn::GetAtt", o')] -> uncurry GetAtt <$> parseJSON o'
-      [("Fn::Base64", o')] -> Base64 <$> parseJSON o'
-      [("Fn::Join", o')] -> uncurry Join <$> parseJSON o'
-      [("Fn::Select", o')] -> (\(x, y) -> Select (unInteger' x) y) <$> parseJSON o'
-      [("Fn::FindInMap", o')] -> do
-        (mapName, topKey, secondKey) <- parseJSON o'
-        return (FindInMap mapName topKey secondKey)
-      [("Fn::ImportValue", o')] -> ImportValue <$> parseJSON o'
-      [("Fn::Sub", vals)] ->
-        case vals of
-          (String s) -> return $ Sub s Nothing
-          otherwise' -> uncurry Sub <$> parseJSON otherwise'
-      [(n, o')] -> Literal <$> parseJSON (object [(n, o')])
-      os -> Literal <$> parseJSON (object os)
-  parseJSON v = Literal <$> parseJSON v
-
 -- | 'ValList' is like 'Val', except it is used in place of lists of Vals in
 -- templates. For example, if you have a parameter called @SubnetIds@ of type
 -- @List<AWS::EC2::Subnet::Id>@ then, you can use @RefList "SubnetIds"@ to
@@ -146,17 +121,6 @@
   toJSON (Split d s) = mkFunc "Fn::Split" [toJSON d, toJSON s]
   toJSON (GetAZs r) = object [("Fn::GetAZs", toJSON r)]
 
-instance (FromJSON a) => FromJSON (ValList a) where
-  parseJSON a@(Array _) = ValList <$> parseJSON a
-  parseJSON (Object o) =
-    case HM.toList o of
-      [("Ref", o')] -> RefList <$> parseJSON o'
-      [("Fn::ImportValue", o')] -> ImportValueList <$> parseJSON o'
-      [("Fn::Split", o')] -> uncurry Split <$> parseJSON o'
-      [("Fn::GetAZs", o')] -> GetAZs <$> parseJSON o'
-      _ -> fail "Could not parse object into RefList"
-  parseJSON _ = fail "Expected Array or Object for ValList in parseJSON"
-
 -- | We need to wrap integers so we can override the Aeson type-classes. This
 -- is necessary because CloudFront made the silly decision to represent numbers
 -- as JSON strings.
@@ -166,13 +130,6 @@
 instance ToJSON Integer' where
   toJSON (Integer' i) = toJSON $ show i
 
-instance FromJSON Integer' where
-  parseJSON v = Integer' <$> do
-    numString <- parseJSON v
-    case readMaybe (numString :: String) of
-      Nothing -> fail "Can't read number from string"
-      (Just n) -> return n
-
 -- | We need to wrap Bools for the same reason we need to wrap Ints.
 newtype Bool' = Bool' { unBool' :: Bool }
   deriving (Show, Bounded, Enum, Eq, Ord)
@@ -181,14 +138,6 @@
   toJSON (Bool' True) = "true"
   toJSON (Bool' False) = "false"
 
-instance FromJSON Bool' where
-  parseJSON v = do
-    string <- parseJSON v
-    case string of
-      "true" -> return (Bool' True)
-      "false" -> return (Bool' False)
-      _ -> fail $ "Unknown bool string " ++ string
-
 -- | Class used to create a 'Ref' from another type.
 class ToRef a b where
   toRef :: a -> Val b
@@ -199,10 +148,3 @@
 
 instance ToJSON Double' where
   toJSON (Double' i) = toJSON $ show i
-
-instance FromJSON Double' where
-  parseJSON v = Double' <$> do
-    numString <- parseJSON v
-    case readMaybe (numString :: String) of
-      Nothing -> fail "Can't read number from string"
-      (Just n) -> return n
diff --git a/stratosphere.cabal b/stratosphere.cabal
--- a/stratosphere.cabal
+++ b/stratosphere.cabal
@@ -4,10 +4,10 @@
 --
 -- see: https://github.com/sol/hpack
 --
--- hash: 1b39c35a049bf62220d11130ca8043229817186cc4af03e3f7be35aeb3519779
+-- hash: e12fa823bbfa5eea3d5d782df67bf0c2196b69e40d7b58f656b038b178d6fee8
 
 name:           stratosphere
-version:        0.31.0
+version:        0.32.0
 synopsis:       EDSL for AWS CloudFormation
 description:    EDSL for AWS CloudFormation
 category:       AWS, Cloud
diff --git a/tests/Stratosphere/ValuesSpec.hs b/tests/Stratosphere/ValuesSpec.hs
--- a/tests/Stratosphere/ValuesSpec.hs
+++ b/tests/Stratosphere/ValuesSpec.hs
@@ -14,15 +14,6 @@
 spec :: Spec
 spec = do
   describe "Val/ValList JSON instances" $ do
-    it "is idempotent for Sub" $ do
-      idempotentJSON (sub "MyString")
-      idempotentJSON (Sub "${Greeting} ${Name}" (Just []) :: Val Text)
-      let
-        values =
-          [ ("Greeting", "Hello")
-          , ("Name", "Bob")
-          ]
-      idempotentJSON (Sub "${Greeting} ${Name}" (Just values) :: Val Text)
 
     it "Ref and RefList produce the same JSON" $ do
       toJSON (Ref "MyVal" :: Val Text) `shouldBe` toJSON (RefList "MyVal" :: ValList Text)
@@ -48,6 +39,3 @@
             , Literal 3
             ]
       fmap (+1) input `shouldBe` expected
-
-idempotentJSON :: (ToJSON a, FromJSON a, Show a, Eq a) => a -> Expectation
-idempotentJSON x = decode (encode x) `shouldBe` Just x