|
|
1.1 root 1: /*
2: * Compute the inverse cosine function.
3: */
4: #include <math.h>
5:
6: #if EMU87
7: #include "emumath.h"
8: #endif
9:
10: double
11: acos(x)
12: double x;
13: {
14: if (x<-1.0 || x>1.0) {
15: errno = EDOM;
16: return (0.0);
17: }
18: return (PI/2.0 - asin(x));
19: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.