factor/extra/benchmark/terrain-generation/terrain-generation.factor

11 lines
310 B
Factor

! (c)Joe Groff bsd license
USING: accessors kernel math.vectors.simd terrain.generation ;
FROM: alien.c-types => float ;
IN: benchmark.terrain-generation
: terrain-generation-benchmark ( -- )
<terrain> float-4{ 0 0 0 1 } terrain-segment
dim>> { 512 512 } assert= ;
MAIN: terrain-generation-benchmark