Symbol Description Uses
deepFac2F 53


File Line number Procedure Code
./pkg/generic_advdiff/gad_advection.F 761 GAD_ADVECTION 
     &                 *deepFac2F(k)*rhoFacF(k)
./pkg/generic_advdiff/gad_diff_r.F 64 GAD_DIFF_R 
     &            *_rA(i,j,bi,bj)*deepFac2F(k)*rhoFacF(k)
./pkg/generic_advdiff/gad_som_advect.F 561 GAD_SOM_ADVECT 
     &                 *deepFac2F(k)*rhoFacF(k)
./pkg/generic_advdiff/gad_som_advect.F 574 GAD_SOM_ADVECT 
     &                 *deepFac2F(k)*rhoFacF(k)
./pkg/longstep/longstep_thermodynamics.F 349 LONGSTEP_THERMODYNAMICS 
     &                              *deepFac2F(k)*rhoFacF(k)
./pkg/mom_common/mom_u_rviscflux.F 62 MOM_U_RVISCFLUX 
     &      *rAw(i,j,bi,bj)*deepFac2F(k)*rhoFacF(k)
./pkg/mom_common/mom_v_rviscflux.F 62 MOM_V_RVISCFLUX 
     &     *rAs(i,j,bi,bj)*deepFac2F(k)*rhoFacF(k)
./pkg/mom_fluxform/mom_calc_rtrans.F 102 MOM_CALC_RTRANS 
     &                  )*deepFac2F(k)*rhoFacF(k)
./pkg/mom_fluxform/mom_calc_rtrans.F 106 MOM_CALC_RTRANS 
     &                  )*deepFac2F(k)*rhoFacF(k)
./pkg/mom_fluxform/mom_u_adv_wu.F 103 MOM_U_ADV_WU 
     &           )*deepFac2F(k)*rhoFacF(k)
./pkg/mom_fluxform/mom_v_adv_wv.F 104 MOM_V_ADV_WV 
     &           )*deepFac2F(k)*rhoFacF(k)
