From 4973d554ef7bc4ffa3ee39356890dbfc5bbdf2e3 Mon Sep 17 00:00:00 2001
From: Gaëtan Gilbert
Date: Wed, 27 Mar 2019 15:43:00 +0100
Subject: Remove some [let foo = foo] in eqschemes

---
 tactics/eqschemes.ml | 5 -----
 1 file changed, 5 deletions(-)

diff --git a/tactics/eqschemes.ml b/tactics/eqschemes.ml
index 073d66e4aa..3fdd97616f 100644
--- a/tactics/eqschemes.ml
+++ b/tactics/eqschemes.ml
@@ -686,11 +686,6 @@ let build_r2l_rew_scheme dep env ind k =
   let (sigma, c) = build_case_analysis_scheme env sigma indu dep k in
     c, Evd.evar_universe_context sigma
 
-let build_l2r_rew_scheme = build_l2r_rew_scheme
-let build_l2r_forward_rew_scheme = build_l2r_forward_rew_scheme
-let build_r2l_rew_scheme = build_r2l_rew_scheme
-let build_r2l_forward_rew_scheme = build_r2l_forward_rew_scheme
-
 (**********************************************************************)
 (* Register the rewriting schemes                                     *)
 (**********************************************************************)
-- 
cgit v1.2.3