(prepare-swap) ( v1 v2 -- length v1-data v1-inc v2-data v2-inc v1 v2 )


Vocabulary
math.blas.vectors.private

Inputs and outputs
v1an object
v2an object
lengthan object
v1-dataan object
v1-incan object
v2-dataan object
v2-incan object


Definition


: (prepare-swap)
( v1 v2 -- length v1-data v1-inc v2-data v2-inc v1 v2 )
[ shorter-length ] [ datas-and-incs ] [ ] 2tri ;