INNER CODE UNIT · C
p
lh3/yak · 6gjdn.c:27
p = i * n + k;
q = i * n + js[k];
t = a[p];
a[p] = a[q];
a[q] = t;
}
if (is != k) {
for (j = k; j <= n - 1; j++) {
p = k * n + j;
q = is * n + j;
t = a[p];
a[p] = a[q];
a[q] = t;
}
for (j = 0; j <= m - 1; j++) {
p = k * m + j;
q = is * m + j;
t = b[p];