mt3d-usgs icon indicating copy to clipboard operation
mt3d-usgs copied to clipboard

Published 20 hours ago • verified publisher icon MODFLOW-USGS

End Loops

Open milesatstetson opened this issue 4 years ago • 1 comments

GOTO

milesatstetson avatar Oct 06 '20 20:10 milesatstetson

Looks like there are a few GOTO statements that are being used to exit loops. Took me a bit to figure out that in both cases, it was just terminating the loop early (i.e. EXIT):

mt3d-usgs.f Line 332: GOTO 110 Line 399: IF(ICNVG.EQ.1) GOTO 110

Then you also can remove line 403: " 110 CONTINUE"

milesatstetson avatar Oct 06 '20 20:10 milesatstetson