draft for Ford-Johnson sorting algorithm

Author: make-github-pseudonymous-again

js/dist/sort.js

@@ -1,6 +1,8 @@
-(function(exports, undefined){
+( function ( ) {
 
-	'use strict';
+'use strict' ;
+
+var definition = function ( exports , undefined ) {
 
 
 /* js/src/merge */
@@ -468,6 +470,99 @@ var __dualpivotquicksort__ = function ( partition ) {
 
 exports.__dualpivotquicksort__ = __dualpivotquicksort__;
 
+/* js/src/sort/fordjohnson.js */
+
+var fordjohnson = function ( compare , swap , a , i , j ) {
+
+	var m , k , t , y , p , q , r , x , l , w , s , pairswap ;
+
+	k = m = ( j - i ) / 2 | 0 ;
+
+	// compare pairs of elements and put largest elements at the front of the
+	// array
+
+	while ( k-- ) {
+
+		if ( compare( a[i+k] , a[i+m+k] ) < 0 ) {
+
+			swap( a , i + k , i + m + k ) ;
+
+		}
+
+	}
+
+	// sort the largest elements at the front recursively
+
+	pairswap = function ( a , i , j ) {
+		swap( a , i , j ) ;
+		swap( a , i + m , j + m ) ;
+	} ;
+
+	fordjohnson( compare , pairswap , a , i , i + m ) ;
+
+	// merge the rest of the array into the front, one item at a time
+
+	p = y = t = 1 ;
+
+	q = 0 ;
+
+	while ( i + m + t <= j ) {
+
+		r = t ;
+
+		while ( r --> q ) {
+
+			w = a[i+m+t-1] ;
+
+			x = binarysearch( compare , a , i , i + t - 1 , w ) ;
+			l = x[0] + x[1] ;
+
+			swap( a , i + m + q , i + m + t - 1 ) ;
+
+			s = i + m + t ;
+
+			while ( --s > l ) {
+
+				swap( a , s , s - 1 ) ;
+
+			}
+
+		}
+
+		q = t ;
+
+		p *= 2 ;
+		y = p - 2 * t ;
+		t += y ;
+
+	}
+
+	r = j - i - m ;
+
+	while ( r --> q ) {
+
+		w = a[i+m+t-1] ;
+
+		x = binarysearch( compare , a , i , i + t - 1 , w ) ;
+		l = x[0] + x[1] ;
+
+		swap( a , i + m + q , i + m + t - 1 ) ;
+
+		s = i + m + t ;
+
+		while ( --s > l ) {
+
+			swap( a , s , s - 1 ) ;
+
+		}
+
+	}
+
+
+} ;
+
+exports.fordjohnson = fordjohnson ;
+
 /* js/src/sort/heapsort.js */
 
 
@@ -919,4 +1014,16 @@ var whole = function ( sort ) {
 
 exports.whole = whole;
 
-})(typeof exports === 'undefined' ? this['sort'] = {} : exports);
+return exports ;
+} ;
+if ( typeof exports === "object" ) {
+	definition( exports ) ;
+}
+else if ( typeof define === "function" && define.amd ) {
+	define( "author-js-lib" , [ ] , function ( ) { return definition( { } ) ; } ) ;
+}
+else if ( typeof window === "object" && typeof window.document === "object" ) {
+	definition( window["sort"] = { } ) ;
+}
+else console.error( "unable to detect type of module to define for author-js-lib") ;
+} )( ) ;