hdiff output

r32416/main.F 2017-04-27 18:30:13.176639461 +0100 r32415/main.F 2017-04-27 18:30:13.436642830 +0100
162: C  NFSTART is the first true frequency to use from a path.info file, and162: C  NFSTART is the first true frequency to use from a path.info file, and
163: C  NFFINISH is the last non-zero frequency to read for a minimum.163: C  NFFINISH is the last non-zero frequency to read for a minimum.
164: C  Used in getnewpath and tssearch. KAPPA is the number of non-zero 164: C  Used in getnewpath and tssearch. KAPPA is the number of non-zero 
165: C  vibrational frequencies.165: C  vibrational frequencies.
166: C166: C
167:       NFSTART=1167:       NFSTART=1
168:       NFFINISH=3*NATOMS-6168:       NFFINISH=3*NATOMS-6
169:       KAPPA=3*NATOMS-6169:       KAPPA=3*NATOMS-6
170:       NGLY=0170:       NGLY=0
171:       IF (NZEROS.GT.0) THEN171:       IF (NZEROS.GT.0) THEN
172:          IF (MLP3T.OR.MLPB3T) THEN172:          NFSTART=1
173:             NFSTART=1173:          NFFINISH=3*NATOMS-NZEROS
174:             NFFINISH=NATOMS-NZEROS174:          KAPPA=3*NATOMS-NZEROS
175: ! 
176: ! This choice for kappa just gives the additive half kT per non-zero vibrational 
177: ! frequency for the configurational part of the heat capacity. This will be the  
178: ! high T limit. 
179: ! 
180:             KAPPA=NATOMS-1 
181:          ELSE 
182:             NFSTART=1 
183:             NFFINISH=3*NATOMS-NZEROS 
184:             KAPPA=3*NATOMS-NZEROS 
185:          ENDIF 
186:          PRINT '(A,2I6)','main> start and finish for non-zero frequencies for minima set to ',NFSTART,NFFINISH175:          PRINT '(A,2I6)','main> start and finish for non-zero frequencies for minima set to ',NFSTART,NFFINISH
187:       ELSEIF (TWOD) THEN176:       ELSEIF (TWOD) THEN
188:          NFSTART=1177:          NFSTART=1
189:          NFFINISH=2*NATOMS-3178:          NFFINISH=2*NATOMS-3
190:          KAPPA=2*NATOMS-3179:          KAPPA=2*NATOMS-3
191:          IF (BULKT) THEN180:          IF (BULKT) THEN
192:             NFSTART=1181:             NFSTART=1
193:             NFFINISH=2*NATOMS-2182:             NFFINISH=2*NATOMS-2
194:             KAPPA=2*NATOMS-2183:             KAPPA=2*NATOMS-2
195:          ENDIF184:          ENDIF


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0