hdiff output

r33437/OPTIM.F 2017-11-03 11:30:12.410181691 +0000 r33436/OPTIM.F 2017-11-03 11:30:12.634184653 +0000
167: 167: 
168:       IF (AMBERT .OR. NABT) CALL SET_CHECK_CHIRAL(Q,NATOMS,GOODSTRUCTURE1,CHIARRAY1)168:       IF (AMBERT .OR. NABT) CALL SET_CHECK_CHIRAL(Q,NATOMS,GOODSTRUCTURE1,CHIARRAY1)
169: 169: 
170:       IF (CHECKDT) CALL CHECKDRVTS(Q)170:       IF (CHECKDT) CALL CHECKDRVTS(Q)
171: 171: 
172:       IF ((INTCONSTRAINTT.OR.INTLJT).AND.(NCONGEOM.GE.2)) THEN172:       IF ((INTCONSTRAINTT.OR.INTLJT).AND.(NCONGEOM.GE.2)) THEN
173: !173: !
174: ! Set up all the constraints and repulsions for zero frozen atoms.174: ! Set up all the constraints and repulsions for zero frozen atoms.
175: !175: !
176:          IF (.NOT.ALLOCATED(CONI)) THEN176:          IF (.NOT.ALLOCATED(CONI)) THEN
177:             ALLOCATE(CONI(INTCONMAX),CONJ(INTCONMAX),CONDISTREF(INTCONMAX),CONCUT(INTCONMAX),CONOFFLIST(INTCONMAX),177:             ALLOCATE(CONI(INTCONMAX),CONJ(INTCONMAX),CONDISTREF(INTCONMAX),CONCUT(INTCONMAX),CONOFFLIST(INTCONMAX),CONOFFTRIED(INTCONMAX))
178:      &               CONOFFTRIED(INTCONMAX)) 
179:             CONOFFTRIED(1:INTCONMAX)=.FALSE.178:             CONOFFTRIED(1:INTCONMAX)=.FALSE.
180:             ALLOCATE(REPI(NREPMAX),REPJ(NREPMAX),NREPI(NREPMAX),NREPJ(NREPMAX),REPCUT(NREPMAX),NREPCUT(NREPMAX))179:             ALLOCATE(REPI(NREPMAX),REPJ(NREPMAX),NREPI(NREPMAX),NREPJ(NREPMAX),REPCUT(NREPMAX),NREPCUT(NREPMAX))
181:          ENDIF180:          ENDIF
182:          INTFREEZETOLSAVE=INTFREEZETOL181:          INTFREEZETOLSAVE=INTFREEZETOL
183:          INTFREEZETOL=-1.0D0182:          INTFREEZETOL=-1.0D0
184:          PRINT *,'OPTIM> NCONGEOM=',NCONGEOM183:          PRINT *,'OPTIM> NCONGEOM=',NCONGEOM
185:          CALL MAKE_CONPOT(NCONGEOM,CONGEOM) 184:          CALL MAKE_CONPOT(NCONGEOM,CONGEOM) 
186:          INTFREEZETOL=INTFREEZETOLSAVE185:          INTFREEZETOL=INTFREEZETOLSAVE
187:       ENDIF186:       ENDIF
188: 187: 


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0