perlin-noise-map-coords ( dim -- coords )

Vocabulary

noise

Inputs

dim

an object

Outputs

coords

an object

Definition

USING: kernel locals.backend math.vectors.simd sequences
specialized-arrays.instances.math.vectors.simd.float-4 ;

IN: noise

MEMO: perlin-noise-map-coords ( dim -- coords )
    first2 <iota> [
        2 load-locals -1 get-local <iota> 0 get-local [
            load-local 0 get-local 0.0 0.0 float-4-boa
            1 drop-locals
        ] curry float-4-array{ } map-as 2 drop-locals
    ] with map concat ;