Symbol Description Uses
freeSurfFac 23


File Line number Procedure Code
./model/src/ini_cg2d.F 227 INI_CG2D 
     &    +freeSurfFac*myNorm*recip_Bo(I,J,bi,bj)*
./model/src/ini_cg2d.F 233 INI_CG2D 
     &    +freeSurfFac*myNorm*recip_Bo(I,J-1,bi,bj)*
./model/src/ini_cg2d.F 239 INI_CG2D 
     &    +freeSurfFac*myNorm*recip_Bo(I-1,J,bi,bj)*
./model/src/ini_cg3d.F 222 INI_CG3D 
     &         -freeSurfFac*myNorm*(horiVertRatio/gravity)*
./model/src/config_summary.F 213 CONFIG_SUMMARY 
      CALL WRITE_0D_R8( freeSurfFac, INDEX_NONE,'freeSurfFac =',
./model/src/solve_for_pressure.F 128 SOLVE_FOR_PRESSURE 
     &       -freeSurfFac*_rA(i,j,bi,bj)/deltaTMom/deltaTfreesurf
./model/src/solve_for_pressure.F 132 SOLVE_FOR_PRESSURE 
     &       -freeSurfFac*_rA(i,j,bi,bj)/deltaTMom/deltaTfreesurf
./model/src/solve_for_pressure.F 144 SOLVE_FOR_PRESSURE 
     &       -freeSurfFac*_rA(i,j,bi,bj)/deltaTMom/deltaTfreesurf
./model/src/solve_for_pressure.F 152 SOLVE_FOR_PRESSURE 
     &       -freeSurfFac*_rA(i,j,bi,bj)/deltaTMom/deltaTfreesurf
./model/src/solve_for_pressure.F 293 SOLVE_FOR_PRESSURE 
     &       +( freeSurfFac*etaN(i,j,bi,bj)/deltaTMom
./model/src/solve_for_pressure.F 87 SOLVE_FOR_PRESSURE 
         tmpFac = freeSurfFac*convertEmP2rUnit
./model/src/solve_for_pressure.F 89 SOLVE_FOR_PRESSURE 
     &        tmpFac = freeSurfFac*convertEmP2rUnit*implicDiv2DFlow
./model/src/cg2d.F 187 CG2D 
     &    -freeSurfFac*_rA(i,j,bi,bj)*recip_Bo(i,j,bi,bj)*
./model/src/cg2d.F 314 CG2D 
     &    -freeSurfFac*_rA(i,j,bi,bj)*recip_Bo(i,j,bi,bj)*
./model/src/ini_parms.F 159 INI_PARMS 
     & implicitFreeSurface, rigidLid, freeSurfFac, hFacMin, hFacMinDz,
./model/src/ini_parms.F 399 INI_PARMS 
      IF ( implicitFreeSurface ) freeSurfFac = 1.D0
./model/src/ini_parms.F 400 INI_PARMS 
      IF ( rigidLid            ) freeSurfFac = 0.D0
./model/src/cg3d.F 165 CG3D 
         IF ( K .EQ. 1) topLevTerm = freeSurfFac*cg3dNorm*
./model/src/cg3d.F 354 CG3D 
       topLevTerm = freeSurfFac*cg3dNorm*
./model/inc/PARAMS.h 588 NO PROCEDURE 
     & delT, tauCD, rCD, freeSurfFac, implicSurfPress, implicDiv2Dflow,
./model/inc/PARAMS.h 629 NO PROCEDURE 
      _RL freeSurfFac
./model/src/update_cg2d.F 124 UPDATE_CG2D 
     &    +freeSurfFac*cg2dNorm*recip_Bo(I,J,bi,bj)*
./pkg/mom_fluxform/mom_fluxform.F 172 MOM_FLUXFORM 
      IF ( k .EQ. 1 ) rVelMaskOverride=freeSurfFac