Symbol Description Uses
Rjm differences at i-1,i,i+1 79


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 60 GAD_DST3_ADV_Y 
        Rjm=(tracer(i,j-1)-tracer(i,j-2))*maskLocS(i,j-1)
./verification/matrix_example/code/gad_dst3_adv_y.F 72 GAD_DST3_ADV_Y 
     &         ABS(Rjm).LT.smallNo ) THEN
./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 96 GAD_DST3_ADV_Y 
     &        *( Tracer(i,j-1) + (d0*Rj+d1*Rjm) )
./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 58 GAD_DST3_ADV_X 
        Rjm=(tracer(i-1,j)-tracer(i-2,j))*maskLocW(i-1,j)
./verification/matrix_example/code/gad_dst3_adv_x.F 70 GAD_DST3_ADV_X 
     &         ABS(Rjm).LT.smallNo ) THEN
./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 94 GAD_DST3_ADV_X 
     &        *( Tracer(i-1,j) + (d0*Rj+d1*Rjm) )
./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 73 GAD_DST3_ADV_R 
        Rjm=(tracer(i,j,km2,bi,bj)-tracer(i,j,km1,bi,bj))
./verification/matrix_example/code/gad_dst3_adv_r.F 85 GAD_DST3_ADV_R 
     &         ABS(Rjm).LT.smallNo ) THEN
