/* * Copyright (c) 1980 Regents of the University of California. * All rights reserved. The Berkeley software License Agreement * specifies the terms and conditions for redistribution. * * @(#)d_atan.c 5.1 6/7/85 */ double d_atan(x) double *x; { double atan(); return( atan(*x) ); }