xndimri.c

来自「一些常用数值算法的 C程序源代码 对初级学数值计算很有帮助」· C语言 代码 · 共 27 行

main()
{
      float a[3],b[3],h[3],al,e,aint=0.0;
      float (*f)(int, float []);
      int n,m,key=1;

      a[1]=-1.0;
      a[2]=-1.0;
      b[1]=1.0;
      b[2]=1.0;
      n=2;
      h[1]=1.0/n;
      h[2]=h[1];
      al=1.5;
      m=15;
      e=1.0E-5;
      ndimri(n,a,b,h,al,m,e,f,&aint,key);
      Printf("Aint=  %f,    Key=  %d \n",aint,key);
}

float f[float x[], int n)
{
      flaot temp;
      temp=fabs(x[1]*x[1]+x[2]*x[2]-0.25);
      return temp;
}