2map-columns ( a b quot -- c )

Vocabulary

math.matrices.simd.private

Inputs

a	an object
b	an object
quot	an object

Outputs

c

an object

Definition

USING: kernel ;

IN: math.matrices.simd.private

:: 2map-columns ( a b quot -- c )
    [
        a columns :> ( a1 a2 a3 a4 ) b columns
        :> ( b1 b2 b3 b4 ) a1 b1 quot call a2 b2 quot call
        a3 b3 quot call a4 b4 quot call
    ] make-matrix4 ; inline