Files
2025-02-Numerical/lib/nr/cpp/recipes/anorm2.cpp
2025-09-12 18:55:25 +09:00

16 lines
215 B
C++

#include <cmath>
#include "nr.h"
using namespace std;
DP NR::anorm2(Mat_I_DP &a)
{
int i,j;
DP sum=0.0;
int n=a.nrows();
for (j=0;j<n;j++)
for (i=0;i<n;i++)
sum += a[i][j]*a[i][j];
return sqrt(sum)/n;
}