|
|
1.1 root 1: /*
2: * Copyright (c) 1980 Regents of the University of California.
3: * All rights reserved. The Berkeley software License Agreement
4: * specifies the terms and conditions for redistribution.
5: *
6: * @(#)r_atn2.c 5.2 7/8/85
7: */
8:
9: float r_atn2(x,y)
10: float *x, *y;
11: {
12: double atan2();
13: return( atan2(*x,*y) );
14: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.