File |
Line number |
Procedure |
Code |
./pkg/thsice/thsice_get_bulkf.F |
15 |
THSICE_GET_BULKF |
I icFlag, hSnow, Tsf, |
./pkg/thsice/thsice_get_bulkf.F |
54 |
THSICE_GET_BULKF |
_RL icFlag (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/thsice/thsice_get_bulkf.F |
86 |
THSICE_GET_BULKF |
IF ( icFlag(i,j).GT.0. _d 0 ) THEN |
./pkg/thsice/thsice_get_exf.F |
15 |
THSICE_GET_EXF |
I icFlag, hSnow1, tsfCel, |
./pkg/thsice/thsice_get_exf.F |
206 |
THSICE_GET_EXF |
IF ( dBug(i,j,bi,bj) .AND. (icFlag(i,j).GT.0. _d 0) ) |
./pkg/thsice/thsice_get_exf.F |
230 |
THSICE_GET_EXF |
IF ( (icFlag(i,j).GT.0. _d 0) .AND. |
./pkg/thsice/thsice_get_exf.F |
300 |
THSICE_GET_EXF |
IF ( (icFlag(i,j).GT.0. _d 0) .AND. |
./pkg/thsice/thsice_get_exf.F |
333 |
THSICE_GET_EXF |
IF ( (icFlag(i,j).GT.0. _d 0) .AND. |
./pkg/thsice/thsice_get_exf.F |
432 |
THSICE_GET_EXF |
IF ( (icFlag(i,j).GT.0. _d 0) .AND. |
./pkg/thsice/thsice_get_exf.F |
464 |
THSICE_GET_EXF |
IF ( (icFlag(i,j).GT.0. _d 0) .AND. |
./pkg/thsice/thsice_get_exf.F |
511 |
THSICE_GET_EXF |
IF ( (icFlag(i,j).GT.0. _d 0) .AND. |
./pkg/thsice/thsice_get_exf.F |
65 |
THSICE_GET_EXF |
_RL icFlag (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |