Doxygen Source Code Documentation
z_cos.c
Go to the documentation of this file.00001 #include "f2c.h" 00002 00003 #ifdef KR_headers 00004 double sin(), cos(), sinh(), cosh(); 00005 VOID z_cos(r, z) doublecomplex *r, *z; 00006 #else 00007 #undef abs 00008 #include "mathh.h" 00009 void z_cos(doublecomplex *r, doublecomplex *z) 00010 #endif 00011 { 00012 r->r = cos(z->r) * cosh(z->i); 00013 r->i = - sin(z->r) * sinh(z->i); 00014 }