diff options
| author | corbinea | 2003-11-25 12:18:36 +0000 |
|---|---|---|
| committer | corbinea | 2003-11-25 12:18:36 +0000 |
| commit | 4b0f28073b3db03d1991c680be99aedbb45de225 (patch) | |
| tree | ccec1722351608b1422eae824b856f0fcf186403 /contrib/cc/ccproof.mli | |
| parent | bc8123f6b8f81fb3f2b1e03a832263fb0c4e70e1 (diff) | |
CC: added injection theory
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4987 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/cc/ccproof.mli')
| -rw-r--r-- | contrib/cc/ccproof.mli | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/contrib/cc/ccproof.mli b/contrib/cc/ccproof.mli index 2dcb01e14a..99ed30d991 100644 --- a/contrib/cc/ccproof.mli +++ b/contrib/cc/ccproof.mli @@ -12,18 +12,23 @@ open Ccalgo type proof = Ax of Names.identifier + | SymAx of Names.identifier | Refl of term | Trans of proof * proof - | Sym of proof | Congr of proof * proof + | Inject of proof * Names.constructor * int * int val pcongr : proof * proof -> proof val ptrans : proof * proof -> proof val psym : proof -> proof val pcongr : proof * proof -> proof +val pid : string -> proof -> proof + val build_proof : UF.t -> int -> int -> proof +exception Wrong_proof of proof + val type_proof : (Names.identifier * (term * term)) list -> proof -> term * term |