floraachy
/
OpenBLAS
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Clean up ZROTG

This commit is contained in:
Martin Kroeker 2023-11-05 15:40:47 +01:00 committed by GitHub
parent f59eb5f8bc
commit 67269c4140
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
interface/zrotg.c
View File

@ -30,8 +30,8 @@ void CNAME(void *VDA, void *VDB, FLOAT *C, void *VS) {
FLOAT db_r = *(DB+0); FLOAT db_r = *(DB+0);
FLOAT db_i = *(DB+1); FLOAT db_i = *(DB+1);
//long double r; //long double r;
FLOAT *r, *S1[2]; FLOAT S1[2];
FLOAT *R=[2]; FLOAT R=[2];
long double d; long double d;
FLOAT ada = da_r * da_r + da_i * da_i; FLOAT ada = da_r * da_r + da_i * da_i;