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/cpp/recipes/reverse.cpp
+++ b/lib/nr/cpp/recipes/reverse.cpp
@@ -0,0 +1,16 @@
+#include "nr.h"
+
+void NR::reverse(Vec_IO_INT &iorder, Vec_I_INT &n)
+{
+	int nn,j,k,l,itmp;
+
+	int ncity=iorder.size();
+	nn=(1+((n[1]-n[0]+ncity) % ncity))/2;
+	for (j=0;j<nn;j++) {
+		k=(n[0]+j) % ncity;
+		l=(n[1]-j+ncity) % ncity;
+		itmp=iorder[k];
+		iorder[k]=iorder[l];
+		iorder[l]=itmp;
+	}
+}