aboutsummaryrefslogtreecommitdiff
path: root/tactics/term_dnet.ml
diff options
context:
space:
mode:
authorGaëtan Gilbert2019-06-13 15:39:43 +0200
committerGaëtan Gilbert2020-07-01 13:06:22 +0200
commit2ded4c25e532c5dfca0483c211653768ebed01a7 (patch)
treea04b2f787490c8971590e6bdf7dd1ec4220e0290 /tactics/term_dnet.ml
parentb017e302f69f20fc4fc3d4088a305194f6c387fa (diff)
UIP in SProp
Diffstat (limited to 'tactics/term_dnet.ml')
-rw-r--r--tactics/term_dnet.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/tactics/term_dnet.ml b/tactics/term_dnet.ml
index 553eb903fa..0f76fdda79 100644
--- a/tactics/term_dnet.ml
+++ b/tactics/term_dnet.ml
@@ -315,7 +315,7 @@ struct
meta
in
Meta meta
- | Case (ci,c1,c2,ca) ->
+ | Case (ci,c1,_iv,c2,ca) ->
Term(DCase(ci,pat_of_constr c1,pat_of_constr c2,Array.map pat_of_constr ca))
| Fix ((ia,i),(_,ta,ca)) ->
Term(DFix(ia,i,Array.map pat_of_constr ta, Array.map pat_of_constr ca))