X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matitaB%2Fcomponents%2Fng_paramodulation%2FnCicProof.mli;fp=matitaB%2Fcomponents%2Fng_paramodulation%2FnCicProof.mli;h=5baa1053516a4e83405301ca41596d12f717d42d;hb=cacbe3c6493ddce76c4c13379ade271d8dd172e8;hp=0000000000000000000000000000000000000000;hpb=f04a064bb34aabaf91dc0c48e3b08b37ecd7b0a2;p=helm.git diff --git a/matitaB/components/ng_paramodulation/nCicProof.mli b/matitaB/components/ng_paramodulation/nCicProof.mli new file mode 100644 index 000000000..5baa10535 --- /dev/null +++ b/matitaB/components/ng_paramodulation/nCicProof.mli @@ -0,0 +1,26 @@ +(* + ||M|| This file is part of HELM, an Hypertextual, Electronic + ||A|| Library of Mathematics, developed at the Computer Science + ||T|| Department, University of Bologna, Italy. + ||I|| + ||T|| HELM is free software; you can redistribute it and/or + ||A|| modify it under the terms of the GNU General Public License + \ / version 2 or (at your option) any later version. + \ / This software is distributed as is, NO WARRANTY. + V_______________________________________________________________ *) + +(* $Id: nCic.ml 9058 2008-10-13 17:42:30Z tassi $ *) + +type eq_sig_type = Eq | EqInd_l | EqInd_r | Refl + +val set_default_sig: unit -> unit +val get_sig: eq_sig_type -> NCic.term + +val mk_proof: + #NCic.status -> + ?demod:bool + -> NCic.term Terms.bag + -> Terms.M.key + -> NCic.term Terms.substitution + -> Terms.M.key list + -> NCic.term * NCic.term (* proof, type *)