diff options
author | Maxime Dénès <mail@maximedenes.fr> | 2017-05-02 16:04:50 +0200 |
---|---|---|
committer | Maxime Dénès <mail@maximedenes.fr> | 2017-05-02 16:04:50 +0200 |
commit | 28accc370aa2f6fafbf50b69be7ae5dc06104212 (patch) | |
tree | 7764de5a598390e9906f064170a480cfcfe0a38d /vernac/auto_ind_decl.ml | |
parent | 63503b99c46b27009e85e5c0fa9588b7424a589d (diff) | |
parent | 9a48211ea8439a8502145e508b70ede9b5929b2f (diff) |
Merge PR#582: Fix warnings
Diffstat (limited to 'vernac/auto_ind_decl.ml')
-rw-r--r-- | vernac/auto_ind_decl.ml | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/vernac/auto_ind_decl.ml b/vernac/auto_ind_decl.ml index c91dcc505..f363deac6 100644 --- a/vernac/auto_ind_decl.ml +++ b/vernac/auto_ind_decl.ml @@ -9,7 +9,6 @@ (* This file is about the automatic generation of schemes about decidable equality, created by Vincent Siles, Oct 2007 *) -open Tacmach open CErrors open Util open Pp @@ -28,8 +27,6 @@ open Proofview.Notations module RelDecl = Context.Rel.Declaration -let out_punivs = Univ.out_punivs - (**********************************************************************) (* Generic synthesis of boolean equality *) @@ -718,7 +715,6 @@ let compute_lb_goal ind lnamesparrec nparrec = ))), eff let compute_lb_tact mode lb_scheme_key ind lnamesparrec nparrec = - let open EConstr in let list_id = list_id lnamesparrec in let avoid = ref [] in let first_intros = |