X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Fcic%2FlibraryObjects.mli;h=0cd9f2e975bb18801766fe52ac974e1c6232fedf;hb=98fa2447804cf187f88af1fbd0fa64d5666ff5f2;hp=eca5a0d902c309f3e386c91e4f1f3e96ce76ff61;hpb=7f2444c2670cadafddd8785b687ef312158376b0;p=helm.git diff --git a/components/cic/libraryObjects.mli b/components/cic/libraryObjects.mli index eca5a0d90..0cd9f2e97 100644 --- a/components/cic/libraryObjects.mli +++ b/components/cic/libraryObjects.mli @@ -26,21 +26,31 @@ val set_default : string -> UriManager.uri list -> unit val reset_defaults : unit -> unit -val eq_URI : unit -> UriManager.uri +val eq_URI : unit -> UriManager.uri option val is_eq_URI : UriManager.uri -> bool +val is_eq_refl_URI : UriManager.uri -> bool val is_eq_ind_URI : UriManager.uri -> bool val is_eq_ind_r_URI : UriManager.uri -> bool +val is_trans_eq_URI : UriManager.uri -> bool +val is_sym_eq_URI : UriManager.uri -> bool +val is_eq_f_URI : UriManager.uri -> bool +val is_eq_f_sym_URI : UriManager.uri -> bool -exception NotRecognized;; +val eq_URI_of_eq_f_URI : UriManager.uri -> UriManager.uri +exception NotRecognized of string;; + +val eq_refl_URI : eq:UriManager.uri -> UriManager.uri val eq_ind_URI : eq:UriManager.uri -> UriManager.uri val eq_ind_r_URI : eq:UriManager.uri -> UriManager.uri val trans_eq_URI : eq:UriManager.uri -> UriManager.uri val sym_eq_URI : eq:UriManager.uri -> UriManager.uri +val eq_f_URI : eq:UriManager.uri -> UriManager.uri +val eq_f_sym_URI : eq:UriManager.uri -> UriManager.uri -val false_URI : unit -> UriManager.uri -val true_URI : unit -> UriManager.uri -val absurd_URI : unit -> UriManager.uri +val false_URI : unit -> UriManager.uri option +val true_URI : unit -> UriManager.uri option +val absurd_URI : unit -> UriManager.uri option