/** * @license Apache-2.0 * * Copyright (c) 2020 The Stdlib Authors. * * Licensed under the Apache License, Version 2.0 (the "License"); * you may not use this file except in compliance with the License. * You may obtain a copy of the License at * * http://www.apache.org/licenses/LICENSE-2.0 * * Unless required by applicable law or agreed to in writing, software * distributed under the License is distributed on an "AS IS" BASIS, * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. * See the License for the specific language governing permissions and * limitations under the License. */ 'use strict'; // VARIABLES // var M = 3; // MAIN // /** * Interchanges two double-precision floating-point vectors. * * @param {PositiveInteger} N - number of values to swap * @param {Float64Array} x - first input array * @param {integer} strideX - `x` stride length * @param {NonNegativeInteger} offsetX - starting `x` index * @param {Float64Array} y - second input array * @param {integer} strideY - `y` stride length * @param {NonNegativeInteger} offsetY - starting `y` index * @returns {Float64Array} `y` * * @example * var Float64Array = require( '@stdlib/array/float64' ); * * var x = new Float64Array( [ 1.0, 2.0, 3.0, 4.0, 5.0 ] ); * var y = new Float64Array( [ 6.0, 7.0, 8.0, 9.0, 10.0 ] ); * * dswap( x.length, x, 1, 0, y, 1, 0 ); * // x => [ 6.0, 7.0, 8.0, 9.0, 10.0 ] * // y => [ 1.0, 2.0, 3.0, 4.0, 5.0 ] */ function dswap( N, x, strideX, offsetX, y, strideY, offsetY ) { var tmp; var ix; var iy; var m; var i; if ( N <= 0 ) { return y; } ix = offsetX; iy = offsetY; // Use unrolled loops if both strides are equal to `1`... if ( strideX === 1 && strideY === 1 ) { m = N % M; // If we have a remainder, run a clean-up loop... if ( m > 0 ) { for ( i = 0; i < m; i++ ) { tmp = x[ ix ]; x[ ix ] = y[ iy ]; y[ iy ] = tmp; ix += strideX; iy += strideY; } } if ( N < M ) { return y; } for ( i = m; i < N; i += M ) { tmp = x[ ix ]; x[ ix ] = y[ iy ]; y[ iy ] = tmp; tmp = x[ ix+1 ]; x[ ix+1 ] = y[ iy+1 ]; y[ iy+1 ] = tmp; tmp = x[ ix+2 ]; x[ ix+2 ] = y[ iy+2 ]; y[ iy+2 ] = tmp; ix += M; iy += M; } return y; } for ( i = 0; i < N; i++ ) { tmp = x[ ix ]; x[ ix ] = y[ iy ]; y[ iy ] = tmp; ix += strideX; iy += strideY; } return y; } // EXPORTS // module.exports = dswap;