Files
2025-02-Numerical/lib/nr/ansi/recipes/rank.c
2025-09-12 18:55:25 +09:00

8 lines
134 B
C

void rank(unsigned long n, unsigned long indx[], unsigned long irank[])
{
unsigned long j;
for (j=1;j<=n;j++) irank[indx[j]]=j;
}