| 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 |
141 |
THSICE_CALC_THICKN |
_RL qicen(1-OLx:sNx+OLx,1-OLy:sNy+OLy,nlyr) |
|
./pkg/thsice/thsice_calc_thickn.F |
183 |
THSICE_CALC_THICKN |
_RL hnew (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nlyr) |
|
./pkg/thsice/thsice_calc_thickn.F |
201 |
THSICE_CALC_THICKN |
_RL qaux(nlyr) |
|
./pkg/thsice/thsice_calc_thickn.F |
238 |
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 |
483 |
THSICE_CALC_THICKN |
DO k = 1, nlyr |
|
./pkg/thsice/thsice_calc_thickn.F |
519 |
THSICE_CALC_THICKN |
DO k = 1, nlyr |
|
./pkg/thsice/thsice_calc_thickn.F |
577 |
THSICE_CALC_THICKN |
qicen(i,j,nlyr) = |
|
./pkg/thsice/thsice_calc_thickn.F |
578 |
THSICE_CALC_THICKN |
& (hnew(i,j,nlyr)*qicen(i,j,nlyr)+dhi*qbot) / |
|
./pkg/thsice/thsice_calc_thickn.F |
579 |
THSICE_CALC_THICKN |
& (hnew(i,j,nlyr)+dhi) |
|
./pkg/thsice/thsice_calc_thickn.F |
580 |
THSICE_CALC_THICKN |
hnew(i,j,nlyr) = hnew(i,j,nlyr) + dhi |
|
./pkg/thsice/thsice_calc_thickn.F |
597 |
THSICE_CALC_THICKN |
DO k = nlyr, 1, -1 |
|
./pkg/thsice/thsice_calc_thickn.F |
755 |
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) |