Attribution
parent
919eadc1a8
commit
c23815fe52
|
@ -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 + ]
|
||||
|
|
Loading…
Reference in New Issue