| File |
Line number |
Procedure |
Code |
|
./pkg/bulk_force/BULKF_PARAMS.h |
49 |
NO PROCEDURE |
& rhoa, rhosw, rhofw, |
|
./pkg/bulk_force/BULKF_PARAMS.h |
63 |
NO PROCEDURE |
_RL rhosw |
|
./pkg/thsice/THSICE_PARAMS.h |
69 |
NO PROCEDURE |
& rhos, rhoi, rhosw, rhofw, rhoiw, |
|
./pkg/thsice/THSICE_PARAMS.h |
84 |
NO PROCEDURE |
_RL rhosw |
|
./pkg/thsice/thsice_calc_thickn.F |
155 |
THSICE_CALC_THICKN |
cpchr =cpwater*rhosw*transcoef |
|
./pkg/thsice/thsice_calc_thickn.F |
433 |
THSICE_CALC_THICKN |
dhi = (hs * rhos - hi * rhoiw) / rhosw |
|
./pkg/thsice/thsice_readparms.F |
171 |
THSICE_READPARMS |
rhoiw = rhosw - rhoi |
|
./pkg/thsice/thsice_readparms.F |
199 |
THSICE_READPARMS |
WRITE(iUnit,*) 'ThSI: rhosw =',rhosw |
|
./pkg/thsice/thsice_readparms.F |
48 |
THSICE_READPARMS |
& rhos, rhoi, rhosw, rhofw, |
|
./pkg/thsice/thsice_readparms.F |
87 |
THSICE_READPARMS |
rhosw = rhoConst |
|
./pkg/thsice/thsice_step_fwd.F |
189 |
THSICE_STEP_FWD |
cphm = cpwater*rhosw*hOceMxL(i,j,bi,bj) |
|
./pkg/thsice/thsice_slab_ocean.F |
59 |
THSICE_SLAB_OCEAN |
dtFac = ocean_deltaT/rhosw |
|
./pkg/thsice/thsice_slab_ocean.F |
60 |
THSICE_SLAB_OCEAN |
fwFac = ocean_deltaT*sMxL_default*rhofw/rhosw |
|
./pkg/thsice/thsice_slab_ocean.F |
61 |
THSICE_SLAB_OCEAN |
heatFac = ocean_deltaT/(cpwater*rhosw) |