diff options
Diffstat (limited to 'gnu/usr.bin/gcc/f/runtime/libF77/z_cos.c')
-rw-r--r-- | gnu/usr.bin/gcc/f/runtime/libF77/z_cos.c | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/gnu/usr.bin/gcc/f/runtime/libF77/z_cos.c b/gnu/usr.bin/gcc/f/runtime/libF77/z_cos.c deleted file mode 100644 index ef02be4c38c..00000000000 --- a/gnu/usr.bin/gcc/f/runtime/libF77/z_cos.c +++ /dev/null @@ -1,14 +0,0 @@ -#include "f2c.h" - -#ifdef KR_headers -double sin(), cos(), sinh(), cosh(); -VOID z_cos(r, z) doublecomplex *r, *z; -#else -#undef abs -#include <math.h> -void z_cos(doublecomplex *r, doublecomplex *z) -#endif -{ -r->r = cos(z->r) * cosh(z->i); -r->i = - sin(z->r) * sinh(z->i); -} |