module Stratosphere.EC2.VPNConnection (
        module Exports, VPNConnection(..), mkVPNConnection
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.EC2.VPNConnection.VpnTunnelOptionsSpecificationProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data VPNConnection
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html>
    VPNConnection {VPNConnection -> ()
haddock_workaround_ :: (),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-customergatewayid>
                   VPNConnection -> Value Text
customerGatewayId :: (Value Prelude.Text),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-enableacceleration>
                   VPNConnection -> Maybe (Value Bool)
enableAcceleration :: (Prelude.Maybe (Value Prelude.Bool)),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-localipv4networkcidr>
                   VPNConnection -> Maybe (Value Text)
localIpv4NetworkCidr :: (Prelude.Maybe (Value Prelude.Text)),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-localipv6networkcidr>
                   VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: (Prelude.Maybe (Value Prelude.Text)),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-outsideipaddresstype>
                   VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: (Prelude.Maybe (Value Prelude.Text)),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-presharedkeystorage>
                   VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: (Prelude.Maybe (Value Prelude.Text)),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-remoteipv4networkcidr>
                   VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: (Prelude.Maybe (Value Prelude.Text)),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-remoteipv6networkcidr>
                   VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: (Prelude.Maybe (Value Prelude.Text)),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-staticroutesonly>
                   VPNConnection -> Maybe (Value Bool)
staticRoutesOnly :: (Prelude.Maybe (Value Prelude.Bool)),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-tags>
                   VPNConnection -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag]),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-transitgatewayid>
                   VPNConnection -> Maybe (Value Text)
transitGatewayId :: (Prelude.Maybe (Value Prelude.Text)),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-transporttransitgatewayattachmentid>
                   VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: (Prelude.Maybe (Value Prelude.Text)),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-tunnelinsideipversion>
                   VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: (Prelude.Maybe (Value Prelude.Text)),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-type>
                   VPNConnection -> Value Text
type' :: (Value Prelude.Text),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-vpngatewayid>
                   VPNConnection -> Maybe (Value Text)
vpnGatewayId :: (Prelude.Maybe (Value Prelude.Text)),
                   -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-vpnconnection.html#cfn-ec2-vpnconnection-vpntunneloptionsspecifications>
                   VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
vpnTunnelOptionsSpecifications :: (Prelude.Maybe [VpnTunnelOptionsSpecificationProperty])}
  deriving stock (VPNConnection -> VPNConnection -> Bool
(VPNConnection -> VPNConnection -> Bool)
-> (VPNConnection -> VPNConnection -> Bool) -> Eq VPNConnection
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: VPNConnection -> VPNConnection -> Bool
== :: VPNConnection -> VPNConnection -> Bool
$c/= :: VPNConnection -> VPNConnection -> Bool
/= :: VPNConnection -> VPNConnection -> Bool
Prelude.Eq, Int -> VPNConnection -> ShowS
[VPNConnection] -> ShowS
VPNConnection -> String
(Int -> VPNConnection -> ShowS)
-> (VPNConnection -> String)
-> ([VPNConnection] -> ShowS)
-> Show VPNConnection
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> VPNConnection -> ShowS
showsPrec :: Int -> VPNConnection -> ShowS
$cshow :: VPNConnection -> String
show :: VPNConnection -> String
$cshowList :: [VPNConnection] -> ShowS
showList :: [VPNConnection] -> ShowS
Prelude.Show)
mkVPNConnection ::
  Value Prelude.Text -> Value Prelude.Text -> VPNConnection
