ack/lang/fortran/lib/libF77/erfc_.c
1991-10-07 16:59:33 +00:00

10 lines
83 B
C

#include "f2c.h"
double erfc_(x)
real *x;
{
double erfc();
return( erfc(*x) );
}