https://gcc.gnu.org/bugzilla/show_bug.cgi?id=95053
--- Comment #14 from Steve Kargl <sgk at troutmask dot apl.washington.edu> --- On Tue, May 12, 2020 at 06:43:54PM +0000, seurer at linux dot vnet.ibm.com wrote: > https://gcc.gnu.org/bugzilla/show_bug.cgi?id=95053 > > --- Comment #13 from Bill Seurer <seurer at linux dot vnet.ibm.com> --- > I don't know fortran and this appears to be part of a multi-thousand line > extremely complex function. > There is only a single division in that line of code. Can you determine what the value of cldeps is? The error message suggests that it is 0. If there is a testcase that you can run, then change the code to if (cldeps == 0) then print *, 'Whoops. cldeps = ', cldeps stop 1 else asort(nxs) = 1.0_r8-(floor(cld(i,k)/cldeps)*cldeps) end if
