| File |
Line number |
Procedure |
Code |
|
./model/inc/PARAMS.h |
819 |
NO PROCEDURE |
& freeSurfFac, implicSurfPress, implicDiv2DFlow, implicitNHPress, |
|
./model/inc/PARAMS.h |
867 |
NO PROCEDURE |
_RL freeSurfFac |
|
./model/src/cg3d.F |
121 |
CG3D |
surfFac = freeSurfFac |
|
./model/src/cg3d_ex0.F |
113 |
CG3D_EX0 |
surfFac = freeSurfFac |
|
./pkg/monitor/mon_ke.F |
325 |
MON_KE |
totAMu = totAMu + freeSurfFac*totAMs |
|
./model/src/config_summary.F |
340 |
CONFIG_SUMMARY |
CALL WRITE_0D_RL( freeSurfFac, INDEX_NONE,'freeSurfFac =', |
|
./model/src/ini_cg2d.F |
211 |
INI_CG2D |
& +freeSurfFac*myNorm*recip_Bo(i,j,bi,bj)*deepFac2F(ks) |
|
./model/src/ini_cg3d.F |
218 |
INI_CG3D |
& - freeSurfFac*recip_Bo(i,j,bi,bj) |
|
./model/src/ini_cg3d.F |
230 |
INI_CG3D |
& - freeSurfFac*recip_Bo(i,j,bi,bj) |
|
./model/src/ini_parms.F |
209 |
INI_PARMS |
& implicitFreeSurface, rigidLid, freeSurfFac, |
|
./model/src/ini_parms.F |
445 |
INI_PARMS |
IF ( implicitFreeSurface ) freeSurfFac = 1. _d 0 |
|
./model/src/ini_parms.F |
446 |
INI_PARMS |
IF ( rigidLid ) freeSurfFac = 0. _d 0 |
|
./model/src/pre_cg3d.F |
119 |
PRE_CG3D |
tmpFac = freeSurfFac*implicDiv2DFlow/deltaTMom |
|
./model/src/pre_cg3d.F |
139 |
PRE_CG3D |
tmpFac = freeSurfFac*implicDiv2DFlow/deltaTMom |
|
./model/src/pre_cg3d.F |
152 |
PRE_CG3D |
surfFac = freeSurfFac*deepFac2F(1) |
|
./model/src/pre_cg3d.F |
160 |
PRE_CG3D |
& +freeSurfFac*etaN(i,j,bi,bj)/deltaTFreeSurf |
|
./model/src/pre_cg3d.F |
95 |
PRE_CG3D |
tmpFac = freeSurfFac*mass2rUnit*implicDiv2DFlow/deltaTMom |
|
./model/src/solve_for_pressure.F |
137 |
SOLVE_FOR_PRESSURE |
tmpFac = freeSurfFac*mass2rUnit*implicDiv2DFlow |
|
./model/src/solve_for_pressure.F |
167 |
SOLVE_FOR_PRESSURE |
& freeSurfFac*deltaTFreeSurf*mass2rUnit*sumEmP/globalArea |
|
./model/src/solve_for_pressure.F |
196 |
SOLVE_FOR_PRESSURE |
& -freeSurfFac*_rA(i,j,bi,bj)*deepFac2F(ks) |
|
./model/src/solve_for_pressure.F |
201 |
SOLVE_FOR_PRESSURE |
& -freeSurfFac*_rA(i,j,bi,bj)*deepFac2F(ks) |
|
./model/src/solve_for_pressure.F |
217 |
SOLVE_FOR_PRESSURE |
& -freeSurfFac*_rA(i,j,bi,bj)*deepFac2F(ks) |
|
./model/src/solve_for_pressure.F |
227 |
SOLVE_FOR_PRESSURE |
& -freeSurfFac*_rA(i,j,bi,bj)*deepFac2F(ks) |
|
./model/src/update_cg2d.F |
141 |
UPDATE_CG2D |
& +freeSurfFac*cg2dNorm*recip_Bo(i,j,bi,bj)*deepFac2F(ks) |
|
./model/src/update_cg2d.F |
152 |
UPDATE_CG2D |
& +freeSurfFac*cg2dNorm*recip_Bo(i,j,bi,bj) |