https://gcc.gnu.org/bugzilla/show_bug.cgi?id=118580

--- Comment #5 from kargls at comcast dot net ---
(In reply to federico from comment #3)
> Sorry, I introduced a typo while editing the post. 
> Here is a slightly shorter version of the sample: 
> 

Given your track record in fortran-lang, I assumed there
was a transcription problem.

The code works if one has either

  complex(4), dimension(k,k) :: A, B
  real(4) :: eye(k, k), mx, mxB

or

  complex(8), dimension(k,k) :: A, B
  real(4) :: eye(k, k), mx, mxB

so the conversion of real(8) eye and complex(4) A seems to be a part of the
problem.

Both maxval() and abs() are in-lined, so it seems an inequality is not
evaluating as one might expect when -ffinite-math-only is not used.

Reply via email to