aboutsummaryrefslogtreecommitdiffhomepage
path: root/tactics/inv.ml
diff options
context:
space:
mode:
authorGravatar Emilio Jesus Gallego Arias <e+git@x80.org>2018-03-10 23:41:05 +0100
committerGravatar Emilio Jesus Gallego Arias <e+git@x80.org>2018-04-02 06:54:30 +0200
commitb0fcd54d69c2f404a17f7bbcd0426c0bac0080f7 (patch)
tree57459c894491fea0d9d4b31c744bc704997dd822 /tactics/inv.ml
parentf29f8f80c8ad94576c7a36f3f638866c208338a0 (diff)
[api] Move some types to their proper module.
We solve some modularity and type duplication problems by moving types to a better place. In particular: - We move tactics types from `Misctypes` to `Tactics` as this is their proper module an single user [with LTAC]. - We deprecate aliases in `Tacexpr` to such tactic types. cc: #6512
Diffstat (limited to 'tactics/inv.ml')
-rw-r--r--tactics/inv.ml5
1 files changed, 5 insertions, 0 deletions
diff --git a/tactics/inv.ml b/tactics/inv.ml
index 067fc8941..d76c9a697 100644
--- a/tactics/inv.ml
+++ b/tactics/inv.ml
@@ -64,6 +64,11 @@ let var_occurs_in_pf gl id =
type inversion_status = Dep of constr option | NoDep
+type inversion_kind =
+ | SimpleInversion
+ | FullInversion
+ | FullInversionClear
+
let compute_eqn env sigma n i ai =
(mkRel (n-i),get_type_of env sigma (mkRel (n-i)))