diff --git a/README.md b/README.md
--- a/README.md
+++ b/README.md
@@ -8,7 +8,7 @@
 
 ## Version
 
-`1.3.6`
+`1.3.7`
 
 
 ## Description
diff --git a/amazonka-directconnect.cabal b/amazonka-directconnect.cabal
--- a/amazonka-directconnect.cabal
+++ b/amazonka-directconnect.cabal
@@ -1,5 +1,5 @@
 name:                  amazonka-directconnect
-version:               1.3.6
+version:               1.3.7
 synopsis:              Amazon Direct Connect SDK.
 homepage:              https://github.com/brendanhay/amazonka
 bug-reports:           https://github.com/brendanhay/amazonka/issues
@@ -88,7 +88,7 @@
         , Network.AWS.DirectConnect.Types.Sum
 
     build-depends:
-          amazonka-core == 1.3.6.*
+          amazonka-core == 1.3.7.*
         , base          >= 4.7     && < 5
 
 test-suite amazonka-directconnect-test
@@ -108,12 +108,11 @@
         , Test.AWS.DirectConnect.Internal
 
     build-depends:
-          amazonka-core == 1.3.6.*
-        , amazonka-test == 1.3.6.*
-        , amazonka-directconnect == 1.3.6.*
+          amazonka-core == 1.3.7.*
+        , amazonka-test == 1.3.7.*
+        , amazonka-directconnect == 1.3.7.*
         , base
         , bytestring
-        , lens
         , tasty
         , tasty-hunit
         , text
diff --git a/gen/Network/AWS/DirectConnect/AllocateConnectionOnInterconnect.hs b/gen/Network/AWS/DirectConnect/AllocateConnectionOnInterconnect.hs
--- a/gen/Network/AWS/DirectConnect/AllocateConnectionOnInterconnect.hs
+++ b/gen/Network/AWS/DirectConnect/AllocateConnectionOnInterconnect.hs
@@ -53,6 +53,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/AllocatePrivateVirtualInterface.hs b/gen/Network/AWS/DirectConnect/AllocatePrivateVirtualInterface.hs
--- a/gen/Network/AWS/DirectConnect/AllocatePrivateVirtualInterface.hs
+++ b/gen/Network/AWS/DirectConnect/AllocatePrivateVirtualInterface.hs
@@ -63,6 +63,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/AllocatePublicVirtualInterface.hs b/gen/Network/AWS/DirectConnect/AllocatePublicVirtualInterface.hs
--- a/gen/Network/AWS/DirectConnect/AllocatePublicVirtualInterface.hs
+++ b/gen/Network/AWS/DirectConnect/AllocatePublicVirtualInterface.hs
@@ -63,6 +63,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/ConfirmConnection.hs b/gen/Network/AWS/DirectConnect/ConfirmConnection.hs
--- a/gen/Network/AWS/DirectConnect/ConfirmConnection.hs
+++ b/gen/Network/AWS/DirectConnect/ConfirmConnection.hs
@@ -43,6 +43,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/ConfirmPrivateVirtualInterface.hs b/gen/Network/AWS/DirectConnect/ConfirmPrivateVirtualInterface.hs
--- a/gen/Network/AWS/DirectConnect/ConfirmPrivateVirtualInterface.hs
+++ b/gen/Network/AWS/DirectConnect/ConfirmPrivateVirtualInterface.hs
@@ -45,6 +45,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/ConfirmPublicVirtualInterface.hs b/gen/Network/AWS/DirectConnect/ConfirmPublicVirtualInterface.hs
--- a/gen/Network/AWS/DirectConnect/ConfirmPublicVirtualInterface.hs
+++ b/gen/Network/AWS/DirectConnect/ConfirmPublicVirtualInterface.hs
@@ -44,6 +44,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/CreateConnection.hs b/gen/Network/AWS/DirectConnect/CreateConnection.hs
--- a/gen/Network/AWS/DirectConnect/CreateConnection.hs
+++ b/gen/Network/AWS/DirectConnect/CreateConnection.hs
@@ -58,6 +58,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/CreateInterconnect.hs b/gen/Network/AWS/DirectConnect/CreateInterconnect.hs
--- a/gen/Network/AWS/DirectConnect/CreateInterconnect.hs
+++ b/gen/Network/AWS/DirectConnect/CreateInterconnect.hs
@@ -61,6 +61,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/CreatePrivateVirtualInterface.hs b/gen/Network/AWS/DirectConnect/CreatePrivateVirtualInterface.hs
--- a/gen/Network/AWS/DirectConnect/CreatePrivateVirtualInterface.hs
+++ b/gen/Network/AWS/DirectConnect/CreatePrivateVirtualInterface.hs
@@ -55,6 +55,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/CreatePublicVirtualInterface.hs b/gen/Network/AWS/DirectConnect/CreatePublicVirtualInterface.hs
--- a/gen/Network/AWS/DirectConnect/CreatePublicVirtualInterface.hs
+++ b/gen/Network/AWS/DirectConnect/CreatePublicVirtualInterface.hs
@@ -56,6 +56,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/DeleteConnection.hs b/gen/Network/AWS/DirectConnect/DeleteConnection.hs
--- a/gen/Network/AWS/DirectConnect/DeleteConnection.hs
+++ b/gen/Network/AWS/DirectConnect/DeleteConnection.hs
@@ -51,6 +51,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/DeleteInterconnect.hs b/gen/Network/AWS/DirectConnect/DeleteInterconnect.hs
--- a/gen/Network/AWS/DirectConnect/DeleteInterconnect.hs
+++ b/gen/Network/AWS/DirectConnect/DeleteInterconnect.hs
@@ -39,6 +39,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/DeleteVirtualInterface.hs b/gen/Network/AWS/DirectConnect/DeleteVirtualInterface.hs
--- a/gen/Network/AWS/DirectConnect/DeleteVirtualInterface.hs
+++ b/gen/Network/AWS/DirectConnect/DeleteVirtualInterface.hs
@@ -39,6 +39,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/DescribeConnections.hs b/gen/Network/AWS/DirectConnect/DescribeConnections.hs
--- a/gen/Network/AWS/DirectConnect/DescribeConnections.hs
+++ b/gen/Network/AWS/DirectConnect/DescribeConnections.hs
@@ -41,6 +41,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/DescribeConnectionsOnInterconnect.hs b/gen/Network/AWS/DirectConnect/DescribeConnectionsOnInterconnect.hs
--- a/gen/Network/AWS/DirectConnect/DescribeConnectionsOnInterconnect.hs
+++ b/gen/Network/AWS/DirectConnect/DescribeConnectionsOnInterconnect.hs
@@ -39,6 +39,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/DescribeInterconnects.hs b/gen/Network/AWS/DirectConnect/DescribeInterconnects.hs
--- a/gen/Network/AWS/DirectConnect/DescribeInterconnects.hs
+++ b/gen/Network/AWS/DirectConnect/DescribeInterconnects.hs
@@ -42,6 +42,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/DescribeLocations.hs b/gen/Network/AWS/DirectConnect/DescribeLocations.hs
--- a/gen/Network/AWS/DirectConnect/DescribeLocations.hs
+++ b/gen/Network/AWS/DirectConnect/DescribeLocations.hs
@@ -39,6 +39,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
@@ -82,7 +83,13 @@
 instance ToQuery DescribeLocations where
         toQuery = const mempty
 
