16 lines
No EOL
305 B
OCaml
16 lines
No EOL
305 B
OCaml
open Graph
|
|
open Gfile
|
|
open Tools
|
|
|
|
val fst3 : ('a * 'b * 'c) -> 'a
|
|
|
|
val snd3 : ('a * 'b * 'c) -> 'b
|
|
|
|
val thrd3 : ('a * 'b * 'c) -> 'c
|
|
|
|
val buildGraph : (string * int * int) list -> int graph
|
|
|
|
val getMaximumNodeId : 'a graph -> int
|
|
|
|
|
|
val addChildren : (id * string * int list) list -> int graph -> int graph |