File |
Line number |
Procedure |
Code |
./pkg/seaice/seaice_solve4temp.F |
145 |
SEAICE_SOLVE4TEMP |
_RL ALB_ICE (1:sNx,1:sNy) |
./pkg/seaice/seaice_solve4temp.F |
280 |
SEAICE_SOLVE4TEMP |
ALB_ICE (I,J) = SEAICE_wetIceAlb_south |
./pkg/seaice/seaice_solve4temp.F |
283 |
SEAICE_SOLVE4TEMP |
ALB_ICE (I,J) = SEAICE_dryIceAlb_south |
./pkg/seaice/seaice_solve4temp.F |
288 |
SEAICE_SOLVE4TEMP |
ALB_ICE (I,J) = SEAICE_wetIceAlb |
./pkg/seaice/seaice_solve4temp.F |
291 |
SEAICE_SOLVE4TEMP |
ALB_ICE (I,J) = SEAICE_dryIceAlb |
./pkg/seaice/seaice_solve4temp.F |
300 |
SEAICE_SOLVE4TEMP |
ALB(I,J) = ALB_ICE(I,J) |
./pkg/seaice/seaice_solve4temp.F |
303 |
SEAICE_SOLVE4TEMP |
ALB(I,J) = MIN( ALB_ICE(I,J) + HSNOW_ACTUAL(I,J)*recip_HCUT |
./pkg/seaice/seaice_solve4temp.F |
304 |
SEAICE_SOLVE4TEMP |
& *(ALB_SNOW(I,J) -ALB_ICE(I,J)) |