diff options
| author |  Samuel Mimram <smimram@debian.org> | 2007-08-18 20:34:57 +0000 |
|---|---|---|
| committer | Samuel Mimram <smimram@debian.org> | 2007-08-18 20:34:57 +0000 |
| commit | be2a2fda89bba47d5342b7aebc10efd97f1d68b9 (patch) | |
| tree | 45a70ccd12dc139a53b49daba9c9821ffe2fd035 /contrib/cc/ccproof.mli | |
| parent | 763b05d3e66a0c0c49bad97434d891d22c1054dc (diff) | |
| parent | 72b9a7df489ea47b3e5470741fd39f6100d31676 (diff) | |
Merge commit 'upstream/8.1.pl1+dfsg'
Diffstat (limited to 'contrib/cc/ccproof.mli')
| -rw-r--r-- | contrib/cc/ccproof.mli | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/contrib/cc/ccproof.mli b/contrib/cc/ccproof.mli index abdd6fea..572b2c53 100644 --- a/contrib/cc/ccproof.mli +++ b/contrib/cc/ccproof.mli @@ -6,26 +6,26 @@ (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -(* $Id: ccproof.mli 9151 2006-09-19 13:32:22Z corbinea $ *) +(* $Id: ccproof.mli 9856 2007-05-24 14:05:40Z corbinea $ *) open Ccalgo open Names open Term -type proof = +type rule= Ax of constr | SymAx of constr | Refl of term - | Trans of proof * proof - | Congr of proof * proof - | Inject of proof * constructor * int * int + | Trans of proof*proof + | Congr of proof*proof + | Inject of proof*constructor*int*int +and proof = + private {p_lhs:term;p_rhs:term;p_rule:rule} val build_proof : forest -> [ `Discr of int * pa_constructor * int * pa_constructor | `Prove of int * int ] -> proof -val type_proof : - (constr, (term * term)) Hashtbl.t -> proof -> term * term |