File |
Line number |
Procedure |
Code |
./pkg/bulk_force/bulkf_forcing.F |
167 |
BULKF_FORCING |
hfl = 0. _d 0 |
./pkg/bulk_force/bulkf_forcing.F |
168 |
BULKF_FORCING |
hfl = hfl + fsh(i,j,bi,bj) |
./pkg/bulk_force/bulkf_forcing.F |
169 |
BULKF_FORCING |
hfl = hfl + flh(i,j,bi,bj) |
./pkg/bulk_force/bulkf_forcing.F |
170 |
BULKF_FORCING |
hfl = hfl - flwupnet(i,j,bi,bj) |
./pkg/bulk_force/bulkf_forcing.F |
171 |
BULKF_FORCING |
hfl = hfl + fswnet(i,j,bi,bj) |
./pkg/bulk_force/bulkf_forcing.F |
173 |
BULKF_FORCING |
Qnet(i,j,bi,bj) = -hfl |
./pkg/bulk_force/bulkf_forcing.F |
63 |
BULKF_FORCING |
_RL df0dT,hfl, evp, dEvdT |
./pkg/exf/exf_bulkformulae.F |
181 |
EXF_BULKFORMULAE |
_RL hfl |
./pkg/exf/exf_bulkformulae.F |
481 |
EXF_BULKFORMULAE |
hfl = 0. _d 0 |
./pkg/exf/exf_bulkformulae.F |
482 |
EXF_BULKFORMULAE |
hfl = hfl - hs(i,j,bi,bj) |
./pkg/exf/exf_bulkformulae.F |
483 |
EXF_BULKFORMULAE |
hfl = hfl - hl(i,j,bi,bj) |
./pkg/exf/exf_bulkformulae.F |
484 |
EXF_BULKFORMULAE |
hfl = hfl + lwflux(i,j,bi,bj) |
./pkg/exf/exf_bulkformulae.F |
486 |
EXF_BULKFORMULAE |
hfl = hfl + swflux(i,j,bi,bj) |
./pkg/exf/exf_bulkformulae.F |
489 |
EXF_BULKFORMULAE |
hflux(i,j,bi,bj) = hfl |