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/addint.c
+++ b/lib/nr/ansi/recipes/addint.c
@@ -0,0 +1,11 @@
+
+void addint(double **uf, double **uc, double **res, int nf)
+{
+	void interp(double **uf, double **uc, int nf);
+	int i,j;
+
+	interp(res,uc,nf);
+	for (j=1;j<=nf;j++)
+		for (i=1;i<=nf;i++)
+			uf[i][j] += res[i][j];
+}