xref: /original-bsd/usr.bin/f77/libF77/erf_.c (revision 0fc6f013)
1 /*
2  * Copyright (c) 1980 Regents of the University of California.
3  * All rights reserved.  The Berkeley software License Agreement
4  * specifies the terms and conditions for redistribution.
5  *
6  *	@(#)erf_.c	5.1	06/07/85
7  */
8 
9 float erf_(x)
10 float *x;
11 {
12 double erf();
13 
14 return( erf(*x) );
15 }
16