splitting-benchmark ( -- )

Vocabulary

benchmark.splitting

Inputs

None

Outputs

None

Definition

USING: kernel math splitting ;

IN: benchmark.splitting

: splitting-benchmark ( -- )
    test-data 2000 [
        over [ even? ] split-when-slice drop 2dup split-slice
        drop
    ] times 2drop ;