Values.CreateClusterSubnetGroupResultSourceCreates a new Amazon Redshift subnet group. You must provide a list of one or more subnets in your existing Amazon Virtual Private Cloud (Amazon VPC) when creating Amazon Redshift subnet group. For information about subnet groups, go to Amazon Redshift Cluster Subnet Groups in the Amazon Redshift Cluster Management Guide.
and t = {createClusterSubnetGroupResult : createClusterSubnetGroupResult;responseMetaData : responseMetaData;}type error = [ | `ClusterSubnetGroupAlreadyExistsFault of ClusterSubnetGroupAlreadyExistsFault.t| `ClusterSubnetGroupQuotaExceededFault of ClusterSubnetGroupQuotaExceededFault.t| `ClusterSubnetQuotaExceededFault of ClusterSubnetQuotaExceededFault.t| `DependentServiceRequestThrottlingFault of
DependentServiceRequestThrottlingFault.t| `InvalidSubnet of InvalidSubnet.t| `InvalidTagFault of InvalidTagFault.t| `TagLimitExceededFault of TagLimitExceededFault.t| `Unknown_operation_error of string * string option ]val error_of_json :
string ->
Yojson.Safe.t ->
[> `ClusterSubnetGroupAlreadyExistsFault of unit
| `ClusterSubnetGroupQuotaExceededFault of unit
| `ClusterSubnetQuotaExceededFault of unit
| `DependentServiceRequestThrottlingFault of unit
| `InvalidSubnet of unit
| `InvalidTagFault of unit
| `TagLimitExceededFault of unit
| `UnauthorizedOperation of unit
| `Unknown_operation_error of string * string option ]val error_of_xml :
string ->
Awso.Xml.t ->
[> `ClusterSubnetGroupAlreadyExistsFault of unit
| `ClusterSubnetGroupQuotaExceededFault of unit
| `ClusterSubnetQuotaExceededFault of unit
| `DependentServiceRequestThrottlingFault of unit
| `InvalidSubnet of unit
| `InvalidTagFault of unit
| `TagLimitExceededFault of unit
| `UnauthorizedOperation of unit
| `Unknown_operation_error of string * string option ]val to_value :
t ->
[> `Structure of
(string
* [> `Structure of
(string
* [> `Structure of
(string
* [> `List of
[> `String of String_.t
| `Structure of
(string
* [> `String of String_.t
| `Structure of
(string
* [> `List of
[> `Structure of
(string
* [> `String of String_.t ])
list ]
list
| `String of String_.t ])
list ])
list ]
list
| `String of String_.t ])
list ])
list ])
list ]