hdiff output

r32251/rbperm.f90 2017-04-05 10:30:13.251539032 +0100 r32250/rbperm.f90 2017-04-05 10:30:13.503542341 +0100
122: !      print *, COORDSB122: !      print *, COORDSB
123: !      print *, 'COORDSA'123: !      print *, 'COORDSA'
124: !      print *, COORDSA124: !      print *, COORDSA
125: 125: 
126:       NRB   = (NATOMS/2)126:       NRB   = (NATOMS/2)
127:       IF (DBPTDT.OR.SANDBOXT) THEN127:       IF (DBPTDT.OR.SANDBOXT) THEN
128:          NSIZE = NTSITES128:          NSIZE = NTSITES
129:       ELSE 129:       ELSE 
130:          NSIZE = NRB*NRBSITES130:          NSIZE = NRB*NRBSITES
131:       ENDIF131:       ENDIF
132:        CMAX = 0.0D0; CMAY = 0.0D0; CMAZ = 0.0D0132: !      CMAX = 0.0D0; CMAY = 0.0D0; CMAZ = 0.0D0
133: !      DO J1 = 1, NATOMS/2133: !      DO J1 = 1, NATOMS/2
134: !         CMAX = CMAX + COORDSA(3*(J1-1)+1)134: !         CMAX = CMAX + COORDSA(3*(J1-1)+1)
135: !         CMAY = CMAY + COORDSA(3*(J1-1)+2)135: !         CMAY = CMAY + COORDSA(3*(J1-1)+2)
136: !         CMAZ = CMAZ + COORDSA(3*(J1-1)+3)136: !         CMAZ = CMAZ + COORDSA(3*(J1-1)+3)
137: !       ENDDO137: !       ENDDO
138:       CMAX = 2*CMAX/NATOMS; CMAY = 2*CMAY/NATOMS; CMAZ = 2*CMAZ/NATOMS138:       CMAX = 2*CMAX/NATOMS; CMAY = 2*CMAY/NATOMS; CMAZ = 2*CMAZ/NATOMS
139:       CMBX = 0.0D0; CMBY = 0.0D0; CMBZ = 0.0D0139:       CMBX = 0.0D0; CMBY = 0.0D0; CMBZ = 0.0D0
140:       DO J1 = 1, NATOMS/2140:       DO J1 = 1, NATOMS/2
141:          CMBX = CMBX + COORDSB(3*(J1-1)+1)141:          CMBX = CMBX + COORDSB(3*(J1-1)+1)
142:          CMBY = CMBY + COORDSB(3*(J1-1)+2)142:          CMBY = CMBY + COORDSB(3*(J1-1)+2)


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0