Index: /branches/eam_branches/ipp-20150625/Ohana/src/libohana/include/ohana_sort.h
===================================================================
--- /branches/eam_branches/ipp-20150625/Ohana/src/libohana/include/ohana_sort.h	(revision 38713)
+++ /branches/eam_branches/ipp-20150625/Ohana/src/libohana/include/ohana_sort.h	(revision 38714)
@@ -80,4 +80,5 @@
 void dsortfour (double *X, double *Y, double *Z, double *W, int N);
 void fsortfour (float *X, float *Y, float *Z, float *W, int N);
+void isortfour (int *X, int *Y, int *Z, int *W, int N);
 
 #endif
Index: /branches/eam_branches/ipp-20150625/Ohana/src/libohana/src/sorts.c
===================================================================
--- /branches/eam_branches/ipp-20150625/Ohana/src/libohana/src/sorts.c	(revision 38713)
+++ /branches/eam_branches/ipp-20150625/Ohana/src/libohana/src/sorts.c	(revision 38714)
@@ -167,2 +167,19 @@
 }
 
+void isortfour (int *X, int *Y, int *Z, int *W, int N) {
+
+# define SWAPFUNC(A,B){ int tmp; \
+  tmp = X[A]; X[A] = X[B]; X[B] = tmp; \
+  tmp = Y[A]; Y[A] = Y[B]; Y[B] = tmp; \
+  tmp = Z[A]; Z[A] = Z[B]; Z[B] = tmp; \
+  tmp = W[A]; W[A] = W[B]; W[B] = tmp; \
+}
+# define COMPARE(A,B)(X[A] < X[B])
+
+  OHANA_SORT (N, COMPARE, SWAPFUNC);
+
+# undef SWAPFUNC
+# undef COMPARE
+
+}
+