v*hs+ ( u v -- w )

Vocabulary

math.vectors

Inputs

u	an object
v	an object

Outputs

w

an object

Definition

IN: math.vectors

GENERIC: v*hs+ ( u v -- w )

Methods

USING: cpu.architecture generic math.vectors math.vectors.simd
math.vectors.simd.intrinsics math.vectors.simd.private ;

M: char-16 v*hs+
    char-16-rep
    [ (simd-v*hs+) ] [ M\ char-16 v*hs+ (call-next-method) ]
    vv->v-op short-8-cast ; inline


USING: cpu.architecture generic math.vectors math.vectors.simd
math.vectors.simd.intrinsics math.vectors.simd.private ;

M: int-4 v*hs+
    int-4-rep
    [ (simd-v*hs+) ] [ M\ int-4 v*hs+ (call-next-method) ]
    vv->v-op longlong-2-cast ; inline


USING: kernel math math.vectors math.vectors.private sequences ;

M: object v*hs+ [ * ] 2map (h+) ; inline


USING: cpu.architecture generic math.vectors math.vectors.simd
math.vectors.simd.intrinsics math.vectors.simd.private ;

M: short-8 v*hs+
    short-8-rep
    [ (simd-v*hs+) ] [ M\ short-8 v*hs+ (call-next-method) ]
    vv->v-op int-4-cast ; inline


USING: cpu.architecture generic math.vectors math.vectors.simd
math.vectors.simd.intrinsics math.vectors.simd.private ;

M: uchar-16 v*hs+
    uchar-16-rep
    [ (simd-v*hs+) ] [ M\ uchar-16 v*hs+ (call-next-method) ]
    vv->v-op short-8-cast ; inline


USING: cpu.architecture generic math.vectors math.vectors.simd
math.vectors.simd.intrinsics math.vectors.simd.private ;

M: uint-4 v*hs+
    uint-4-rep
    [ (simd-v*hs+) ] [ M\ uint-4 v*hs+ (call-next-method) ]
    vv->v-op ulonglong-2-cast ; inline


USING: cpu.architecture generic math.vectors math.vectors.simd
math.vectors.simd.intrinsics math.vectors.simd.private ;

M: ushort-8 v*hs+
    ushort-8-rep
    [ (simd-v*hs+) ] [ M\ ushort-8 v*hs+ (call-next-method) ]
    vv->v-op uint-4-cast ; inline