hdiff output

r31983/getparams.f 2017-02-28 10:30:14.821168166 +0000 r31982/getparams.f 2017-02-28 10:30:15.077171569 +0000
255:          ENDDO255:          ENDDO
256: 211      CONTINUE256: 211      CONTINUE
257:       ELSE IF (WORD.EQ.'RINGPOLYMER') THEN257:       ELSE IF (WORD.EQ.'RINGPOLYMER') THEN
258:          RINGPOLYMERT=.TRUE.258:          RINGPOLYMERT=.TRUE.
259:          GOTO 200259:          GOTO 200
260:       ELSE IF (WORD.EQ.'VARIABLES') THEN260:       ELSE IF (WORD.EQ.'VARIABLES') THEN
261:          VARIABLES=.TRUE.261:          VARIABLES=.TRUE.
262:          GOTO 200262:          GOTO 200
263:       ELSE IF (WORD .EQ. 'AMBER12') THEN263:       ELSE IF (WORD .EQ. 'AMBER12') THEN
264:          AMBER12T = .TRUE.264:          AMBER12T = .TRUE.
265:          WRITE(OSTRING,'(A)') 'coords.inpcrd' 
266:          IF (NITEMS == 3) THEN265:          IF (NITEMS == 3) THEN
267:             CALL READA(FIRSTAMBERSTR)266:             CALL READA(FIRSTAMBERSTR)
268:             IF (FILTH2 .NE. 0) THEN267:             IF (FILTH2 .NE. 0) THEN
269:                WRITE(OTEMP, *) FILTH2268:                WRITE(OTEMP, *) FILTH2
270:                WRITE(OSTRING,'(A)') TRIM(ADJUSTL(FIRSTAMBERSTR))//'.'//TRIM(ADJUSTL(OTEMP))269:                WRITE(OSTRING,'(A)') TRIM(ADJUSTL(FIRSTAMBERSTR))//'.'//TRIM(ADJUSTL(OTEMP))
271:                WRITE(*,*) 'ostring=', OSTRING270:                WRITE(*,*) 'ostring=', OSTRING
272:             ELSE271:             ELSE
273:                WRITE(OSTRING,'(A)') TRIM(ADJUSTL(FIRSTAMBERSTR))272:                WRITE(OSTRING,'(A)') TRIM(ADJUSTL(FIRSTAMBERSTR))
274:             END IF273:             END IF
275:             CALL READA(FIRSTAMBERSTR)274:             CALL READA(FIRSTAMBERSTR)


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0