DO L = LBB,IGENRL1(NLEV)
if(L==-1) print*, K,L
The DO variable LBB>=1, so the “if” statement is useless, and the code runs fine.
Without this line the code crashes, however.
Sounds like an optimization issue, though, we’ll need a reproducing example to tell what’s wrong. If you can’t create a small example to post, can you send the full source to PGI Customer Support (email@example.com).
The code is large. The test case data + the code folder is about 250mb.
Do you have a secure way to transfer files?
You can let me know via my email: firstname.lastname@example.org
I will have to describe the procedure to reproduce the error, if you need.
I sent a note to our Customer Support ask that they send you instructions on accessing our FTP server.