hdiff output

r22233/amberinterface.f 2016-07-06 15:30:56.239446783 +0100 r22232/amberinterface.f 2016-07-06 15:30:57.027457443 +0100
  1: SUBROUTINE AMBERINTERFACE(natoms,ncalls,inpcrd1,MYUNIT)  1: SUBROUTINE AMBERINTERFACE(natoms,ncalls,inpcrd1,MYUNIT)
  2:   use modamber9  2:   use modamber9
  3: !  use commons, only : zsym  3: !  use commons, only : zsym
  4: ! ss2029> 02062011: added 'use commons, only : MPIT'    4: ! ss2029> 02062011: added 'use commons, only : MPIT'  
  5:   use commons, only : MPIT   5:   use commons 
  6: ! : MPIT  6: ! : MPIT
  7:   use genborn  7:   use genborn
  8:   use decomp, only : allocate_int_decomp, allocate_real_decomp, &  8:   use decomp, only : allocate_int_decomp, allocate_real_decomp, &
  9:                      deallocate_int_decomp, deallocate_real_decomp  9:                      deallocate_int_decomp, deallocate_real_decomp
 10:   use stack 10:   use stack
 11:   use nblist, only:cutoffnb,skinnb,nblist_allocate,nblist_deallocate, & 11:   use nblist, only:cutoffnb,skinnb,nblist_allocate,nblist_deallocate, &
 12:                     nblist_allreal,nblist_allint, num_calls_nblist, first_list_flag 12:                     nblist_allreal,nblist_allint, num_calls_nblist, first_list_flag
 13:   use amoeba_interface, only:  & 13:   use amoeba_interface, only:  &
 14:                              AMOEBA_deallocate,AMOEBA_readparm 14:                              AMOEBA_deallocate,AMOEBA_readparm
 15:   use amoeba_runmd, only : AM_RUNMD_get_coords,AM_RUNMD 15:   use amoeba_runmd, only : AM_RUNMD_get_coords,AM_RUNMD


r22233/commons.f90 2016-07-06 15:30:56.639452194 +0100 r22232/commons.f90 2016-07-06 15:30:57.907469349 +0100
 14: !    14: !   
 15: !   You should have received a copy of the GNU General Public License 15: !   You should have received a copy of the GNU General Public License
 16: !   along with this program; if not, write to the Free Software 16: !   along with this program; if not, write to the Free Software
 17: !   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA 17: !   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 18: ! 18: !
 19: MODULE COMMONS 19: MODULE COMMONS
 20:       IMPLICIT NONE 20:       IMPLICIT NONE
 21:  21: 
 22:       INTEGER :: NATOMS, ISTATUS, NUNIQUE, NOPT, IPRNT, INR, IVEC, IVEC2, ISTCRT, NMOL, NINTS, NRBSITES 22:       INTEGER :: NATOMS, ISTATUS, NUNIQUE, NOPT, IPRNT, INR, IVEC, IVEC2, ISTCRT, NMOL, NINTS, NRBSITES
 23:       DOUBLE PRECISION :: ZSTAR, RHO, PARAM1=0.0D0, PARAM2, PARAM3, PARAM4, PARAM5, PARAM6, PARAM7, EVDISTTHRESH, NEWRES_TEMP 23:       DOUBLE PRECISION :: ZSTAR, RHO, PARAM1=0.0D0, PARAM2, PARAM3, PARAM4, PARAM5, PARAM6, PARAM7, EVDISTTHRESH, NEWRES_TEMP
 24:       LOGICAL REDOPATH, REDOPATHXYZ, RATIOS, REDOPATHNEB, MPIT 24:       LOGICAL REDOPATH, REDOPATHXYZ, RATIOS, REDOPATHNEB
 25:  25: 
 26:       INTEGER, ALLOCATABLE, DIMENSION(:) :: NR, IATNUM      !   MXATMS 26:       INTEGER, ALLOCATABLE, DIMENSION(:) :: NR, IATNUM      !   MXATMS
 27:       DOUBLE PRECISION, ALLOCATABLE, DIMENSION(:) :: ATMASS !   MXATMS 27:       DOUBLE PRECISION, ALLOCATABLE, DIMENSION(:) :: ATMASS !   MXATMS
 28:       DOUBLE PRECISION, ALLOCATABLE, DIMENSION(:) :: STPMAX ! 3*MXATMS 28:       DOUBLE PRECISION, ALLOCATABLE, DIMENSION(:) :: STPMAX ! 3*MXATMS
 29:       CHARACTER(LEN=5), ALLOCATABLE, DIMENSION(:) :: ZSYM   !   MXATMS 29:       CHARACTER(LEN=5), ALLOCATABLE, DIMENSION(:) :: ZSYM   !   MXATMS
 30:       DOUBLE PRECISION, ALLOCATABLE :: TAGFAC(:) 30:       DOUBLE PRECISION, ALLOCATABLE :: TAGFAC(:)
 31:       DOUBLE PRECISION, ALLOCATABLE :: RBSITE(:,:), RBSTLA(:,:), STCHRG(:), DPMU(:) 31:       DOUBLE PRECISION, ALLOCATABLE :: RBSITE(:,:), RBSTLA(:,:), STCHRG(:), DPMU(:)
 32:       INTEGER, ALLOCATABLE :: TAGNUM(:) 32:       INTEGER, ALLOCATABLE :: TAGNUM(:)
 33:       INTEGER NTAG 33:       INTEGER NTAG
 34:       LOGICAL TAGT, CHANGE_TEMP 34:       LOGICAL TAGT, CHANGE_TEMP


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0