9 lines
109 B
C
9 lines
109 B
C
|
|
float erffc(x)
|
|
float x;
|
|
{
|
|
float gammp(),gammq();
|
|
|
|
return x < 0.0 ? 1.0+gammp(0.5,x*x) : gammq(0.5,x*x);
|
|
}
|