hdiff output

r31509/newneb.f90 2017-01-21 10:34:36.534250000 +0000 r31508/newneb.f90 2017-01-21 10:34:36.894250000 +0000
524:                EMAX=MAXVAL(EIMAGE)524:                EMAX=MAXVAL(EIMAGE)
525:                DO J1=1,NIMAGE525:                DO J1=1,NIMAGE
526:                     IF (EMAX == EIMAGE(J1)) JMAX=J1526:                     IF (EMAX == EIMAGE(J1)) JMAX=J1
527:                ENDDO527:                ENDDO
528:                QQ = X(NOPT*(JMAX-1)+1:NOPT*JMAX)528:                QQ = X(NOPT*(JMAX-1)+1:NOPT*JMAX)
529:           ENDIF529:           ENDIF
530:           530:           
531:           CALL MYCPU_TIME(ENDTIME,.FALSE.)531:           CALL MYCPU_TIME(ENDTIME,.FALSE.)
532: 532: 
533:           WRITE(*,*) "Time to go through NEB: ", ENDTIME-STARTTIME533:           WRITE(*,*) "Time to go through NEB: ", ENDTIME-STARTTIME
 534:           STOP ! sn402: remove!
534:           NMINFOUND=0535:           NMINFOUND=0
535:           IF (TSRESET) NTSFOUND=0536:           IF (TSRESET) NTSFOUND=0
536: !537: !
537: !  Current structure precludes searching the NEB profile for538: !  Current structure precludes searching the NEB profile for
538: !  both minima and ts. Could perhaps change this. Current philosophy is539: !  both minima and ts. Could perhaps change this. Current philosophy is
539: !  that if we have persistent minima we should start the whole DNEB again540: !  that if we have persistent minima we should start the whole DNEB again
540: !  without ts searches.541: !  without ts searches.
541: !542: !
542:           IF (NPERSIST.GT.0) THEN543:           IF (NPERSIST.GT.0) THEN
543:              PTEST=.FALSE.544:              PTEST=.FALSE.


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0