hdiff output

r30055/finalio.f90 2016-03-16 18:34:29.503636067 +0000 r30054/finalio.f90 2016-03-16 18:34:29.699638085 +0000
257:               WRITE(MYUNIT,*)257:               WRITE(MYUNIT,*)
258:               ! Log prod. of frequencies is log prod. of sqrt of evals 258:               ! Log prod. of frequencies is log prod. of sqrt of evals 
259:               LOG_PROD = &259:               LOG_PROD = &
260:                    SUM(DLOG(EVALS(NUM_ZERO_EVS+1:3*NATOMS)))260:                    SUM(DLOG(EVALS(NUM_ZERO_EVS+1:3*NATOMS)))
261:               WRITE(MYUNIT,'(A,G20.10)') &261:               WRITE(MYUNIT,'(A,G20.10)') &
262:                    'finalio> Log product of non-zero eigenvalues: ', &262:                    'finalio> Log product of non-zero eigenvalues: ', &
263:                    LOG_PROD263:                    LOG_PROD
264:               CALL MYINERTIA(QMINP(J1,1:3*NATOMS),ITDET)264:               CALL MYINERTIA(QMINP(J1,1:3*NATOMS),ITDET)
265:               WRITE(MYUNIT,'(A,G20.10)') &265:               WRITE(MYUNIT,'(A,G20.10)') &
266:                    'finalio> Determinant of inertia tensor: ', ITDET266:                    'finalio> Determinant of inertia tensor: ', ITDET
267:               WRITE(MYUNIT2, '(2F20.10,I6,1X,E15.8E2)') &267:               WRITE(MYUNIT2, '(2F20.10,I6,F20.10)') &
268:                    EDUMMY, LOG_PROD, NSYMOPS, ITDET268:                    EDUMMY, LOG_PROD, NSYMOPS, ITDET
269:               !269:               !
270:            ENDIF270:            ENDIF
271:            !271:            !
272:         ELSE ! <ds656272:         ELSE ! <ds656
273:            WRITE(MYUNIT2,10) J1, QMIN(J1), FF(J1), NPCALL_QMIN(J1)273:            WRITE(MYUNIT2,10) J1, QMIN(J1), FF(J1), NPCALL_QMIN(J1)
274: 10         FORMAT('Energy of minimum ',I6,'=',G20.10, &274: 10         FORMAT('Energy of minimum ',I6,'=',G20.10, &
275:                 ' first found at step ',I8,' after ',I20,' function calls')275:                 ' first found at step ',I8,' after ',I20,' function calls')
276:         ENDIF276:         ENDIF
277:         !277:         !


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0