hdiff output

r29820/minpermdist.f90 2016-01-25 10:30:11.429607202 +0000 r29819/minpermdist.f90 2016-01-25 10:30:11.617609712 +0000
218:    XBEST(1:3*NATOMS)=DUMMYA(1:3*NATOMS)218:    XBEST(1:3*NATOMS)=DUMMYA(1:3*NATOMS)
219: ELSE219: ELSE
220:    DO J1=1,NATOMS220:    DO J1=1,NATOMS
221:       XBEST(3*(J1-1)+1)=DUMMYA(3*(J1-1)+1)-CMBX221:       XBEST(3*(J1-1)+1)=DUMMYA(3*(J1-1)+1)-CMBX
222:       XBEST(3*(J1-1)+2)=DUMMYA(3*(J1-1)+2)-CMBY222:       XBEST(3*(J1-1)+2)=DUMMYA(3*(J1-1)+2)-CMBY
223:       XBEST(3*(J1-1)+3)=DUMMYA(3*(J1-1)+3)-CMBZ223:       XBEST(3*(J1-1)+3)=DUMMYA(3*(J1-1)+3)-CMBZ
224:    ENDDO224:    ENDDO
225: ENDIF225: ENDIF
226: BESTINVERT=1226: BESTINVERT=1
227: DO J1=1,NATOMS227: DO J1=1,NATOMS
228:    BESTPERM(J1)=J1228:    BESTPERM(1:NATOMS)=J1
229: ENDDO229: ENDDO
230: RMATBEST(1:3,1:3)=RMAT(1:3,1:3)230: RMATBEST(1:3,1:3)=RMAT(1:3,1:3)
231: ROTINVBBEST(1:3,1:3)=0.0D0231: ROTINVBBEST(1:3,1:3)=0.0D0
232: ROTINVBBEST(1,1)=1.0D0;ROTINVBBEST(2,2)=1.0D0;ROTINVBBEST(3,3)=1.0D0;232: ROTINVBBEST(1,1)=1.0D0;ROTINVBBEST(2,2)=1.0D0;ROTINVBBEST(3,3)=1.0D0;
233: ROTABEST(1:3,1:3)=0.0D0233: ROTABEST(1:3,1:3)=0.0D0
234: ROTABEST(1,1)=1.0D0;ROTABEST(2,2)=1.0D0;ROTABEST(3,3)=1.0D0;234: ROTABEST(1,1)=1.0D0;ROTABEST(2,2)=1.0D0;ROTABEST(3,3)=1.0D0;
235: !235: !
236: ! End of XBEST associated initialisation.236: ! End of XBEST associated initialisation.
237: ! 237: ! 
238: NROTDONE=-1238: NROTDONE=-1


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0