|
|
1.1 root 1: /*
2: * Evaluate the sine function.
3: */
4: #include <math.h>
5:
6: #if EMU87
7: #include "emumath.h"
8: #endif
9:
10: double
11: sin(x)
12: double x;
13: {
14: return (cos(x-PI/2.0));
15: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.