Added a new section on automation

[helm.git] / helm / ocaml / cic / libraryObjects.mli

diff --git a/helm/ocaml/cic/libraryObjects.mli b/helm/ocaml/cic/libraryObjects.mli
index 859b4e732daf302b55d945e955afb4d152696ed5..eca5a0d902c309f3e386c91e4f1f3e96ce76ff61 100644 (file)
--- a/helm/ocaml/cic/libraryObjects.mli
+++ b/helm/ocaml/cic/libraryObjects.mli
@@ -23,12 +23,16 @@
  * http://helm.cs.unibo.it/
  *)
 
-(*CSC: how can we choose between the two libraries? *)
-val eq_URI : UriManager.uri
+val set_default : string -> UriManager.uri list -> unit
+val reset_defaults : unit -> unit 
+
+val eq_URI : unit -> UriManager.uri
 
 val is_eq_URI : UriManager.uri -> bool
+val is_eq_ind_URI : UriManager.uri -> bool
+val is_eq_ind_r_URI : UriManager.uri -> bool
 
-exception Not_recognized;;
+exception NotRecognized;;
 
 val eq_ind_URI : eq:UriManager.uri -> UriManager.uri
 val eq_ind_r_URI : eq:UriManager.uri -> UriManager.uri
@@ -36,6 +40,7 @@ val trans_eq_URI : eq:UriManager.uri -> UriManager.uri
 val sym_eq_URI : eq:UriManager.uri -> UriManager.uri
 
 
-val false_URI : UriManager.uri
-val true_URI : UriManager.uri
-val absurd_URI : UriManager.uri
+val false_URI : unit -> UriManager.uri
+val true_URI : unit -> UriManager.uri
+val absurd_URI : unit -> UriManager.uri
+