AppMesh.VirtualServicesee http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-appmesh-virtualservice.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualnodeserviceprovider.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-resource-tags.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualrouterserviceprovider.html
and virtual_service_provider = {virtual_node : virtual_node_service_provider option;virtual_router : virtual_router_service_provider option;}see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualserviceprovider.html
see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualservice-virtualservicespec.html
type properties = {mesh_name : string;mesh_owner : string option;virtual_service_name : string;spec : virtual_service_spec;}see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-appmesh-virtualservice.html;
val make_properties :
mesh_name:string ->
?mesh_owner:string ->
virtual_service_name:string ->
spec:virtual_service_spec ->
?tags:tag list ->
unit ->
propertiesval make_virtual_node_service_provider :
virtual_node_name:string ->
unit ->
virtual_node_service_providerval make_tag : key:string -> value:string -> unit -> tagval make_virtual_router_service_provider :
virtual_router_name:string ->
unit ->
virtual_router_service_providerval make_virtual_service_provider :
?virtual_node:virtual_node_service_provider ->
?virtual_router:virtual_router_service_provider ->
unit ->
virtual_service_providerval make_virtual_service_spec :
?provider:virtual_service_provider ->
unit ->
virtual_service_specval yojson_of_virtual_node_service_provider :
virtual_node_service_provider ->
Yojson.Safe.tval yojson_of_tag : tag -> [> `Assoc of (string * Yojson.Safe.t) list ]val yojson_of_virtual_router_service_provider :
virtual_router_service_provider ->
Yojson.Safe.tval yojson_of_virtual_service_provider :
virtual_service_provider ->
Yojson.Safe.tval yojson_of_virtual_service_spec :
virtual_service_spec ->
[> `Assoc of (string * Yojson.Safe.t) list ]val yojson_of_properties :
properties ->
[> `Assoc of (string * Yojson.Safe.t) list ]val create_attributes : string -> attributes