add numerical recipes library
This commit is contained in:
10
lib/nr/k_and_r/recipes/slvsml.c
Normal file
10
lib/nr/k_and_r/recipes/slvsml.c
Normal file
@@ -0,0 +1,10 @@
|
||||
|
||||
void slvsml(u,rhs)
|
||||
double **rhs,**u;
|
||||
{
|
||||
void fill0();
|
||||
double h=0.5;
|
||||
|
||||
fill0(u,3);
|
||||
u[2][2] = -h*h*rhs[2][2]/4.0;
|
||||
}
|
||||
Reference in New Issue
Block a user