Tweak to reduce the number of bad candidates.

This commit is contained in:
Steve Franke 2019-06-19 09:07:08 -05:00
parent efb01d014d
commit c68679bd10
1 changed files with 1 additions and 1 deletions

View File

@ -282,7 +282,7 @@ contains
call timer('sync4d ',1)
enddo
if(iseg.eq.1) smax1=smax
if(smax.lt.0.7) cycle
if(smax.lt.1.2) cycle
if(iseg.gt.1 .and. smax.lt.smax1) cycle
f1=f0+real(idfbest)
if( f1.le.10.0 .or. f1.ge.4990.0 ) cycle