110452Sdlw /* 2*22843Skre * Copyright (c) 1980 Regents of the University of California. 3*22843Skre * All rights reserved. The Berkeley software License Agreement 4*22843Skre * specifies the terms and conditions for redistribution. 5*22843Skre * 6*22843Skre * @(#)d_atan.c 5.1 06/07/85 710452Sdlw */ 810452Sdlw 910452Sdlw double d_atan(x) 1010452Sdlw double *x; 1110452Sdlw { 1210452Sdlw double atan(); 1310452Sdlw return( atan(*x) ); 1410452Sdlw } 15