| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_calc_thickn.F |
112 |
THSICE_CALC_THICKN |
_RL tFrz (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_calc_thickn.F |
12 |
THSICE_CALC_THICKN |
I iceMask, tFrz, tOce, v2oc, |
|
./pkg/thsice/thsice_calc_thickn.F |
387 |
THSICE_CALC_THICKN |
Fbot(i,j) = cpchr*(tFrz(i,j)-tOce(i,j))*ustar |
|
./pkg/thsice/thsice_calc_thickn.F |
568 |
THSICE_CALC_THICKN |
qbot = -cpIce *tFrz(i,j) + Lfresh |
|
./pkg/thsice/thsice_extend.F |
12 |
THSICE_EXTEND |
I fzMlOc, tFrz, tOce, |
|
./pkg/thsice/thsice_extend.F |
165 |
THSICE_EXTEND |
Tf = tFrz(i,j) |
|
./pkg/thsice/thsice_extend.F |
236 |
THSICE_EXTEND |
tSrf(i,j) = tFrz(i,j) |
|
./pkg/thsice/thsice_extend.F |
237 |
THSICE_EXTEND |
tIc1(i,j) = tFrz(i,j) |
|
./pkg/thsice/thsice_extend.F |
238 |
THSICE_EXTEND |
tIc2(i,j) = tFrz(i,j) |
|
./pkg/thsice/thsice_extend.F |
74 |
THSICE_EXTEND |
_RL tFrz (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_solve4temp.F |
13 |
THSICE_SOLVE4TEMP |
I iceMask, hIce, hSnow, tFrz, flxExSW, |
|
./pkg/thsice/thsice_solve4temp.F |
311 |
THSICE_SOLVE4TEMP |
& - k32*( 4. _d 0*dt*k32*tFrz(i,j) |
|
./pkg/thsice/thsice_solve4temp.F |
526 |
THSICE_SOLVE4TEMP |
tIc2(i,j) = ( 2. _d 0*dt*k32*(tIc1(i,j)+2. _d 0*tFrz(i,j)) |
|
./pkg/thsice/thsice_solve4temp.F |
538 |
THSICE_SOLVE4TEMP |
flxCnB(i,j) = 4. _d 0*kIce *(tIc2(i,j)-tFrz(i,j))/hIce(i,j) |
|
./pkg/thsice/thsice_solve4temp.F |
98 |
THSICE_SOLVE4TEMP |
_RL tFrz (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |