| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
641 |
NO PROCEDURE |
& delT, tauCD, rCD, freeSurfFac, implicSurfPress, implicDiv2Dflow, |
|
./model/inc/PARAMS.h |
681 |
NO PROCEDURE |
_RL freeSurfFac |
|
./model/src/ini_cg2d.F |
212 |
INI_CG2D |
& +freeSurfFac*myNorm*recip_Bo(I,J,bi,bj)* |
|
./model/src/ini_cg2d.F |
218 |
INI_CG2D |
& +freeSurfFac*myNorm*recip_Bo(I,J-1,bi,bj)* |
|
./model/src/ini_cg2d.F |
224 |
INI_CG2D |
& +freeSurfFac*myNorm*recip_Bo(I-1,J,bi,bj)* |
|
./model/src/ini_cg3d.F |
237 |
INI_CG3D |
& -freeSurfFac*recip_Bo(I,J,bi,bj) |
|
./model/src/update_cg2d.F |
124 |
UPDATE_CG2D |
& +freeSurfFac*cg2dNorm*recip_Bo(I,J,bi,bj)* |
|
./model/src/ini_parms.F |
176 |
INI_PARMS |
& implicitFreeSurface, rigidLid, freeSurfFac, hFacMin, hFacMinDz, |
|
./model/src/ini_parms.F |
446 |
INI_PARMS |
IF ( implicitFreeSurface ) freeSurfFac = 1.D0 |
|
./model/src/ini_parms.F |
447 |
INI_PARMS |
IF ( rigidLid ) freeSurfFac = 0.D0 |
|
./model/src/solve_for_pressure.F |
128 |
SOLVE_FOR_PRESSURE |
tmpFac = freeSurfFac*convertEmP2rUnit |
|
./model/src/solve_for_pressure.F |
130 |
SOLVE_FOR_PRESSURE |
& tmpFac = freeSurfFac*convertEmP2rUnit*implicDiv2DFlow |
|
./model/src/solve_for_pressure.F |
158 |
SOLVE_FOR_PRESSURE |
IF (globalArea.GT.0.) tmpFac = freeSurfFac*deltaTfreesurf |
|
./model/src/solve_for_pressure.F |
195 |
SOLVE_FOR_PRESSURE |
& -freeSurfFac*_rA(i,j,bi,bj)/deltaTMom/deltaTfreesurf |
|
./model/src/solve_for_pressure.F |
198 |
SOLVE_FOR_PRESSURE |
& -freeSurfFac*_rA(i,j,bi,bj)/deltaTMom/deltaTfreesurf |
|
./model/src/solve_for_pressure.F |
209 |
SOLVE_FOR_PRESSURE |
& -freeSurfFac*_rA(i,j,bi,bj)/deltaTMom/deltaTfreesurf |
|
./model/src/solve_for_pressure.F |
213 |
SOLVE_FOR_PRESSURE |
& -freeSurfFac*_rA(i,j,bi,bj)/deltaTMom/deltaTfreesurf |
|
./model/src/solve_for_pressure.F |
226 |
SOLVE_FOR_PRESSURE |
& -freeSurfFac*_rA(i,j,bi,bj)/deltaTMom/deltaTfreesurf |
|
./model/src/solve_for_pressure.F |
234 |
SOLVE_FOR_PRESSURE |
& -freeSurfFac*_rA(i,j,bi,bj)/deltaTMom/deltaTfreesurf |
|
./model/src/solve_for_pressure.F |
383 |
SOLVE_FOR_PRESSURE |
tmpFac = freeSurfFac |
|
./model/src/solve_for_pressure.F |
392 |
SOLVE_FOR_PRESSURE |
& +freeSurfFac*etaN(i,j,bi,bj)/deltaTfreesurf |
|
./model/src/config_summary.F |
230 |
CONFIG_SUMMARY |
CALL WRITE_0D_R8( freeSurfFac, INDEX_NONE,'freeSurfFac =', |
|
./model/src/cg2d.F |
179 |
CG2D |
& -freeSurfFac*_rA(i,j,bi,bj)*recip_Bo(i,j,bi,bj)* |
|
./model/src/cg2d.F |
306 |
CG2D |
& -freeSurfFac*_rA(i,j,bi,bj)*recip_Bo(i,j,bi,bj)* |
|
./model/src/cg2d_nsa.F |
237 |
CG2D_NSA |
& -freeSurfFac*_rA(i,j,bi,bj)*recip_Bo(i,j,bi,bj)* |
|
./model/src/cg2d_nsa.F |
392 |
CG2D_NSA |
& -freeSurfFac*_rA(i,j,bi,bj)*recip_Bo(i,j,bi,bj)* |