|
|
1.1 root 1: double r_atn2(x,y)
2: float *x, *y;
3: {
4: double atan2();
5: return( atan2(*x,*y) );
6: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.