| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/THSICE_SIZE.h |
11 |
NO PROCEDURE |
INTEGER nlyr |
|
./pkg/thsice/THSICE_SIZE.h |
12 |
NO PROCEDURE |
PARAMETER (nlyr = 2) |
|
./pkg/thsice/thsice_calc_thickn.F |
139 |
THSICE_CALC_THICKN |
_RL qicen(1-Olx:sNx+Olx,1-Oly:sNy+Oly,nlyr) |
|
./pkg/thsice/thsice_calc_thickn.F |
181 |
THSICE_CALC_THICKN |
_RL hnew (1-Olx:sNx+Olx,1-Oly:sNy+Oly,nlyr) |
|
./pkg/thsice/thsice_calc_thickn.F |
199 |
THSICE_CALC_THICKN |
_RL qaux(nlyr) |
|
./pkg/thsice/thsice_calc_thickn.F |
237 |
THSICE_CALC_THICKN |
rec_nlyr = nlyr |
|
./pkg/thsice/thsice_calc_thickn.F |
290 |
THSICE_CALC_THICKN |
DO k = 1,nlyr |
|
./pkg/thsice/thsice_calc_thickn.F |
482 |
THSICE_CALC_THICKN |
DO k = 1, nlyr |
|
./pkg/thsice/thsice_calc_thickn.F |
518 |
THSICE_CALC_THICKN |
DO k = 1, nlyr |
|
./pkg/thsice/thsice_calc_thickn.F |
576 |
THSICE_CALC_THICKN |
qicen(i,j,nlyr) = |
|
./pkg/thsice/thsice_calc_thickn.F |
577 |
THSICE_CALC_THICKN |
& (hnew(i,j,nlyr)*qicen(i,j,nlyr)+dhi*qbot) / |
|
./pkg/thsice/thsice_calc_thickn.F |
578 |
THSICE_CALC_THICKN |
& (hnew(i,j,nlyr)+dhi) |
|
./pkg/thsice/thsice_calc_thickn.F |
579 |
THSICE_CALC_THICKN |
hnew(i,j,nlyr) = hnew(i,j,nlyr) + dhi |
|
./pkg/thsice/thsice_calc_thickn.F |
594 |
THSICE_CALC_THICKN |
DO k = nlyr, 1, -1 |
|
./pkg/thsice/thsice_calc_thickn.F |
749 |
THSICE_CALC_THICKN |
DO k = 1, nlyr |
|
./pkg/thsice/thsice_check_conserv.F |
38 |
THSICE_CHECK_CONSERV |
_RL compact, hIce, hSnow, qicen(nlyr) |
|
./pkg/thsice/thsice_extend.F |
99 |
THSICE_EXTEND |
_RL qicen(nlyr) |