Merge pull request #3978 from martin-frbg/fix3941

fix division-by-zero guard in zgetf2

Author: martin-frbg

lapack/getf2/zgetf2_k.c

@@ -107,7 +107,7 @@ blasint CNAME(blas_arg_t *args, BLASLONG *range_m, BLASLONG *range_n, FLOAT *sa,
       temp2 = *(b + jp * 2 + 1);
 
   //    if ((temp1 != ZERO) || (temp2 != ZERO)) {
-	if ((fabs(temp1) >= DBL_MIN) && (fabs(temp2) >= DBL_MIN)) {
+	if ((fabs(temp1) >= DBL_MIN) || (fabs(temp2) >= DBL_MIN)) {
 
 	if (jp != j) {
 	  SWAP_K(j + 1, 0, 0, ZERO, ZERO, a + j * 2, lda,