add numerical recipes library

2025-09-12 18:55:25 +09:00
parent d4dff245bd
commit 2c75620ec9
1344 changed files with 63869 additions and 0 deletions
--- a/lib/nr/ansi/recipes/rank.c
+++ b/lib/nr/ansi/recipes/rank.c
@@ -0,0 +1,7 @@
+
+void rank(unsigned long n, unsigned long indx[], unsigned long irank[])
+{
+	unsigned long j;
+
+	for (j=1;j<=n;j++) irank[indx[j]]=j;
+}