Compare commits

..

2 commits

Author SHA1 Message Date
Arnaud Vergnet
26f16658cf use vscodium instead of vscode 2020-11-03 16:47:25 +01:00
Arnaud Vergnet
782341829c add basic tools module 2020-11-03 16:47:03 +01:00
3 changed files with 13 additions and 1 deletions

View file

@ -7,7 +7,7 @@ format:
ocp-indent --inplace src/*
edit:
code . -n
codium . -n
demo: build
@echo "\n==== EXECUTING ====\n"

7
src/tools.ml Normal file
View file

@ -0,0 +1,7 @@
(* Yes, we have to repeat open Graph. *)
open Graph
(* assert false is of type ∀α.α, so the type-checker is happy. *)
let clone_nodes gr = assert false
let gmap gr f = assert false
let add_arc gr f = assert false

5
src/tools.mli Normal file
View file

@ -0,0 +1,5 @@
open Graph
val clone_nodes: 'a graph -> 'b graph
val gmap: 'a graph -> ('a -> 'b) -> 'b graph
val add_arc: int graph -> id -> id -> int -> int graph