--- | /See:/ 'describeLocationsResponse' smart constructor.
+-- | A location is a network facility where AWS Direct Connect routers are
+-- available to be connected. Generally, these are colocation hubs where
+-- many network providers have equipment, and where cross connects can be
+-- delivered. Locations include a name and facility code, and must be
+-- provided when creating a connection.
+--
+-- /See:/ 'describeLocationsResponse' smart constructor.
 data DescribeLocationsResponse = DescribeLocationsResponse'
     { _dlrsLocations      :: !(Maybe [Location])
     , _dlrsResponseStatus :: !Int
@@ -104,7 +111,8 @@
     , _dlrsResponseStatus = pResponseStatus_
     }
 
--- | Undocumented member.
+-- | A list of colocation hubs where network providers have equipment. Most
+-- regions have multiple locations available.
 dlrsLocations :: Lens' DescribeLocationsResponse [Location]
 dlrsLocations = lens _dlrsLocations (\ s a -> s{_dlrsLocations = a}) . _Default . _Coerce;
 
diff --git a/gen/Network/AWS/DirectConnect/DescribeVirtualGateways.hs b/gen/Network/AWS/DirectConnect/DescribeVirtualGateways.hs
--- a/gen/Network/AWS/DirectConnect/DescribeVirtualGateways.hs
+++ b/gen/Network/AWS/DirectConnect/DescribeVirtualGateways.hs
@@ -43,6 +43,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/DescribeVirtualInterfaces.hs b/gen/Network/AWS/DirectConnect/DescribeVirtualInterfaces.hs
--- a/gen/Network/AWS/DirectConnect/DescribeVirtualInterfaces.hs
+++ b/gen/Network/AWS/DirectConnect/DescribeVirtualInterfaces.hs
@@ -52,6 +52,7 @@
 
 import           Network.AWS.DirectConnect.Types
 import           Network.AWS.DirectConnect.Types.Product
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Request
 import           Network.AWS.Response
