Parent Directory | Revision Log | Patch
revision 1.12 by pam-fi, Wed Nov 8 10:12:01 2006 UTC | revision 1.13 by pam-fi, Wed Nov 8 16:42:28 2006 UTC | |
---|---|---|
# | Line 297 c$$$ if(ibest.eq.0)goto 880 !>> | Line 297 c$$$ if(ibest.eq.0)goto 880 !>> |
297 | ||
298 | iprint=0 | iprint=0 |
299 | c if(DEBUG)iprint=1 | c if(DEBUG)iprint=1 |
300 | if(.true.)iprint=1 | if(VERBOSE)iprint=1 |
301 | call mini2(jstep,ifail,iprint) | call mini2(jstep,ifail,iprint) |
302 | if(ifail.ne.0) then | if(ifail.ne.0) then |
303 | if(.true.)then | if(.true.)then |
|
ViewVC Help | |
Powered by ViewVC 1.1.23 |