15 "\ndouble Intg(double n)\n\
25 std::string
bikDecl =
"double bik(double n,double k);\n";
27 "double bik(double n,double k)\n"
29 " double nVal1 = n;\n"
30 " double nVal2 = k;\n"
35 " nVal1 = nVal1 * n;\n"
36 " nVal2 = nVal2 * k;\n"
40 " return (nVal1 / nVal2);\n"
45 "double local_coth(double n)\n"
47 " double a = exp(n);\n"
48 " double b = exp(-n);\n"
49 " double nVal = (a + b) / (a - b);\n"
55 "double local_cosh(double n)\n"
57 " double nVal = (exp(n) + exp(-n)) / 2;\n"
60 std::string
atan2Decl =
"double arctan2(double y, double x);\n";
62 "double arctan2(double y, double x)\n"
66 " double a,num,den,tmpPi;\n"
69 " if (fabs(x) >= fabs(y))\n"
77 " if(fabs(x) < fabs(y))\n"
84 " a = atan(num/den);\n"
85 " a = flag==1?a:-a;\n"
86 " a = a + (y >= 0.0 ? tmpPi : -tmpPi);\n"
std::string Math_Intg_Str
std::string local_cothDecl
std::string local_coshDecl