diff --git a/gen/Network/AWS/DirectConnect/Types.hs b/gen/Network/AWS/DirectConnect/Types.hs
--- a/gen/Network/AWS/DirectConnect/Types.hs
+++ b/gen/Network/AWS/DirectConnect/Types.hs
@@ -138,6 +138,7 @@
 
 import           Network.AWS.DirectConnect.Types.Product
 import           Network.AWS.DirectConnect.Types.Sum
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Sign.V4
 
diff --git a/gen/Network/AWS/DirectConnect/Types/Product.hs b/gen/Network/AWS/DirectConnect/Types/Product.hs
--- a/gen/Network/AWS/DirectConnect/Types/Product.hs
+++ b/gen/Network/AWS/DirectConnect/Types/Product.hs
@@ -18,6 +18,7 @@
 module Network.AWS.DirectConnect.Types.Product where
 
 import           Network.AWS.DirectConnect.Types.Sum
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 
 -- | A connection represents the physical network connection between the AWS
diff --git a/gen/Network/AWS/DirectConnect/Types/Sum.hs b/gen/Network/AWS/DirectConnect/Types/Sum.hs
--- a/gen/Network/AWS/DirectConnect/Types/Sum.hs
+++ b/gen/Network/AWS/DirectConnect/Types/Sum.hs
@@ -33,6 +33,7 @@
 -- -   __Available__: The network link is up, and the connection is ready
 --     for use.
 -- -   __Down__: The network link is down.
+-- -   __Deleting__: The connection is in the process of being deleted.
 -- -   __Deleted__: The connection has been deleted.
 -- -   __Rejected__: A hosted connection in the \'Ordering\' state will
 --     enter the \'Rejected\' state if it is deleted by the end customer.
@@ -45,7 +46,7 @@
     | CSPending
     | CSRejected
     | CSRequested
-    deriving (Eq,Ord,Read,Show,Enum,Data,Typeable,Generic)
+    deriving (Eq,Ord,Read,Show,Enum,Bounded,Data,Typeable,Generic)
 
 instance FromText ConnectionState where
     parser = takeLowerText >>= \case
@@ -89,6 +90,7 @@
 -- -   __Available__: The network link is up, and the interconnect is ready
 --     for use.
 -- -   __Down__: The network link is down.
+-- -   __Deleting__: The interconnect is in the process of being deleted.
 -- -   __Deleted__: The interconnect has been deleted.
 data InterconnectState
     = ISAvailable
@@ -97,7 +99,7 @@
     | ISDown
     | ISPending
     | ISRequested
-    deriving (Eq,Ord,Read,Show,Enum,Data,Typeable,Generic)
+    deriving (Eq,Ord,Read,Show,Enum,Bounded,Data,Typeable,Generic)
 
 instance FromText InterconnectState where
     parser = takeLowerText >>= \case
@@ -141,6 +143,7 @@
 --     it is created until the virtual interface is ready to forward
 --     traffic.
 -- -   __Available__: A virtual interface that is able to forward traffic.
+-- -   __Down__: A virtual interface that is BGP down.
 -- -   __Deleting__: A virtual interface is in this state immediately after
 --     calling /DeleteVirtualInterface/ until it can no longer forward
 --     traffic.
@@ -157,7 +160,7 @@
     | Pending
     | Rejected
     | Verifying
-    deriving (Eq,Ord,Read,Show,Enum,Data,Typeable,Generic)
+    deriving (Eq,Ord,Read,Show,Enum,Bounded,Data,Typeable,Generic)
 
 instance FromText VirtualInterfaceState where
     parser = takeLowerText >>= \case
diff --git a/gen/Network/AWS/DirectConnect/Waiters.hs b/gen/Network/AWS/DirectConnect/Waiters.hs
--- a/gen/Network/AWS/DirectConnect/Waiters.hs
+++ b/gen/Network/AWS/DirectConnect/Waiters.hs
@@ -16,5 +16,6 @@
 module Network.AWS.DirectConnect.Waiters where
 
 import           Network.AWS.DirectConnect.Types
+import           Network.AWS.Lens
 import           Network.AWS.Prelude
 import           Network.AWS.Waiter