diff options
| author | letouzey | 2012-10-06 10:08:27 +0000 |
|---|---|---|
| committer | letouzey | 2012-10-06 10:08:27 +0000 |
| commit | 4a8188a2b460ab014379c508abac933690b48555 (patch) | |
| tree | 5e80d9c7f9b15d9fc3143f42fd0f61e8e1c3da09 /proofs/proof_type.mli | |
| parent | 8e10368c387570df13904531bfba05130335ed0e (diff) | |
Clean-up : no more Proof_type.proof_tree
Btw, remove unused code in the xml plugin and in Tactic_printer
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15863 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs/proof_type.mli')
| -rw-r--r-- | proofs/proof_type.mli | 16 |
1 files changed, 1 insertions, 15 deletions
diff --git a/proofs/proof_type.mli b/proofs/proof_type.mli index d6081e56c3..832377e316 100644 --- a/proofs/proof_type.mli +++ b/proofs/proof_type.mli @@ -66,21 +66,7 @@ type prim_rule = in the type of evar] \} \} \} v} *) -(** {6 ... } *) -(** Proof trees. - [ref] = [None] if the goal has still to be proved, - and [Some (r,l)] if the rule [r] was applied to the goal - and gave [l] as subproofs to be completed. - if [ref = (Some(Nested(Tactic t,p),l))] then [p] is the proof - that the goal can be proven if the goals in [l] are solved. *) -type proof_tree = { - goal : goal; - ref : (rule * proof_tree list) option } - -and rule = - | Prim of prim_rule - | Decl_proof of bool - | Daimon +type rule = Prim of prim_rule type compound_rule= (** the boolean of Tactic tells if the default tactic is used *) |