Attribution

db4
Slava Pestov 2008-07-14 00:54:30 -05:00
parent 919eadc1a8
commit c23815fe52
1 changed files with 2 additions and 0 deletions

View File

@ -3,6 +3,8 @@
USING: math math.ranges math.parser sequences kernel io locals ;
IN: benchmark.beust2
! http://crazybob.org/BeustSequence.java.html
:: (count-numbers) ( remaining first value used max listener -- ? )
10 first - [| i |
[let* | digit [ i first + ]