./verification/matrix_example/code/gad_dst3_adv_r.F 89 GAD_DST3_ADV_R 
           thetaP=(Rjm+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 77 GAD_FLUXLIMIT_ADV_X 
        Rjm=(tracer(i-1,j)-tracer(i-2,j))*maskLocW(i-1,j)
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F 81 GAD_FLUXLIMIT_ADV_X 
           Cr=Rjm/Rj
./pkg/generic_advdiff/gad_fluxlimit_adv_x.F 87 GAD_FLUXLIMIT_ADV_X 
           Cr=Rjm*1.E20
./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 67 GAD_C4_ADV_Y 
        Rjm=(tracer(i,j-1)-tracer(i,j-2))
./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 88 GAD_FLUXLIMIT_IMPL_R 
         Rjm=(tFld(i,j,km1)-tFld(i,j,km2))*maskC(i,j,km2,bi,bj)
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F 92 GAD_FLUXLIMIT_IMPL_R 
            Cr=Rjm/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 65 GAD_C4_ADV_X 
        Rjm=(tracer(i-1,j)-tracer(i-2,j))
./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 80 GAD_C4_ADV_R 
         Rjm=(tracer(i,j,km1,bi,bj)-tracer(i,j,km2,bi,bj))
./pkg/generic_advdiff/gad_c4_adv_r.F 83 GAD_C4_ADV_R 
         Rjjm=(Rj-Rjm)
./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 79 GAD_FLUXLIMIT_ADV_Y 
        Rjm=(tracer(i,j-1)-tracer(i,j-2))*maskLocS(i,j-1)
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F 83 GAD_FLUXLIMIT_ADV_Y 
           Cr=Rjm/Rj
./pkg/generic_advdiff/gad_fluxlimit_adv_y.F 89 GAD_FLUXLIMIT_ADV_Y 
           Cr=Rjm*1.E20
./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 65 GAD_DST3FL_ADV_R 
        Rjm=(tracer(i,j,km2,bi,bj)-tracer(i,j,km1,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_dst3_adv_y.F 39 GAD_DST3_ADV_Y 
      _RL Rjm,Rj,Rjp,cfl,d0,d1
./pkg/generic_advdiff/gad_dst3_adv_y.F 60 GAD_DST3_ADV_Y 
        Rjm=(tracer(i,j-1)-tracer(i,j-2))*maskLocS(i,j-1)
./pkg/generic_advdiff/gad_dst3_adv_y.F 69 GAD_DST3_ADV_Y 
     &       ABS(Rjm).LT.smallNo ) THEN
./pkg/generic_advdiff/gad_dst3_adv_y.F 73 GAD_DST3_ADV_Y 
         thetaP=(Rjm+smallNo)/(smallNo+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 62 GAD_U3_ADV_X 
        Rjm=(tracer(i-1,j)-tracer(i-2,j))*maskW(i-1,j,k,bi,bj)
./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 49 GAD_DST3FL_ADV_Y 
        Rjm=(tracer(i,j-1)-tracer(i,j-2))*maskLocS(i,j-1)
./pkg/generic_advdiff/gad_dst3fl_adv_y.F 59 GAD_DST3FL_ADV_Y 
        thetaP=Rjm/(1.D-20+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 58 GAD_DST3_ADV_X 
        Rjm=(tracer(i-1,j)-tracer(i-2,j))*maskLocW(i-1,j)
./pkg/generic_advdiff/gad_dst3_adv_x.F 67 GAD_DST3_ADV_X 
     &       ABS(Rjm).LT.smallNo ) THEN
./pkg/generic_advdiff/gad_dst3_adv_x.F 71 GAD_DST3_ADV_X 
         thetaP=(Rjm+smallNo)/(smallNo+Rj)
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F 103 GAD_FLUXLIMIT_ADV_R 
         Rjm=(tracer(i,j,km1,bi,bj)-tracer(i,j,kM2,bi,bj))
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F 108 GAD_FLUXLIMIT_ADV_R 
            Cr=Rjm/Rj
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F 114 GAD_FLUXLIMIT_ADV_R 
            Cr=Rjm*1.E20
./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 47 GAD_DST3FL_ADV_X 
        Rjm=(tracer(i-1,j)-tracer(i-2,j))*maskLocW(i-1,j)
./pkg/generic_advdiff/gad_dst3fl_adv_x.F 57 GAD_DST3FL_ADV_X 
        thetaP=Rjm/(1.D-20+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 73 GAD_DST3_ADV_R 
        Rjm=(tracer(i,j,km2,bi,bj)-tracer(i,j,km1,bi,bj))
./pkg/generic_advdiff/gad_dst3_adv_r.F 82 GAD_DST3_ADV_R 
     &       ABS(Rjm).LT.smallNo ) THEN
./pkg/generic_advdiff/gad_dst3_adv_r.F 86 GAD_DST3_ADV_R 
         thetaP=(Rjm+smallNo)/(smallNo+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 64 GAD_U3_ADV_Y 
        Rjm=(tracer(i,j-1)-tracer(i,j-2))*maskS(i,j-1,k,bi,bj)
./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 74 GAD_U3_ADV_R 
         Rjm=(tracer(i,j,km1,bi,bj)-tracer(i,j,km2,bi,bj))
./pkg/generic_advdiff/gad_u3_adv_r.F 77 GAD_U3_ADV_R 
         Rjjm=Rj-Rjm
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 104 MOM_VI_U_CORIOLIS_C4 
          Rjm=omega3(i,j)*r_hFacZ(i,j)
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 108 MOM_VI_U_CORIOLIS_C4 
     &               -1./12.*(Rjp-Rjm)
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 44 MOM_VI_U_CORIOLIS_C4 
      _RL vBarXY,vort3u,Rjp,Rjm
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 78 MOM_VI_U_CORIOLIS_C4 
          Rjm = omega3(i,j)*r_hFacZ(i,j)
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 81 MOM_VI_U_CORIOLIS_C4 
          vort3u=0.5*( vBarXm*Rjm + vBarXp*Rjp )
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 104 MOM_VI_V_CORIOLIS_C4 
          Rjm=omega3(i,j)*r_hFacZ(i,j)
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 108 MOM_VI_V_CORIOLIS_C4 
     &               -1./12.*(Rjp-Rjm)
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 44 MOM_VI_V_CORIOLIS_C4 
      _RL uBarXY,vort3v,Rjp,Rjm
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 78 MOM_VI_V_CORIOLIS_C4 
          Rjm = omega3(i,j)*r_hFacZ(i,j)
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 81 MOM_VI_V_CORIOLIS_C4 
          vort3v=0.5*( uBarYm*Rjm + uBarYp*Rjp )