Module AppMesh.VirtualRouter

see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-appmesh-virtualrouter.html

type tag = {
  1. key : string;
  2. value : string;
}

see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-resource-tags.html

and port_mapping = {
  1. port : int;
  2. protocol : string;
}

see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualrouter-portmapping.html

and virtual_router_listener = {
  1. port_mapping : port_mapping;
}

see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualrouter-virtualrouterlistener.html

and virtual_router_spec = {
  1. listeners : virtual_router_listener list;
}

see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-appmesh-virtualrouter-virtualrouterspec.html

type properties = {
  1. mesh_name : string;
  2. virtual_router_name : string option;
  3. mesh_owner : string option;
  4. spec : virtual_router_spec;
  5. tags : tag list option;
}

see http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-resource-appmesh-virtualrouter.html;

val make_properties : mesh_name:string -> ?virtual_router_name:string -> ?mesh_owner:string -> spec:virtual_router_spec -> ?tags:tag list -> unit -> properties
val make_tag : key:string -> value:string -> unit -> tag
val make_port_mapping : port:int -> protocol:string -> unit -> port_mapping
val make_virtual_router_listener : port_mapping:port_mapping -> unit -> virtual_router_listener
val make_virtual_router_spec : listeners:virtual_router_listener list -> unit -> virtual_router_spec
val yojson_of_tag : tag -> [> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_port_mapping : port_mapping -> [> `Assoc of (string * Yojson.Safe.t) list ]
val yojson_of_virtual_router_listener : virtual_router_listener -> [> `Assoc of (string * [> `Assoc of (string * Yojson.Safe.t) list ]) list ]
val yojson_of_virtual_router_spec : virtual_router_spec -> [> `Assoc of (string * [> `List of [> `Assoc of (string * [> `Assoc of (string * Yojson.Safe.t) list ]) list ] list ]) list ]
val yojson_of_properties : properties -> [> `Assoc of (string * Yojson.Safe.t) list ]
type attributes = {
  1. ref_ : string;
  2. uid : string;
  3. mesh_name : string;
  4. virtual_router_name : string;
  5. mesh_owner : string;
  6. resource_owner : string;
  7. arn : string;
}
val create_attributes : string -> attributes
val cloudformation_type : string