1*10483Sdlw /* 2*10483Sdlw * "@(#)erfc_.c 1.1" 3*10483Sdlw */ 4*10483Sdlw 5*10483Sdlw float erfc_(x) 6*10483Sdlw float *x; 7*10483Sdlw { 8*10483Sdlw double erfc(); 9*10483Sdlw 10*10483Sdlw return( erfc(*x) ); 11*10483Sdlw } 12