Files
2025-02-Numerical/lib/nr/k_and_r/recipes/slvsml.c
2025-09-12 18:55:25 +09:00

11 lines
117 B
C

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;
}