hdiff output

r30662/SBM.f 2016-07-06 15:38:12.893351767 +0100 r30661/SBM.f 2016-07-06 15:38:13.217356146 +0100
778:       USE KEY778:       USE KEY
779:       implicit NONE779:       implicit NONE
780:       integer I, N, J, AN, NATOMS780:       integer I, N, J, AN, NATOMS
781: 781: 
782: 782: 
783:       DOUBLE PRECISION x(NATOMS), y(NATOMS), z(NATOMS),783:       DOUBLE PRECISION x(NATOMS), y(NATOMS), z(NATOMS),
784:      Q grad(3*NATOMS), gradOMP(3*NATOMS), energy,STT,SA,SB,SC784:      Q grad(3*NATOMS), gradOMP(3*NATOMS), energy,STT,SA,SB,SC
785: 785: 
786:       integer C1, C2, ii,jj,kk,k,l,iii,jjj786:       integer C1, C2, ii,jj,kk,k,l,iii,jjj
787:       DOUBLE PRECISION  r2, rm2, rm14, f_over_r, NCswitch,NCcut 787:       DOUBLE PRECISION  r2, rm2, rm14, f_over_r, NCswitch,NCcut 
788:         INTEGER NTHREADS788: 
789: !$    INTEGER  OMP_GET_NUM_THREADS,789: !$    INTEGER NTHREADS, OMP_GET_NUM_THREADS,
790: !$   Q  OMP_GET_THREAD_NUM,OMP_NUM_THREADS790: !$   Q  OMP_GET_THREAD_NUM,OMP_NUM_THREADS
791: 791: 
792:         INTEGER NNCinc(NATOMS,NATOMS)792:         INTEGER NNCinc(NATOMS,NATOMS)
793:         DOUBLE PRECISION dx,dy,dz793:         DOUBLE PRECISION dx,dy,dz
794:         integer tempN, alpha794:         integer tempN, alpha
795:         double precision Rdiff,Vfunc,Ffunc795:         double precision Rdiff,Vfunc,Ffunc
796:         double precision Rcut2,Rswitch2796:         double precision Rcut2,Rswitch2
797:         ! Ngrid is the number of atoms in that grid point797:         ! Ngrid is the number of atoms in that grid point
798:         ! grid is the array of atoms in each grid798:         ! grid is the array of atoms in each grid
799:         integer Ngrid,grid,maxgrid,maxpergrid799:         integer Ngrid,grid,maxgrid,maxpergrid


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0