CreateCluster (smaws-clients.Smaws_Client

val error_to_string : 
  [ Smaws_Lib.Protocols.AwsJson.error
  | `ACLNotFoundFault of Types.acl_not_found_fault
  | `ClusterAlreadyExistsFault of Types.cluster_already_exists_fault
  | `ClusterQuotaForCustomerExceededFault of
    Types.cluster_quota_for_customer_exceeded_fault
  | `InsufficientClusterCapacityFault of
    Types.insufficient_cluster_capacity_fault
  | `InvalidACLStateFault of Types.invalid_acl_state_fault
  | `InvalidCredentialsException of Types.invalid_credentials_exception
  | `InvalidMultiRegionClusterStateFault of
    Types.invalid_multi_region_cluster_state_fault
  | `InvalidParameterCombinationException of
    Types.invalid_parameter_combination_exception
  | `InvalidParameterValueException of Types.invalid_parameter_value_exception
  | `InvalidVPCNetworkStateFault of Types.invalid_vpc_network_state_fault
  | `MultiRegionClusterNotFoundFault of
    Types.multi_region_cluster_not_found_fault
  | `NodeQuotaForClusterExceededFault of
    Types.node_quota_for_cluster_exceeded_fault
  | `NodeQuotaForCustomerExceededFault of
    Types.node_quota_for_customer_exceeded_fault
  | `ParameterGroupNotFoundFault of Types.parameter_group_not_found_fault
  | `ServiceLinkedRoleNotFoundFault of
    Types.service_linked_role_not_found_fault
  | `ShardsPerClusterQuotaExceededFault of
    Types.shards_per_cluster_quota_exceeded_fault
  | `SubnetGroupNotFoundFault of Types.subnet_group_not_found_fault
  | `TagQuotaPerResourceExceeded of Types.tag_quota_per_resource_exceeded ] ->
  string

val request : 
  'http_type Smaws_Lib.Context.t ->
  Types.create_cluster_request ->
  (Types.create_cluster_response,
    [> Smaws_Lib.Protocols.AwsJson.error
    | `ACLNotFoundFault of Types.acl_not_found_fault
    | `ClusterAlreadyExistsFault of Types.cluster_already_exists_fault
    | `ClusterQuotaForCustomerExceededFault of
      Types.cluster_quota_for_customer_exceeded_fault
    | `InsufficientClusterCapacityFault of
      Types.insufficient_cluster_capacity_fault
    | `InvalidACLStateFault of Types.invalid_acl_state_fault
    | `InvalidCredentialsException of Types.invalid_credentials_exception
    | `InvalidMultiRegionClusterStateFault of
      Types.invalid_multi_region_cluster_state_fault
    | `InvalidParameterCombinationException of
      Types.invalid_parameter_combination_exception
    | `InvalidParameterValueException of
      Types.invalid_parameter_value_exception
    | `InvalidVPCNetworkStateFault of Types.invalid_vpc_network_state_fault
    | `MultiRegionClusterNotFoundFault of
      Types.multi_region_cluster_not_found_fault
    | `NodeQuotaForClusterExceededFault of
      Types.node_quota_for_cluster_exceeded_fault
    | `NodeQuotaForCustomerExceededFault of
      Types.node_quota_for_customer_exceeded_fault
    | `ParameterGroupNotFoundFault of Types.parameter_group_not_found_fault
    | `ServiceLinkedRoleNotFoundFault of
      Types.service_linked_role_not_found_fault
    | `ShardsPerClusterQuotaExceededFault of
      Types.shards_per_cluster_quota_exceeded_fault
    | `SubnetGroupNotFoundFault of Types.subnet_group_not_found_fault
    | `TagQuotaPerResourceExceeded of Types.tag_quota_per_resource_exceeded ])
    Stdlib.result

val request_with_metadata : 
  'http_type Smaws_Lib.Context.t ->
  Types.create_cluster_request ->
  (Types.create_cluster_response Smaws_Lib.Response.t,
    [> Smaws_Lib.Protocols.AwsJson.error
    | `ACLNotFoundFault of Types.acl_not_found_fault
    | `ClusterAlreadyExistsFault of Types.cluster_already_exists_fault
    | `ClusterQuotaForCustomerExceededFault of
      Types.cluster_quota_for_customer_exceeded_fault
    | `InsufficientClusterCapacityFault of
      Types.insufficient_cluster_capacity_fault
    | `InvalidACLStateFault of Types.invalid_acl_state_fault
    | `InvalidCredentialsException of Types.invalid_credentials_exception
    | `InvalidMultiRegionClusterStateFault of
      Types.invalid_multi_region_cluster_state_fault
    | `InvalidParameterCombinationException of
      Types.invalid_parameter_combination_exception
    | `InvalidParameterValueException of
      Types.invalid_parameter_value_exception
    | `InvalidVPCNetworkStateFault of Types.invalid_vpc_network_state_fault
    | `MultiRegionClusterNotFoundFault of
      Types.multi_region_cluster_not_found_fault
    | `NodeQuotaForClusterExceededFault of
      Types.node_quota_for_cluster_exceeded_fault
    | `NodeQuotaForCustomerExceededFault of
      Types.node_quota_for_customer_exceeded_fault
    | `ParameterGroupNotFoundFault of Types.parameter_group_not_found_fault
    | `ServiceLinkedRoleNotFoundFault of
      Types.service_linked_role_not_found_fault
    | `ShardsPerClusterQuotaExceededFault of
      Types.shards_per_cluster_quota_exceeded_fault
    | `SubnetGroupNotFoundFault of Types.subnet_group_not_found_fault
    | `TagQuotaPerResourceExceeded of Types.tag_quota_per_resource_exceeded ]
    * Smaws_Lib.Response.metadata)
    Stdlib.result