Lines Matching full:perm
49 Aint* perm;
62 perm = calloc(n, sizeof(*perm ));
83 for( i=1 ; i<n ; ++i ) { /* perm = perm1 */
84 perm[i] = perm1[i];
86 k = perm1[0]; /* cache perm[0] in k */
90 XCH(perm[i], perm[j])
94 * Now exchange k (caching perm[0]) and perm[k]... with care!
95 * XCH(k, perm[k]) does NOT work!
97 j=perm[k]; perm[k]=k ; k=j;
108 /* rotate down perm[0..r] by one */