./model/src/calc_gw.F 487 CALC_GW 
     &              ( wVel(i,j, k ,bi,bj)*deepFac2F( k )*rhoFacF( k )
./model/src/calc_gw.F 488 CALC_GW 
     &               +wVel(i,j,kp1,bi,bj)*deepFac2F(kp1)*rhoFacF(kp1)
./model/src/calc_gw.F 500 CALC_GW 
             rTrans = wVel(i,j,k,bi,bj)*deepFac2F(k)*rhoFacF(k)
./pkg/monitor/mon_ke.F 101 MON_KE 
     &                             *deepFac2F(kp1)*rhoFacF(kp1)
./pkg/monitor/mon_ke.F 129 MON_KE 
     &            + tmpVal*rA(i,j,bi,bj)*deepFac2F(1)
./pkg/monitor/mon_ke.F 99 MON_KE 
     &                             *deepFac2F( k )*rhoFacF( k )
./pkg/monitor/monitor.F 98 MONITOR 
          thickFacF(k) = drC(k)*deepFac2F(k)*rhoFacF(k)
./model/src/cg3d.F 195 CG3D 
     &              *rA(i,j,bi,bj)*deepFac2F(ks)
./model/src/cg3d.F 385 CG3D 
     &              *rA(i,j,bi,bj)*deepFac2F(ks)
./pkg/smooth/smooth_impldiff.F 84 SMOOTH_IMPLDIFF 
     &               *deepFac2F(k)*rhoFacF(k)
./pkg/smooth/smooth_impldiff.F 97 SMOOTH_IMPLDIFF 
     &               *deepFac2F(k+1)*rhoFacF(k+1)
./model/src/impldiff.F 141 IMPLDIFF 
     &               *deepFac2F(k)*rhoFacF(k)
./model/src/impldiff.F 159 IMPLDIFF 
     &               *deepFac2F(k+1)*rhoFacF(k+1)
./model/src/impldiff.F 336 IMPLDIFF 
     &             -rA(i,j,bi,bj)*deepFac2F(k)*rhoFacF(k)
./model/src/impldiff.F 350 IMPLDIFF 
     &             -rAw(i,j,bi,bj)*deepFac2F(k)*rhoFacF(k)
./model/src/impldiff.F 366 IMPLDIFF 
     &             -rAs(i,j,bi,bj)*deepFac2F(k)*rhoFacF(k)
./model/src/ini_cg2d.F 220 INI_CG2D 
     &      +freeSurfFac*myNorm*recip_Bo(i,j,bi,bj)*deepFac2F(ks)
./model/src/ini_cg3d.F 147 INI_CG3D 
     &                              *deepFac2F(k)
./model/src/ini_cg3d.F 254 INI_CG3D 
     &          *rA(i,j,bi,bj)*deepFac2F(ks)/deltaTMom/deltaTfreesurf
./model/src/integr_continuity.F 214 INTEGR_CONTINUITY 
     &                            *deepFac2F(ks)*rhoFacF(ks)
./model/src/integrate_for_w.F 108 INTEGRATE_FOR_W 
     &        ( wFld(i,j,k+1,bi,bj)*deepFac2F(k+1)*rhoFacF(k+1)
./model/src/integrate_for_w.F 134 INTEGRATE_FOR_W 
     &        ( wFld(i,j,k+1,bi,bj)*deepFac2F(k+1)*rhoFacF(k+1)
./model/src/integrate_for_w.F 184 INTEGRATE_FOR_W 
     &        ( wFld(i,j,k+1,bi,bj)*deepFac2F(k+1)*rhoFacF(k+1)
./model/src/pre_cg3d.F 118 PRE_CG3D 
     &                              *_rA(i,j,bi,bj)*deepFac2F(ks)
./model/src/pre_cg3d.F 131 PRE_CG3D 
     &                    *_rA(i,j,bi,bj)*deepFac2F(ks)
./model/src/pre_cg3d.F 147 PRE_CG3D 
           tmpFac = freeSurfFac*deepFac2F(1)
./model/src/pre_cg3d.F 157 PRE_CG3D 
     &                  *_rA(i,j,bi,bj)*deepFac2F(ks)/deltaTmom
./model/src/pre_cg3d.F 204 PRE_CG3D 
         wFacKp = implicDiv2DFlow*deepFac2F(kp1)*rhoFacF(kp1)
./model/src/pre_cg3d.F 222 PRE_CG3D 
          wFacKm = implicDiv2DFlow*deepFac2F( k )*rhoFacF( k )
./model/src/pre_cg3d.F 223 PRE_CG3D 
          wFacKp = implicDiv2DFlow*deepFac2F(kp1)*rhoFacF(kp1)
./model/src/set_grid_factors.F 59 SET_GRID_FACTORS 
        deepFac2F(k)= 1. _d 0
./model/src/set_grid_factors.F 72 SET_GRID_FACTORS 
          deepFac2F(k) = deepFacF(k)*deepFacF(k)
./model/src/set_grid_factors.F 83 SET_GRID_FACTORS 
          deepFac2F(k) = deepFacF(k)*deepFacF(k)
./model/src/set_grid_factors.F 93 SET_GRID_FACTORS 
        recip_deepFac2F(k)= 1. _d 0/deepFac2F(k)
./model/src/solve_for_pressure.F 193 SOLVE_FOR_PRESSURE 
     &       -freeSurfFac*_rA(i,j,bi,bj)*deepFac2F(ks)
./model/src/solve_for_pressure.F 198 SOLVE_FOR_PRESSURE 
     &       -freeSurfFac*_rA(i,j,bi,bj)*deepFac2F(ks)
./model/src/solve_for_pressure.F 214 SOLVE_FOR_PRESSURE 
     &       -freeSurfFac*_rA(i,j,bi,bj)*deepFac2F(ks)
./model/src/solve_for_pressure.F 224 SOLVE_FOR_PRESSURE 
     &       -freeSurfFac*_rA(i,j,bi,bj)*deepFac2F(ks)
./model/src/thermodynamics.F 520 THERMODYNAMICS 
     &                              *deepFac2F(k)*rhoFacF(k)
./model/src/update_cg2d.F 129 UPDATE_CG2D 
     &      +freeSurfFac*cg2dNorm*recip_Bo(I,J,bi,bj)*deepFac2F(ks)
./model/inc/GRID.h 316 NO PROCEDURE 
     &  deepFacF, deepFac2F, recip_deepFacF, recip_deepFac2F,
./model/inc/GRID.h 325 NO PROCEDURE 
      _RL deepFac2F      (Nr+1)