hdiff output

r29301/shannon.f90 2015-11-17 23:34:53.062020987 +0000 r29300/shannon.f90 2015-11-17 23:34:53.254023560 +0000
 19: ! 19: !
 20: SUBROUTINE SHANNON 20: SUBROUTINE SHANNON
 21: USE PORFUNCS 21: USE PORFUNCS
 22: USE UTILS 22: USE UTILS
 23: USE SAVESTATE 23: USE SAVESTATE
 24: USE COMMONS, ONLY : DEBUG, KAPPA, TOTALE, TEMPERATURE, ENSEMBLE, HORDERMIN, FVIBMIN, TOTALE, NMIN, EMIN, & 24: USE COMMONS, ONLY : DEBUG, KAPPA, TOTALE, TEMPERATURE, ENSEMBLE, HORDERMIN, FVIBMIN, TOTALE, NMIN, EMIN, &
 25:   &                 SHANNONTMIN, SHANNONTMAX, SHANNONTINC, EINC, NPEQ, NMINA, NMINB, LOCATIONA, LOCATIONB, & 25:   &                 SHANNONTMIN, SHANNONTMAX, SHANNONTINC, EINC, NPEQ, NMINA, NMINB, LOCATIONA, LOCATIONB, &
 26:   &                 TSATTEMPT, MAXTS, NTS, MINGROUP, FVIBTS, HORDERTS, NEGEIG, REGROUPFREETHRESH, GPFOLD, & 26:   &                 TSATTEMPT, MAXTS, NTS, MINGROUP, FVIBTS, HORDERTS, NEGEIG, REGROUPFREETHRESH, GPFOLD, &
 27:   &                 IXMIN, IYMIN, IZMIN, POINTERP, POINTERM,  MINUS, PLUS, TOPPOINTER, KMINUS,  KPLUS, & 27:   &                 IXMIN, IYMIN, IZMIN, POINTERP, POINTERM,  MINUS, PLUS, TOPPOINTER, KMINUS,  KPLUS, &
 28:   &                 ETS, PFMIN, ZSYM, PI, PFMEAN, PFTOTALA, PFTOTALB, FRICTIONT, RATEAB, RATEBA, & 28:   &                 ETS, PFMIN, ZSYM, PI, PFMEAN, PFTOTALA, PFTOTALB, FRICTIONT, RATEAB, RATEBA, &
 29:   &                 NRATESCYCLETEMPS, RATESCYCLETEMPS, NCONNMAX, SHANNONRT, & 29:   &                 NRATESCYCLETEMPS, RATESCYCLETEMPS, NCONNMAX, SHANNONRT,
 30:   &                 SHANNONZT 30:   &                 SHANNONZT
 31: IMPLICIT NONE 31: IMPLICIT NONE
 32: INTEGER J1, LUNIT, NGMIN, NHIGHESTPEQ(NPEQ), J2, J3, J4, NSTEPS, NDUMMY, NCONNMAXSAVE 32: INTEGER J1, LUNIT, NGMIN, NHIGHESTPEQ(NPEQ), J2, J3, J4, NSTEPS, NDUMMY, NCONNMAXSAVE
 33: DOUBLE PRECISION PFNORM1, PFNORM2, BARRIER(NMIN), DUMMY, FRUSTRATION, HIGHESTPEQ(NPEQ) 33: DOUBLE PRECISION PFNORM1, PFNORM2, BARRIER(NMIN), DUMMY, FRUSTRATION, HIGHESTPEQ(NPEQ)
 34: DOUBLE PRECISION DUMMY2, RATESUM1, RATESUM2, PRENORM 34: DOUBLE PRECISION DUMMY2, RATESUM1, RATESUM2, PRENORM
 35: DOUBLE PRECISION GLOBALMIN, SENTROPY, TEMPSAVE 35: DOUBLE PRECISION GLOBALMIN, SENTROPY, TEMPSAVE
 36: DOUBLE PRECISION FRICTIONFAC, PSUM 36: DOUBLE PRECISION FRICTIONFAC, PSUM
 37: INTEGER, ALLOCATABLE :: MINMAP(:) 37: INTEGER, ALLOCATABLE :: MINMAP(:)
 38:  38: 
 39: ALLOCATE(TSATTEMPT(MAXTS)) 39: ALLOCATE(TSATTEMPT(MAXTS))


legend
Lines Added 
Lines changed
 Lines Removed

hdiff - version: 2.1.0