diff options
| author | herbelin | 2000-03-21 18:15:33 +0000 |
|---|---|---|
| committer | herbelin | 2000-03-21 18:15:33 +0000 |
| commit | ca6339f183151df339d7ba12ff5994e7519652e2 (patch) | |
| tree | d473b445a3d9138ee50c210a05e1923f4b92cb3c /tactics/equality.mli | |
| parent | b19d66b9b57eac7864d66f6083fd807c98a21a21 (diff) | |
Modification de type_of_case, type_case_branches, etc;nettoyage
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@350 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'tactics/equality.mli')
| -rw-r--r-- | tactics/equality.mli | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/tactics/equality.mli b/tactics/equality.mli index 8cb4cfe18c..ec18aa9fe4 100644 --- a/tactics/equality.mli +++ b/tactics/equality.mli @@ -31,8 +31,7 @@ val eq_pattern : marked_term val eqT_pattern : marked_term val idT_pattern : marked_term -val find_eq_pattern : constr -> constr -> constr - +val find_eq_pattern : sorts -> sorts -> constr val general_rewrite_bindings : bool -> (constr * constr substitution) -> tactic val general_rewrite : bool -> constr -> tactic @@ -80,7 +79,7 @@ type elimination_types = (* necessary_elimination [sort_of_arity] [sort_of_goal] *) -val necessary_elimination : constr -> constr -> elimination_types +val necessary_elimination : sorts -> sorts -> elimination_types val discr : identifier -> tactic val discrClause : clause -> tactic |