Symbol Description Uses
recip_Bo 1/Bo_surf 23


File Line number Procedure Code
./model/inc/SURFACE.h 25 NO PROCEDURE 
      COMMON /SURF_FIXED/ Bo_surf, recip_Bo, topoZ, phi0surf
./model/inc/SURFACE.h 27 NO PROCEDURE 
      _RL  recip_Bo(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy)
./model/src/cg3d.F 196 CG3D 
     &              *recip_Bo(i,j,bi,bj)/deltaTMom/deltaTfreesurf
./model/src/cg3d.F 378 CG3D 
     &              *recip_Bo(i,j,bi,bj)/deltaTMom/deltaTfreesurf
./model/src/cg3d_ex0.F 189 CG3D_EX0 
     &              *recip_Bo(i,j,bi,bj)/deltaTMom/deltaTfreesurf
./model/src/cg3d_ex0.F 362 CG3D_EX0 
     &              *recip_Bo(i,j,bi,bj)/deltaTMom/deltaTfreesurf
./model/src/ini_cg2d.F 211 INI_CG2D 
     &      +freeSurfFac*myNorm*recip_Bo(i,j,bi,bj)*deepFac2F(ks)
./model/src/ini_cg3d.F 221 INI_CG3D 
     &         - freeSurfFac*recip_Bo(i,j,bi,bj)
./model/src/ini_linear_phisurf.F 102 INI_LINEAR_PHISURF 
             recip_Bo(i,j,bi,bj) = rhoConst
./model/src/ini_linear_phisurf.F 134 INI_LINEAR_PHISURF 
             recip_Bo(i,j,bi,bj) =  rhoLoc
./model/src/ini_linear_phisurf.F 137 INI_LINEAR_PHISURF 
              recip_Bo(i,j,bi,bj) = 0. _d 0
./model/src/ini_linear_phisurf.F 158 INI_LINEAR_PHISURF 
              recip_Bo(i,j,bi,bj) = 1. _d 0 / Bo_surf(i,j,bi,bj)
./model/src/ini_linear_phisurf.F 161 INI_LINEAR_PHISURF 
              recip_Bo(i,j,bi,bj) = 0.
./model/src/ini_linear_phisurf.F 174 INI_LINEAR_PHISURF 
              recip_Bo(i,j,bi,bj) = 1. _d 0 / Bo_surf(i,j,bi,bj)
./model/src/ini_linear_phisurf.F 177 INI_LINEAR_PHISURF 
              recip_Bo(i,j,bi,bj) = 0.
./model/src/ini_linear_phisurf.F 61 INI_LINEAR_PHISURF 
           recip_Bo(i,j,bi,bj) = 0. _d 0
./model/src/ini_linear_phisurf.F 88 INI_LINEAR_PHISURF 
             recip_Bo(i,j,bi,bj) = 1. _d 0 / gBaro
./model/src/post_cg3d.F 149 POST_CG3D 
     &                      + recip_Bo(i,j,bi,bj)*dPhiNH(i,j,bi,bj)
./model/src/solve_for_pressure.F 192 SOLVE_FOR_PRESSURE 
     &           +phi_nh(i,j,ks,bi,bj)*recip_Bo(i,j,bi,bj) )
./model/src/solve_for_pressure.F 197 SOLVE_FOR_PRESSURE 
     &           +phi_nh(i,j,ks,bi,bj)*recip_Bo(i,j,bi,bj) )
./model/src/solve_for_pressure.F 342 SOLVE_FOR_PRESSURE 
          etaN(i,j,bi,bj) = recip_Bo(i,j,bi,bj)*cg2d_x(i,j,bi,bj)
./model/src/update_cg2d.F 115 UPDATE_CG2D 
     &      +freeSurfFac*cg2dNorm*recip_Bo(i,j,bi,bj)*deepFac2F(ks)
./model/src/update_cg2d.F 126 UPDATE_CG2D 
     &      +freeSurfFac*cg2dNorm*recip_Bo(i,j,bi,bj)