drygdryg/calc
1
0
Fork 0
mirror of https://github.com/lcn2/calc.git synced 2025-08-16 01:03:29 +03:00
Code Issues Packages Projects Releases Wiki Activity

rename vercos to coversin

Browse Source 
The code to compute 1 - sin(x) belongs to coversin, not vercos.
This commit is contained in:
Landon Curt Noll
2023-09-01 23:26:26 -07:00
parent b0a48a2b70
commit 7398fbb2e9
17 changed files with 93 additions and 89 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
comfunc.c
View File

@@ -1371,10 +1371,10 @@ c_versin(COMPLEX *c, NUMBER *epsilon)
*
* This uses the formula:
*
* vercos(x) = 1 - sin(x)
* coversin(x) = 1 - sin(x)
*/
COMPLEX *
c_vercos(COMPLEX *c, NUMBER *epsilon)
c_coversin(COMPLEX *c, NUMBER *epsilon)
{
COMPLEX *r; /* return COMPLEX value */
COMPLEX *ctmp; /* complex sin(c) */
@@ -1387,7 +1387,7 @@ c_vercos(COMPLEX *c, NUMBER *epsilon)
not_reached();
}
if (check_epsilon(epsilon) == false) {
math_error("Invalid epsilon value for complex vercos");
math_error("Invalid epsilon value for complex coversin");
not_reached();
}
@@ -1396,7 +1396,7 @@ c_vercos(COMPLEX *c, NUMBER *epsilon)
*/
ctmp = c_sin(c, epsilon);
if (ctmp == NULL) {
math_error("Failed to compute complex sin for complex vercos");
math_error("Failed to compute complex sin for complex coversin");
not_reached();
}
r = c_sub(&_cone_, ctmp);