(simd-binary) ( a b op rep -- c )

Vocabulary

math.vectors.simd.intrinsics

Inputs

a	an object
b	an object
op	an object
rep	an object

Outputs

c

an object

Definition

USING: accessors alien.c-types combinators cpu.architecture math
math.order math.vectors.simd.intrinsics.private sequences ;

IN: math.vectors.simd.intrinsics

:: (simd-binary) ( a b op rep -- c )
    op {
        {
            "shift"
            [
                rep rep-component-type heap-size 8 *
                :> width a rep byte>rep-array
                b rep signed-rep byte>rep-array
                [ width neg max width min shift ] rep
                <rep-array> 2map-as underlying>>
            ]
        }
        { "absdiff" [ a b rep [ - abs ] components-2map ] }
    } case ;