diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -8,7 +8,7 @@
 
 ## Version
 
-`1.4.0`
+`1.4.1`
 
 
 ## Description
@@ -23,25 +23,47 @@
 applications and businesses unique.
 
 Amazon RDS gives you access to the capabilities of a MySQL, MariaDB,
-PostgreSQL, Microsoft SQL Server, Oracle, or Aurora database server.
-This means the code, applications, and tools you already use today with
-your existing databases work with Amazon RDS without modification.
-Amazon RDS automatically backs up your database and maintains the
-database software that powers your DB instance. Amazon RDS is flexible:
-you can scale your database instance\'s compute resources and storage
-capacity to meet your application\'s demand. As with all Amazon Web
-Services, there are no up-front investments, and you pay only for the
-resources you use.
+PostgreSQL, Microsoft SQL Server, Oracle, or Amazon Aurora database
+server. These capabilities mean that the code, applications, and tools
+you already use today with your existing databases work with Amazon RDS
+without modification. Amazon RDS automatically backs up your database
+and maintains the database software that powers your DB instance. Amazon
+RDS is flexible: you can scale your database instance\'s compute
+resources and storage capacity to meet your application\'s demand. As
+with all Amazon Web Services, there are no up-front investments, and you
+pay only for the resources you use.
 
-This is an interface reference for Amazon RDS. It contains documentation
-for a programming or command line interface you can use to manage Amazon
-RDS. Note that Amazon RDS is asynchronous, which means that some
-interfaces might require techniques such as polling or callback
-functions to determine when a command has been applied. In this
-reference, the parameter descriptions indicate whether a command is
-applied immediately, on the next instance reboot, or during the
-maintenance window. For a summary of the Amazon RDS interfaces, go to
-<http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Welcome.html#Welcome.Interfaces Available RDS Interfaces>.
+This interface reference for Amazon RDS contains documentation for a
+programming or command line interface you can use to manage Amazon RDS.
+Note that Amazon RDS is asynchronous, which means that some interfaces
+might require techniques such as polling or callback functions to
+determine when a command has been applied. In this reference, the
+parameter descriptions indicate whether a command is applied
+immediately, on the next instance reboot, or during the maintenance
+window. The reference structure is as follows, and we list following
+some related topics from the user guide.
+
+__Amazon RDS API Reference__
+
+-   For the alphabetical list of API actions, see
+    <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/API_Operations.html API Actions>.
+
+-   For the alphabetical list of data types, see
+    <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/API_Types.html Data Types>.
+
+-   For a list of common query parameters, see
+    <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/CommonParameters.html Common Parameters>.
+
+-   For descriptions of the error codes, see
+    <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/CommonErrors.html Common Errors>.
+
+__Amazon RDS User Guide__
+
+-   For a summary of the Amazon RDS interfaces, see
+    <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Welcome.html#Welcome.Interfaces Available RDS Interfaces>.
+
+-   For more information about how to use the Query API, see
+    <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Using_the_Query_API.html Using the Query API>.
 
 Documentation is available via [Hackage](http://hackage.haskell.org/package/amazonka-rds)
 and the [AWS API Reference](https://aws.amazon.com/documentation/).
diff --git a/amazonka-rds.cabal b/amazonka-rds.cabal
--- a/amazonka-rds.cabal
+++ b/amazonka-rds.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-rds
-version:               1.4.0
+version:               1.4.1
 synopsis:              Amazon Relational Database Service SDK.
 homepage:              https://github.com/brendanhay/amazonka
 bug-reports:           https://github.com/brendanhay/amazonka/issues
@@ -23,25 +23,47 @@
     applications and businesses unique.
 
     Amazon RDS gives you access to the capabilities of a MySQL, MariaDB,
-    PostgreSQL, Microsoft SQL Server, Oracle, or Aurora database server.
-    This means the code, applications, and tools you already use today with
-    your existing databases work with Amazon RDS without modification.
-    Amazon RDS automatically backs up your database and maintains the
-    database software that powers your DB instance. Amazon RDS is flexible:
-    you can scale your database instance\'s compute resources and storage
-    capacity to meet your application\'s demand. As with all Amazon Web
-    Services, there are no up-front investments, and you pay only for the
-    resources you use.
+    PostgreSQL, Microsoft SQL Server, Oracle, or Amazon Aurora database
+    server. These capabilities mean that the code, applications, and tools
+    you already use today with your existing databases work with Amazon RDS
+    without modification. Amazon RDS automatically backs up your database
+    and maintains the database software that powers your DB instance. Amazon
+    RDS is flexible: you can scale your database instance\'s compute
+    resources and storage capacity to meet your application\'s demand. As
+    with all Amazon Web Services, there are no up-front investments, and you
+    pay only for the resources you use.
 
-    This is an interface reference for Amazon RDS. It contains documentation
-    for a programming or command line interface you can use to manage Amazon
-    RDS. Note that Amazon RDS is asynchronous, which means that some
-    interfaces might require techniques such as polling or callback
-    functions to determine when a command has been applied. In this
-    reference, the parameter descriptions indicate whether a command is
-    applied immediately, on the next instance reboot, or during the
-    maintenance window. For a summary of the Amazon RDS interfaces, go to
-    <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Welcome.html#Welcome.Interfaces Available RDS Interfaces>.
+    This interface reference for Amazon RDS contains documentation for a
+    programming or command line interface you can use to manage Amazon RDS.
+    Note that Amazon RDS is asynchronous, which means that some interfaces
+    might require techniques such as polling or callback functions to
+    determine when a command has been applied. In this reference, the
+    parameter descriptions indicate whether a command is applied
+    immediately, on the next instance reboot, or during the maintenance
+    window. The reference structure is as follows, and we list following
+    some related topics from the user guide.
+
+    __Amazon RDS API Reference__
+
+    -   For the alphabetical list of API actions, see
+        <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/API_Operations.html API Actions>.
+
+    -   For the alphabetical list of data types, see
+        <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/API_Types.html Data Types>.
+
+    -   For a list of common query parameters, see
+        <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/CommonParameters.html Common Parameters>.
+
+    -   For descriptions of the error codes, see
+        <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/CommonErrors.html Common Errors>.
+
+    __Amazon RDS User Guide__
+
+    -   For a summary of the Amazon RDS interfaces, see
+        <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Welcome.html#Welcome.Interfaces Available RDS Interfaces>.
+
+    -   For more information about how to use the Query API, see
+        <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Using_the_Query_API.html Using the Query API>.
     .
     The types from this library are intended to be used with
     <http://hackage.haskell.org/package/amazonka amazonka>, which provides
@@ -155,7 +177,7 @@
         , Network.AWS.RDS.Types.Sum
 
     build-depends:
-          amazonka-core == 1.4.0.*
+          amazonka-core == 1.4.1.*
         , base          >= 4.7     && < 5
 
 test-suite amazonka-rds-test
@@ -175,9 +197,9 @@
         , Test.AWS.RDS.Internal
 
     build-depends:
-          amazonka-core == 1.4.0.*
-        , amazonka-test == 1.4.0.*
-        , amazonka-rds == 1.4.0.*
+          amazonka-core == 1.4.1.*
+        , amazonka-test == 1.4.1.*
+        , amazonka-rds == 1.4.1.*
         , base
         , bytestring
         , tasty
diff --git a/gen/Network/AWS/RDS.hs b/gen/Network/AWS/RDS.hs
--- a/gen/Network/AWS/RDS.hs
+++ b/gen/Network/AWS/RDS.hs
@@ -21,25 +21,48 @@
 -- applications and businesses unique.
 --
 -- Amazon RDS gives you access to the capabilities of a MySQL, MariaDB,
--- PostgreSQL, Microsoft SQL Server, Oracle, or Aurora database server.
--- This means the code, applications, and tools you already use today with
--- your existing databases work with Amazon RDS without modification.
--- Amazon RDS automatically backs up your database and maintains the
--- database software that powers your DB instance. Amazon RDS is flexible:
--- you can scale your database instance\'s compute resources and storage
--- capacity to meet your application\'s demand. As with all Amazon Web
--- Services, there are no up-front investments, and you pay only for the
--- resources you use.
+-- PostgreSQL, Microsoft SQL Server, Oracle, or Amazon Aurora database
+-- server. These capabilities mean that the code, applications, and tools
+-- you already use today with your existing databases work with Amazon RDS
+-- without modification. Amazon RDS automatically backs up your database
+-- and maintains the database software that powers your DB instance. Amazon
+-- RDS is flexible: you can scale your database instance\'s compute
+-- resources and storage capacity to meet your application\'s demand. As
+-- with all Amazon Web Services, there are no up-front investments, and you
+-- pay only for the resources you use.
 --
--- This is an interface reference for Amazon RDS. It contains documentation
--- for a programming or command line interface you can use to manage Amazon
--- RDS. Note that Amazon RDS is asynchronous, which means that some
--- interfaces might require techniques such as polling or callback
--- functions to determine when a command has been applied. In this
--- reference, the parameter descriptions indicate whether a command is
--- applied immediately, on the next instance reboot, or during the
--- maintenance window. For a summary of the Amazon RDS interfaces, go to
--- <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Welcome.html#Welcome.Interfaces Available RDS Interfaces>.
+-- This interface reference for Amazon RDS contains documentation for a
+-- programming or command line interface you can use to manage Amazon RDS.
+-- Note that Amazon RDS is asynchronous, which means that some interfaces
+-- might require techniques such as polling or callback functions to
+-- determine when a command has been applied. In this reference, the
+-- parameter descriptions indicate whether a command is applied
+-- immediately, on the next instance reboot, or during the maintenance
+-- window. The reference structure is as follows, and we list following
+-- some related topics from the user guide.
+--
+-- __Amazon RDS API Reference__
+--
+-- -   For the alphabetical list of API actions, see
+--     <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/API_Operations.html API Actions>.
+--
+-- -   For the alphabetical list of data types, see
+--     <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/API_Types.html Data Types>.
+--
+-- -   For a list of common query parameters, see
+--     <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/CommonParameters.html Common Parameters>.
+--
+-- -   For descriptions of the error codes, see
+--     <http://docs.aws.amazon.com/AmazonRDS/latest/APIReference/CommonErrors.html Common Errors>.
+--
+-- __Amazon RDS User Guide__
+--
+-- -   For a summary of the Amazon RDS interfaces, see
+--     <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Welcome.html#Welcome.Interfaces Available RDS Interfaces>.
+--
+-- -   For more information about how to use the Query API, see
+--     <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Using_the_Query_API.html Using the Query API>.
+--
 module Network.AWS.RDS
     (
     -- * Service Configuration
@@ -165,6 +188,9 @@
     -- ** InstanceQuotaExceededFault
     , _InstanceQuotaExceededFault
 
+    -- ** DomainNotFoundFault
+    , _DomainNotFoundFault
+
     -- ** DBParameterGroupNotFoundFault
     , _DBParameterGroupNotFoundFault
 
@@ -578,6 +604,7 @@
     -- ** DBClusterMember
     , DBClusterMember
     , dbClusterMember
+    , dcmPromotionTier
     , dcmDBInstanceIdentifier
     , dcmIsClusterWriter
     , dcmDBClusterParameterGroupStatus
@@ -652,6 +679,7 @@
     , diEngine
     , diLatestRestorableTime
     , diDBInstanceClass
+    , diPromotionTier
     , diLicenseModel
     , diPreferredMaintenanceWindow
     , diCACertificateIdentifier
@@ -678,6 +706,7 @@
     , diPendingModifiedValues
     , diStorageType
     , diStatusInfos
+    , diDomainMemberships
     , diDBName
 
     -- ** DBInstanceStatusInfo
@@ -776,6 +805,14 @@
     , ddlfdLastWritten
     , ddlfdSize
     , ddlfdLogFileName
+
+    -- ** DomainMembership
+    , DomainMembership
+    , domainMembership
+    , dmStatus
+    , dmFQDN
+    , dmDomain
+    , dmIAMRoleName
 
     -- ** EC2SecurityGroup
     , EC2SecurityGroup
diff --git a/gen/Network/AWS/RDS/AddSourceIdentifierToSubscription.hs b/gen/Network/AWS/RDS/AddSourceIdentifierToSubscription.hs
--- a/gen/Network/AWS/RDS/AddSourceIdentifierToSubscription.hs
+++ b/gen/Network/AWS/RDS/AddSourceIdentifierToSubscription.hs
@@ -105,6 +105,8 @@
 
 instance Hashable AddSourceIdentifierToSubscription
 
+instance NFData AddSourceIdentifierToSubscription
+
 instance ToHeaders AddSourceIdentifierToSubscription
          where
         toHeaders = const mempty
@@ -152,3 +154,6 @@
 -- | The response status code.
 asitsrsResponseStatus :: Lens' AddSourceIdentifierToSubscriptionResponse Int
 asitsrsResponseStatus = lens _asitsrsResponseStatus (\ s a -> s{_asitsrsResponseStatus = a});
+
+instance NFData
+         AddSourceIdentifierToSubscriptionResponse
diff --git a/gen/Network/AWS/RDS/AddTagsToResource.hs b/gen/Network/AWS/RDS/AddTagsToResource.hs
--- a/gen/Network/AWS/RDS/AddTagsToResource.hs
+++ b/gen/Network/AWS/RDS/AddTagsToResource.hs
@@ -87,6 +87,8 @@
 
 instance Hashable AddTagsToResource
 
+instance NFData AddTagsToResource
+
 instance ToHeaders AddTagsToResource where
         toHeaders = const mempty
 
@@ -111,3 +113,5 @@
 addTagsToResourceResponse
     :: AddTagsToResourceResponse
 addTagsToResourceResponse = AddTagsToResourceResponse'
+
+instance NFData AddTagsToResourceResponse
diff --git a/gen/Network/AWS/RDS/ApplyPendingMaintenanceAction.hs b/gen/Network/AWS/RDS/ApplyPendingMaintenanceAction.hs
--- a/gen/Network/AWS/RDS/ApplyPendingMaintenanceAction.hs
+++ b/gen/Network/AWS/RDS/ApplyPendingMaintenanceAction.hs
@@ -83,6 +83,8 @@
 apmaResourceIdentifier = lens _apmaResourceIdentifier (\ s a -> s{_apmaResourceIdentifier = a});
 
 -- | The pending maintenance action to apply to this resource.
+--
+-- Valid values: 'system-update', 'db-upgrade'
 apmaApplyAction :: Lens' ApplyPendingMaintenanceAction Text
 apmaApplyAction = lens _apmaApplyAction (\ s a -> s{_apmaApplyAction = a});
 
@@ -114,6 +116,8 @@
 
 instance Hashable ApplyPendingMaintenanceAction
 
+instance NFData ApplyPendingMaintenanceAction
+
 instance ToHeaders ApplyPendingMaintenanceAction
          where
         toHeaders = const mempty
@@ -160,3 +164,5 @@
 -- | The response status code.
 apmarsResponseStatus :: Lens' ApplyPendingMaintenanceActionResponse Int
 apmarsResponseStatus = lens _apmarsResponseStatus (\ s a -> s{_apmarsResponseStatus = a});
+
+instance NFData ApplyPendingMaintenanceActionResponse
diff --git a/gen/Network/AWS/RDS/AuthorizeDBSecurityGroupIngress.hs b/gen/Network/AWS/RDS/AuthorizeDBSecurityGroupIngress.hs
--- a/gen/Network/AWS/RDS/AuthorizeDBSecurityGroupIngress.hs
+++ b/gen/Network/AWS/RDS/AuthorizeDBSecurityGroupIngress.hs
@@ -140,6 +140,8 @@
 
 instance Hashable AuthorizeDBSecurityGroupIngress
 
+instance NFData AuthorizeDBSecurityGroupIngress
+
 instance ToHeaders AuthorizeDBSecurityGroupIngress
          where
         toHeaders = const mempty
@@ -190,3 +192,6 @@
 -- | The response status code.
 adsgirsResponseStatus :: Lens' AuthorizeDBSecurityGroupIngressResponse Int
 adsgirsResponseStatus = lens _adsgirsResponseStatus (\ s a -> s{_adsgirsResponseStatus = a});
+
+instance NFData
+         AuthorizeDBSecurityGroupIngressResponse
diff --git a/gen/Network/AWS/RDS/CopyDBClusterSnapshot.hs b/gen/Network/AWS/RDS/CopyDBClusterSnapshot.hs
--- a/gen/Network/AWS/RDS/CopyDBClusterSnapshot.hs
+++ b/gen/Network/AWS/RDS/CopyDBClusterSnapshot.hs
@@ -118,6 +118,8 @@
 
 instance Hashable CopyDBClusterSnapshot
 
+instance NFData CopyDBClusterSnapshot
+
 instance ToHeaders CopyDBClusterSnapshot where
         toHeaders = const mempty
 
@@ -164,3 +166,5 @@
 -- | The response status code.
 cdcsrsResponseStatus :: Lens' CopyDBClusterSnapshotResponse Int
 cdcsrsResponseStatus = lens _cdcsrsResponseStatus (\ s a -> s{_cdcsrsResponseStatus = a});
+
+instance NFData CopyDBClusterSnapshotResponse
diff --git a/gen/Network/AWS/RDS/CopyDBParameterGroup.hs b/gen/Network/AWS/RDS/CopyDBParameterGroup.hs
--- a/gen/Network/AWS/RDS/CopyDBParameterGroup.hs
+++ b/gen/Network/AWS/RDS/CopyDBParameterGroup.hs
@@ -128,6 +128,8 @@
 
 instance Hashable CopyDBParameterGroup
 
+instance NFData CopyDBParameterGroup
+
 instance ToHeaders CopyDBParameterGroup where
         toHeaders = const mempty
 
@@ -176,3 +178,5 @@
 -- | The response status code.
 cdbpgrsResponseStatus :: Lens' CopyDBParameterGroupResponse Int
 cdbpgrsResponseStatus = lens _cdbpgrsResponseStatus (\ s a -> s{_cdbpgrsResponseStatus = a});
+
+instance NFData CopyDBParameterGroupResponse
diff --git a/gen/Network/AWS/RDS/CopyDBSnapshot.hs b/gen/Network/AWS/RDS/CopyDBSnapshot.hs
--- a/gen/Network/AWS/RDS/CopyDBSnapshot.hs
+++ b/gen/Network/AWS/RDS/CopyDBSnapshot.hs
@@ -18,7 +18,7 @@
 -- Stability   : auto-generated
 -- Portability : non-portable (GHC extensions)
 --
--- Copies the specified DB Snapshot. The source DB snapshot must be in the
+-- Copies the specified DB snapshot. The source DB snapshot must be in the
 -- \"available\" state.
 --
 -- If you are copying from a shared manual DB snapshot, the
@@ -160,6 +160,8 @@
 
 instance Hashable CopyDBSnapshot
 
+instance NFData CopyDBSnapshot
+
 instance ToHeaders CopyDBSnapshot where
         toHeaders = const mempty
 
@@ -208,3 +210,5 @@
 -- | The response status code.
 cdsrsResponseStatus :: Lens' CopyDBSnapshotResponse Int
 cdsrsResponseStatus = lens _cdsrsResponseStatus (\ s a -> s{_cdsrsResponseStatus = a});
+
+instance NFData CopyDBSnapshotResponse
diff --git a/gen/Network/AWS/RDS/CopyOptionGroup.hs b/gen/Network/AWS/RDS/CopyOptionGroup.hs
--- a/gen/Network/AWS/RDS/CopyOptionGroup.hs
+++ b/gen/Network/AWS/RDS/CopyOptionGroup.hs
@@ -127,6 +127,8 @@
 
 instance Hashable CopyOptionGroup
 
+instance NFData CopyOptionGroup
+
 instance ToHeaders CopyOptionGroup where
         toHeaders = const mempty
 
@@ -175,3 +177,5 @@
 -- | The response status code.
 cogrsResponseStatus :: Lens' CopyOptionGroupResponse Int
 cogrsResponseStatus = lens _cogrsResponseStatus (\ s a -> s{_cogrsResponseStatus = a});
+
+instance NFData CopyOptionGroupResponse
diff --git a/gen/Network/AWS/RDS/CreateDBCluster.hs b/gen/Network/AWS/RDS/CreateDBCluster.hs
--- a/gen/Network/AWS/RDS/CreateDBCluster.hs
+++ b/gen/Network/AWS/RDS/CreateDBCluster.hs
@@ -175,8 +175,6 @@
 -- Constraints: Must contain no more than 255 alphanumeric characters,
 -- periods, underscores, spaces, or hyphens. Must not be default.
 --
--- +
---
 -- Example: 'mySubnetgroup'
 cdcDBSubnetGroupName :: Lens' CreateDBCluster (Maybe Text)
 cdcDBSubnetGroupName = lens _cdcDBSubnetGroupName (\ s a -> s{_cdcDBSubnetGroupName = a});
@@ -343,6 +341,8 @@
 
 instance Hashable CreateDBCluster
 
+instance NFData CreateDBCluster
+
 instance ToHeaders CreateDBCluster where
         toHeaders = const mempty
 
@@ -411,3 +411,5 @@
 -- | The response status code.
 cdcrsResponseStatus :: Lens' CreateDBClusterResponse Int
 cdcrsResponseStatus = lens _cdcrsResponseStatus (\ s a -> s{_cdcrsResponseStatus = a});
+
+instance NFData CreateDBClusterResponse
diff --git a/gen/Network/AWS/RDS/CreateDBClusterParameterGroup.hs b/gen/Network/AWS/RDS/CreateDBClusterParameterGroup.hs
--- a/gen/Network/AWS/RDS/CreateDBClusterParameterGroup.hs
+++ b/gen/Network/AWS/RDS/CreateDBClusterParameterGroup.hs
@@ -152,6 +152,8 @@
 
 instance Hashable CreateDBClusterParameterGroup
 
+instance NFData CreateDBClusterParameterGroup
+
 instance ToHeaders CreateDBClusterParameterGroup
          where
         toHeaders = const mempty
@@ -201,3 +203,5 @@
 -- | The response status code.
 cdcpgrsResponseStatus :: Lens' CreateDBClusterParameterGroupResponse Int
 cdcpgrsResponseStatus = lens _cdcpgrsResponseStatus (\ s a -> s{_cdcpgrsResponseStatus = a});
+
+instance NFData CreateDBClusterParameterGroupResponse
diff --git a/gen/Network/AWS/RDS/CreateDBClusterSnapshot.hs b/gen/Network/AWS/RDS/CreateDBClusterSnapshot.hs
--- a/gen/Network/AWS/RDS/CreateDBClusterSnapshot.hs
+++ b/gen/Network/AWS/RDS/CreateDBClusterSnapshot.hs
@@ -118,6 +118,8 @@
 
 instance Hashable CreateDBClusterSnapshot
 
+instance NFData CreateDBClusterSnapshot
+
 instance ToHeaders CreateDBClusterSnapshot where
         toHeaders = const mempty
 
@@ -164,3 +166,5 @@
 -- | The response status code.
 cdbcsrsResponseStatus :: Lens' CreateDBClusterSnapshotResponse Int
 cdbcsrsResponseStatus = lens _cdbcsrsResponseStatus (\ s a -> s{_cdbcsrsResponseStatus = a});
+
+instance NFData CreateDBClusterSnapshotResponse
diff --git a/gen/Network/AWS/RDS/CreateDBInstance.hs b/gen/Network/AWS/RDS/CreateDBInstance.hs
--- a/gen/Network/AWS/RDS/CreateDBInstance.hs
+++ b/gen/Network/AWS/RDS/CreateDBInstance.hs
@@ -36,8 +36,10 @@
     , cdiDBSubnetGroupName
     , cdiMonitoringRoleARN
     , cdiIOPS
+    , cdiDomain
     , cdiMonitoringInterval
     , cdiTDECredentialPassword
+    , cdiPromotionTier
     , cdiLicenseModel
     , cdiPreferredMaintenanceWindow
     , cdiCharacterSetName
@@ -52,6 +54,7 @@
     , cdiOptionGroupName
     , cdiCopyTagsToSnapshot
     , cdiTDECredentialARN
+    , cdiDomainIAMRoleName
     , cdiTags
     , cdiPort
     , cdiStorageType
@@ -90,8 +93,10 @@
     , _cdiDBSubnetGroupName          :: !(Maybe Text)
     , _cdiMonitoringRoleARN          :: !(Maybe Text)
     , _cdiIOPS                       :: !(Maybe Int)
+    , _cdiDomain                     :: !(Maybe Text)
     , _cdiMonitoringInterval         :: !(Maybe Int)
     , _cdiTDECredentialPassword      :: !(Maybe Text)
+    , _cdiPromotionTier              :: !(Maybe Int)
     , _cdiLicenseModel               :: !(Maybe Text)
     , _cdiPreferredMaintenanceWindow :: !(Maybe Text)
     , _cdiCharacterSetName           :: !(Maybe Text)
@@ -106,6 +111,7 @@
     , _cdiOptionGroupName            :: !(Maybe Text)
     , _cdiCopyTagsToSnapshot         :: !(Maybe Bool)
     , _cdiTDECredentialARN           :: !(Maybe Text)
+    , _cdiDomainIAMRoleName          :: !(Maybe Text)
     , _cdiTags                       :: !(Maybe [Tag])
     , _cdiPort                       :: !(Maybe Int)
     , _cdiStorageType                :: !(Maybe Text)
@@ -141,10 +147,14 @@
 --
 -- * 'cdiIOPS'
 --
+-- * 'cdiDomain'
+--
 -- * 'cdiMonitoringInterval'
 --
 -- * 'cdiTDECredentialPassword'
 --
+-- * 'cdiPromotionTier'
+--
 -- * 'cdiLicenseModel'
 --
 -- * 'cdiPreferredMaintenanceWindow'
@@ -173,6 +183,8 @@
 --
 -- * 'cdiTDECredentialARN'
 --
+-- * 'cdiDomainIAMRoleName'
+--
 -- * 'cdiTags'
 --
 -- * 'cdiPort'
@@ -204,8 +216,10 @@
     , _cdiDBSubnetGroupName = Nothing
     , _cdiMonitoringRoleARN = Nothing
     , _cdiIOPS = Nothing
+    , _cdiDomain = Nothing
     , _cdiMonitoringInterval = Nothing
     , _cdiTDECredentialPassword = Nothing
+    , _cdiPromotionTier = Nothing
     , _cdiLicenseModel = Nothing
     , _cdiPreferredMaintenanceWindow = Nothing
     , _cdiCharacterSetName = Nothing
@@ -220,6 +234,7 @@
     , _cdiOptionGroupName = Nothing
     , _cdiCopyTagsToSnapshot = Nothing
     , _cdiTDECredentialARN = Nothing
+    , _cdiDomainIAMRoleName = Nothing
     , _cdiTags = Nothing
     , _cdiPort = Nothing
     , _cdiStorageType = Nothing
@@ -246,7 +261,7 @@
 -- -   __Version 5.5 (Available in all regions):__
 --     ' 5.5.40b | 5.5.41 | 5.5.42'
 -- -   __Version 5.6 (Available in all regions):__
---     ' 5.6.19a | 5.6.19b | 5.6.21 | 5.6.21b | 5.6.22 | 5.6.23'
+--     ' 5.6.19a | 5.6.19b | 5.6.21 | 5.6.21b | 5.6.22 | 5.6.23 | 5.6.27'
 -- -   __Version 5.7 (Available in all regions):__ ' 5.7.10'
 --
 -- __MariaDB__
@@ -480,6 +495,10 @@
 cdiIOPS :: Lens' CreateDBInstance (Maybe Int)
 cdiIOPS = lens _cdiIOPS (\ s a -> s{_cdiIOPS = a});
 
+-- | Specify the Active Directory Domain to create the instance in.
+cdiDomain :: Lens' CreateDBInstance (Maybe Text)
+cdiDomain = lens _cdiDomain (\ s a -> s{_cdiDomain = a});
+
 -- | The interval, in seconds, between points when Enhanced Monitoring
 -- metrics are collected for the DB instance. To disable collecting
 -- Enhanced Monitoring metrics, specify 0. The default is 60.
@@ -496,6 +515,17 @@
 cdiTDECredentialPassword :: Lens' CreateDBInstance (Maybe Text)
 cdiTDECredentialPassword = lens _cdiTDECredentialPassword (\ s a -> s{_cdiTDECredentialPassword = a});
 
+-- | A value that specifies the order in which an Aurora Replica is promoted
+-- to the primary instance after a failure of the existing primary
+-- instance. For more information, see
+-- <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Aurora.Managing.html#Aurora.Managing.FaultTolerance Fault Tolerance for an Aurora DB Cluster>.
+--
+-- Default: 1
+--
+-- Valid Values: 0 - 15
+cdiPromotionTier :: Lens' CreateDBInstance (Maybe Int)
+cdiPromotionTier = lens _cdiPromotionTier (\ s a -> s{_cdiPromotionTier = a});
+
 -- | License model information for this DB instance.
 --
 -- Valid values: 'license-included' | 'bring-your-own-license' |
@@ -664,6 +694,11 @@
 cdiTDECredentialARN :: Lens' CreateDBInstance (Maybe Text)
 cdiTDECredentialARN = lens _cdiTDECredentialARN (\ s a -> s{_cdiTDECredentialARN = a});
 
+-- | Specify the name of the IAM role to be used when making API calls to the
+-- Directory Service.
+cdiDomainIAMRoleName :: Lens' CreateDBInstance (Maybe Text)
+cdiDomainIAMRoleName = lens _cdiDomainIAMRoleName (\ s a -> s{_cdiDomainIAMRoleName = a});
+
 -- | Undocumented member.
 cdiTags :: Lens' CreateDBInstance [Tag]
 cdiTags = lens _cdiTags (\ s a -> s{_cdiTags = a}) . _Default . _Coerce;
@@ -838,6 +873,8 @@
 
 instance Hashable CreateDBInstance
 
+instance NFData CreateDBInstance
+
 instance ToHeaders CreateDBInstance where
         toHeaders = const mempty
 
@@ -863,9 +900,10 @@
                "MasterUsername" =: _cdiMasterUsername,
                "DBSubnetGroupName" =: _cdiDBSubnetGroupName,
                "MonitoringRoleArn" =: _cdiMonitoringRoleARN,
-               "Iops" =: _cdiIOPS,
+               "Iops" =: _cdiIOPS, "Domain" =: _cdiDomain,
                "MonitoringInterval" =: _cdiMonitoringInterval,
                "TdeCredentialPassword" =: _cdiTDECredentialPassword,
+               "PromotionTier" =: _cdiPromotionTier,
                "LicenseModel" =: _cdiLicenseModel,
                "PreferredMaintenanceWindow" =:
                  _cdiPreferredMaintenanceWindow,
@@ -884,6 +922,7 @@
                "OptionGroupName" =: _cdiOptionGroupName,
                "CopyTagsToSnapshot" =: _cdiCopyTagsToSnapshot,
                "TdeCredentialArn" =: _cdiTDECredentialARN,
+               "DomainIAMRoleName" =: _cdiDomainIAMRoleName,
                "Tags" =: toQuery (toQueryList "Tag" <$> _cdiTags),
                "Port" =: _cdiPort, "StorageType" =: _cdiStorageType,
                "DBName" =: _cdiDBName,
@@ -920,3 +959,5 @@
 -- | The response status code.
 cdirsResponseStatus :: Lens' CreateDBInstanceResponse Int
 cdirsResponseStatus = lens _cdirsResponseStatus (\ s a -> s{_cdirsResponseStatus = a});
+
+instance NFData CreateDBInstanceResponse
diff --git a/gen/Network/AWS/RDS/CreateDBInstanceReadReplica.hs b/gen/Network/AWS/RDS/CreateDBInstanceReadReplica.hs
--- a/gen/Network/AWS/RDS/CreateDBInstanceReadReplica.hs
+++ b/gen/Network/AWS/RDS/CreateDBInstanceReadReplica.hs
@@ -313,6 +313,8 @@
 
 instance Hashable CreateDBInstanceReadReplica
 
+instance NFData CreateDBInstanceReadReplica
+
 instance ToHeaders CreateDBInstanceReadReplica where
         toHeaders = const mempty
 
@@ -372,3 +374,5 @@
 -- | The response status code.
 cdirrrsResponseStatus :: Lens' CreateDBInstanceReadReplicaResponse Int
 cdirrrsResponseStatus = lens _cdirrrsResponseStatus (\ s a -> s{_cdirrrsResponseStatus = a});
+
+instance NFData CreateDBInstanceReadReplicaResponse
diff --git a/gen/Network/AWS/RDS/CreateDBParameterGroup.hs b/gen/Network/AWS/RDS/CreateDBParameterGroup.hs
--- a/gen/Network/AWS/RDS/CreateDBParameterGroup.hs
+++ b/gen/Network/AWS/RDS/CreateDBParameterGroup.hs
@@ -140,6 +140,8 @@
 
 instance Hashable CreateDBParameterGroup
 
+instance NFData CreateDBParameterGroup
+
 instance ToHeaders CreateDBParameterGroup where
         toHeaders = const mempty
 
@@ -187,3 +189,5 @@
 -- | The response status code.
 cdpgrsResponseStatus :: Lens' CreateDBParameterGroupResponse Int
 cdpgrsResponseStatus = lens _cdpgrsResponseStatus (\ s a -> s{_cdpgrsResponseStatus = a});
+
+instance NFData CreateDBParameterGroupResponse
diff --git a/gen/Network/AWS/RDS/CreateDBSecurityGroup.hs b/gen/Network/AWS/RDS/CreateDBSecurityGroup.hs
--- a/gen/Network/AWS/RDS/CreateDBSecurityGroup.hs
+++ b/gen/Network/AWS/RDS/CreateDBSecurityGroup.hs
@@ -109,6 +109,8 @@
 
 instance Hashable CreateDBSecurityGroup
 
+instance NFData CreateDBSecurityGroup
+
 instance ToHeaders CreateDBSecurityGroup where
         toHeaders = const mempty
 
@@ -154,3 +156,5 @@
 -- | The response status code.
 cdbsgrsResponseStatus :: Lens' CreateDBSecurityGroupResponse Int
 cdbsgrsResponseStatus = lens _cdbsgrsResponseStatus (\ s a -> s{_cdbsgrsResponseStatus = a});
+
+instance NFData CreateDBSecurityGroupResponse
diff --git a/gen/Network/AWS/RDS/CreateDBSnapshot.hs b/gen/Network/AWS/RDS/CreateDBSnapshot.hs
--- a/gen/Network/AWS/RDS/CreateDBSnapshot.hs
+++ b/gen/Network/AWS/RDS/CreateDBSnapshot.hs
@@ -113,6 +113,8 @@
 
 instance Hashable CreateDBSnapshot
 
+instance NFData CreateDBSnapshot
+
 instance ToHeaders CreateDBSnapshot where
         toHeaders = const mempty
 
@@ -157,3 +159,5 @@
 -- | The response status code.
 cdbsrsResponseStatus :: Lens' CreateDBSnapshotResponse Int
 cdbsrsResponseStatus = lens _cdbsrsResponseStatus (\ s a -> s{_cdbsrsResponseStatus = a});
+
+instance NFData CreateDBSnapshotResponse
diff --git a/gen/Network/AWS/RDS/CreateDBSubnetGroup.hs b/gen/Network/AWS/RDS/CreateDBSubnetGroup.hs
--- a/gen/Network/AWS/RDS/CreateDBSubnetGroup.hs
+++ b/gen/Network/AWS/RDS/CreateDBSubnetGroup.hs
@@ -113,6 +113,8 @@
 
 instance Hashable CreateDBSubnetGroup
 
+instance NFData CreateDBSubnetGroup
+
 instance ToHeaders CreateDBSubnetGroup where
         toHeaders = const mempty
 
@@ -160,3 +162,5 @@
 -- | The response status code.
 cdsgrsResponseStatus :: Lens' CreateDBSubnetGroupResponse Int
 cdsgrsResponseStatus = lens _cdsgrsResponseStatus (\ s a -> s{_cdsgrsResponseStatus = a});
+
+instance NFData CreateDBSubnetGroupResponse
diff --git a/gen/Network/AWS/RDS/CreateEventSubscription.hs b/gen/Network/AWS/RDS/CreateEventSubscription.hs
--- a/gen/Network/AWS/RDS/CreateEventSubscription.hs
+++ b/gen/Network/AWS/RDS/CreateEventSubscription.hs
@@ -184,6 +184,8 @@
 
 instance Hashable CreateEventSubscription
 
+instance NFData CreateEventSubscription
+
 instance ToHeaders CreateEventSubscription where
         toHeaders = const mempty
 
@@ -237,3 +239,5 @@
 -- | The response status code.
 cesrsResponseStatus :: Lens' CreateEventSubscriptionResponse Int
 cesrsResponseStatus = lens _cesrsResponseStatus (\ s a -> s{_cesrsResponseStatus = a});
+
+instance NFData CreateEventSubscriptionResponse
diff --git a/gen/Network/AWS/RDS/CreateOptionGroup.hs b/gen/Network/AWS/RDS/CreateOptionGroup.hs
--- a/gen/Network/AWS/RDS/CreateOptionGroup.hs
+++ b/gen/Network/AWS/RDS/CreateOptionGroup.hs
@@ -126,6 +126,8 @@
 
 instance Hashable CreateOptionGroup
 
+instance NFData CreateOptionGroup
+
 instance ToHeaders CreateOptionGroup where
         toHeaders = const mempty
 
@@ -173,3 +175,5 @@
 -- | The response status code.
 crsResponseStatus :: Lens' CreateOptionGroupResponse Int
 crsResponseStatus = lens _crsResponseStatus (\ s a -> s{_crsResponseStatus = a});
+
+instance NFData CreateOptionGroupResponse
diff --git a/gen/Network/AWS/RDS/DeleteDBCluster.hs b/gen/Network/AWS/RDS/DeleteDBCluster.hs
--- a/gen/Network/AWS/RDS/DeleteDBCluster.hs
+++ b/gen/Network/AWS/RDS/DeleteDBCluster.hs
@@ -128,6 +128,8 @@
 
 instance Hashable DeleteDBCluster
 
+instance NFData DeleteDBCluster
+
 instance ToHeaders DeleteDBCluster where
         toHeaders = const mempty
 
@@ -173,3 +175,5 @@
 -- | The response status code.
 ddbcrsResponseStatus :: Lens' DeleteDBClusterResponse Int
 ddbcrsResponseStatus = lens _ddbcrsResponseStatus (\ s a -> s{_ddbcrsResponseStatus = a});
+
+instance NFData DeleteDBClusterResponse
diff --git a/gen/Network/AWS/RDS/DeleteDBClusterParameterGroup.hs b/gen/Network/AWS/RDS/DeleteDBClusterParameterGroup.hs
--- a/gen/Network/AWS/RDS/DeleteDBClusterParameterGroup.hs
+++ b/gen/Network/AWS/RDS/DeleteDBClusterParameterGroup.hs
@@ -84,6 +84,8 @@
 
 instance Hashable DeleteDBClusterParameterGroup
 
+instance NFData DeleteDBClusterParameterGroup
+
 instance ToHeaders DeleteDBClusterParameterGroup
          where
         toHeaders = const mempty
@@ -110,3 +112,5 @@
 deleteDBClusterParameterGroupResponse
     :: DeleteDBClusterParameterGroupResponse
 deleteDBClusterParameterGroupResponse = DeleteDBClusterParameterGroupResponse'
+
+instance NFData DeleteDBClusterParameterGroupResponse
diff --git a/gen/Network/AWS/RDS/DeleteDBClusterSnapshot.hs b/gen/Network/AWS/RDS/DeleteDBClusterSnapshot.hs
--- a/gen/Network/AWS/RDS/DeleteDBClusterSnapshot.hs
+++ b/gen/Network/AWS/RDS/DeleteDBClusterSnapshot.hs
@@ -88,6 +88,8 @@
 
 instance Hashable DeleteDBClusterSnapshot
 
+instance NFData DeleteDBClusterSnapshot
+
 instance ToHeaders DeleteDBClusterSnapshot where
         toHeaders = const mempty
 
@@ -132,3 +134,5 @@
 -- | The response status code.
 ddcsrsResponseStatus :: Lens' DeleteDBClusterSnapshotResponse Int
 ddcsrsResponseStatus = lens _ddcsrsResponseStatus (\ s a -> s{_ddcsrsResponseStatus = a});
+
+instance NFData DeleteDBClusterSnapshotResponse
diff --git a/gen/Network/AWS/RDS/DeleteDBInstance.hs b/gen/Network/AWS/RDS/DeleteDBInstance.hs
--- a/gen/Network/AWS/RDS/DeleteDBInstance.hs
+++ b/gen/Network/AWS/RDS/DeleteDBInstance.hs
@@ -142,6 +142,8 @@
 
 instance Hashable DeleteDBInstance
 
+instance NFData DeleteDBInstance
+
 instance ToHeaders DeleteDBInstance where
         toHeaders = const mempty
 
@@ -187,3 +189,5 @@
 -- | The response status code.
 ddirsResponseStatus :: Lens' DeleteDBInstanceResponse Int
 ddirsResponseStatus = lens _ddirsResponseStatus (\ s a -> s{_ddirsResponseStatus = a});
+
+instance NFData DeleteDBInstanceResponse
diff --git a/gen/Network/AWS/RDS/DeleteDBParameterGroup.hs b/gen/Network/AWS/RDS/DeleteDBParameterGroup.hs
--- a/gen/Network/AWS/RDS/DeleteDBParameterGroup.hs
+++ b/gen/Network/AWS/RDS/DeleteDBParameterGroup.hs
@@ -79,6 +79,8 @@
 
 instance Hashable DeleteDBParameterGroup
 
+instance NFData DeleteDBParameterGroup
+
 instance ToHeaders DeleteDBParameterGroup where
         toHeaders = const mempty
 
@@ -103,3 +105,5 @@
 deleteDBParameterGroupResponse
     :: DeleteDBParameterGroupResponse
 deleteDBParameterGroupResponse = DeleteDBParameterGroupResponse'
+
+instance NFData DeleteDBParameterGroupResponse
diff --git a/gen/Network/AWS/RDS/DeleteDBSecurityGroup.hs b/gen/Network/AWS/RDS/DeleteDBSecurityGroup.hs
--- a/gen/Network/AWS/RDS/DeleteDBSecurityGroup.hs
+++ b/gen/Network/AWS/RDS/DeleteDBSecurityGroup.hs
@@ -84,6 +84,8 @@
 
 instance Hashable DeleteDBSecurityGroup
 
+instance NFData DeleteDBSecurityGroup
+
 instance ToHeaders DeleteDBSecurityGroup where
         toHeaders = const mempty
 
@@ -107,3 +109,5 @@
 deleteDBSecurityGroupResponse
     :: DeleteDBSecurityGroupResponse
 deleteDBSecurityGroupResponse = DeleteDBSecurityGroupResponse'
+
+instance NFData DeleteDBSecurityGroupResponse
diff --git a/gen/Network/AWS/RDS/DeleteDBSnapshot.hs b/gen/Network/AWS/RDS/DeleteDBSnapshot.hs
--- a/gen/Network/AWS/RDS/DeleteDBSnapshot.hs
+++ b/gen/Network/AWS/RDS/DeleteDBSnapshot.hs
@@ -83,6 +83,8 @@
 
 instance Hashable DeleteDBSnapshot
 
+instance NFData DeleteDBSnapshot
+
 instance ToHeaders DeleteDBSnapshot where
         toHeaders = const mempty
 
@@ -125,3 +127,5 @@
 -- | The response status code.
 ddbsrsResponseStatus :: Lens' DeleteDBSnapshotResponse Int
 ddbsrsResponseStatus = lens _ddbsrsResponseStatus (\ s a -> s{_ddbsrsResponseStatus = a});
+
+instance NFData DeleteDBSnapshotResponse
diff --git a/gen/Network/AWS/RDS/DeleteDBSubnetGroup.hs b/gen/Network/AWS/RDS/DeleteDBSubnetGroup.hs
--- a/gen/Network/AWS/RDS/DeleteDBSubnetGroup.hs
+++ b/gen/Network/AWS/RDS/DeleteDBSubnetGroup.hs
@@ -66,6 +66,8 @@
 --
 -- You cannot delete the default subnet group.
 --
+-- Constraints:
+--
 -- Constraints: Must contain no more than 255 alphanumeric characters,
 -- periods, underscores, spaces, or hyphens. Must not be default.
 --
@@ -81,6 +83,8 @@
 
 instance Hashable DeleteDBSubnetGroup
 
+instance NFData DeleteDBSubnetGroup
+
 instance ToHeaders DeleteDBSubnetGroup where
         toHeaders = const mempty
 
@@ -104,3 +108,5 @@
 deleteDBSubnetGroupResponse
     :: DeleteDBSubnetGroupResponse
 deleteDBSubnetGroupResponse = DeleteDBSubnetGroupResponse'
+
+instance NFData DeleteDBSubnetGroupResponse
diff --git a/gen/Network/AWS/RDS/DeleteEventSubscription.hs b/gen/Network/AWS/RDS/DeleteEventSubscription.hs
--- a/gen/Network/AWS/RDS/DeleteEventSubscription.hs
+++ b/gen/Network/AWS/RDS/DeleteEventSubscription.hs
@@ -78,6 +78,8 @@
 
 instance Hashable DeleteEventSubscription
 
+instance NFData DeleteEventSubscription
+
 instance ToHeaders DeleteEventSubscription where
         toHeaders = const mempty
 
@@ -121,3 +123,5 @@
 -- | The response status code.
 drsResponseStatus :: Lens' DeleteEventSubscriptionResponse Int
 drsResponseStatus = lens _drsResponseStatus (\ s a -> s{_drsResponseStatus = a});
+
+instance NFData DeleteEventSubscriptionResponse
diff --git a/gen/Network/AWS/RDS/DeleteOptionGroup.hs b/gen/Network/AWS/RDS/DeleteOptionGroup.hs
--- a/gen/Network/AWS/RDS/DeleteOptionGroup.hs
+++ b/gen/Network/AWS/RDS/DeleteOptionGroup.hs
@@ -72,6 +72,8 @@
 
 instance Hashable DeleteOptionGroup
 
+instance NFData DeleteOptionGroup
+
 instance ToHeaders DeleteOptionGroup where
         toHeaders = const mempty
 
@@ -95,3 +97,5 @@
 deleteOptionGroupResponse
     :: DeleteOptionGroupResponse
 deleteOptionGroupResponse = DeleteOptionGroupResponse'
+
+instance NFData DeleteOptionGroupResponse
diff --git a/gen/Network/AWS/RDS/DescribeAccountAttributes.hs b/gen/Network/AWS/RDS/DescribeAccountAttributes.hs
--- a/gen/Network/AWS/RDS/DescribeAccountAttributes.hs
+++ b/gen/Network/AWS/RDS/DescribeAccountAttributes.hs
@@ -72,6 +72,8 @@
 
 instance Hashable DescribeAccountAttributes
 
+instance NFData DescribeAccountAttributes
+
 instance ToHeaders DescribeAccountAttributes where
         toHeaders = const mempty
 
@@ -119,3 +121,5 @@
 -- | The response status code.
 daarsResponseStatus :: Lens' DescribeAccountAttributesResponse Int
 daarsResponseStatus = lens _daarsResponseStatus (\ s a -> s{_daarsResponseStatus = a});
+
+instance NFData DescribeAccountAttributesResponse
diff --git a/gen/Network/AWS/RDS/DescribeCertificates.hs b/gen/Network/AWS/RDS/DescribeCertificates.hs
--- a/gen/Network/AWS/RDS/DescribeCertificates.hs
+++ b/gen/Network/AWS/RDS/DescribeCertificates.hs
@@ -127,6 +127,8 @@
 
 instance Hashable DescribeCertificates
 
+instance NFData DescribeCertificates
+
 instance ToHeaders DescribeCertificates where
         toHeaders = const mempty
 
@@ -185,3 +187,5 @@
 -- | The response status code.
 dcrsResponseStatus :: Lens' DescribeCertificatesResponse Int
 dcrsResponseStatus = lens _dcrsResponseStatus (\ s a -> s{_dcrsResponseStatus = a});
+
+instance NFData DescribeCertificatesResponse
diff --git a/gen/Network/AWS/RDS/DescribeDBClusterParameterGroups.hs b/gen/Network/AWS/RDS/DescribeDBClusterParameterGroups.hs
--- a/gen/Network/AWS/RDS/DescribeDBClusterParameterGroups.hs
+++ b/gen/Network/AWS/RDS/DescribeDBClusterParameterGroups.hs
@@ -133,6 +133,8 @@
 
 instance Hashable DescribeDBClusterParameterGroups
 
+instance NFData DescribeDBClusterParameterGroups
+
 instance ToHeaders DescribeDBClusterParameterGroups
          where
         toHeaders = const mempty
@@ -197,3 +199,6 @@
 -- | The response status code.
 ddcpgrsResponseStatus :: Lens' DescribeDBClusterParameterGroupsResponse Int
 ddcpgrsResponseStatus = lens _ddcpgrsResponseStatus (\ s a -> s{_ddcpgrsResponseStatus = a});
+
+instance NFData
+         DescribeDBClusterParameterGroupsResponse
diff --git a/gen/Network/AWS/RDS/DescribeDBClusterParameters.hs b/gen/Network/AWS/RDS/DescribeDBClusterParameters.hs
--- a/gen/Network/AWS/RDS/DescribeDBClusterParameters.hs
+++ b/gen/Network/AWS/RDS/DescribeDBClusterParameters.hs
@@ -142,6 +142,8 @@
 
 instance Hashable DescribeDBClusterParameters
 
+instance NFData DescribeDBClusterParameters
+
 instance ToHeaders DescribeDBClusterParameters where
         toHeaders = const mempty
 
@@ -205,3 +207,5 @@
 -- | The response status code.
 ddcprsResponseStatus :: Lens' DescribeDBClusterParametersResponse Int
 ddcprsResponseStatus = lens _ddcprsResponseStatus (\ s a -> s{_ddcprsResponseStatus = a});
+
+instance NFData DescribeDBClusterParametersResponse
diff --git a/gen/Network/AWS/RDS/DescribeDBClusterSnapshots.hs b/gen/Network/AWS/RDS/DescribeDBClusterSnapshots.hs
--- a/gen/Network/AWS/RDS/DescribeDBClusterSnapshots.hs
+++ b/gen/Network/AWS/RDS/DescribeDBClusterSnapshots.hs
@@ -163,6 +163,8 @@
 
 instance Hashable DescribeDBClusterSnapshots
 
+instance NFData DescribeDBClusterSnapshots
+
 instance ToHeaders DescribeDBClusterSnapshots where
         toHeaders = const mempty
 
@@ -227,3 +229,5 @@
 -- | The response status code.
 ddbcsrsResponseStatus :: Lens' DescribeDBClusterSnapshotsResponse Int
 ddbcsrsResponseStatus = lens _ddbcsrsResponseStatus (\ s a -> s{_ddbcsrsResponseStatus = a});
+
+instance NFData DescribeDBClusterSnapshotsResponse
diff --git a/gen/Network/AWS/RDS/DescribeDBClusters.hs b/gen/Network/AWS/RDS/DescribeDBClusters.hs
--- a/gen/Network/AWS/RDS/DescribeDBClusters.hs
+++ b/gen/Network/AWS/RDS/DescribeDBClusters.hs
@@ -131,6 +131,8 @@
 
 instance Hashable DescribeDBClusters
 
+instance NFData DescribeDBClusters
+
 instance ToHeaders DescribeDBClusters where
         toHeaders = const mempty
 
@@ -189,3 +191,5 @@
 -- | The response status code.
 ddcrsResponseStatus :: Lens' DescribeDBClustersResponse Int
 ddcrsResponseStatus = lens _ddcrsResponseStatus (\ s a -> s{_ddcrsResponseStatus = a});
+
+instance NFData DescribeDBClustersResponse
diff --git a/gen/Network/AWS/RDS/DescribeDBEngineVersions.hs b/gen/Network/AWS/RDS/DescribeDBEngineVersions.hs
--- a/gen/Network/AWS/RDS/DescribeDBEngineVersions.hs
+++ b/gen/Network/AWS/RDS/DescribeDBEngineVersions.hs
@@ -172,6 +172,8 @@
 
 instance Hashable DescribeDBEngineVersions
 
+instance NFData DescribeDBEngineVersions
+
 instance ToHeaders DescribeDBEngineVersions where
         toHeaders = const mempty
 
@@ -238,3 +240,5 @@
 -- | The response status code.
 ddevrsResponseStatus :: Lens' DescribeDBEngineVersionsResponse Int
 ddevrsResponseStatus = lens _ddevrsResponseStatus (\ s a -> s{_ddevrsResponseStatus = a});
+
+instance NFData DescribeDBEngineVersionsResponse
diff --git a/gen/Network/AWS/RDS/DescribeDBInstances.hs b/gen/Network/AWS/RDS/DescribeDBInstances.hs
--- a/gen/Network/AWS/RDS/DescribeDBInstances.hs
+++ b/gen/Network/AWS/RDS/DescribeDBInstances.hs
@@ -137,6 +137,8 @@
 
 instance Hashable DescribeDBInstances
 
+instance NFData DescribeDBInstances
+
 instance ToHeaders DescribeDBInstances where
         toHeaders = const mempty
 
@@ -196,3 +198,5 @@
 -- | The response status code.
 ddbirsResponseStatus :: Lens' DescribeDBInstancesResponse Int
 ddbirsResponseStatus = lens _ddbirsResponseStatus (\ s a -> s{_ddbirsResponseStatus = a});
+
+instance NFData DescribeDBInstancesResponse
diff --git a/gen/Network/AWS/RDS/DescribeDBLogFiles.hs b/gen/Network/AWS/RDS/DescribeDBLogFiles.hs
--- a/gen/Network/AWS/RDS/DescribeDBLogFiles.hs
+++ b/gen/Network/AWS/RDS/DescribeDBLogFiles.hs
@@ -161,6 +161,8 @@
 
 instance Hashable DescribeDBLogFiles
 
+instance NFData DescribeDBLogFiles
+
 instance ToHeaders DescribeDBLogFiles where
         toHeaders = const mempty
 
@@ -221,3 +223,5 @@
 -- | The response status code.
 ddlfrsResponseStatus :: Lens' DescribeDBLogFilesResponse Int
 ddlfrsResponseStatus = lens _ddlfrsResponseStatus (\ s a -> s{_ddlfrsResponseStatus = a});
+
+instance NFData DescribeDBLogFilesResponse
diff --git a/gen/Network/AWS/RDS/DescribeDBParameterGroups.hs b/gen/Network/AWS/RDS/DescribeDBParameterGroups.hs
--- a/gen/Network/AWS/RDS/DescribeDBParameterGroups.hs
+++ b/gen/Network/AWS/RDS/DescribeDBParameterGroups.hs
@@ -136,6 +136,8 @@
 
 instance Hashable DescribeDBParameterGroups
 
+instance NFData DescribeDBParameterGroups
+
 instance ToHeaders DescribeDBParameterGroups where
         toHeaders = const mempty
 
@@ -196,3 +198,5 @@
 -- | The response status code.
 ddpgrsResponseStatus :: Lens' DescribeDBParameterGroupsResponse Int
 ddpgrsResponseStatus = lens _ddpgrsResponseStatus (\ s a -> s{_ddpgrsResponseStatus = a});
+
+instance NFData DescribeDBParameterGroupsResponse
diff --git a/gen/Network/AWS/RDS/DescribeDBParameters.hs b/gen/Network/AWS/RDS/DescribeDBParameters.hs
--- a/gen/Network/AWS/RDS/DescribeDBParameters.hs
+++ b/gen/Network/AWS/RDS/DescribeDBParameters.hs
@@ -146,6 +146,8 @@
 
 instance Hashable DescribeDBParameters
 
+instance NFData DescribeDBParameters
+
 instance ToHeaders DescribeDBParameters where
         toHeaders = const mempty
 
@@ -206,3 +208,5 @@
 -- | The response status code.
 ddprsResponseStatus :: Lens' DescribeDBParametersResponse Int
 ddprsResponseStatus = lens _ddprsResponseStatus (\ s a -> s{_ddprsResponseStatus = a});
+
+instance NFData DescribeDBParametersResponse
diff --git a/gen/Network/AWS/RDS/DescribeDBSecurityGroups.hs b/gen/Network/AWS/RDS/DescribeDBSecurityGroups.hs
--- a/gen/Network/AWS/RDS/DescribeDBSecurityGroups.hs
+++ b/gen/Network/AWS/RDS/DescribeDBSecurityGroups.hs
@@ -130,6 +130,8 @@
 
 instance Hashable DescribeDBSecurityGroups
 
+instance NFData DescribeDBSecurityGroups
+
 instance ToHeaders DescribeDBSecurityGroups where
         toHeaders = const mempty
 
@@ -190,3 +192,5 @@
 -- | The response status code.
 ddbsgrsResponseStatus :: Lens' DescribeDBSecurityGroupsResponse Int
 ddbsgrsResponseStatus = lens _ddbsgrsResponseStatus (\ s a -> s{_ddbsgrsResponseStatus = a});
+
+instance NFData DescribeDBSecurityGroupsResponse
diff --git a/gen/Network/AWS/RDS/DescribeDBSnapshotAttributes.hs b/gen/Network/AWS/RDS/DescribeDBSnapshotAttributes.hs
--- a/gen/Network/AWS/RDS/DescribeDBSnapshotAttributes.hs
+++ b/gen/Network/AWS/RDS/DescribeDBSnapshotAttributes.hs
@@ -90,6 +90,8 @@
 
 instance Hashable DescribeDBSnapshotAttributes
 
+instance NFData DescribeDBSnapshotAttributes
+
 instance ToHeaders DescribeDBSnapshotAttributes where
         toHeaders = const mempty
 
@@ -133,3 +135,5 @@
 -- | The response status code.
 ddsarsResponseStatus :: Lens' DescribeDBSnapshotAttributesResponse Int
 ddsarsResponseStatus = lens _ddsarsResponseStatus (\ s a -> s{_ddsarsResponseStatus = a});
+
+instance NFData DescribeDBSnapshotAttributesResponse
diff --git a/gen/Network/AWS/RDS/DescribeDBSnapshots.hs b/gen/Network/AWS/RDS/DescribeDBSnapshots.hs
--- a/gen/Network/AWS/RDS/DescribeDBSnapshots.hs
+++ b/gen/Network/AWS/RDS/DescribeDBSnapshots.hs
@@ -212,6 +212,8 @@
 
 instance Hashable DescribeDBSnapshots
 
+instance NFData DescribeDBSnapshots
+
 instance ToHeaders DescribeDBSnapshots where
         toHeaders = const mempty
 
@@ -275,3 +277,5 @@
 -- | The response status code.
 ddsrsResponseStatus :: Lens' DescribeDBSnapshotsResponse Int
 ddsrsResponseStatus = lens _ddsrsResponseStatus (\ s a -> s{_ddsrsResponseStatus = a});
+
+instance NFData DescribeDBSnapshotsResponse
diff --git a/gen/Network/AWS/RDS/DescribeDBSubnetGroups.hs b/gen/Network/AWS/RDS/DescribeDBSubnetGroups.hs
--- a/gen/Network/AWS/RDS/DescribeDBSubnetGroups.hs
+++ b/gen/Network/AWS/RDS/DescribeDBSubnetGroups.hs
@@ -133,6 +133,8 @@
 
 instance Hashable DescribeDBSubnetGroups
 
+instance NFData DescribeDBSubnetGroups
+
 instance ToHeaders DescribeDBSubnetGroups where
         toHeaders = const mempty
 
@@ -193,3 +195,5 @@
 -- | The response status code.
 ddsgrsResponseStatus :: Lens' DescribeDBSubnetGroupsResponse Int
 ddsgrsResponseStatus = lens _ddsgrsResponseStatus (\ s a -> s{_ddsgrsResponseStatus = a});
+
+instance NFData DescribeDBSubnetGroupsResponse
diff --git a/gen/Network/AWS/RDS/DescribeEngineDefaultClusterParameters.hs b/gen/Network/AWS/RDS/DescribeEngineDefaultClusterParameters.hs
--- a/gen/Network/AWS/RDS/DescribeEngineDefaultClusterParameters.hs
+++ b/gen/Network/AWS/RDS/DescribeEngineDefaultClusterParameters.hs
@@ -124,6 +124,9 @@
 instance Hashable
          DescribeEngineDefaultClusterParameters
 
+instance NFData
+         DescribeEngineDefaultClusterParameters
+
 instance ToHeaders
          DescribeEngineDefaultClusterParameters where
         toHeaders = const mempty
@@ -176,3 +179,6 @@
 -- | The response status code.
 dedcprsResponseStatus :: Lens' DescribeEngineDefaultClusterParametersResponse Int
 dedcprsResponseStatus = lens _dedcprsResponseStatus (\ s a -> s{_dedcprsResponseStatus = a});
+
+instance NFData
+         DescribeEngineDefaultClusterParametersResponse
diff --git a/gen/Network/AWS/RDS/DescribeEngineDefaultParameters.hs b/gen/Network/AWS/RDS/DescribeEngineDefaultParameters.hs
--- a/gen/Network/AWS/RDS/DescribeEngineDefaultParameters.hs
+++ b/gen/Network/AWS/RDS/DescribeEngineDefaultParameters.hs
@@ -134,6 +134,8 @@
 
 instance Hashable DescribeEngineDefaultParameters
 
+instance NFData DescribeEngineDefaultParameters
+
 instance ToHeaders DescribeEngineDefaultParameters
          where
         toHeaders = const mempty
@@ -185,3 +187,6 @@
 -- | Undocumented member.
 dedprsEngineDefaults :: Lens' DescribeEngineDefaultParametersResponse EngineDefaults
 dedprsEngineDefaults = lens _dedprsEngineDefaults (\ s a -> s{_dedprsEngineDefaults = a});
+
+instance NFData
+         DescribeEngineDefaultParametersResponse
diff --git a/gen/Network/AWS/RDS/DescribeEventCategories.hs b/gen/Network/AWS/RDS/DescribeEventCategories.hs
--- a/gen/Network/AWS/RDS/DescribeEventCategories.hs
+++ b/gen/Network/AWS/RDS/DescribeEventCategories.hs
@@ -95,6 +95,8 @@
 
 instance Hashable DescribeEventCategories
 
+instance NFData DescribeEventCategories
+
 instance ToHeaders DescribeEventCategories where
         toHeaders = const mempty
 
@@ -142,3 +144,5 @@
 -- | The response status code.
 decrsResponseStatus :: Lens' DescribeEventCategoriesResponse Int
 decrsResponseStatus = lens _decrsResponseStatus (\ s a -> s{_decrsResponseStatus = a});
+
+instance NFData DescribeEventCategoriesResponse
diff --git a/gen/Network/AWS/RDS/DescribeEventSubscriptions.hs b/gen/Network/AWS/RDS/DescribeEventSubscriptions.hs
--- a/gen/Network/AWS/RDS/DescribeEventSubscriptions.hs
+++ b/gen/Network/AWS/RDS/DescribeEventSubscriptions.hs
@@ -135,6 +135,8 @@
 
 instance Hashable DescribeEventSubscriptions
 
+instance NFData DescribeEventSubscriptions
+
 instance ToHeaders DescribeEventSubscriptions where
         toHeaders = const mempty
 
@@ -194,3 +196,5 @@
 -- | The response status code.
 desrsResponseStatus :: Lens' DescribeEventSubscriptionsResponse Int
 desrsResponseStatus = lens _desrsResponseStatus (\ s a -> s{_desrsResponseStatus = a});
+
+instance NFData DescribeEventSubscriptionsResponse
diff --git a/gen/Network/AWS/RDS/DescribeEvents.hs b/gen/Network/AWS/RDS/DescribeEvents.hs
--- a/gen/Network/AWS/RDS/DescribeEvents.hs
+++ b/gen/Network/AWS/RDS/DescribeEvents.hs
@@ -201,6 +201,8 @@
 
 instance Hashable DescribeEvents
 
+instance NFData DescribeEvents
+
 instance ToHeaders DescribeEvents where
         toHeaders = const mempty
 
@@ -265,3 +267,5 @@
 -- | The response status code.
 dersResponseStatus :: Lens' DescribeEventsResponse Int
 dersResponseStatus = lens _dersResponseStatus (\ s a -> s{_dersResponseStatus = a});
+
+instance NFData DescribeEventsResponse
diff --git a/gen/Network/AWS/RDS/DescribeOptionGroupOptions.hs b/gen/Network/AWS/RDS/DescribeOptionGroupOptions.hs
--- a/gen/Network/AWS/RDS/DescribeOptionGroupOptions.hs
+++ b/gen/Network/AWS/RDS/DescribeOptionGroupOptions.hs
@@ -140,6 +140,8 @@
 
 instance Hashable DescribeOptionGroupOptions
 
+instance NFData DescribeOptionGroupOptions
+
 instance ToHeaders DescribeOptionGroupOptions where
         toHeaders = const mempty
 
@@ -200,3 +202,5 @@
 -- | The response status code.
 dogorsResponseStatus :: Lens' DescribeOptionGroupOptionsResponse Int
 dogorsResponseStatus = lens _dogorsResponseStatus (\ s a -> s{_dogorsResponseStatus = a});
+
+instance NFData DescribeOptionGroupOptionsResponse
diff --git a/gen/Network/AWS/RDS/DescribeOptionGroups.hs b/gen/Network/AWS/RDS/DescribeOptionGroups.hs
--- a/gen/Network/AWS/RDS/DescribeOptionGroups.hs
+++ b/gen/Network/AWS/RDS/DescribeOptionGroups.hs
@@ -149,6 +149,8 @@
 
 instance Hashable DescribeOptionGroups
 
+instance NFData DescribeOptionGroups
+
 instance ToHeaders DescribeOptionGroups where
         toHeaders = const mempty
 
@@ -209,3 +211,5 @@
 -- | The response status code.
 dogrsResponseStatus :: Lens' DescribeOptionGroupsResponse Int
 dogrsResponseStatus = lens _dogrsResponseStatus (\ s a -> s{_dogrsResponseStatus = a});
+
+instance NFData DescribeOptionGroupsResponse
diff --git a/gen/Network/AWS/RDS/DescribeOrderableDBInstanceOptions.hs b/gen/Network/AWS/RDS/DescribeOrderableDBInstanceOptions.hs
--- a/gen/Network/AWS/RDS/DescribeOrderableDBInstanceOptions.hs
+++ b/gen/Network/AWS/RDS/DescribeOrderableDBInstanceOptions.hs
@@ -174,6 +174,8 @@
 
 instance Hashable DescribeOrderableDBInstanceOptions
 
+instance NFData DescribeOrderableDBInstanceOptions
+
 instance ToHeaders DescribeOrderableDBInstanceOptions
          where
         toHeaders = const mempty
@@ -242,3 +244,6 @@
 -- | The response status code.
 dodiorsResponseStatus :: Lens' DescribeOrderableDBInstanceOptionsResponse Int
 dodiorsResponseStatus = lens _dodiorsResponseStatus (\ s a -> s{_dodiorsResponseStatus = a});
+
+instance NFData
+         DescribeOrderableDBInstanceOptionsResponse
diff --git a/gen/Network/AWS/RDS/DescribePendingMaintenanceActions.hs b/gen/Network/AWS/RDS/DescribePendingMaintenanceActions.hs
--- a/gen/Network/AWS/RDS/DescribePendingMaintenanceActions.hs
+++ b/gen/Network/AWS/RDS/DescribePendingMaintenanceActions.hs
@@ -130,6 +130,8 @@
 
 instance Hashable DescribePendingMaintenanceActions
 
+instance NFData DescribePendingMaintenanceActions
+
 instance ToHeaders DescribePendingMaintenanceActions
          where
         toHeaders = const mempty
@@ -193,3 +195,6 @@
 -- | The response status code.
 dpmarsResponseStatus :: Lens' DescribePendingMaintenanceActionsResponse Int
 dpmarsResponseStatus = lens _dpmarsResponseStatus (\ s a -> s{_dpmarsResponseStatus = a});
+
+instance NFData
+         DescribePendingMaintenanceActionsResponse
diff --git a/gen/Network/AWS/RDS/DescribeReservedDBInstances.hs b/gen/Network/AWS/RDS/DescribeReservedDBInstances.hs
--- a/gen/Network/AWS/RDS/DescribeReservedDBInstances.hs
+++ b/gen/Network/AWS/RDS/DescribeReservedDBInstances.hs
@@ -194,6 +194,8 @@
 
 instance Hashable DescribeReservedDBInstances
 
+instance NFData DescribeReservedDBInstances
+
 instance ToHeaders DescribeReservedDBInstances where
         toHeaders = const mempty
 
@@ -261,3 +263,5 @@
 -- | The response status code.
 drdirsResponseStatus :: Lens' DescribeReservedDBInstancesResponse Int
 drdirsResponseStatus = lens _drdirsResponseStatus (\ s a -> s{_drdirsResponseStatus = a});
+
+instance NFData DescribeReservedDBInstancesResponse
diff --git a/gen/Network/AWS/RDS/DescribeReservedDBInstancesOfferings.hs b/gen/Network/AWS/RDS/DescribeReservedDBInstancesOfferings.hs
--- a/gen/Network/AWS/RDS/DescribeReservedDBInstancesOfferings.hs
+++ b/gen/Network/AWS/RDS/DescribeReservedDBInstancesOfferings.hs
@@ -190,6 +190,8 @@
 instance Hashable
          DescribeReservedDBInstancesOfferings
 
+instance NFData DescribeReservedDBInstancesOfferings
+
 instance ToHeaders
          DescribeReservedDBInstancesOfferings where
         toHeaders = const mempty
@@ -260,3 +262,6 @@
 -- | The response status code.
 drdiorsResponseStatus :: Lens' DescribeReservedDBInstancesOfferingsResponse Int
 drdiorsResponseStatus = lens _drdiorsResponseStatus (\ s a -> s{_drdiorsResponseStatus = a});
+
+instance NFData
+         DescribeReservedDBInstancesOfferingsResponse
diff --git a/gen/Network/AWS/RDS/DownloadDBLogFilePortion.hs b/gen/Network/AWS/RDS/DownloadDBLogFilePortion.hs
--- a/gen/Network/AWS/RDS/DownloadDBLogFilePortion.hs
+++ b/gen/Network/AWS/RDS/DownloadDBLogFilePortion.hs
@@ -93,7 +93,8 @@
 -- on the value of the Marker parameter.
 --
 -- -   If neither Marker or NumberOfLines are specified, the entire log
---     file is returned.
+--     file is returned up to a maximum of 10000 lines, starting with the
+--     most recent log entries first.
 --
 -- -   If NumberOfLines is specified and Marker is not specified, then the
 --     most recent lines from the end of the log file are returned.
@@ -154,6 +155,8 @@
 
 instance Hashable DownloadDBLogFilePortion
 
+instance NFData DownloadDBLogFilePortion
+
 instance ToHeaders DownloadDBLogFilePortion where
         toHeaders = const mempty
 
@@ -221,3 +224,5 @@
 -- | The response status code.
 ddlfprsResponseStatus :: Lens' DownloadDBLogFilePortionResponse Int
 ddlfprsResponseStatus = lens _ddlfprsResponseStatus (\ s a -> s{_ddlfprsResponseStatus = a});
+
+instance NFData DownloadDBLogFilePortionResponse
diff --git a/gen/Network/AWS/RDS/FailoverDBCluster.hs b/gen/Network/AWS/RDS/FailoverDBCluster.hs
--- a/gen/Network/AWS/RDS/FailoverDBCluster.hs
+++ b/gen/Network/AWS/RDS/FailoverDBCluster.hs
@@ -98,6 +98,8 @@
 
 instance Hashable FailoverDBCluster
 
+instance NFData FailoverDBCluster
+
 instance ToHeaders FailoverDBCluster where
         toHeaders = const mempty
 
@@ -140,3 +142,5 @@
 -- | The response status code.
 fdcrsResponseStatus :: Lens' FailoverDBClusterResponse Int
 fdcrsResponseStatus = lens _fdcrsResponseStatus (\ s a -> s{_fdcrsResponseStatus = a});
+
+instance NFData FailoverDBClusterResponse
diff --git a/gen/Network/AWS/RDS/ListTagsForResource.hs b/gen/Network/AWS/RDS/ListTagsForResource.hs
--- a/gen/Network/AWS/RDS/ListTagsForResource.hs
+++ b/gen/Network/AWS/RDS/ListTagsForResource.hs
@@ -94,6 +94,8 @@
 
 instance Hashable ListTagsForResource
 
+instance NFData ListTagsForResource
+
 instance ToHeaders ListTagsForResource where
         toHeaders = const mempty
 
@@ -140,3 +142,5 @@
 -- | The response status code.
 ltfrrsResponseStatus :: Lens' ListTagsForResourceResponse Int
 ltfrrsResponseStatus = lens _ltfrrsResponseStatus (\ s a -> s{_ltfrrsResponseStatus = a});
+
+instance NFData ListTagsForResourceResponse
diff --git a/gen/Network/AWS/RDS/ModifyDBCluster.hs b/gen/Network/AWS/RDS/ModifyDBCluster.hs
--- a/gen/Network/AWS/RDS/ModifyDBCluster.hs
+++ b/gen/Network/AWS/RDS/ModifyDBCluster.hs
@@ -181,10 +181,16 @@
 -- | A value that specifies whether the modifications in this request and any
 -- pending modifications are asynchronously applied as soon as possible,
 -- regardless of the 'PreferredMaintenanceWindow' setting for the DB
--- cluster.
+-- cluster. If this parameter is set to 'false', changes to the DB cluster
+-- are applied during the next maintenance window.
 --
--- If this parameter is set to 'false', changes to the DB cluster are
--- applied during the next maintenance window.
+-- The 'ApplyImmediately' parameter only affects the
+-- 'NewDBClusterIdentifier' and 'MasterUserPassword' values. If you set the
+-- 'ApplyImmediately' parameter value to false, then changes to the
+-- 'NewDBClusterIdentifier' and 'MasterUserPassword' values are applied
+-- during the next maintenance window. All other changes are applied
+-- immediately, regardless of the value of the 'ApplyImmediately'
+-- parameter.
 --
 -- Default: 'false'
 mdcApplyImmediately :: Lens' ModifyDBCluster (Maybe Bool)
@@ -249,6 +255,8 @@
 
 instance Hashable ModifyDBCluster
 
+instance NFData ModifyDBCluster
+
 instance ToHeaders ModifyDBCluster where
         toHeaders = const mempty
 
@@ -307,3 +315,5 @@
 -- | The response status code.
 mdcrsResponseStatus :: Lens' ModifyDBClusterResponse Int
 mdcrsResponseStatus = lens _mdcrsResponseStatus (\ s a -> s{_mdcrsResponseStatus = a});
+
+instance NFData ModifyDBClusterResponse
diff --git a/gen/Network/AWS/RDS/ModifyDBClusterParameterGroup.hs b/gen/Network/AWS/RDS/ModifyDBClusterParameterGroup.hs
--- a/gen/Network/AWS/RDS/ModifyDBClusterParameterGroup.hs
+++ b/gen/Network/AWS/RDS/ModifyDBClusterParameterGroup.hs
@@ -110,6 +110,8 @@
 
 instance Hashable ModifyDBClusterParameterGroup
 
+instance NFData ModifyDBClusterParameterGroup
+
 instance ToHeaders ModifyDBClusterParameterGroup
          where
         toHeaders = const mempty
diff --git a/gen/Network/AWS/RDS/ModifyDBInstance.hs b/gen/Network/AWS/RDS/ModifyDBInstance.hs
--- a/gen/Network/AWS/RDS/ModifyDBInstance.hs
+++ b/gen/Network/AWS/RDS/ModifyDBInstance.hs
@@ -37,9 +37,11 @@
     , mdiIOPS
     , mdiAllowMajorVersionUpgrade
     , mdiNewDBInstanceIdentifier
+    , mdiDomain
     , mdiMonitoringInterval
     , mdiTDECredentialPassword
     , mdiDBInstanceClass
+    , mdiPromotionTier
     , mdiPreferredMaintenanceWindow
     , mdiCACertificateIdentifier
     , mdiDBParameterGroupName
@@ -52,6 +54,7 @@
     , mdiOptionGroupName
     , mdiCopyTagsToSnapshot
     , mdiTDECredentialARN
+    , mdiDomainIAMRoleName
     , mdiStorageType
     , mdiDBInstanceIdentifier
 
@@ -84,9 +87,11 @@
     , _mdiIOPS                       :: !(Maybe Int)
     , _mdiAllowMajorVersionUpgrade   :: !(Maybe Bool)
     , _mdiNewDBInstanceIdentifier    :: !(Maybe Text)
+    , _mdiDomain                     :: !(Maybe Text)
     , _mdiMonitoringInterval         :: !(Maybe Int)
     , _mdiTDECredentialPassword      :: !(Maybe Text)
     , _mdiDBInstanceClass            :: !(Maybe Text)
+    , _mdiPromotionTier              :: !(Maybe Int)
     , _mdiPreferredMaintenanceWindow :: !(Maybe Text)
     , _mdiCACertificateIdentifier    :: !(Maybe Text)
     , _mdiDBParameterGroupName       :: !(Maybe Text)
@@ -99,6 +104,7 @@
     , _mdiOptionGroupName            :: !(Maybe Text)
     , _mdiCopyTagsToSnapshot         :: !(Maybe Bool)
     , _mdiTDECredentialARN           :: !(Maybe Text)
+    , _mdiDomainIAMRoleName          :: !(Maybe Text)
     , _mdiStorageType                :: !(Maybe Text)
     , _mdiDBInstanceIdentifier       :: !Text
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
@@ -127,12 +133,16 @@
 --
 -- * 'mdiNewDBInstanceIdentifier'
 --
+-- * 'mdiDomain'
+--
 -- * 'mdiMonitoringInterval'
 --
 -- * 'mdiTDECredentialPassword'
 --
 -- * 'mdiDBInstanceClass'
 --
+-- * 'mdiPromotionTier'
+--
 -- * 'mdiPreferredMaintenanceWindow'
 --
 -- * 'mdiCACertificateIdentifier'
@@ -157,6 +167,8 @@
 --
 -- * 'mdiTDECredentialARN'
 --
+-- * 'mdiDomainIAMRoleName'
+--
 -- * 'mdiStorageType'
 --
 -- * 'mdiDBInstanceIdentifier'
@@ -175,9 +187,11 @@
     , _mdiIOPS = Nothing
     , _mdiAllowMajorVersionUpgrade = Nothing
     , _mdiNewDBInstanceIdentifier = Nothing
+    , _mdiDomain = Nothing
     , _mdiMonitoringInterval = Nothing
     , _mdiTDECredentialPassword = Nothing
     , _mdiDBInstanceClass = Nothing
+    , _mdiPromotionTier = Nothing
     , _mdiPreferredMaintenanceWindow = Nothing
     , _mdiCACertificateIdentifier = Nothing
     , _mdiDBParameterGroupName = Nothing
@@ -190,6 +204,7 @@
     , _mdiOptionGroupName = Nothing
     , _mdiCopyTagsToSnapshot = Nothing
     , _mdiTDECredentialARN = Nothing
+    , _mdiDomainIAMRoleName = Nothing
     , _mdiStorageType = Nothing
     , _mdiDBInstanceIdentifier = pDBInstanceIdentifier_
     }
@@ -246,6 +261,8 @@
 --
 -- Valid Values: '1150-65535'
 --
+-- Type: Integer
+--
 -- __Oracle__
 --
 -- Default: '1521'
@@ -389,6 +406,14 @@
 mdiNewDBInstanceIdentifier :: Lens' ModifyDBInstance (Maybe Text)
 mdiNewDBInstanceIdentifier = lens _mdiNewDBInstanceIdentifier (\ s a -> s{_mdiNewDBInstanceIdentifier = a});
 
+-- | Specify the Active Directory Domain to move the instance to.
+--
+-- The specified Active Directory Domain must be created prior to this
+-- operation. Currently only a SQL Server instance can be created in a
+-- Active Directory Domain.
+mdiDomain :: Lens' ModifyDBInstance (Maybe Text)
+mdiDomain = lens _mdiDomain (\ s a -> s{_mdiDomain = a});
+
 -- | The interval, in seconds, between points when Enhanced Monitoring
 -- metrics are collected for the DB instance. To disable collecting
 -- Enhanced Monitoring metrics, specify 0. The default is 60.
@@ -420,6 +445,17 @@
 mdiDBInstanceClass :: Lens' ModifyDBInstance (Maybe Text)
 mdiDBInstanceClass = lens _mdiDBInstanceClass (\ s a -> s{_mdiDBInstanceClass = a});
 
+-- | A value that specifies the order in which an Aurora Replica is promoted
+-- to the primary instance after a failure of the existing primary
+-- instance. For more information, see
+-- <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Aurora.Managing.html#Aurora.Managing.FaultTolerance Fault Tolerance for an Aurora DB Cluster>.
+--
+-- Default: 1
+--
+-- Valid Values: 0 - 15
+mdiPromotionTier :: Lens' ModifyDBInstance (Maybe Int)
+mdiPromotionTier = lens _mdiPromotionTier (\ s a -> s{_mdiPromotionTier = a});
+
 -- | The weekly time range (in UTC) during which system maintenance can
 -- occur, which might result in an outage. Changing this parameter does not
 -- result in an outage, except in the following situation, and the change
@@ -640,6 +676,11 @@
 mdiTDECredentialARN :: Lens' ModifyDBInstance (Maybe Text)
 mdiTDECredentialARN = lens _mdiTDECredentialARN (\ s a -> s{_mdiTDECredentialARN = a});
 
+-- | Specify the name of the IAM role to be used when making API calls to the
+-- Directory Service.
+mdiDomainIAMRoleName :: Lens' ModifyDBInstance (Maybe Text)
+mdiDomainIAMRoleName = lens _mdiDomainIAMRoleName (\ s a -> s{_mdiDomainIAMRoleName = a});
+
 -- | Specifies the storage type to be associated with the DB instance.
 --
 -- Valid values: 'standard | gp2 | io1'
@@ -674,6 +715,8 @@
 
 instance Hashable ModifyDBInstance
 
+instance NFData ModifyDBInstance
+
 instance ToHeaders ModifyDBInstance where
         toHeaders = const mempty
 
@@ -701,9 +744,11 @@
                  _mdiAllowMajorVersionUpgrade,
                "NewDBInstanceIdentifier" =:
                  _mdiNewDBInstanceIdentifier,
+               "Domain" =: _mdiDomain,
                "MonitoringInterval" =: _mdiMonitoringInterval,
                "TdeCredentialPassword" =: _mdiTDECredentialPassword,
                "DBInstanceClass" =: _mdiDBInstanceClass,
+               "PromotionTier" =: _mdiPromotionTier,
                "PreferredMaintenanceWindow" =:
                  _mdiPreferredMaintenanceWindow,
                "CACertificateIdentifier" =:
@@ -721,6 +766,7 @@
                "OptionGroupName" =: _mdiOptionGroupName,
                "CopyTagsToSnapshot" =: _mdiCopyTagsToSnapshot,
                "TdeCredentialArn" =: _mdiTDECredentialARN,
+               "DomainIAMRoleName" =: _mdiDomainIAMRoleName,
                "StorageType" =: _mdiStorageType,
                "DBInstanceIdentifier" =: _mdiDBInstanceIdentifier]
 
@@ -753,3 +799,5 @@
 -- | The response status code.
 mdirsResponseStatus :: Lens' ModifyDBInstanceResponse Int
 mdirsResponseStatus = lens _mdirsResponseStatus (\ s a -> s{_mdirsResponseStatus = a});
+
+instance NFData ModifyDBInstanceResponse
diff --git a/gen/Network/AWS/RDS/ModifyDBParameterGroup.hs b/gen/Network/AWS/RDS/ModifyDBParameterGroup.hs
--- a/gen/Network/AWS/RDS/ModifyDBParameterGroup.hs
+++ b/gen/Network/AWS/RDS/ModifyDBParameterGroup.hs
@@ -120,6 +120,8 @@
 
 instance Hashable ModifyDBParameterGroup
 
+instance NFData ModifyDBParameterGroup
+
 instance ToHeaders ModifyDBParameterGroup where
         toHeaders = const mempty
 
diff --git a/gen/Network/AWS/RDS/ModifyDBSnapshotAttribute.hs b/gen/Network/AWS/RDS/ModifyDBSnapshotAttribute.hs
--- a/gen/Network/AWS/RDS/ModifyDBSnapshotAttribute.hs
+++ b/gen/Network/AWS/RDS/ModifyDBSnapshotAttribute.hs
@@ -137,6 +137,8 @@
 
 instance Hashable ModifyDBSnapshotAttribute
 
+instance NFData ModifyDBSnapshotAttribute
+
 instance ToHeaders ModifyDBSnapshotAttribute where
         toHeaders = const mempty
 
@@ -188,3 +190,5 @@
 -- | The response status code.
 mdsarsResponseStatus :: Lens' ModifyDBSnapshotAttributeResponse Int
 mdsarsResponseStatus = lens _mdsarsResponseStatus (\ s a -> s{_mdsarsResponseStatus = a});
+
+instance NFData ModifyDBSnapshotAttributeResponse
diff --git a/gen/Network/AWS/RDS/ModifyDBSubnetGroup.hs b/gen/Network/AWS/RDS/ModifyDBSubnetGroup.hs
--- a/gen/Network/AWS/RDS/ModifyDBSubnetGroup.hs
+++ b/gen/Network/AWS/RDS/ModifyDBSubnetGroup.hs
@@ -81,7 +81,7 @@
 -- string.
 --
 -- Constraints: Must contain no more than 255 alphanumeric characters,
--- periods, underscores, spaces, or hyphens. Must not be \"default\".
+-- periods, underscores, spaces, or hyphens. Must not be default.
 --
 -- Example: 'mySubnetgroup'
 mdsgDBSubnetGroupName :: Lens' ModifyDBSubnetGroup Text
@@ -103,6 +103,8 @@
 
 instance Hashable ModifyDBSubnetGroup
 
+instance NFData ModifyDBSubnetGroup
+
 instance ToHeaders ModifyDBSubnetGroup where
         toHeaders = const mempty
 
@@ -149,3 +151,5 @@
 -- | The response status code.
 mdsgrsResponseStatus :: Lens' ModifyDBSubnetGroupResponse Int
 mdsgrsResponseStatus = lens _mdsgrsResponseStatus (\ s a -> s{_mdsgrsResponseStatus = a});
+
+instance NFData ModifyDBSubnetGroupResponse
diff --git a/gen/Network/AWS/RDS/ModifyEventSubscription.hs b/gen/Network/AWS/RDS/ModifyEventSubscription.hs
--- a/gen/Network/AWS/RDS/ModifyEventSubscription.hs
+++ b/gen/Network/AWS/RDS/ModifyEventSubscription.hs
@@ -135,6 +135,8 @@
 
 instance Hashable ModifyEventSubscription
 
+instance NFData ModifyEventSubscription
+
 instance ToHeaders ModifyEventSubscription where
         toHeaders = const mempty
 
@@ -185,3 +187,5 @@
 -- | The response status code.
 mesrsResponseStatus :: Lens' ModifyEventSubscriptionResponse Int
 mesrsResponseStatus = lens _mesrsResponseStatus (\ s a -> s{_mesrsResponseStatus = a});
+
+instance NFData ModifyEventSubscriptionResponse
diff --git a/gen/Network/AWS/RDS/ModifyOptionGroup.hs b/gen/Network/AWS/RDS/ModifyOptionGroup.hs
--- a/gen/Network/AWS/RDS/ModifyOptionGroup.hs
+++ b/gen/Network/AWS/RDS/ModifyOptionGroup.hs
@@ -113,6 +113,8 @@
 
 instance Hashable ModifyOptionGroup
 
+instance NFData ModifyOptionGroup
+
 instance ToHeaders ModifyOptionGroup where
         toHeaders = const mempty
 
@@ -163,3 +165,5 @@
 -- | The response status code.
 mogrsResponseStatus :: Lens' ModifyOptionGroupResponse Int
 mogrsResponseStatus = lens _mogrsResponseStatus (\ s a -> s{_mogrsResponseStatus = a});
+
+instance NFData ModifyOptionGroupResponse
diff --git a/gen/Network/AWS/RDS/PromoteReadReplica.hs b/gen/Network/AWS/RDS/PromoteReadReplica.hs
--- a/gen/Network/AWS/RDS/PromoteReadReplica.hs
+++ b/gen/Network/AWS/RDS/PromoteReadReplica.hs
@@ -132,6 +132,8 @@
 
 instance Hashable PromoteReadReplica
 
+instance NFData PromoteReadReplica
+
 instance ToHeaders PromoteReadReplica where
         toHeaders = const mempty
 
@@ -176,3 +178,5 @@
 -- | The response status code.
 prrrsResponseStatus :: Lens' PromoteReadReplicaResponse Int
 prrrsResponseStatus = lens _prrrsResponseStatus (\ s a -> s{_prrrsResponseStatus = a});
+
+instance NFData PromoteReadReplicaResponse
diff --git a/gen/Network/AWS/RDS/PurchaseReservedDBInstancesOffering.hs b/gen/Network/AWS/RDS/PurchaseReservedDBInstancesOffering.hs
--- a/gen/Network/AWS/RDS/PurchaseReservedDBInstancesOffering.hs
+++ b/gen/Network/AWS/RDS/PurchaseReservedDBInstancesOffering.hs
@@ -113,6 +113,8 @@
 
 instance Hashable PurchaseReservedDBInstancesOffering
 
+instance NFData PurchaseReservedDBInstancesOffering
+
 instance ToHeaders
          PurchaseReservedDBInstancesOffering where
         toHeaders = const mempty
@@ -164,3 +166,6 @@
 -- | The response status code.
 prdiorsResponseStatus :: Lens' PurchaseReservedDBInstancesOfferingResponse Int
 prdiorsResponseStatus = lens _prdiorsResponseStatus (\ s a -> s{_prdiorsResponseStatus = a});
+
+instance NFData
+         PurchaseReservedDBInstancesOfferingResponse
diff --git a/gen/Network/AWS/RDS/RebootDBInstance.hs b/gen/Network/AWS/RDS/RebootDBInstance.hs
--- a/gen/Network/AWS/RDS/RebootDBInstance.hs
+++ b/gen/Network/AWS/RDS/RebootDBInstance.hs
@@ -113,6 +113,8 @@
 
 instance Hashable RebootDBInstance
 
+instance NFData RebootDBInstance
+
 instance ToHeaders RebootDBInstance where
         toHeaders = const mempty
 
@@ -156,3 +158,5 @@
 -- | The response status code.
 rdirsResponseStatus :: Lens' RebootDBInstanceResponse Int
 rdirsResponseStatus = lens _rdirsResponseStatus (\ s a -> s{_rdirsResponseStatus = a});
+
+instance NFData RebootDBInstanceResponse
diff --git a/gen/Network/AWS/RDS/RemoveSourceIdentifierFromSubscription.hs b/gen/Network/AWS/RDS/RemoveSourceIdentifierFromSubscription.hs
--- a/gen/Network/AWS/RDS/RemoveSourceIdentifierFromSubscription.hs
+++ b/gen/Network/AWS/RDS/RemoveSourceIdentifierFromSubscription.hs
@@ -95,6 +95,9 @@
 instance Hashable
          RemoveSourceIdentifierFromSubscription
 
+instance NFData
+         RemoveSourceIdentifierFromSubscription
+
 instance ToHeaders
          RemoveSourceIdentifierFromSubscription where
         toHeaders = const mempty
@@ -143,3 +146,6 @@
 -- | The response status code.
 rsifsrsResponseStatus :: Lens' RemoveSourceIdentifierFromSubscriptionResponse Int
 rsifsrsResponseStatus = lens _rsifsrsResponseStatus (\ s a -> s{_rsifsrsResponseStatus = a});
+
+instance NFData
+         RemoveSourceIdentifierFromSubscriptionResponse
diff --git a/gen/Network/AWS/RDS/RemoveTagsFromResource.hs b/gen/Network/AWS/RDS/RemoveTagsFromResource.hs
--- a/gen/Network/AWS/RDS/RemoveTagsFromResource.hs
+++ b/gen/Network/AWS/RDS/RemoveTagsFromResource.hs
@@ -86,6 +86,8 @@
 
 instance Hashable RemoveTagsFromResource
 
+instance NFData RemoveTagsFromResource
+
 instance ToHeaders RemoveTagsFromResource where
         toHeaders = const mempty
 
@@ -111,3 +113,5 @@
 removeTagsFromResourceResponse
     :: RemoveTagsFromResourceResponse
 removeTagsFromResourceResponse = RemoveTagsFromResourceResponse'
+
+instance NFData RemoveTagsFromResourceResponse
diff --git a/gen/Network/AWS/RDS/ResetDBClusterParameterGroup.hs b/gen/Network/AWS/RDS/ResetDBClusterParameterGroup.hs
--- a/gen/Network/AWS/RDS/ResetDBClusterParameterGroup.hs
+++ b/gen/Network/AWS/RDS/ResetDBClusterParameterGroup.hs
@@ -114,6 +114,8 @@
 
 instance Hashable ResetDBClusterParameterGroup
 
+instance NFData ResetDBClusterParameterGroup
+
 instance ToHeaders ResetDBClusterParameterGroup where
         toHeaders = const mempty
 
diff --git a/gen/Network/AWS/RDS/ResetDBParameterGroup.hs b/gen/Network/AWS/RDS/ResetDBParameterGroup.hs
--- a/gen/Network/AWS/RDS/ResetDBParameterGroup.hs
+++ b/gen/Network/AWS/RDS/ResetDBParameterGroup.hs
@@ -132,6 +132,8 @@
 
 instance Hashable ResetDBParameterGroup
 
+instance NFData ResetDBParameterGroup
+
 instance ToHeaders ResetDBParameterGroup where
         toHeaders = const mempty
 
diff --git a/gen/Network/AWS/RDS/RestoreDBClusterFromSnapshot.hs b/gen/Network/AWS/RDS/RestoreDBClusterFromSnapshot.hs
--- a/gen/Network/AWS/RDS/RestoreDBClusterFromSnapshot.hs
+++ b/gen/Network/AWS/RDS/RestoreDBClusterFromSnapshot.hs
@@ -237,6 +237,8 @@
 
 instance Hashable RestoreDBClusterFromSnapshot
 
+instance NFData RestoreDBClusterFromSnapshot
+
 instance ToHeaders RestoreDBClusterFromSnapshot where
         toHeaders = const mempty
 
@@ -297,3 +299,5 @@
 -- | The response status code.
 rdcfsrsResponseStatus :: Lens' RestoreDBClusterFromSnapshotResponse Int
 rdcfsrsResponseStatus = lens _rdcfsrsResponseStatus (\ s a -> s{_rdcfsrsResponseStatus = a});
+
+instance NFData RestoreDBClusterFromSnapshotResponse
diff --git a/gen/Network/AWS/RDS/RestoreDBClusterToPointInTime.hs b/gen/Network/AWS/RDS/RestoreDBClusterToPointInTime.hs
--- a/gen/Network/AWS/RDS/RestoreDBClusterToPointInTime.hs
+++ b/gen/Network/AWS/RDS/RestoreDBClusterToPointInTime.hs
@@ -234,6 +234,8 @@
 
 instance Hashable RestoreDBClusterToPointInTime
 
+instance NFData RestoreDBClusterToPointInTime
+
 instance ToHeaders RestoreDBClusterToPointInTime
          where
         toHeaders = const mempty
@@ -293,3 +295,5 @@
 -- | The response status code.
 rdctpitrsResponseStatus :: Lens' RestoreDBClusterToPointInTimeResponse Int
 rdctpitrsResponseStatus = lens _rdctpitrsResponseStatus (\ s a -> s{_rdctpitrsResponseStatus = a});
+
+instance NFData RestoreDBClusterToPointInTimeResponse
diff --git a/gen/Network/AWS/RDS/RestoreDBInstanceFromDBSnapshot.hs b/gen/Network/AWS/RDS/RestoreDBInstanceFromDBSnapshot.hs
--- a/gen/Network/AWS/RDS/RestoreDBInstanceFromDBSnapshot.hs
+++ b/gen/Network/AWS/RDS/RestoreDBInstanceFromDBSnapshot.hs
@@ -49,6 +49,7 @@
     , rdifdsAutoMinorVersionUpgrade
     , rdifdsDBSubnetGroupName
     , rdifdsIOPS
+    , rdifdsDomain
     , rdifdsEngine
     , rdifdsTDECredentialPassword
     , rdifdsDBInstanceClass
@@ -58,6 +59,7 @@
     , rdifdsOptionGroupName
     , rdifdsCopyTagsToSnapshot
     , rdifdsTDECredentialARN
+    , rdifdsDomainIAMRoleName
     , rdifdsTags
     , rdifdsPort
     , rdifdsStorageType
@@ -88,6 +90,7 @@
     , _rdifdsAutoMinorVersionUpgrade :: !(Maybe Bool)
     , _rdifdsDBSubnetGroupName       :: !(Maybe Text)
     , _rdifdsIOPS                    :: !(Maybe Int)
+    , _rdifdsDomain                  :: !(Maybe Text)
     , _rdifdsEngine                  :: !(Maybe Text)
     , _rdifdsTDECredentialPassword   :: !(Maybe Text)
     , _rdifdsDBInstanceClass         :: !(Maybe Text)
@@ -97,6 +100,7 @@
     , _rdifdsOptionGroupName         :: !(Maybe Text)
     , _rdifdsCopyTagsToSnapshot      :: !(Maybe Bool)
     , _rdifdsTDECredentialARN        :: !(Maybe Text)
+    , _rdifdsDomainIAMRoleName       :: !(Maybe Text)
     , _rdifdsTags                    :: !(Maybe [Tag])
     , _rdifdsPort                    :: !(Maybe Int)
     , _rdifdsStorageType             :: !(Maybe Text)
@@ -117,6 +121,8 @@
 --
 -- * 'rdifdsIOPS'
 --
+-- * 'rdifdsDomain'
+--
 -- * 'rdifdsEngine'
 --
 -- * 'rdifdsTDECredentialPassword'
@@ -135,6 +141,8 @@
 --
 -- * 'rdifdsTDECredentialARN'
 --
+-- * 'rdifdsDomainIAMRoleName'
+--
 -- * 'rdifdsTags'
 --
 -- * 'rdifdsPort'
@@ -156,6 +164,7 @@
     , _rdifdsAutoMinorVersionUpgrade = Nothing
     , _rdifdsDBSubnetGroupName = Nothing
     , _rdifdsIOPS = Nothing
+    , _rdifdsDomain = Nothing
     , _rdifdsEngine = Nothing
     , _rdifdsTDECredentialPassword = Nothing
     , _rdifdsDBInstanceClass = Nothing
@@ -165,6 +174,7 @@
     , _rdifdsOptionGroupName = Nothing
     , _rdifdsCopyTagsToSnapshot = Nothing
     , _rdifdsTDECredentialARN = Nothing
+    , _rdifdsDomainIAMRoleName = Nothing
     , _rdifdsTags = Nothing
     , _rdifdsPort = Nothing
     , _rdifdsStorageType = Nothing
@@ -224,6 +234,10 @@
 rdifdsIOPS :: Lens' RestoreDBInstanceFromDBSnapshot (Maybe Int)
 rdifdsIOPS = lens _rdifdsIOPS (\ s a -> s{_rdifdsIOPS = a});
 
+-- | Specify the Active Directory Domain to restore the instance in.
+rdifdsDomain :: Lens' RestoreDBInstanceFromDBSnapshot (Maybe Text)
+rdifdsDomain = lens _rdifdsDomain (\ s a -> s{_rdifdsDomain = a});
+
 -- | The database engine to use for the new instance.
 --
 -- Default: The same as source
@@ -294,6 +308,11 @@
 rdifdsTDECredentialARN :: Lens' RestoreDBInstanceFromDBSnapshot (Maybe Text)
 rdifdsTDECredentialARN = lens _rdifdsTDECredentialARN (\ s a -> s{_rdifdsTDECredentialARN = a});
 
+-- | Specify the name of the IAM role to be used when making API calls to the
+-- Directory Service.
+rdifdsDomainIAMRoleName :: Lens' RestoreDBInstanceFromDBSnapshot (Maybe Text)
+rdifdsDomainIAMRoleName = lens _rdifdsDomainIAMRoleName (\ s a -> s{_rdifdsDomainIAMRoleName = a});
+
 -- | Undocumented member.
 rdifdsTags :: Lens' RestoreDBInstanceFromDBSnapshot [Tag]
 rdifdsTags = lens _rdifdsTags (\ s a -> s{_rdifdsTags = a}) . _Default . _Coerce;
@@ -365,6 +384,8 @@
 
 instance Hashable RestoreDBInstanceFromDBSnapshot
 
+instance NFData RestoreDBInstanceFromDBSnapshot
+
 instance ToHeaders RestoreDBInstanceFromDBSnapshot
          where
         toHeaders = const mempty
@@ -383,7 +404,8 @@
                "AutoMinorVersionUpgrade" =:
                  _rdifdsAutoMinorVersionUpgrade,
                "DBSubnetGroupName" =: _rdifdsDBSubnetGroupName,
-               "Iops" =: _rdifdsIOPS, "Engine" =: _rdifdsEngine,
+               "Iops" =: _rdifdsIOPS, "Domain" =: _rdifdsDomain,
+               "Engine" =: _rdifdsEngine,
                "TdeCredentialPassword" =:
                  _rdifdsTDECredentialPassword,
                "DBInstanceClass" =: _rdifdsDBInstanceClass,
@@ -393,6 +415,7 @@
                "OptionGroupName" =: _rdifdsOptionGroupName,
                "CopyTagsToSnapshot" =: _rdifdsCopyTagsToSnapshot,
                "TdeCredentialArn" =: _rdifdsTDECredentialARN,
+               "DomainIAMRoleName" =: _rdifdsDomainIAMRoleName,
                "Tags" =:
                  toQuery (toQueryList "Tag" <$> _rdifdsTags),
                "Port" =: _rdifdsPort,
@@ -432,3 +455,6 @@
 -- | The response status code.
 rdifdsrsResponseStatus :: Lens' RestoreDBInstanceFromDBSnapshotResponse Int
 rdifdsrsResponseStatus = lens _rdifdsrsResponseStatus (\ s a -> s{_rdifdsrsResponseStatus = a});
+
+instance NFData
+         RestoreDBInstanceFromDBSnapshotResponse
diff --git a/gen/Network/AWS/RDS/RestoreDBInstanceToPointInTime.hs b/gen/Network/AWS/RDS/RestoreDBInstanceToPointInTime.hs
--- a/gen/Network/AWS/RDS/RestoreDBInstanceToPointInTime.hs
+++ b/gen/Network/AWS/RDS/RestoreDBInstanceToPointInTime.hs
@@ -42,6 +42,7 @@
     , rditpitDBSubnetGroupName
     , rditpitRestoreTime
     , rditpitIOPS
+    , rditpitDomain
     , rditpitEngine
     , rditpitTDECredentialPassword
     , rditpitDBInstanceClass
@@ -51,6 +52,7 @@
     , rditpitOptionGroupName
     , rditpitCopyTagsToSnapshot
     , rditpitTDECredentialARN
+    , rditpitDomainIAMRoleName
     , rditpitTags
     , rditpitPort
     , rditpitStorageType
@@ -83,6 +85,7 @@
     , _rditpitDBSubnetGroupName          :: !(Maybe Text)
     , _rditpitRestoreTime                :: !(Maybe ISO8601)
     , _rditpitIOPS                       :: !(Maybe Int)
+    , _rditpitDomain                     :: !(Maybe Text)
     , _rditpitEngine                     :: !(Maybe Text)
     , _rditpitTDECredentialPassword      :: !(Maybe Text)
     , _rditpitDBInstanceClass            :: !(Maybe Text)
@@ -92,6 +95,7 @@
     , _rditpitOptionGroupName            :: !(Maybe Text)
     , _rditpitCopyTagsToSnapshot         :: !(Maybe Bool)
     , _rditpitTDECredentialARN           :: !(Maybe Text)
+    , _rditpitDomainIAMRoleName          :: !(Maybe Text)
     , _rditpitTags                       :: !(Maybe [Tag])
     , _rditpitPort                       :: !(Maybe Int)
     , _rditpitStorageType                :: !(Maybe Text)
@@ -116,6 +120,8 @@
 --
 -- * 'rditpitIOPS'
 --
+-- * 'rditpitDomain'
+--
 -- * 'rditpitEngine'
 --
 -- * 'rditpitTDECredentialPassword'
@@ -134,6 +140,8 @@
 --
 -- * 'rditpitTDECredentialARN'
 --
+-- * 'rditpitDomainIAMRoleName'
+--
 -- * 'rditpitTags'
 --
 -- * 'rditpitPort'
@@ -157,6 +165,7 @@
     , _rditpitDBSubnetGroupName = Nothing
     , _rditpitRestoreTime = Nothing
     , _rditpitIOPS = Nothing
+    , _rditpitDomain = Nothing
     , _rditpitEngine = Nothing
     , _rditpitTDECredentialPassword = Nothing
     , _rditpitDBInstanceClass = Nothing
@@ -166,6 +175,7 @@
     , _rditpitOptionGroupName = Nothing
     , _rditpitCopyTagsToSnapshot = Nothing
     , _rditpitTDECredentialARN = Nothing
+    , _rditpitDomainIAMRoleName = Nothing
     , _rditpitTags = Nothing
     , _rditpitPort = Nothing
     , _rditpitStorageType = Nothing
@@ -244,6 +254,10 @@
 rditpitIOPS :: Lens' RestoreDBInstanceToPointInTime (Maybe Int)
 rditpitIOPS = lens _rditpitIOPS (\ s a -> s{_rditpitIOPS = a});
 
+-- | Specify the Active Directory Domain to restore the instance in.
+rditpitDomain :: Lens' RestoreDBInstanceToPointInTime (Maybe Text)
+rditpitDomain = lens _rditpitDomain (\ s a -> s{_rditpitDomain = a});
+
 -- | The database engine to use for the new instance.
 --
 -- Default: The same as source
@@ -316,6 +330,11 @@
 rditpitTDECredentialARN :: Lens' RestoreDBInstanceToPointInTime (Maybe Text)
 rditpitTDECredentialARN = lens _rditpitTDECredentialARN (\ s a -> s{_rditpitTDECredentialARN = a});
 
+-- | Specify the name of the IAM role to be used when making API calls to the
+-- Directory Service.
+rditpitDomainIAMRoleName :: Lens' RestoreDBInstanceToPointInTime (Maybe Text)
+rditpitDomainIAMRoleName = lens _rditpitDomainIAMRoleName (\ s a -> s{_rditpitDomainIAMRoleName = a});
+
 -- | Undocumented member.
 rditpitTags :: Lens' RestoreDBInstanceToPointInTime [Tag]
 rditpitTags = lens _rditpitTags (\ s a -> s{_rditpitTags = a}) . _Default . _Coerce;
@@ -381,6 +400,8 @@
 
 instance Hashable RestoreDBInstanceToPointInTime
 
+instance NFData RestoreDBInstanceToPointInTime
+
 instance ToHeaders RestoreDBInstanceToPointInTime
          where
         toHeaders = const mempty
@@ -401,7 +422,8 @@
                  _rditpitAutoMinorVersionUpgrade,
                "DBSubnetGroupName" =: _rditpitDBSubnetGroupName,
                "RestoreTime" =: _rditpitRestoreTime,
-               "Iops" =: _rditpitIOPS, "Engine" =: _rditpitEngine,
+               "Iops" =: _rditpitIOPS, "Domain" =: _rditpitDomain,
+               "Engine" =: _rditpitEngine,
                "TdeCredentialPassword" =:
                  _rditpitTDECredentialPassword,
                "DBInstanceClass" =: _rditpitDBInstanceClass,
@@ -411,6 +433,7 @@
                "OptionGroupName" =: _rditpitOptionGroupName,
                "CopyTagsToSnapshot" =: _rditpitCopyTagsToSnapshot,
                "TdeCredentialArn" =: _rditpitTDECredentialARN,
+               "DomainIAMRoleName" =: _rditpitDomainIAMRoleName,
                "Tags" =:
                  toQuery (toQueryList "Tag" <$> _rditpitTags),
                "Port" =: _rditpitPort,
@@ -450,3 +473,6 @@
 -- | The response status code.
 rditpitrsResponseStatus :: Lens' RestoreDBInstanceToPointInTimeResponse Int
 rditpitrsResponseStatus = lens _rditpitrsResponseStatus (\ s a -> s{_rditpitrsResponseStatus = a});
+
+instance NFData
+         RestoreDBInstanceToPointInTimeResponse
diff --git a/gen/Network/AWS/RDS/RevokeDBSecurityGroupIngress.hs b/gen/Network/AWS/RDS/RevokeDBSecurityGroupIngress.hs
--- a/gen/Network/AWS/RDS/RevokeDBSecurityGroupIngress.hs
+++ b/gen/Network/AWS/RDS/RevokeDBSecurityGroupIngress.hs
@@ -132,6 +132,8 @@
 
 instance Hashable RevokeDBSecurityGroupIngress
 
+instance NFData RevokeDBSecurityGroupIngress
+
 instance ToHeaders RevokeDBSecurityGroupIngress where
         toHeaders = const mempty
 
@@ -180,3 +182,5 @@
 -- | The response status code.
 rdsgirsResponseStatus :: Lens' RevokeDBSecurityGroupIngressResponse Int
 rdsgirsResponseStatus = lens _rdsgirsResponseStatus (\ s a -> s{_rdsgirsResponseStatus = a});
+
+instance NFData RevokeDBSecurityGroupIngressResponse
diff --git a/gen/Network/AWS/RDS/Types.hs b/gen/Network/AWS/RDS/Types.hs
--- a/gen/Network/AWS/RDS/Types.hs
+++ b/gen/Network/AWS/RDS/Types.hs
@@ -55,6 +55,7 @@
     , _DBSecurityGroupNotFoundFault
     , _DBSecurityGroupNotSupportedFault
     , _InstanceQuotaExceededFault
+    , _DomainNotFoundFault
     , _DBParameterGroupNotFoundFault
     , _InvalidDBSubnetGroupFault
     , _ReservedDBInstancesOfferingNotFoundFault
@@ -154,6 +155,7 @@
     -- * DBClusterMember
     , DBClusterMember
     , dbClusterMember
+    , dcmPromotionTier
     , dcmDBInstanceIdentifier
     , dcmIsClusterWriter
     , dcmDBClusterParameterGroupStatus
@@ -228,6 +230,7 @@
     , diEngine
     , diLatestRestorableTime
     , diDBInstanceClass
+    , diPromotionTier
     , diLicenseModel
     , diPreferredMaintenanceWindow
     , diCACertificateIdentifier
@@ -254,6 +257,7 @@
     , diPendingModifiedValues
     , diStorageType
     , diStatusInfos
+    , diDomainMemberships
     , diDBName
 
     -- * DBInstanceStatusInfo
@@ -353,6 +357,14 @@
     , ddlfdSize
     , ddlfdLogFileName
 
+    -- * DomainMembership
+    , DomainMembership
+    , domainMembership
+    , dmStatus
+    , dmFQDN
+    , dmDomain
+    , dmIAMRoleName
+
     -- * EC2SecurityGroup
     , EC2SecurityGroup
     , ec2SecurityGroup
@@ -652,6 +664,8 @@
       | has (hasCode "ThrottlingException" . hasStatus 400) e =
           Just "throttling_exception"
       | has (hasCode "Throttling" . hasStatus 400) e = Just "throttling"
+      | has (hasStatus 504) e = Just "gateway_timeout"
+      | has (hasStatus 502) e = Just "bad_gateway"
       | has (hasStatus 503) e = Just "service_unavailable"
       | has (hasStatus 500) e = Just "general_server_error"
       | has (hasStatus 509) e = Just "limit_exceeded"
@@ -865,6 +879,11 @@
 _InstanceQuotaExceededFault :: AsError a => Getting (First ServiceError) a ServiceError
 _InstanceQuotaExceededFault =
     _ServiceError . hasStatus 400 . hasCode "InstanceQuotaExceeded"
+
+-- | Prism for DomainNotFoundFault' errors.
+_DomainNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
+_DomainNotFoundFault =
+    _ServiceError . hasStatus 404 . hasCode "DomainNotFoundFault"
 
 -- | /DBParameterGroupName/ does not refer to an existing DB parameter group.
 _DBParameterGroupNotFoundFault :: AsError a => Getting (First ServiceError) a ServiceError
diff --git a/gen/Network/AWS/RDS/Types/Product.hs b/gen/Network/AWS/RDS/Types/Product.hs
--- a/gen/Network/AWS/RDS/Types/Product.hs
+++ b/gen/Network/AWS/RDS/Types/Product.hs
@@ -69,6 +69,8 @@
 
 instance Hashable AccountQuota
 
+instance NFData AccountQuota
+
 -- | Contains Availability Zone information.
 --
 -- This data type is used as an element in the following data type:
@@ -101,6 +103,8 @@
 
 instance Hashable AvailabilityZone
 
+instance NFData AvailabilityZone
+
 -- | A CA certificate for an AWS account.
 --
 -- /See:/ 'certificate' smart constructor.
@@ -166,6 +170,8 @@
 
 instance Hashable Certificate
 
+instance NFData Certificate
+
 -- | This data type is used as a response element in the action
 -- < DescribeDBEngineVersions>.
 --
@@ -206,6 +212,8 @@
 
 instance Hashable CharacterSet
 
+instance NFData CharacterSet
+
 -- | Contains the result of a successful invocation of the following actions:
 --
 -- -   < CreateDBCluster>
@@ -495,11 +503,14 @@
 
 instance Hashable DBCluster
 
+instance NFData DBCluster
+
 -- | Contains information about an instance that is part of a DB cluster.
 --
 -- /See:/ 'dbClusterMember' smart constructor.
 data DBClusterMember = DBClusterMember'
-    { _dcmDBInstanceIdentifier          :: !(Maybe Text)
+    { _dcmPromotionTier                 :: !(Maybe Int)
+    , _dcmDBInstanceIdentifier          :: !(Maybe Text)
     , _dcmIsClusterWriter               :: !(Maybe Bool)
     , _dcmDBClusterParameterGroupStatus :: !(Maybe Text)
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
@@ -508,6 +519,8 @@
 --
 -- Use one of the following lenses to modify other fields as desired:
 --
+-- * 'dcmPromotionTier'
+--
 -- * 'dcmDBInstanceIdentifier'
 --
 -- * 'dcmIsClusterWriter'
@@ -517,11 +530,19 @@
     :: DBClusterMember
 dbClusterMember =
     DBClusterMember'
-    { _dcmDBInstanceIdentifier = Nothing
+    { _dcmPromotionTier = Nothing
+    , _dcmDBInstanceIdentifier = Nothing
     , _dcmIsClusterWriter = Nothing
     , _dcmDBClusterParameterGroupStatus = Nothing
     }
 
+-- | A value that specifies the order in which an Aurora Replica is promoted
+-- to the primary instance after a failure of the existing primary
+-- instance. For more information, see
+-- <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Aurora.Managing.html#Aurora.Managing.FaultTolerance Fault Tolerance for an Aurora DB Cluster>.
+dcmPromotionTier :: Lens' DBClusterMember (Maybe Int)
+dcmPromotionTier = lens _dcmPromotionTier (\ s a -> s{_dcmPromotionTier = a});
+
 -- | Specifies the instance identifier for this member of the DB cluster.
 dcmDBInstanceIdentifier :: Lens' DBClusterMember (Maybe Text)
 dcmDBInstanceIdentifier = lens _dcmDBInstanceIdentifier (\ s a -> s{_dcmDBInstanceIdentifier = a});
@@ -539,12 +560,15 @@
 instance FromXML DBClusterMember where
         parseXML x
           = DBClusterMember' <$>
-              (x .@? "DBInstanceIdentifier") <*>
-                (x .@? "IsClusterWriter")
+              (x .@? "PromotionTier") <*>
+                (x .@? "DBInstanceIdentifier")
+                <*> (x .@? "IsClusterWriter")
                 <*> (x .@? "DBClusterParameterGroupStatus")
 
 instance Hashable DBClusterMember
 
+instance NFData DBClusterMember
+
 -- | Contains status information for a DB cluster option group.
 --
 -- /See:/ 'dbClusterOptionGroupStatus' smart constructor.
@@ -584,6 +608,8 @@
 
 instance Hashable DBClusterOptionGroupStatus
 
+instance NFData DBClusterOptionGroupStatus
+
 -- | Contains the result of a successful invocation of the
 -- < CreateDBClusterParameterGroup> action.
 --
@@ -639,6 +665,8 @@
 
 instance Hashable DBClusterParameterGroup
 
+instance NFData DBClusterParameterGroup
+
 -- |
 --
 -- /See:/ 'dbClusterParameterGroupNameMessage' smart constructor.
@@ -678,6 +706,8 @@
 
 instance Hashable DBClusterParameterGroupNameMessage
 
+instance NFData DBClusterParameterGroupNameMessage
+
 -- | Contains the result of a successful invocation of the following actions:
 --
 -- -   < CreateDBClusterSnapshot>
@@ -867,6 +897,8 @@
 
 instance Hashable DBClusterSnapshot
 
+instance NFData DBClusterSnapshot
+
 -- | This data type is used as a response element in the action
 -- < DescribeDBEngineVersions>.
 --
@@ -969,6 +1001,8 @@
 
 instance Hashable DBEngineVersion
 
+instance NFData DBEngineVersion
+
 -- | Contains the result of a successful invocation of the following actions:
 --
 -- -   < CreateDBInstance>
@@ -996,6 +1030,7 @@
     , _diEngine                                :: !(Maybe Text)
     , _diLatestRestorableTime                  :: !(Maybe ISO8601)
     , _diDBInstanceClass                       :: !(Maybe Text)
+    , _diPromotionTier                         :: !(Maybe Int)
     , _diLicenseModel                          :: !(Maybe Text)
     , _diPreferredMaintenanceWindow            :: !(Maybe Text)
     , _diCACertificateIdentifier               :: !(Maybe Text)
@@ -1022,6 +1057,7 @@
     , _diPendingModifiedValues                 :: !(Maybe PendingModifiedValues)
     , _diStorageType                           :: !(Maybe Text)
     , _diStatusInfos                           :: !(Maybe [DBInstanceStatusInfo])
+    , _diDomainMemberships                     :: !(Maybe [DomainMembership])
     , _diDBName                                :: !(Maybe Text)
     } deriving (Eq,Read,Show,Data,Typeable,Generic)
 
@@ -1061,6 +1097,8 @@
 --
 -- * 'diDBInstanceClass'
 --
+-- * 'diPromotionTier'
+--
 -- * 'diLicenseModel'
 --
 -- * 'diPreferredMaintenanceWindow'
@@ -1113,6 +1151,8 @@
 --
 -- * 'diStatusInfos'
 --
+-- * 'diDomainMemberships'
+--
 -- * 'diDBName'
 dbInstance
     :: DBInstance
@@ -1134,6 +1174,7 @@
     , _diEngine = Nothing
     , _diLatestRestorableTime = Nothing
     , _diDBInstanceClass = Nothing
+    , _diPromotionTier = Nothing
     , _diLicenseModel = Nothing
     , _diPreferredMaintenanceWindow = Nothing
     , _diCACertificateIdentifier = Nothing
@@ -1160,6 +1201,7 @@
     , _diPendingModifiedValues = Nothing
     , _diStorageType = Nothing
     , _diStatusInfos = Nothing
+    , _diDomainMemberships = Nothing
     , _diDBName = Nothing
     }
 
@@ -1253,6 +1295,13 @@
 diDBInstanceClass :: Lens' DBInstance (Maybe Text)
 diDBInstanceClass = lens _diDBInstanceClass (\ s a -> s{_diDBInstanceClass = a});
 
+-- | A value that specifies the order in which an Aurora Replica is promoted
+-- to the primary instance after a failure of the existing primary
+-- instance. For more information, see
+-- <http://docs.aws.amazon.com/AmazonRDS/latest/UserGuide/Aurora.Managing.html#Aurora.Managing.FaultTolerance Fault Tolerance for an Aurora DB Cluster>.
+diPromotionTier :: Lens' DBInstance (Maybe Int)
+diPromotionTier = lens _diPromotionTier (\ s a -> s{_diPromotionTier = a});
+
 -- | License model information for this DB instance.
 diLicenseModel :: Lens' DBInstance (Maybe Text)
 diLicenseModel = lens _diLicenseModel (\ s a -> s{_diLicenseModel = a});
@@ -1379,6 +1428,11 @@
 diStatusInfos :: Lens' DBInstance [DBInstanceStatusInfo]
 diStatusInfos = lens _diStatusInfos (\ s a -> s{_diStatusInfos = a}) . _Default . _Coerce;
 
+-- | The Active Directory Domain membership records associated with the DB
+-- instance.
+diDomainMemberships :: Lens' DBInstance [DomainMembership]
+diDomainMemberships = lens _diDomainMemberships (\ s a -> s{_diDomainMemberships = a}) . _Default . _Coerce;
+
 -- | The meaning of this parameter differs according to the database engine
 -- you use. For example, this value returns MySQL, MariaDB, or PostgreSQL
 -- information when returning values from CreateDBInstanceReadReplica since
@@ -1423,6 +1477,7 @@
                 <*> (x .@? "Engine")
                 <*> (x .@? "LatestRestorableTime")
                 <*> (x .@? "DBInstanceClass")
+                <*> (x .@? "PromotionTier")
                 <*> (x .@? "LicenseModel")
                 <*> (x .@? "PreferredMaintenanceWindow")
                 <*> (x .@? "CACertificateIdentifier")
@@ -1457,10 +1512,15 @@
                 <*>
                 (x .@? "StatusInfos" .!@ mempty >>=
                    may (parseXMLList "DBInstanceStatusInfo"))
+                <*>
+                (x .@? "DomainMemberships" .!@ mempty >>=
+                   may (parseXMLList "DomainMembership"))
                 <*> (x .@? "DBName")
 
 instance Hashable DBInstance
 
+instance NFData DBInstance
+
 -- | Provides a list of status information for a DB instance.
 --
 -- /See:/ 'dbInstanceStatusInfo' smart constructor.
@@ -1520,6 +1580,8 @@
 
 instance Hashable DBInstanceStatusInfo
 
+instance NFData DBInstanceStatusInfo
+
 -- | Contains the result of a successful invocation of the
 -- < CreateDBParameterGroup> action.
 --
@@ -1574,6 +1636,8 @@
 
 instance Hashable DBParameterGroup
 
+instance NFData DBParameterGroup
+
 -- | Contains the result of a successful invocation of the
 -- < ModifyDBParameterGroup> or < ResetDBParameterGroup> action.
 --
@@ -1605,6 +1669,8 @@
 
 instance Hashable DBParameterGroupNameMessage
 
+instance NFData DBParameterGroupNameMessage
+
 -- | The status of the DB parameter group.
 --
 -- This data type is used as a response element in the following actions:
@@ -1653,6 +1719,8 @@
 
 instance Hashable DBParameterGroupStatus
 
+instance NFData DBParameterGroupStatus
+
 -- | Contains the result of a successful invocation of the following actions:
 --
 -- -   < DescribeDBSecurityGroups>
@@ -1738,6 +1806,8 @@
 
 instance Hashable DBSecurityGroup
 
+instance NFData DBSecurityGroup
+
 -- | This data type is used as a response element in the following actions:
 --
 -- -   < ModifyDBInstance>
@@ -1781,6 +1851,8 @@
 
 instance Hashable DBSecurityGroupMembership
 
+instance NFData DBSecurityGroupMembership
+
 -- | Contains the result of a successful invocation of the following actions:
 --
 -- -   < CreateDBSnapshot>
@@ -2023,6 +2095,8 @@
 
 instance Hashable DBSnapshot
 
+instance NFData DBSnapshot
+
 -- | Contains the name and values of a manual DB snapshot attribute
 --
 -- Manual DB snapshot attributes are used to authorize other AWS accounts
@@ -2076,6 +2150,8 @@
 
 instance Hashable DBSnapshotAttribute
 
+instance NFData DBSnapshotAttribute
+
 -- | Contains the results of a successful call to the
 -- < DescribeDBSnapshotAttributes> API.
 --
@@ -2121,6 +2197,8 @@
 
 instance Hashable DBSnapshotAttributesResult
 
+instance NFData DBSnapshotAttributesResult
+
 -- | Contains the result of a successful invocation of the following actions:
 --
 -- -   < CreateDBSubnetGroup>
@@ -2195,6 +2273,8 @@
 
 instance Hashable DBSubnetGroup
 
+instance NFData DBSubnetGroup
+
 -- | This data type is used as a response element to < DescribeDBLogFiles>.
 --
 -- /See:/ 'describeDBLogFilesDetails' smart constructor.
@@ -2242,6 +2322,69 @@
 
 instance Hashable DescribeDBLogFilesDetails
 
+instance NFData DescribeDBLogFilesDetails
+
+-- | An Active Directory Domain membership record associated with the DB
+-- instance.
+--
+-- /See:/ 'domainMembership' smart constructor.
+data DomainMembership = DomainMembership'
+    { _dmStatus      :: !(Maybe Text)
+    , _dmFQDN        :: !(Maybe Text)
+    , _dmDomain      :: !(Maybe Text)
+    , _dmIAMRoleName :: !(Maybe Text)
+    } deriving (Eq,Read,Show,Data,Typeable,Generic)
+
+-- | Creates a value of 'DomainMembership' with the minimum fields required to make a request.
+--
+-- Use one of the following lenses to modify other fields as desired:
+--
+-- * 'dmStatus'
+--
+-- * 'dmFQDN'
+--
+-- * 'dmDomain'
+--
+-- * 'dmIAMRoleName'
+domainMembership
+    :: DomainMembership
+domainMembership =
+    DomainMembership'
+    { _dmStatus = Nothing
+    , _dmFQDN = Nothing
+    , _dmDomain = Nothing
+    , _dmIAMRoleName = Nothing
+    }
+
+-- | The status of the DB instance\'s Active Directory Domain membership,
+-- such as joined, pending-join, failed etc).
+dmStatus :: Lens' DomainMembership (Maybe Text)
+dmStatus = lens _dmStatus (\ s a -> s{_dmStatus = a});
+
+-- | The fully qualified domain name of the Active Directory Domain.
+dmFQDN :: Lens' DomainMembership (Maybe Text)
+dmFQDN = lens _dmFQDN (\ s a -> s{_dmFQDN = a});
+
+-- | The identifier of the Active Directory Domain.
+dmDomain :: Lens' DomainMembership (Maybe Text)
+dmDomain = lens _dmDomain (\ s a -> s{_dmDomain = a});
+
+-- | The name of the IAM role to be used when making API calls to the
+-- Directory Service.
+dmIAMRoleName :: Lens' DomainMembership (Maybe Text)
+dmIAMRoleName = lens _dmIAMRoleName (\ s a -> s{_dmIAMRoleName = a});
+
+instance FromXML DomainMembership where
+        parseXML x
+          = DomainMembership' <$>
+              (x .@? "Status") <*> (x .@? "FQDN") <*>
+                (x .@? "Domain")
+                <*> (x .@? "IAMRoleName")
+
+instance Hashable DomainMembership
+
+instance NFData DomainMembership
+
 -- | This data type is used as a response element in the following actions:
 --
 -- -   < AuthorizeDBSecurityGroupIngress>
@@ -2305,6 +2448,8 @@
 
 instance Hashable EC2SecurityGroup
 
+instance NFData EC2SecurityGroup
+
 -- | This data type is used as a response element in the following actions:
 --
 -- -   < CreateDBInstance>
@@ -2357,6 +2502,8 @@
 
 instance Hashable Endpoint
 
+instance NFData Endpoint
+
 -- | Contains the result of a successful invocation of the
 -- < DescribeEngineDefaultParameters> action.
 --
@@ -2410,6 +2557,8 @@
 
 instance Hashable EngineDefaults
 
+instance NFData EngineDefaults
+
 -- | This data type is used as a response element in the < DescribeEvents>
 -- action.
 --
@@ -2478,6 +2627,8 @@
 
 instance Hashable Event
 
+instance NFData Event
+
 -- | Contains the results of a successful invocation of the
 -- < DescribeEventCategories> action.
 --
@@ -2519,6 +2670,8 @@
 
 instance Hashable EventCategoriesMap
 
+instance NFData EventCategoriesMap
+
 -- | Contains the results of a successful invocation of the
 -- < DescribeEventSubscriptions> action.
 --
@@ -2636,6 +2789,8 @@
 
 instance Hashable EventSubscription
 
+instance NFData EventSubscription
+
 -- | /See:/ 'filter'' smart constructor.
 data Filter = Filter'
     { _fName   :: !Text
@@ -2668,6 +2823,8 @@
 
 instance Hashable Filter
 
+instance NFData Filter
+
 instance ToQuery Filter where
         toQuery Filter'{..}
           = mconcat
@@ -2713,6 +2870,8 @@
 
 instance Hashable IPRange
 
+instance NFData IPRange
+
 -- | Option details.
 --
 -- /See:/ 'option' smart constructor.
@@ -2813,6 +2972,8 @@
 
 instance Hashable Option
 
+instance NFData Option
+
 -- | A list of all available options
 --
 -- /See:/ 'optionConfiguration' smart constructor.
@@ -2871,6 +3032,8 @@
 
 instance Hashable OptionConfiguration
 
+instance NFData OptionConfiguration
+
 instance ToQuery OptionConfiguration where
         toQuery OptionConfiguration'{..}
           = mconcat
@@ -2980,6 +3143,8 @@
 
 instance Hashable OptionGroup
 
+instance NFData OptionGroup
+
 -- | Provides information on the option groups the DB instance is a member
 -- of.
 --
@@ -3022,6 +3187,8 @@
 
 instance Hashable OptionGroupMembership
 
+instance NFData OptionGroupMembership
+
 -- | Available option.
 --
 -- /See:/ 'optionGroupOption' smart constructor.
@@ -3153,6 +3320,8 @@
 
 instance Hashable OptionGroupOption
 
+instance NFData OptionGroupOption
+
 -- | Option group option settings are used to display settings available for
 -- each option with their default values and other information. These
 -- values are used with the DescribeOptionGroupOptions action.
@@ -3230,6 +3399,8 @@
 
 instance Hashable OptionGroupOptionSetting
 
+instance NFData OptionGroupOptionSetting
+
 -- | Option settings are the actual settings being applied or configured for
 -- that option. It is used when you modify an option group or describe
 -- option groups. For example, the NATIVE_NETWORK_ENCRYPTION option has a
@@ -3336,6 +3507,8 @@
 
 instance Hashable OptionSetting
 
+instance NFData OptionSetting
+
 instance ToQuery OptionSetting where
         toQuery OptionSetting'{..}
           = mconcat
@@ -3481,6 +3654,8 @@
 
 instance Hashable OrderableDBInstanceOption
 
+instance NFData OrderableDBInstanceOption
+
 -- | This data type is used as a request parameter in the
 -- < ModifyDBParameterGroup> and < ResetDBParameterGroup> actions.
 --
@@ -3597,6 +3772,8 @@
 
 instance Hashable Parameter
 
+instance NFData Parameter
+
 instance ToQuery Parameter where
         toQuery Parameter'{..}
           = mconcat
@@ -3698,6 +3875,8 @@
 
 instance Hashable PendingMaintenanceAction
 
+instance NFData PendingMaintenanceAction
+
 -- | This data type is used as a response element in the < ModifyDBInstance>
 -- action.
 --
@@ -3826,6 +4005,8 @@
 
 instance Hashable PendingModifiedValues
 
+instance NFData PendingModifiedValues
+
 -- | This data type is used as a response element in the
 -- < DescribeReservedDBInstances> and
 -- < DescribeReservedDBInstancesOfferings> actions.
@@ -3867,6 +4048,8 @@
 
 instance Hashable RecurringCharge
 
+instance NFData RecurringCharge
+
 -- | This data type is used as a response element in the
 -- < DescribeReservedDBInstances> and
 -- < PurchaseReservedDBInstancesOffering> actions.
@@ -4017,6 +4200,8 @@
 
 instance Hashable ReservedDBInstance
 
+instance NFData ReservedDBInstance
+
 -- | This data type is used as a response element in the
 -- < DescribeReservedDBInstancesOfferings> action.
 --
@@ -4131,6 +4316,8 @@
 
 instance Hashable ReservedDBInstancesOffering
 
+instance NFData ReservedDBInstancesOffering
+
 -- | Describes the pending maintenance actions for a resource.
 --
 -- /See:/ 'resourcePendingMaintenanceActions' smart constructor.
@@ -4173,6 +4360,8 @@
 
 instance Hashable ResourcePendingMaintenanceActions
 
+instance NFData ResourcePendingMaintenanceActions
+
 -- | This data type is used as a response element in the
 -- < DescribeDBSubnetGroups> action.
 --
@@ -4221,6 +4410,8 @@
 
 instance Hashable Subnet
 
+instance NFData Subnet
+
 -- | Metadata assigned to an Amazon RDS resource consisting of a key-value
 -- pair.
 --
@@ -4267,6 +4458,8 @@
 
 instance Hashable Tag
 
+instance NFData Tag
+
 instance ToQuery Tag where
         toQuery Tag'{..}
           = mconcat ["Value" =: _tagValue, "Key" =: _tagKey]
@@ -4341,6 +4534,8 @@
 
 instance Hashable UpgradeTarget
 
+instance NFData UpgradeTarget
+
 -- | This data type is used as a response element for queries on VPC security
 -- group membership.
 --
@@ -4379,3 +4574,5 @@
               (x .@? "Status") <*> (x .@? "VpcSecurityGroupId")
 
 instance Hashable VPCSecurityGroupMembership
+
+instance NFData VPCSecurityGroupMembership
diff --git a/gen/Network/AWS/RDS/Types/Sum.hs b/gen/Network/AWS/RDS/Types/Sum.hs
--- a/gen/Network/AWS/RDS/Types/Sum.hs
+++ b/gen/Network/AWS/RDS/Types/Sum.hs
@@ -37,6 +37,7 @@
         PendingReboot -> "pending-reboot"
 
 instance Hashable     ApplyMethod
+instance NFData       ApplyMethod
 instance ToByteString ApplyMethod
 instance ToQuery      ApplyMethod
 instance ToHeader     ApplyMethod
@@ -74,6 +75,7 @@
         DBSnapshot -> "db-snapshot"
 
 instance Hashable     SourceType
+instance NFData       SourceType
 instance ToByteString SourceType
 instance ToQuery      SourceType
 instance ToHeader     SourceType