Symbol Description Uses
Rj differences at i-1,i,i+1 119



File Line number Procedure Code
./verification/matrix_example/code/gad_dst3_adv_y.F 39 GAD_DST3_ADV_Y
      _RL Rjm,Rj,Rjp,cfl,d0,d1
./verification/matrix_example/code/gad_dst3_adv_y.F 59 GAD_DST3_ADV_Y
        Rj =(tracer(i, j )-tracer(i,j-1))*maskLocS(i, j )
./verification/matrix_example/code/gad_dst3_adv_y.F 71 GAD_DST3_ADV_Y
          IF ( ABS(Rj).LT.smallNo .OR.
./verification/matrix_example/code/gad_dst3_adv_y.F 76 GAD_DST3_ADV_Y
           thetaP=(Rjm+smallNo)/(smallNo+Rj)
./verification/matrix_example/code/gad_dst3_adv_y.F 79 GAD_DST3_ADV_Y
          IF ( ABS(Rj).LT.smallNo .OR.
./verification/matrix_example/code/gad_dst3_adv_y.F 84 GAD_DST3_ADV_Y
           thetaM=(Rjp+smallNo)/(smallNo+Rj)
./verification/matrix_example/code/gad_dst3_adv_y.F 89 GAD_DST3_ADV_Y
     &        *( Tracer(i,j-1) + psiP*Rj )
./verification/matrix_example/code/gad_dst3_adv_y.F 91 GAD_DST3_ADV_Y
     &        *( Tracer(i, j ) - psiM*Rj )
./verification/matrix_example/code/gad_dst3_adv_y.F 96 GAD_DST3_ADV_Y
     &        *( Tracer(i,j-1) + (d0*Rj+d1*Rjm) )
./verification/matrix_example/code/gad_dst3_adv_y.F 98 GAD_DST3_ADV_Y
     &        *( Tracer(i, j ) - (d0*Rj+d1*Rjp) )
./verification/matrix_example/code/gad_dst3_adv_x.F 39 GAD_DST3_ADV_X
      _RL Rjm,Rj,Rjp,cfl,d0,d1
./verification/matrix_example/code/gad_dst3_adv_x.F 57 GAD_DST3_ADV_X
        Rj =(tracer( i ,j)-tracer(i-1,j))*maskLocW( i ,j)
./verification/matrix_example/code/gad_dst3_adv_x.F 69 GAD_DST3_ADV_X
          IF ( ABS(Rj).LT.smallNo .OR.
./verification/matrix_example/code/gad_dst3_adv_x.F 74 GAD_DST3_ADV_X
           thetaP=(Rjm+smallNo)/(smallNo+Rj)
./verification/matrix_example/code/gad_dst3_adv_x.F 77 GAD_DST3_ADV_X
          IF ( ABS(Rj).LT.smallNo .OR.
./verification/matrix_example/code/gad_dst3_adv_x.F 82 GAD_DST3_ADV_X
           thetaM=(Rjp+smallNo)/(smallNo+Rj)
./verification/matrix_example/code/gad_dst3_adv_x.F 87 GAD_DST3_ADV_X
     &        *( Tracer(i-1,j) + psiP*Rj )
./verification/matrix_example/code/gad_dst3_adv_x.F 89 GAD_DST3_ADV_X
     &        *( Tracer( i ,j) - psiM*Rj )
./verification/matrix_example/code/gad_dst3_adv_x.F 94 GAD_DST3_ADV_X
     &        *( Tracer(i-1,j) + (d0*Rj+d1*Rjm) )
./verification/matrix_example/code/gad_dst3_adv_x.F 96 GAD_DST3_ADV_X
     &        *( Tracer( i ,j) - (d0*Rj+d1*Rjp) )
./verification/matrix_example/code/gad_dst3_adv_r.F 102 GAD_DST3_ADV_R
     &        *( Tracer(i,j, k ,bi,bj) + psiM*Rj )
./verification/matrix_example/code/gad_dst3_adv_r.F 104 GAD_DST3_ADV_R
     &        *( Tracer(i,j,km1,bi,bj) - psiP*Rj )
./verification/matrix_example/code/gad_dst3_adv_r.F 109 GAD_DST3_ADV_R
     &        *( Tracer(i,j, k ,bi,bj) + (d0*Rj+d1*Rjp) )
./verification/matrix_example/code/gad_dst3_adv_r.F 111 GAD_DST3_ADV_R
     &        *( Tracer(i,j,km1,bi,bj) - (d0*Rj+d1*Rjm) )
./verification/matrix_example/code/gad_dst3_adv_r.F 38 GAD_DST3_ADV_R
      _RL Rjm,Rj,Rjp,cfl,d0,d1
./verification/matrix_example/code/gad_dst3_adv_r.F 71 GAD_DST3_ADV_R
        Rj =(tracer(i,j,km1,bi,bj)-tracer(i,j,k,bi,bj))
./verification/matrix_example/code/gad_dst3_adv_r.F 84 GAD_DST3_ADV_R
          IF ( ABS(Rj).LT.smallNo .OR.
./verification/matrix_example/code/gad_dst3_adv_r.F 89 GAD_DST3_ADV_R
           thetaP=(Rjm+smallNo)/(smallNo+Rj)
./verification/matrix_example/code/gad_dst3_adv_r.F 92 GAD_DST3_ADV_R
          IF ( ABS(Rj).LT.smallNo .OR.
./verification/matrix_example/code/gad_dst3_adv_r.F 97 GAD_DST3_ADV_R
           thetaM=(Rjp+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F 60 GAD_FLUXLIMIT_ADV_X
      _RL Cr,Rjm,Rj,Rjp
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F 76 GAD_FLUXLIMIT_ADV_X
        Rj =(tracer( i ,j)-tracer(i-1,j))*maskLocW( i ,j)
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F 79 GAD_FLUXLIMIT_ADV_X
        IF (Rj.NE.0.) THEN
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F 81 GAD_FLUXLIMIT_ADV_X
           Cr=Rjm/Rj
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F 83 GAD_FLUXLIMIT_ADV_X
           Cr=Rjp/Rj
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F 99 GAD_FLUXLIMIT_ADV_X
     &        )*Rj
./pkg/generic_advdiff/gad_c4_adv_y.F 53 GAD_C4_ADV_Y
      _RL Rjm,Rj,Rjp,Rjjm,Rjjp
./pkg/generic_advdiff/gad_c4_adv_y.F 65 GAD_C4_ADV_Y
        Rj =(tracer(i,j)-tracer(i,j-1))
./pkg/generic_advdiff/gad_c4_adv_y.F 69 GAD_C4_ADV_Y
        Rjjp=(Rjp-Rj)
./pkg/generic_advdiff/gad_c4_adv_y.F 70 GAD_C4_ADV_Y
        Rjjm=(Rj-Rjm)
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 65 GAD_FLUXLIMIT_IMPL_R
      _RL Cr,Rjm,Rj,Rjp, w_CFL
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 87 GAD_FLUXLIMIT_IMPL_R
         Rj =(tFld(i,j,k)  -tFld(i,j,km1))
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 90 GAD_FLUXLIMIT_IMPL_R
         IF ( Rj.NE.0. _d 0) THEN
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 92 GAD_FLUXLIMIT_IMPL_R
            Cr=Rjm/Rj
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 94 GAD_FLUXLIMIT_IMPL_R
            Cr=Rjp/Rj
./pkg/generic_advdiff/gad_c4_adv_x.F 53 GAD_C4_ADV_X
      _RL Rjm,Rj,Rjp,Rjjm,Rjjp
./pkg/generic_advdiff/gad_c4_adv_x.F 63 GAD_C4_ADV_X
        Rj =(tracer(i,j)-tracer(i-1,j))
./pkg/generic_advdiff/gad_c4_adv_x.F 67 GAD_C4_ADV_X
        Rjjp=(Rjp-Rj)
./pkg/generic_advdiff/gad_c4_adv_x.F 68 GAD_C4_ADV_X
        Rjjm=(Rj-Rjm)
./pkg/generic_advdiff/gad_c4_adv_r.F 57 GAD_C4_ADV_R
      _RL Rjm,Rj,Rjp,Rjjm,Rjjp
./pkg/generic_advdiff/gad_c4_adv_r.F 79 GAD_C4_ADV_R
         Rj =(tracer(i,j,k,bi,bj)-tracer(i,j,km1,bi,bj))
./pkg/generic_advdiff/gad_c4_adv_r.F 82 GAD_C4_ADV_R
         Rjjp=(Rjp-Rj)
./pkg/generic_advdiff/gad_c4_adv_r.F 83 GAD_C4_ADV_R
         Rjjm=(Rj-Rjm)
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F 101 GAD_FLUXLIMIT_ADV_Y
     &        )*Rj
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F 60 GAD_FLUXLIMIT_ADV_Y
      _RL Cr,Rjm,Rj,Rjp
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F 78 GAD_FLUXLIMIT_ADV_Y
        Rj =(tracer(i, j )-tracer(i,j-1))*maskLocS(i, j )
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F 81 GAD_FLUXLIMIT_ADV_Y
        IF (Rj.NE.0.) THEN
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F 83 GAD_FLUXLIMIT_ADV_Y
           Cr=Rjm/Rj
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F 85 GAD_FLUXLIMIT_ADV_Y
           Cr=Rjp/Rj
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 38 GAD_DST3FL_ADV_R
      _RL Rjm,Rj,Rjp,cfl,d0,d1
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 63 GAD_DST3FL_ADV_R
        Rj =(tracer(i,j,km1,bi,bj)-tracer(i,j,k,bi,bj))
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 75 GAD_DST3FL_ADV_R
        thetaP=Rjm/(1.D-20+Rj)
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 79 GAD_DST3FL_ADV_R
        thetaM=Rjp/(1.D-20+Rj)
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 87 GAD_DST3FL_ADV_R
     &      *( Tracer(i,j, k ,bi,bj) + psiM*Rj )
./pkg/generic_advdiff/gad_dst3fl_adv_r.F 89 GAD_DST3FL_ADV_R
     &      *( Tracer(i,j,km1,bi,bj) - psiP*Rj )
./pkg/generic_advdiff/gad_dst3_adv_y.F 39 GAD_DST3_ADV_Y
      _RL Rjm,Rj,Rjp,cfl,d0,d1
./pkg/generic_advdiff/gad_dst3_adv_y.F 59 GAD_DST3_ADV_Y
        Rj =(tracer(i, j )-tracer(i,j-1))*maskLocS(i, j )
./pkg/generic_advdiff/gad_dst3_adv_y.F 68 GAD_DST3_ADV_Y
        IF ( ABS(Rj).LT.smallNo .OR.
./pkg/generic_advdiff/gad_dst3_adv_y.F 73 GAD_DST3_ADV_Y
         thetaP=(Rjm+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_dst3_adv_y.F 76 GAD_DST3_ADV_Y
        IF ( ABS(Rj).LT.smallNo .OR.
./pkg/generic_advdiff/gad_dst3_adv_y.F 81 GAD_DST3_ADV_Y
         thetaM=(Rjp+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_dst3_adv_y.F 86 GAD_DST3_ADV_Y
     &      *( Tracer(i,j-1) + psiP*Rj )
./pkg/generic_advdiff/gad_dst3_adv_y.F 88 GAD_DST3_ADV_Y
     &      *( Tracer(i, j ) - psiM*Rj )
./pkg/generic_advdiff/gad_u3_adv_x.F 52 GAD_U3_ADV_X
      _RL Rjm,Rj,Rjp,Rjjm,Rjjp
./pkg/generic_advdiff/gad_u3_adv_x.F 61 GAD_U3_ADV_X
        Rj =(tracer(i,j)-tracer(i-1,j))*maskW(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_u3_adv_x.F 63 GAD_U3_ADV_X
        Rjjp=Rjp-Rj
./pkg/generic_advdiff/gad_u3_adv_x.F 64 GAD_U3_ADV_X
        Rjjm=Rj-Rjm
./pkg/generic_advdiff/gad_dst3fl_adv_y.F 37 GAD_DST3FL_ADV_Y
      _RL Rjm,Rj,Rjp,cfl,d0,d1,psiP,psiM,thetaP,thetaM
./pkg/generic_advdiff/gad_dst3fl_adv_y.F 48 GAD_DST3FL_ADV_Y
        Rj =(tracer(i, j )-tracer(i,j-1))*maskLocS(i, j )
./pkg/generic_advdiff/gad_dst3fl_adv_y.F 59 GAD_DST3FL_ADV_Y
        thetaP=Rjm/(1.D-20+Rj)
./pkg/generic_advdiff/gad_dst3fl_adv_y.F 63 GAD_DST3FL_ADV_Y
        thetaM=Rjp/(1.D-20+Rj)
./pkg/generic_advdiff/gad_dst3fl_adv_y.F 71 GAD_DST3FL_ADV_Y
     &      *( Tracer(i,j-1) + psiP*Rj )
./pkg/generic_advdiff/gad_dst3fl_adv_y.F 73 GAD_DST3FL_ADV_Y
     &      *( Tracer(i, j ) - psiM*Rj )
./pkg/generic_advdiff/gad_dst3_adv_x.F 39 GAD_DST3_ADV_X
      _RL Rjm,Rj,Rjp,cfl,d0,d1
./pkg/generic_advdiff/gad_dst3_adv_x.F 57 GAD_DST3_ADV_X
        Rj =(tracer( i ,j)-tracer(i-1,j))*maskLocW( i ,j)
./pkg/generic_advdiff/gad_dst3_adv_x.F 66 GAD_DST3_ADV_X
        IF ( ABS(Rj).LT.smallNo .OR.
./pkg/generic_advdiff/gad_dst3_adv_x.F 71 GAD_DST3_ADV_X
         thetaP=(Rjm+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_dst3_adv_x.F 74 GAD_DST3_ADV_X
        IF ( ABS(Rj).LT.smallNo .OR.
./pkg/generic_advdiff/gad_dst3_adv_x.F 79 GAD_DST3_ADV_X
         thetaM=(Rjp+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_dst3_adv_x.F 84 GAD_DST3_ADV_X
     &      *( Tracer(i-1,j) + psiP*Rj )
./pkg/generic_advdiff/gad_dst3_adv_x.F 86 GAD_DST3_ADV_X
     &      *( Tracer( i ,j) - psiM*Rj )
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F 102 GAD_FLUXLIMIT_ADV_R
         Rj=(tracer(i,j,k,bi,bj)-tracer(i,j,kM1,bi,bj))
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F 106 GAD_FLUXLIMIT_ADV_R
         IF (Rj.NE.0.) THEN
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F 108 GAD_FLUXLIMIT_ADV_R
            Cr=Rjm/Rj
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F 110 GAD_FLUXLIMIT_ADV_R
            Cr=Rjp/Rj
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F 126 GAD_FLUXLIMIT_ADV_R
     &     )*Rj*0.5 _d 0                )
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F 65 GAD_FLUXLIMIT_ADV_R
      _RL Cr,Rjm,Rj,Rjp
./pkg/generic_advdiff/gad_dst3fl_adv_x.F 37 GAD_DST3FL_ADV_X
      _RL Rjm,Rj,Rjp,cfl,d0,d1,psiP,psiM,thetaP,thetaM
./pkg/generic_advdiff/gad_dst3fl_adv_x.F 46 GAD_DST3FL_ADV_X
        Rj =(tracer( i ,j)-tracer(i-1,j))*maskLocW( i ,j)
./pkg/generic_advdiff/gad_dst3fl_adv_x.F 57 GAD_DST3FL_ADV_X
        thetaP=Rjm/(1.D-20+Rj)
./pkg/generic_advdiff/gad_dst3fl_adv_x.F 61 GAD_DST3FL_ADV_X
        thetaM=Rjp/(1.D-20+Rj)
./pkg/generic_advdiff/gad_dst3fl_adv_x.F 69 GAD_DST3FL_ADV_X
     &      *( Tracer(i-1,j) + psiP*Rj )
./pkg/generic_advdiff/gad_dst3fl_adv_x.F 71 GAD_DST3FL_ADV_X
     &      *( Tracer( i ,j) - psiM*Rj )
./pkg/generic_advdiff/gad_dst3_adv_r.F 101 GAD_DST3_ADV_R
     &       *( Tracer(i,j,km1,bi,bj) - psiP*Rj )
./pkg/generic_advdiff/gad_dst3_adv_r.F 38 GAD_DST3_ADV_R
      _RL Rjm,Rj,Rjp,cfl,d0,d1
./pkg/generic_advdiff/gad_dst3_adv_r.F 71 GAD_DST3_ADV_R
        Rj =(tracer(i,j,km1,bi,bj)-tracer(i,j,k,bi,bj))
./pkg/generic_advdiff/gad_dst3_adv_r.F 81 GAD_DST3_ADV_R
        IF ( ABS(Rj).LT.smallNo .OR.
./pkg/generic_advdiff/gad_dst3_adv_r.F 86 GAD_DST3_ADV_R
         thetaP=(Rjm+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_dst3_adv_r.F 89 GAD_DST3_ADV_R
        IF ( ABS(Rj).LT.smallNo .OR.
./pkg/generic_advdiff/gad_dst3_adv_r.F 94 GAD_DST3_ADV_R
         thetaM=(Rjp+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_dst3_adv_r.F 99 GAD_DST3_ADV_R
     &       *( Tracer(i,j, k ,bi,bj) + psiM*Rj )
./pkg/generic_advdiff/gad_u3_adv_y.F 52 GAD_U3_ADV_Y
      _RL Rjm,Rj,Rjp,Rjjm,Rjjp
./pkg/generic_advdiff/gad_u3_adv_y.F 63 GAD_U3_ADV_Y
        Rj =(tracer(i,j)-tracer(i,j-1))*maskS(i,j,k,bi,bj)
./pkg/generic_advdiff/gad_u3_adv_y.F 65 GAD_U3_ADV_Y
        Rjjp=Rjp-Rj
./pkg/generic_advdiff/gad_u3_adv_y.F 66 GAD_U3_ADV_Y
        Rjjm=Rj-Rjm
./pkg/generic_advdiff/gad_u3_adv_r.F 55 GAD_U3_ADV_R
      _RL Rjm,Rj,Rjp,Rjjm,Rjjp
./pkg/generic_advdiff/gad_u3_adv_r.F 73 GAD_U3_ADV_R
         Rj=(tracer(i,j,k,bi,bj)-tracer(i,j,km1,bi,bj))
./pkg/generic_advdiff/gad_u3_adv_r.F 76 GAD_U3_ADV_R
         Rjjp=Rjp-Rj
./pkg/generic_advdiff/gad_u3_adv_r.F 77 GAD_U3_ADV_R
         Rjjm=Rj-Rjm