diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-06-10 22:07:13 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2011-06-10 22:07:13 +0000 |
commit | 11425d763714cd663a5d3849f6a9367d39f38e7d (patch) | |
tree | 91d603163db744d6acf8fbbfa887763390ac93b8 /pretyping/unification.mli | |
parent | 33682f0e2ee0d99701da1703cae218b6f5f85a7f (diff) |
Moved allow_K to a unification flag
- seized the opportunity to align unification flags for functional induction to the ones of induction
- also tried to add delta in the elim_flags used in tactics.ml
- also tried to unify the rewrite flags in concl or in hyp (removed allow_K in hyps)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14186 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/unification.mli')
-rw-r--r-- | pretyping/unification.mli | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/pretyping/unification.mli b/pretyping/unification.mli index cd8e70418..0f7eec692 100644 --- a/pretyping/unification.mli +++ b/pretyping/unification.mli @@ -18,15 +18,19 @@ type unify_flags = { resolve_evars : bool; use_evars_pattern_unification : bool; modulo_betaiota : bool; - modulo_eta : bool + modulo_eta : bool; + allow_K_in_toplevel_higher_order_unification : bool } val default_unify_flags : unify_flags val default_no_delta_unify_flags : unify_flags +val elim_flags : unify_flags +val elim_no_delta_flags : unify_flags + (** The "unique" unification fonction *) val w_unify : - bool -> env -> conv_pb -> ?flags:unify_flags -> constr -> constr -> evar_map -> evar_map + env -> conv_pb -> ?flags:unify_flags -> constr -> constr -> evar_map -> evar_map (** [w_unify_to_subterm env (c,t) m] performs unification of [c] with a subterm of [t]. Constraints are added to [m] and the matched |