File |
Line number |
Procedure |
Code |
./pkg/thsice/thsice_get_bulkf.F |
100 |
THSICE_GET_BULKF |
I Tsurf, flwdwn(i,j,bi,bj), |
./pkg/thsice/thsice_get_bulkf.F |
139 |
THSICE_GET_BULKF |
flwNet_dwn = flwdwn(i,j,bi,bj) - flwup |
./pkg/bulk_force/BULKF.h |
29 |
NO PROCEDURE |
& Tair, Qair, Rain, Solar, flwdwn, |
./pkg/bulk_force/BULKF.h |
40 |
NO PROCEDURE |
_RL flwdwn (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/bulk_force/bulkf_forcing.F |
140 |
BULKF_FORCING |
flwupnet(i,j,bi,bj)=flwup(i,j,bi,bj)-flwdwn(i,j,bi,bj) |
./pkg/bulk_force/bulkf_forcing.F |
88 |
BULKF_FORCING |
I theta(i,j,ks,bi,bj), flwdwn(i,j,bi,bj), |
./pkg/bulk_force/bulkf_init_varia.F |
49 |
BULKF_INIT_VARIA |
flwdwn(i,j,bi,bj) = 0. _d 0 |