File |
Line number |
Procedure |
Code |
./pkg/thsice/thsice_get_bulkf.F |
103 |
THSICE_GET_BULKF |
O SHF, EVPloc, SLRU, |
./pkg/thsice/thsice_get_bulkf.F |
110 |
THSICE_GET_BULKF |
evap(i,j) = EVPloc(1) * 1. _d -3 |
./pkg/thsice/thsice_get_bulkf.F |
80 |
THSICE_GET_BULKF |
_RL Tsurf(1), SHF(1), EVPloc(1), SLRU(1) |
./pkg/bulk_force/bulkf_forcing.F |
100 |
BULKF_FORCING |
evap(i,j,bi,bj) = EVPloc(1) * 1. _d -3 / rhoFW |
./pkg/bulk_force/bulkf_forcing.F |
68 |
BULKF_FORCING |
_RL SHF(1), EVPloc(1), SLRU(1) |
./pkg/bulk_force/bulkf_forcing.F |
91 |
BULKF_FORCING |
O SHF, EVPloc, SLRU, |
./pkg/bulk_force/bulkf_forcing.F |
98 |
BULKF_FORCING |
flh(i,j,bi,bj) = -Lvap*EVPloc(1) |