xref: /csrg-svn/usr.bin/f77/libF77/d_atn2.c (revision 47940)
1*47940Sbostic /*-
2*47940Sbostic  * Copyright (c) 1980 The Regents of the University of California.
3*47940Sbostic  * All rights reserved.
422845Skre  *
5*47940Sbostic  * %sccs.include.proprietary.c%
610453Sdlw  */
710453Sdlw 
8*47940Sbostic #ifndef lint
9*47940Sbostic static char sccsid[] = "@(#)d_atn2.c	5.2 (Berkeley) 04/12/91";
10*47940Sbostic #endif /* not lint */
11*47940Sbostic 
d_atn2(x,y)1210453Sdlw double d_atn2(x,y)
1310453Sdlw double *x, *y;
1410453Sdlw {
1510453Sdlw double atan2();
1610453Sdlw return( atan2(*x,*y) );
1710453Sdlw }
18