mkVPNConnection :: Value Text -> Value Text -> VPNConnection
mkVPNConnection Value Text
customerGatewayId Value Text
type'
  = VPNConnection
      {haddock_workaround_ :: ()
haddock_workaround_ = (), customerGatewayId :: Value Text
customerGatewayId = Value Text
customerGatewayId,
       type' :: Value Text
type' = Value Text
type', enableAcceleration :: Maybe (Value Bool)
enableAcceleration = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing,
       localIpv4NetworkCidr :: Maybe (Value Text)
localIpv4NetworkCidr = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       localIpv6NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       outsideIpAddressType :: Maybe (Value Text)
outsideIpAddressType = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       preSharedKeyStorage :: Maybe (Value Text)
preSharedKeyStorage = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv4NetworkCidr = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       remoteIpv6NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       staticRoutesOnly :: Maybe (Value Bool)
staticRoutesOnly = Maybe (Value Bool)
forall a. Maybe a
Prelude.Nothing, tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing,
       transitGatewayId :: Maybe (Value Text)
transitGatewayId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       transportTransitGatewayAttachmentId :: Maybe (Value Text)
transportTransitGatewayAttachmentId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       tunnelInsideIpVersion :: Maybe (Value Text)
tunnelInsideIpVersion = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       vpnGatewayId :: Maybe (Value Text)
vpnGatewayId = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
       vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
vpnTunnelOptionsSpecifications = Maybe [VpnTunnelOptionsSpecificationProperty]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties VPNConnection where
  toResourceProperties :: VPNConnection -> ResourceProperties
toResourceProperties VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::EC2::VPNConnection", supportsTags :: Bool
supportsTags = Bool
Prelude.True,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"CustomerGatewayId" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
customerGatewayId,
                            Key
"Type" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
type']
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnableAcceleration" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
enableAcceleration,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LocalIpv4NetworkCidr" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
localIpv4NetworkCidr,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LocalIpv6NetworkCidr" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
localIpv6NetworkCidr,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"OutsideIpAddressType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
outsideIpAddressType,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PreSharedKeyStorage" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
preSharedKeyStorage,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RemoteIpv4NetworkCidr"
                                 (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
remoteIpv4NetworkCidr,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RemoteIpv6NetworkCidr"
                                 (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
remoteIpv6NetworkCidr,
                               Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"StaticRoutesOnly" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
staticRoutesOnly,
                               Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TransitGatewayId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
transitGatewayId,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TransportTransitGatewayAttachmentId"
                                 (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
transportTransitGatewayAttachmentId,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TunnelInsideIpVersion"
                                 (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
tunnelInsideIpVersion,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VpnGatewayId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
vpnGatewayId,
                               Key -> [VpnTunnelOptionsSpecificationProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VpnTunnelOptionsSpecifications"
                                 ([VpnTunnelOptionsSpecificationProperty] -> (Key, Value))
-> Maybe [VpnTunnelOptionsSpecificationProperty]
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [VpnTunnelOptionsSpecificationProperty]
vpnTunnelOptionsSpecifications]))}
instance JSON.ToJSON VPNConnection where
  toJSON :: VPNConnection -> Value
toJSON VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"CustomerGatewayId" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
customerGatewayId,
               Key
"Type" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
type']
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnableAcceleration" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
enableAcceleration,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LocalIpv4NetworkCidr" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
localIpv4NetworkCidr,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"LocalIpv6NetworkCidr" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
localIpv6NetworkCidr,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"OutsideIpAddressType" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
outsideIpAddressType,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PreSharedKeyStorage" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
preSharedKeyStorage,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RemoteIpv4NetworkCidr"
                    (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
remoteIpv4NetworkCidr,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"RemoteIpv6NetworkCidr"
                    (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
remoteIpv6NetworkCidr,
                  Key -> Value Bool -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"StaticRoutesOnly" (Value Bool -> (Key, Value))
-> Maybe (Value Bool) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Bool)
staticRoutesOnly,
                  Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TransitGatewayId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
transitGatewayId,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TransportTransitGatewayAttachmentId"
                    (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
transportTransitGatewayAttachmentId,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"TunnelInsideIpVersion"
                    (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
tunnelInsideIpVersion,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VpnGatewayId" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
vpnGatewayId,
                  Key -> [VpnTunnelOptionsSpecificationProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"VpnTunnelOptionsSpecifications"
                    ([VpnTunnelOptionsSpecificationProperty] -> (Key, Value))
-> Maybe [VpnTunnelOptionsSpecificationProperty]
-> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [VpnTunnelOptionsSpecificationProperty]
vpnTunnelOptionsSpecifications])))
instance Property "CustomerGatewayId" VPNConnection where
  type PropertyType "CustomerGatewayId" VPNConnection = Value Prelude.Text
  set :: PropertyType "CustomerGatewayId" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "CustomerGatewayId" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {customerGatewayId :: Value Text
customerGatewayId = PropertyType "CustomerGatewayId" VPNConnection
Value Text
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "EnableAcceleration" VPNConnection where
  type PropertyType "EnableAcceleration" VPNConnection = Value Prelude.Bool
  set :: PropertyType "EnableAcceleration" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "EnableAcceleration" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {enableAcceleration :: Maybe (Value Bool)
enableAcceleration = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "EnableAcceleration" VPNConnection
Value Bool
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "LocalIpv4NetworkCidr" VPNConnection where
  type PropertyType "LocalIpv4NetworkCidr" VPNConnection = Value Prelude.Text
  set :: PropertyType "LocalIpv4NetworkCidr" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "LocalIpv4NetworkCidr" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {localIpv4NetworkCidr :: Maybe (Value Text)
localIpv4NetworkCidr = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "LocalIpv4NetworkCidr" VPNConnection
Value Text
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "LocalIpv6NetworkCidr" VPNConnection where
  type PropertyType "LocalIpv6NetworkCidr" VPNConnection = Value Prelude.Text
  set :: PropertyType "LocalIpv6NetworkCidr" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "LocalIpv6NetworkCidr" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {localIpv6NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "LocalIpv6NetworkCidr" VPNConnection
Value Text
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "OutsideIpAddressType" VPNConnection where
  type PropertyType "OutsideIpAddressType" VPNConnection = Value Prelude.Text
  set :: PropertyType "OutsideIpAddressType" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "OutsideIpAddressType" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {outsideIpAddressType :: Maybe (Value Text)
outsideIpAddressType = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "OutsideIpAddressType" VPNConnection
Value Text
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "PreSharedKeyStorage" VPNConnection where
  type PropertyType "PreSharedKeyStorage" VPNConnection = Value Prelude.Text
  set :: PropertyType "PreSharedKeyStorage" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "PreSharedKeyStorage" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {preSharedKeyStorage :: Maybe (Value Text)
preSharedKeyStorage = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PreSharedKeyStorage" VPNConnection
Value Text
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "RemoteIpv4NetworkCidr" VPNConnection where
  type PropertyType "RemoteIpv4NetworkCidr" VPNConnection = Value Prelude.Text
  set :: PropertyType "RemoteIpv4NetworkCidr" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "RemoteIpv4NetworkCidr" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv4NetworkCidr = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "RemoteIpv4NetworkCidr" VPNConnection
Value Text
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "RemoteIpv6NetworkCidr" VPNConnection where
  type PropertyType "RemoteIpv6NetworkCidr" VPNConnection = Value Prelude.Text
  set :: PropertyType "RemoteIpv6NetworkCidr" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "RemoteIpv6NetworkCidr" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {remoteIpv6NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "RemoteIpv6NetworkCidr" VPNConnection
Value Text
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "StaticRoutesOnly" VPNConnection where
  type PropertyType "StaticRoutesOnly" VPNConnection = Value Prelude.Bool
  set :: PropertyType "StaticRoutesOnly" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "StaticRoutesOnly" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {staticRoutesOnly :: Maybe (Value Bool)
staticRoutesOnly = Value Bool -> Maybe (Value Bool)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "StaticRoutesOnly" VPNConnection
Value Bool
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "Tags" VPNConnection where
  type PropertyType "Tags" VPNConnection = [Tag]
  set :: PropertyType "Tags" VPNConnection -> VPNConnection -> VPNConnection
set PropertyType "Tags" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {tags :: Maybe [Tag]
tags = [Tag] -> Maybe [Tag]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [Tag]
PropertyType "Tags" VPNConnection
newValue, Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "TransitGatewayId" VPNConnection where
  type PropertyType "TransitGatewayId" VPNConnection = Value Prelude.Text
  set :: PropertyType "TransitGatewayId" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "TransitGatewayId" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {transitGatewayId :: Maybe (Value Text)
transitGatewayId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TransitGatewayId" VPNConnection
Value Text
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "TransportTransitGatewayAttachmentId" VPNConnection where
  type PropertyType "TransportTransitGatewayAttachmentId" VPNConnection = Value Prelude.Text
  set :: PropertyType "TransportTransitGatewayAttachmentId" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "TransportTransitGatewayAttachmentId" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection
        {transportTransitGatewayAttachmentId :: Maybe (Value Text)
transportTransitGatewayAttachmentId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TransportTransitGatewayAttachmentId" VPNConnection
Value Text
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "TunnelInsideIpVersion" VPNConnection where
  type PropertyType "TunnelInsideIpVersion" VPNConnection = Value Prelude.Text
  set :: PropertyType "TunnelInsideIpVersion" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "TunnelInsideIpVersion" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {tunnelInsideIpVersion :: Maybe (Value Text)
tunnelInsideIpVersion = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "TunnelInsideIpVersion" VPNConnection
Value Text
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "Type" VPNConnection where
  type PropertyType "Type" VPNConnection = Value Prelude.Text
  set :: PropertyType "Type" VPNConnection -> VPNConnection -> VPNConnection
set PropertyType "Type" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {type' :: Value Text
type' = PropertyType "Type" VPNConnection
Value Text
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "VpnGatewayId" VPNConnection where
  type PropertyType "VpnGatewayId" VPNConnection = Value Prelude.Text
  set :: PropertyType "VpnGatewayId" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "VpnGatewayId" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection {vpnGatewayId :: Maybe (Value Text)
vpnGatewayId = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "VpnGatewayId" VPNConnection
Value Text
newValue, Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
instance Property "VpnTunnelOptionsSpecifications" VPNConnection where
  type PropertyType "VpnTunnelOptionsSpecifications" VPNConnection = [VpnTunnelOptionsSpecificationProperty]
  set :: PropertyType "VpnTunnelOptionsSpecifications" VPNConnection
-> VPNConnection -> VPNConnection
set PropertyType "VpnTunnelOptionsSpecifications" VPNConnection
newValue VPNConnection {Maybe [Tag]
Maybe [VpnTunnelOptionsSpecificationProperty]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: VPNConnection -> ()
customerGatewayId :: VPNConnection -> Value Text
enableAcceleration :: VPNConnection -> Maybe (Value Bool)
localIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
localIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
outsideIpAddressType :: VPNConnection -> Maybe (Value Text)
preSharedKeyStorage :: VPNConnection -> Maybe (Value Text)
remoteIpv4NetworkCidr :: VPNConnection -> Maybe (Value Text)
remoteIpv6NetworkCidr :: VPNConnection -> Maybe (Value Text)
staticRoutesOnly :: VPNConnection -> Maybe (Value Bool)
tags :: VPNConnection -> Maybe [Tag]
transitGatewayId :: VPNConnection -> Maybe (Value Text)
transportTransitGatewayAttachmentId :: VPNConnection -> Maybe (Value Text)
tunnelInsideIpVersion :: VPNConnection -> Maybe (Value Text)
type' :: VPNConnection -> Value Text
vpnGatewayId :: VPNConnection -> Maybe (Value Text)
vpnTunnelOptionsSpecifications :: VPNConnection -> Maybe [VpnTunnelOptionsSpecificationProperty]
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
..}
    = VPNConnection
        {vpnTunnelOptionsSpecifications :: Maybe [VpnTunnelOptionsSpecificationProperty]
vpnTunnelOptionsSpecifications = [VpnTunnelOptionsSpecificationProperty]
-> Maybe [VpnTunnelOptionsSpecificationProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [VpnTunnelOptionsSpecificationProperty]
PropertyType "VpnTunnelOptionsSpecifications" VPNConnection
newValue, Maybe [Tag]
Maybe (Value Bool)
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
haddock_workaround_ :: ()
customerGatewayId :: Value Text
enableAcceleration :: Maybe (Value Bool)
localIpv4NetworkCidr :: Maybe (Value Text)
localIpv6NetworkCidr :: Maybe (Value Text)
outsideIpAddressType :: Maybe (Value Text)
preSharedKeyStorage :: Maybe (Value Text)
remoteIpv4NetworkCidr :: Maybe (Value Text)
remoteIpv6NetworkCidr :: Maybe (Value Text)
staticRoutesOnly :: Maybe (Value Bool)
tags :: Maybe [Tag]
transitGatewayId :: Maybe (Value Text)
transportTransitGatewayAttachmentId :: Maybe (Value Text)
tunnelInsideIpVersion :: Maybe (Value Text)
type' :: Value Text
vpnGatewayId :: Maybe (Value Text)
..}