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