From 294b84b659580868c1c0f8328be6ae43940b985b Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Sat, 6 Dec 2008 18:41:13 -0600
Subject: [PATCH] remove extra short definition

---
 extra/project-euler/117/117.factor | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/extra/project-euler/117/117.factor b/extra/project-euler/117/117.factor
index 7174066227..b90a98173e 100644
--- a/extra/project-euler/117/117.factor
+++ b/extra/project-euler/117/117.factor
@@ -27,9 +27,6 @@ IN: project-euler.117
 
 <PRIVATE
 
-: short ( seq n -- seq n )
-    over length min ;
-
 : next ( seq -- )
     [ 4 short tail* sum ] keep push ;