| File |
Line number |
Procedure |
Code |
|
./pkg/exf/exf_mapfields.F |
114 |
EXF_MAPFIELDS |
qnet(i,j,bi,bj) = exf_outscal_hflux*hflux(i,j,bi,bj) |
|
./pkg/exf/exf_mapfields.F |
116 |
EXF_MAPFIELDS |
& qnet(i,j,bi,bj) = qnet(i,j,bi,bj) - |
|
./pkg/exf/exf_mapfields.F |
240 |
EXF_MAPFIELDS |
_EXCH_XY_R4( qnet, mythid ) |
|
./pkg/sbo/sbo_calc.F |
227 |
SBO_CALC |
sboqnetwet = sboqnetwet + qnet(i,j,bi,bj) *darea |
|
./pkg/ecco/cost_averagesfields.F |
336 |
COST_AVERAGESFIELDS |
& hfluxbar, qnet, xx_hflux_mean_dummy, |
|
./pkg/ctrl/ctrl_map_forcing.F |
146 |
CTRL_MAP_FORCING |
qnet(i,j,bi,bj) = qnet(i,j,bi,bj) + tmpfld2d(i,j,bi,bj) |