| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_calc_thickn.F |
113 |
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 |
388 |
THSICE_CALC_THICKN |
Fbot(i,j) = cpchr*(tFrz(i,j)-tOce(i,j))*ustar |
|
./pkg/thsice/thsice_calc_thickn.F |
569 |
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 |
174 |
THSICE_EXTEND |
Tf = tFrz(i,j) |
|
./pkg/thsice/thsice_extend.F |
245 |
THSICE_EXTEND |
tSrf(i,j) = tFrz(i,j) |
|
./pkg/thsice/thsice_extend.F |
246 |
THSICE_EXTEND |
tIc1(i,j) = tFrz(i,j) |
|
./pkg/thsice/thsice_extend.F |
247 |
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 |
109 |
THSICE_SOLVE4TEMP |
_RL tFrz (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_solve4temp.F |
18 |
THSICE_SOLVE4TEMP |
I icMask, hIce, hSnow1, tFrz, flxExSW, |
|
./pkg/thsice/thsice_solve4temp.F |
330 |
THSICE_SOLVE4TEMP |
& - k32*( 4. _d 0*dt*k32*tFrz(i,j) |
|
./pkg/thsice/thsice_solve4temp.F |
576 |
THSICE_SOLVE4TEMP |
tIc2(i,j) = ( 2. _d 0*dt*k32*(tIc1(i,j)+2. _d 0*tFrz(i,j)) |
|
./pkg/thsice/thsice_solve4temp.F |
588 |
THSICE_SOLVE4TEMP |
flxCnB(i,j) = 4. _d 0*kIce *(tIc2(i,j)-tFrz(i,j))/hIce(i,j) |