steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

remove extra short definition

db4
Doug Coleman 2008-12-06 18:41:13 -06:00
parent 45e428f186
commit 294b84b659
1 changed files with 0 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
extra/project-euler/117/117.factor
View File

@ -27,9 +27,6 @@ IN: project-euler.117
<PRIVATE <PRIVATE
: short ( seq n -- seq n )
over length min ;
: next ( seq -- ) : next ( seq -- )
[ 4 short tail* sum ] keep push ; [ 4 short tail* sum ] keep push ;