110478Sdlw /* 2*22886Skre * Copyright (c) 1980 Regents of the University of California. 3*22886Skre * All rights reserved. The Berkeley software License Agreement 4*22886Skre * specifies the terms and conditions for redistribution. 5*22886Skre * 6*22886Skre * @(#)derf_.c 5.1 06/07/85 710478Sdlw */ 810478Sdlw 910478Sdlw double derf_(x) 1010478Sdlw double *x; 1110478Sdlw { 1210478Sdlw double erf(); 1310478Sdlw 1410478Sdlw return( erf(*x) ); 1510478Sdlw } 16