diff options
author | 2010-03-15 19:35:45 +0000 | |
---|---|---|
committer | 2010-03-15 19:35:45 +0000 | |
commit | 1a7466be726edfc883412ba511e2c84f0e0071fc (patch) | |
tree | c8bd5bf43173da675a5e32c1e313e43236466d64 /plugins/subtac/subtac_obligations.mli | |
parent | a28e2d94c7a0ee0c85d7f018115ffc2c64e62d5f (diff) |
Fix splitting evars tactics and stop dropping evar constraints when
building a new goal evar defs.
Allow customization of the reduction function applied to subtac
obligations.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@12867 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'plugins/subtac/subtac_obligations.mli')
-rw-r--r-- | plugins/subtac/subtac_obligations.mli | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/plugins/subtac/subtac_obligations.mli b/plugins/subtac/subtac_obligations.mli index c1e8d31c0..aed5b58b7 100644 --- a/plugins/subtac/subtac_obligations.mli +++ b/plugins/subtac/subtac_obligations.mli @@ -27,6 +27,7 @@ val add_definition : Names.identifier -> ?term:Term.constr -> Term.types -> ?implicits:(Topconstr.explicitation * (bool * bool * bool)) list -> ?kind:Decl_kinds.definition_kind -> ?tactic:Proof_type.tactic -> + ?reduce:(Term.constr -> Term.constr) -> ?hook:(Tacexpr.declaration_hook) -> obligation_info -> progress type notations = (string * Topconstr.constr_expr * Topconstr.scope_name option) list @@ -40,6 +41,7 @@ val add_mutual_definitions : (Topconstr.explicitation * (bool * bool * bool)) list * obligation_info) list -> ?tactic:Proof_type.tactic -> ?kind:Decl_kinds.definition_kind -> + ?reduce:(Term.constr -> Term.constr) -> ?hook:Tacexpr.declaration_hook -> notations -> fixpoint_kind -> unit |