Module Kappa_site_graphs.User_graph

type cc_port = {
  1. port_states : string list option;
    (*

    None means WHATEVER

    *)
}
type site =
  1. | Port of cc_port
  2. | Counter of int
type cc_site = {
  1. site_name : string;
  2. site_type : site;
}
type cc_node = {
  1. node_type : string;
  2. node_id : int option;
  3. node_sites : cc_site array;
}
type connected_component = cc_node option array array
val print_cc : Stdlib.Format.formatter -> connected_component -> unit
val print_dot_cc : int -> Stdlib.Format.formatter -> connected_component -> unit
val write_connected_component : Stdlib.Buffer.t -> connected_component -> unit

Output a JSON value of type connected_component.

val string_of_connected_component : ?len:int -> connected_component -> string

Serialize a value of type connected_component into a JSON string.

  • parameter len

    specifies the initial length of the buffer used internally. Default: 1024.

val read_connected_component : Yojson.Safe.lexer_state -> Stdlib.Lexing.lexbuf -> connected_component

Input JSON data of type connected_component.

val connected_component_of_string : string -> connected_component

Deserialize JSON data of type connected_component.