X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fparamodulation%2Finference.mli;h=30927dc72d4e7a9c3eb3836d23bdc1a0358303f1;hb=b1bad322d0daf6c25f95a82c4349f057a753ab7c;hp=f2b7073d1378314e122be29fa5143324b0521093;hpb=b6bec181b81b3cbc56ec8914dcd7e6a029c7d84f;p=helm.git diff --git a/helm/ocaml/paramodulation/inference.mli b/helm/ocaml/paramodulation/inference.mli index f2b7073d1..30927dc72 100644 --- a/helm/ocaml/paramodulation/inference.mli +++ b/helm/ocaml/paramodulation/inference.mli @@ -84,7 +84,7 @@ val find_equalities: *) val find_library_equalities: HMysql.dbd -> Cic.context -> ProofEngineTypes.status -> int -> - UriManager.UriSet.t * equality list * int + UriManager.UriSet.t * (UriManager.uri * equality) list * int (** searches the library for theorems that are not equalities (returned by the @@ -109,6 +109,11 @@ exception TermIsNotAnEquality;; *) val equality_of_term: Cic.term -> Cic.term -> equality +(** + Re-builds the term corresponding to this equality +*) +val term_of_equality: equality -> Cic.term + val term_is_equality: Cic.term -> bool (** tests a sort of alpha-convertibility between the two terms, but on the