2ccos.c

来自「常用算法程序集(c语言描述) 第三版.rar」· C语言 代码 · 共 11 行

  #include "math.h"
  void ccos(x,y,u,v)
  double x,y,*u,*v;
  { double p,q;
    p=exp(y); q=exp(-y);
    *u=cos(x)*(p+q)/2.0; *v=-sin(x)*(p-q)/2.0;
    return;
  }