simd-for-bop ( array -- simd-array rest-slice/f )

Vocabulary

tensors.private

Inputs

array

an object

Outputs

simd-array	an object
rest-slice/f	an object

Definition

USING: alien.data kernel math math.vectors.simd sequences ;

IN: tensors.private

: simd-for-bop ( array -- simd-array rest-slice/f )
    dup length dup 4 mod [ drop f ] [ - cut-slice ] if-zero
    [ float-4 cast-array ] dip ; inline