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

Update utest/test_dnrm2.c

This commit is contained in:
Evgeni Burovski 2024-03-12 15:28:50 +03:00 committed by GitHub
parent a6e16a065d
commit 07dddde1fe
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
utest/test_dnrm2.c
View File

@ -72,7 +72,7 @@ CTEST(dnrm2,dnrm2_neg_incx)
blasint n=5; blasint n=5;
double res1, res2; double res1, res2;
for (i=0;i<n;i++)x[i]=10.0 for (i=0;i<n;i++)x[i]=10.0;
res1=BLASFUNC(dnrm2)(&n, x, &incx); res1=BLASFUNC(dnrm2)(&n, x, &incx);
res2 = sqrt(500.0); res2 = sqrt(500.0);
ASSERT_DBL_NEAR_TOL(res2, res1, DOUBLE_EPS); ASSERT_DBL_NEAR_TOL(res2, res1, DOUBLE_EPS);