DocDB.DBCluster
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-docdb-dbcluster.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-resource-tags.html
type properties = {
storage_encrypted : bool option;
restore_to_time : string option;
engine_version : string option;
storage_type : string option;
kms_key_id : string option;
availability_zones : string list option;
snapshot_identifier : string option;
port : int option;
db_cluster_identifier : string option;
preferred_maintenance_window : string option;
db_subnet_group_name : string option;
deletion_protection : bool option;
preferred_backup_window : string option;
use_latest_restorable_time : bool option;
master_user_password : string option;
vpc_security_group_ids : string list option;
source_db_cluster_identifier : string option;
master_username : string option;
db_cluster_parameter_group_name : string option;
backup_retention_period : int option;
restore_type : string option;
enable_cloudwatch_logs_exports : string list option;
}
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-docdb-dbcluster.html;
val make_properties :
?storage_encrypted:bool ->
?restore_to_time:string ->
?engine_version:string ->
?storage_type:string ->
?kms_key_id:string ->
?availability_zones:string list ->
?snapshot_identifier:string ->
?port:int ->
?db_cluster_identifier:string ->
?preferred_maintenance_window:string ->
?db_subnet_group_name:string ->
?deletion_protection:bool ->
?preferred_backup_window:string ->
?use_latest_restorable_time:bool ->
?master_user_password:string ->
?vpc_security_group_ids:string list ->
?source_db_cluster_identifier:string ->
?master_username:string ->
?db_cluster_parameter_group_name:string ->
?copy_tags_to_snapshot:bool ->
?backup_retention_period:int ->
?restore_type:string ->
?tags:tag list ->
?enable_cloudwatch_logs_exports:string list ->
unit ->
properties
val make_tag : key:string -> value:string -> unit -> tag
val yojson_of_tag : tag -> [> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_properties :
properties ->
[> `Assoc of (string * Yojson.Safe.t) list ]
val create_attributes : string -> attributes