13 #define SWAP1(a, b, t1) \  argument
15     t1 = a; \
17     b  = t1; \
19 #define SWAP2(a, b, c, d, t1, t2) \  argument
21     t1 = a; \
23     b  = t1; \
28 #define SWAP3(a, b, c, d, e, f, t1, t2, t3) \  argument
30     t1 = a; \
32     b  = t1; \
42 #define SWAP2Data(a, b, c, d, t1, t2, siz) \  argument
44     t1 = a; \
46     b  = t1; \
68 #define TwoWayPartition1(X, pivot, t1, lo, hi, l, r) \  argument
79       SWAP1(X[l], X[r], t1); \
101 #define TwoWayPartitionReverse1(X, pivot, t1, lo, hi, l, r) \  argument
112       SWAP1(X[l], X[r], t1); \
118 #define TwoWayPartition2(X, Y, pivot, t1, t2, lo, hi, l, r) \  argument
129       SWAP2(X[l], X[r], Y[l], Y[r], t1, t2); \
135 #define TwoWayPartition3(X, Y, Z, pivot, t1, t2, t3, lo, hi, l, r) \  argument
146       SWAP3(X[l], X[r], Y[l], Y[r], Z[l], Z[r], t1, t2, t3); \
153 #define QuickSort1(FuncName, X, n, pivot, t1) \  argument
161             SWAP1(X[i], X[j], t1); \
169       TwoWayPartition1(X, pivot, t1, 0, hi, l, r); \
176 #define QuickSortReverse1(FuncName, X, n, pivot, t1) \  argument
184             SWAP1(X[i], X[j], t1); \
192       TwoWayPartitionReverse1(X, pivot, t1, 0, hi, l, r); \
198 #define QuickSort2(FuncName, X, Y, n, pivot, t1, t2) \  argument
206             SWAP2(X[i], X[j], Y[i], Y[j], t1, t2); \
214       TwoWayPartition2(X, Y, pivot, t1, t2, 0, hi, l, r); \
220 #define QuickSort3(FuncName, X, Y, Z, n, pivot, t1, t2, t3) \  argument
228             SWAP3(X[i], X[j], Y[i], Y[j], Z[i], Z[j], t1, t2, t3); \
236       TwoWayPartition3(X, Y, Z, pivot, t1, t2, t3, 0, hi, l, r); \
312   PetscInt pivot, t1, N;  in PetscSortInt()  local
317   QuickSort1(PetscSortInt, X, N, pivot, t1);  in PetscSortInt()
339   PetscCount pivot, t1;  in PetscSortInt64()  local
343   QuickSort1(PetscSortInt64, X, n, pivot, t1);  in PetscSortInt64()
365   PetscCount pivot, t1;  in PetscSortCount()  local
369   QuickSort1(PetscSortCount, X, n, pivot, t1);  in PetscSortCount()
388   PetscInt pivot, t1;  in PetscSortReverseInt()  local
392   QuickSortReverse1(PetscSortReverseInt, X, n, pivot, t1);  in PetscSortReverseInt()
692   PetscInt pivot, t1, t2;  in PetscSortIntWithArray()  local
695   QuickSort2(PetscSortIntWithArray, X, Y, n, pivot, t1, t2);  in PetscSortIntWithArray()
717   PetscInt pivot, t1, t2, t3;  in PetscSortIntWithArrayPair()  local
720   QuickSort3(PetscSortIntWithArrayPair, X, Y, Z, n, pivot, t1, t2, t3);  in PetscSortIntWithArrayPair()
741   PetscInt    pivot, t1;  in PetscSortIntWithMPIIntArray()  local
745   QuickSort2(PetscSortIntWithMPIIntArray, X, Y, n, pivot, t1, t2);  in PetscSortIntWithMPIIntArray()
766   PetscInt   pivot, t1;  in PetscSortIntWithCountArray()  local
770   QuickSort2(PetscSortIntWithCountArray, X, Y, n, pivot, t1, t2);  in PetscSortIntWithCountArray()
795   PetscInt   pivot, t1, t2; /* pivot is take from X[], so its type is still PetscInt */  in PetscSortIntWithIntCountArrayPair()  local
799   QuickSort3(PetscSortIntWithIntCountArrayPair, X, Y, Z, n, pivot, t1, t2, t3);  in PetscSortIntWithIntCountArrayPair()
846   PetscMPIInt pivot, t1;  in PetscSortMPIInt()  local
849   QuickSort1(PetscSortMPIInt, X, n, pivot, t1);  in PetscSortMPIInt()
902   PetscMPIInt pivot, t1, t2;  in PetscSortMPIIntWithArray()  local
905   QuickSort2(PetscSortMPIIntWithArray, X, Y, n, pivot, t1, t2);  in PetscSortMPIIntWithArray()
929   PetscMPIInt pivot, t1;  in PetscSortMPIIntWithIntArray()  local
933   QuickSort2(PetscSortMPIIntWithIntArray, X, Y, n, pivot, t1, t2);  in PetscSortMPIIntWithIntArray()
954   PetscInt    pivot, t1;  in PetscSortIntWithScalarArray()  local
958   QuickSort2(PetscSortIntWithScalarArray, X, Y, n, pivot, t1, t2);  in PetscSortIntWithScalarArray()
984   PetscInt   pivot, t1;  in PetscSortIntWithDataArray()  local
992           SWAP2Data(X[i], X[j], YY + size * i, YY + size * j, t1, t2, size);  in PetscSortIntWithDataArray()
1009       SWAP2Data(X[l], X[r], YY + size * l, YY + size * r, t1, t2, size);  in PetscSortIntWithDataArray()