(simd-v*high) ( a b rep -- c )

Vocabulary

math.vectors.simd.intrinsics

Inputs

a	an object
b	an object
rep	an object

Outputs

c

an object

Definition

USING: alien.c-types cpu.architecture kernel math
math.vectors.simd.intrinsics.private ;

IN: math.vectors.simd.intrinsics

: (simd-v*high) ( a b rep -- c )
    dup rep-component-type heap-size -8 * [ [ * ] ] dip
    [ shift ] curry compose components-2map ;