|
|
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.