^reduce-number-vector ( src op rep -- dst )


Vocabulary
compiler.cfg.intrinsics.simd

Inputs
srcan object
opan object
repan object


Outputs
dstan object


Definition
USING: cpu.architecture kernel math sequences ;

IN: compiler.cfg.intrinsics.simd

:: ^reduce-number-vector ( src op rep -- dst )
rep rep-length 1 - <iota> src [| accum i |
accum src i 1 + rep ^broadcast-vector
rep op "min-element" = ^extreme-number-vector
] reduce ;