stratosphere-ec2-1.0.0: gen/Stratosphere/EC2/TransitGatewayRouteTableAssociation.hs

module Stratosphere.EC2.TransitGatewayRouteTableAssociation (
        TransitGatewayRouteTableAssociation(..),
        mkTransitGatewayRouteTableAssociation
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import Stratosphere.ResourceProperties
import Stratosphere.Value
data TransitGatewayRouteTableAssociation
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-transitgatewayroutetableassociation.html>
    TransitGatewayRouteTableAssociation {haddock_workaround_ :: (),
                                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-transitgatewayroutetableassociation.html#cfn-ec2-transitgatewayroutetableassociation-transitgatewayattachmentid>
                                         transitGatewayAttachmentId :: (Value Prelude.Text),
                                         -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-ec2-transitgatewayroutetableassociation.html#cfn-ec2-transitgatewayroutetableassociation-transitgatewayroutetableid>
                                         transitGatewayRouteTableId :: (Value Prelude.Text)}
  deriving stock (Prelude.Eq, Prelude.Show)
mkTransitGatewayRouteTableAssociation ::
  Value Prelude.Text
  -> Value Prelude.Text -> TransitGatewayRouteTableAssociation
mkTransitGatewayRouteTableAssociation
  transitGatewayAttachmentId
  transitGatewayRouteTableId
  = TransitGatewayRouteTableAssociation
      {haddock_workaround_ = (),
       transitGatewayAttachmentId = transitGatewayAttachmentId,
       transitGatewayRouteTableId = transitGatewayRouteTableId}
instance ToResourceProperties TransitGatewayRouteTableAssociation where
  toResourceProperties TransitGatewayRouteTableAssociation {..}
    = ResourceProperties
        {awsType = "AWS::EC2::TransitGatewayRouteTableAssociation",
         supportsTags = Prelude.False,
         properties = ["TransitGatewayAttachmentId"
                         JSON..= transitGatewayAttachmentId,
                       "TransitGatewayRouteTableId" JSON..= transitGatewayRouteTableId]}
instance JSON.ToJSON TransitGatewayRouteTableAssociation where
  toJSON TransitGatewayRouteTableAssociation {..}
    = JSON.object
        ["TransitGatewayAttachmentId" JSON..= transitGatewayAttachmentId,
         "TransitGatewayRouteTableId" JSON..= transitGatewayRouteTableId]
instance Property "TransitGatewayAttachmentId" TransitGatewayRouteTableAssociation where
  type PropertyType "TransitGatewayAttachmentId" TransitGatewayRouteTableAssociation = Value Prelude.Text
  set newValue TransitGatewayRouteTableAssociation {..}
    = TransitGatewayRouteTableAssociation
        {transitGatewayAttachmentId = newValue, ..}
instance Property "TransitGatewayRouteTableId" TransitGatewayRouteTableAssociation where
  type PropertyType "TransitGatewayRouteTableId" TransitGatewayRouteTableAssociation = Value Prelude.Text
  set newValue TransitGatewayRouteTableAssociation {..}
    = TransitGatewayRouteTableAssociation
        {transitGatewayRouteTableId = newValue, ..}