| File |
Line number |
Procedure |
Code |
|
./pkg/seaice/seaice_budget_ice.F |
113 |
SEAICE_BUDGET_ICE |
HCUT=SEAICE_snowThick |
|
./pkg/seaice/seaice_budget_ice.F |
149 |
SEAICE_BUDGET_ICE |
IF(hSnwLoc(I,J).GT.HCUT) THEN |
|
./pkg/seaice/seaice_budget_ice.F |
152 |
SEAICE_BUDGET_ICE |
ALB(I,J)=ALB(I,J) + (hSnwLoc(I,J)/HCUT)*(ASNOW-ALB(I,J)) |
|
./pkg/seaice/seaice_budget_ice.F |
66 |
SEAICE_BUDGET_ICE |
_RL TMELT, TMELTP, XKI, XKS, HCUT, ASNOW, XIO |
|
./pkg/seaice/seaice_budget_ice_if.F |
120 |
SEAICE_BUDGET_ICE_IF |
HCUT=SEAICE_snowThick |
|
./pkg/seaice/seaice_budget_ice_if.F |
76 |
SEAICE_BUDGET_ICE_IF |
_RL TMELT, TMELTP, XKI, XKS, HCUT, ASNOW, XIO |