Searched refs:OKNEWD (Results 1 – 1 of 1) sorted by relevance
| /dports/biology/mopac/mopac7-1.15/fortran/ |
| H A D | iter.f | 95 SAVE IFILL, CAMKIN, CI, OKPULY, UHF, SCF1, OKNEWD, TIMES
99 1,UHF, NEWDG, SCF1, HALFE, FORCE, PRT1EL,PRTPL, OKNEWD local
172 OKNEWD=ABS(BSHIFT) .LT. 0.001D0
802 OKNEWD=(PL.LT.SELLIM .OR. OKNEWD)
803 NEWDG=(PL.LT.TRANS .AND. OKNEWD .OR. NEWDG)
804 IF(PL.LT.TRANS*0.3333D0)OKNEWD=.TRUE.
|