110522Sdlw /* 222950Skre * Copyright (c) 1980 Regents of the University of California. 322950Skre * All rights reserved. The Berkeley software License Agreement 422950Skre * specifies the terms and conditions for redistribution. 522950Skre * 6*23854Sjerry * @(#)r_atn2.c 5.2 07/08/85 710522Sdlw */ 810522Sdlw 9*23854Sjerry float r_atn2(x,y) 1010522Sdlw float *x, *y; 1110522Sdlw { 1210522Sdlw double atan2(); 1310522Sdlw return( atan2(*x,*y) ); 1410522Sdlw } 15