run-raytracer ( -- string )

Vocabulary

benchmark.raytracer

Inputs

None

Outputs

string

an object

Definition

USING: make math sequences
specialized-arrays.instances.alien.c-types.double ;

IN: benchmark.raytracer

: run-raytracer ( -- string )
    levels double-array{ 0.0 -1.0 0.0 } 1.0 create ray-trace [
        size size pgm-header
        [ [ oversampling sq / pgm-pixel ] each ] each
    ] B{ } make ;