14errf.c

来自「C语言数值算法」· C语言 代码 · 共 13 行

  #include "14gam2.c"
  double errf(x)
  double x;
  { double y;
    if (x>=0.0)
      y=gam2(0.5,x*x);
    else
      y=-gam2(0.5,x*x);
    return(y);
  }