hdiff output

r24062/mdread.f 2017-03-30 13:31:33.045350141 +0100 r24061/mdread.f 2017-03-30 13:31:33.353354231 +0100
1059:       mxgrp = 01059:       mxgrp = 0
1060:       itotst = 11060:       itotst = 1
1061:       1061:       
1062:       ! Set ITOTST to 0 if IMIN equals 1 (i.e. if minimization, not dynamics)1062:       ! Set ITOTST to 0 if IMIN equals 1 (i.e. if minimization, not dynamics)
1063:       ! This will cause any "time-averaged" requests to be over-ridden.1063:       ! This will cause any "time-averaged" requests to be over-ridden.
1064:       1064:       
1065:       if (imin == 1) then 1065:       if (imin == 1) then 
1066:          itotst = 01066:          itotst = 0
1067:       end if 1067:       end if 
1068:       !         CALL AMOPEN(31,NMR,'O','F','R')1068:       !         CALL AMOPEN(31,NMR,'O','F','R')
1069: ! csw34> Changing the unit from 5 to 1355 here to test1069:       call restlx(5,itotst,mxgrp,dt,6,ierr)
1070: ! GETUNIT in GMIN/source/utils.f should be used long term  
1071: !      call restlx(5,itotst,mxgrp,dt,6,ierr) 
1072:       call restlx(1355,itotst,mxgrp,dt,6,ierr) 
1073:       !         CLOSE(31)1070:       !         CLOSE(31)
1074:    end if1071:    end if
1075:    1072:    
1076:    ! Set the definition of the water molecule. The default definition is in1073:    ! Set the definition of the water molecule. The default definition is in
1077:    ! WATDEF(4).1074:    ! WATDEF(4).
1078:    1075:    
1079:    read(watdef(1),'(A4)') iwtnm1076:    read(watdef(1),'(A4)') iwtnm
1080:    read(watdef(2),'(A4)') iowtnm1077:    read(watdef(2),'(A4)') iowtnm
1081:    read(watdef(3),'(A4)') ihwtnm(1)1078:    read(watdef(3),'(A4)') ihwtnm(1)
1082:    read(watdef(4),'(A4)') ihwtnm(2)1079:    read(watdef(4),'(A4)') ihwtnm(2)


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0