Closed edwardhartnett closed 1 year ago
In degrib2.F90 we have:
character(len = 90) :: tabbrev call prvtime(gfld%ipdtnum, gfld%ipdtmpl, listsec1, tabbrev)
in prvtime() the final parameter is set like this:
tabbrev(1:100) = " " So it is writing past the end of the char array passed in to prvtime.
tabbrev(1:100) = " "
Similarly the final argument to prlevel() is also 10 short of the length it is supposed to be.
In degrib2.F90 we have:
in prvtime() the final parameter is set like this:
tabbrev(1:100) = " "So it is writing past the end of the char array passed in to prvtime.Similarly the final argument to prlevel() is also 10 short of the length it is supposed to be.