OpenMathLib/OpenBLAS
1
0
Fork 0
mirror of https://github.com/OpenMathLib/OpenBLAS synced 2026-06-12 00:41:42 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

fix typo and missing declaration

Browse Source
This commit is contained in:
Martin Kroeker
2023-07-14 00:05:00 +02:00
committed by GitHub
parent 5e1103b8d7
commit 04cdf5efb4
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
interface/zrotg.c
View File

@@ -83,7 +83,7 @@ void CNAME(void *VDA, void *VDB, FLOAT *C, void *VS) {
FLOAT r;
FLOAT ada = fabs(da_r) + fabs(da_i);
FLOAT ada = fabs(db_r) + fabs(db_i);
FLOAT adb = fabs(db_r) + fabs(db_i);
PRINT_DEBUG_NAME;
@@ -99,7 +99,7 @@ void CNAME(void *VDA, void *VDB, FLOAT *C, void *VS) {
*(DA + 1) = db_i;
} else {
long double safmax = 1./safmin;
FLOAT scale;
FLOAT scale, sigma;
FLOAT aa_r, aa_i, bb_r, bb_i;
FLOAT alpha_r, alpha_i;