add numerical recipes library
This commit is contained in:
19
lib/nr/ansi/recipes/piksr2.c
Normal file
19
lib/nr/ansi/recipes/piksr2.c
Normal file
@@ -0,0 +1,19 @@
|
||||
|
||||
void piksr2(int n, float arr[], float brr[])
|
||||
{
|
||||
int i,j;
|
||||
float a,b;
|
||||
|
||||
for (j=2;j<=n;j++) {
|
||||
a=arr[j];
|
||||
b=brr[j];
|
||||
i=j-1;
|
||||
while (i > 0 && arr[i] > a) {
|
||||
arr[i+1]=arr[i];
|
||||
brr[i+1]=brr[i];
|
||||
i--;
|
||||
}
|
||||
arr[i+1]=a;
|
||||
brr[i+1]=b;
|
||||
}
|
||||
}
|
||||
Reference in New Issue
Block a user