OSchip
/
OpenBLAS
Not watched
1
0
Fork 0
Code
Releases 66 Wiki evaluate Activity
Issues 0 Pull Requests 0 Datasets Model Cloudbrain HPC
Browse Source

compare agaist DBLMIN rather than a somewhat arbitrary value near it

pull/3941/head
Martin Kroeker GitHub 3 years ago
parent
8d6813ec41
commit
6052fd97a4
No known key found for this signature in database GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 1 deletions
Split View
Diff Options
Show Stats Download Patch File Download Diff File
  1. +1
    -1
      lapack/getf2/getf2_k.c

+ 1
- 1
lapack/getf2/getf2_k.c View File

@@ -100,7 +100,7 @@ blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa,
temp1 = *(b + jp);

//if (temp1 != ZERO) {
if (fabs(temp1) > 1.e-305) {
if (fabs(temp1) >= DBL_MIN
temp1 = dp1 / temp1;

if (jp != j) {


Write Preview
Loading…
Cancel
Save