refactor: reduce code duplication

Author: kgryte

lib/node_modules/@stdlib/strided/base/quaternary/lib/main.js

@@ -18,6 +18,12 @@
 
 'use strict';
 
+// MODULES //
+
+var stride2offset = require( '@stdlib/strided/base/stride2offset' );
+var ndarray = require( './ndarray.js' );
+
+
 // MAIN //
 
 /**
@@ -48,71 +54,18 @@
 * // => <Float64Array>[ 4.0, 8.0, 12.0, 16.0, 20.0 ]
 */
 function quaternary( arrays, shape, strides, fcn ) {
-	var sx;
-	var sy;
-	var sz;
-	var sw;
-	var su;
-	var ix;
-	var iy;
-	var iz;
-	var iw;
-	var iu;
-	var x;
-	var y;
-	var z;
-	var w;
-	var u;
+	var offsets;
 	var N;
-	var i;
 
 	N = shape[ 0 ];
-	if ( N <= 0 ) {
-		return;
-	}
-	sx = strides[ 0 ];
-	sy = strides[ 1 ];
-	sz = strides[ 2 ];
-	sw = strides[ 3 ];
-	su = strides[ 4 ];
-	if ( sx < 0 ) {
-		ix = (1-N) * sx;
-	} else {
-		ix = 0;
-	}
-	if ( sy < 0 ) {
-		iy = (1-N) * sy;
-	} else {
-		iy = 0;
-	}
-	if ( sz < 0 ) {
-		iz = (1-N) * sz;
-	} else {
-		iz = 0;
-	}
-	if ( sw < 0 ) {
-		iw = (1-N) * sw;
-	} else {
-		iw = 0;
-	}
-	if ( su < 0 ) {
-		iu = (1-N) * su;
-	} else {
-		iu = 0;
-	}
-	x = arrays[ 0 ];
-	y = arrays[ 1 ];
-	z = arrays[ 2 ];
-	w = arrays[ 3 ];
-	u = arrays[ 4 ];
-	for ( i = 0; i < N; i++ ) {
-		u[ iu ] = fcn( x[ ix ], y[ iy ], z[ iz ], w[ iw ] );
-		ix += sx;
-		iy += sy;
-		iz += sz;
-		iw += sw;
-		iu += su;
-	}
+	offsets = [
+		stride2offset( N, strides[ 0 ] ),
+		stride2offset( N, strides[ 1 ] ),
+		stride2offset( N, strides[ 2 ] ),
+		stride2offset( N, strides[ 3 ] ),
+		stride2offset( N, strides[ 4 ] )
+	];
+	return ndarray( arrays, shape, strides, offsets, fcn );
 }