hdiff output

r29877/main.F 2016-03-16 18:33:17.598896696 +0000 r29876/main.F 2016-03-16 18:33:17.810898874 +0000
111: !      END IF111: !      END IF
112: 112: 
113: ! Add the GMIN version to the output - helps bug hunting :)113: ! Add the GMIN version to the output - helps bug hunting :)
114:       !WRITE(MYUNIT, '(A,I5)') 'GMIN version r',VERSIONTEMP114:       !WRITE(MYUNIT, '(A,I5)') 'GMIN version r',VERSIONTEMP
115: !     CALL DISPLAY_VERSION(MYUNIT)115: !     CALL DISPLAY_VERSION(MYUNIT)
116:       CALL COUNTATOMS(MYUNIT, NPAR, GCBHT, GCMU, GCNATOMS)116:       CALL COUNTATOMS(MYUNIT, NPAR, GCBHT, GCMU, GCNATOMS)
117:       IF (CHRMMT) WRITE(MYUNIT,'(A,I8)') 'main> MAXAIM parameter for CHARMM MXATMS=',MXATMS117:       IF (CHRMMT) WRITE(MYUNIT,'(A,I8)') 'main> MAXAIM parameter for CHARMM MXATMS=',MXATMS
118: !118: !
119: ! NATOMS is set to NUMBER_OF_ATOMS in modcommonunit119: ! NATOMS is set to NUMBER_OF_ATOMS in modcommonunit
120: !120: !
121:       IF (MLPB3T) THEN121:       IF (MLP3T) THEN
122:          IF (NUMBER_OF_ATOMS.NE.MLPHIDDEN*(MLPIN+MLPOUT)+1) THEN 
123:             WRITE(MYUNIT,'(A,I8,A,I8)') 'main> ERROR *** number of coordinates in coords is ',NUMBER_OF_ATOMS, 
124:      &                         ' should be ',MLPHIDDEN*(MLPIN+MLPOUT) +1 
125:             STOP 
126:          ENDIF 
127:       ELSEIF (MLP3T) THEN 
128:          IF (NUMBER_OF_ATOMS.NE.MLPHIDDEN*(MLPIN+MLPOUT)) THEN122:          IF (NUMBER_OF_ATOMS.NE.MLPHIDDEN*(MLPIN+MLPOUT)) THEN
129:             WRITE(MYUNIT,'(A,I8,A,I8)') 'main> ERROR *** number of coordinates in coords is ',NUMBER_OF_ATOMS,123:             WRITE(MYUNIT,'(A,I8,A,I8)') 'main> ERROR *** number of coordinates in coords is ',NUMBER_OF_ATOMS,
130:      &                         ' should be ',MLPHIDDEN*(MLPIN+MLPOUT) 124:      &                         ' should be ',MLPHIDDEN*(MLPIN+MLPOUT) 
131:             STOP125:             STOP
132:          ENDIF126:          ENDIF
133:       ENDIF127:       ENDIF
134:       NATOMSALLOC=NUMBER_OF_ATOMS128:       NATOMSALLOC=NUMBER_OF_ATOMS
135:       NATOMS=NUMBER_OF_ATOMS129:       NATOMS=NUMBER_OF_ATOMS
136:       IF (GCBHT) THEN130:       IF (GCBHT) THEN
137:          NATOMSALLOC=GCNATOMS131:          NATOMSALLOC=GCNATOMS


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0