From 0aa2544d04dbd4b6ee665b551ed165e4fb02d2fa Mon Sep 17 00:00:00 2001
From: Enrico Tassi <gareuselesinge@debian.org>
Date: Wed, 15 Jul 2015 10:36:12 +0200
Subject: Imported Upstream version 8.5~beta2+dfsg

---
 kernel/reduction.ml | 8 --------
 1 file changed, 8 deletions(-)

(limited to 'kernel/reduction.ml')

diff --git a/kernel/reduction.ml b/kernel/reduction.ml
index 4153b323..b09367dd 100644
--- a/kernel/reduction.ml
+++ b/kernel/reduction.ml
@@ -28,14 +28,6 @@ open Esubst
 
 let left2right = ref false
 
-let conv_key k =
-  match k with
-    VarKey id -> 
-    VarKey id
-  | ConstKey (cst,_) -> 
-     ConstKey cst
-  | RelKey n -> RelKey n
-		       
 let rec is_empty_stack = function
   [] -> true
   | Zupdate _::s -> is_empty_stack s
-- 
cgit v1.2.3