math.vectors.simd.cords: use head-slice/tail-slice to slice up input sequences for >A op so that e.g. float-4{ ... } >double-4 works
parent
ec2b8da7c7
commit
6dc9e9f108
|
@ -28,8 +28,8 @@ BOA-EFFECT [ N 2 * "n" <array> { "v" } <effect> ]
|
|||
WHERE
|
||||
|
||||
: >A ( seq -- A )
|
||||
[ N head >A/2 ]
|
||||
[ N tail >A/2 ] bi cord-append ;
|
||||
[ N head-slice >A/2 ]
|
||||
[ N tail-slice >A/2 ] bi cord-append ;
|
||||
|
||||
\ A-boa
|
||||
{ N ndip A/2-boa cord-append } { A/2-boa } >quotation prefix >quotation
|
||||
|
|
Loading…
Reference in New Issue