| File |
Line number |
Procedure |
Code |
|
./pkg/ecco/cost_averagesfields.F |
730 |
COST_AVERAGESFIELDS |
sfluxbar(i,j,bi,bj) = sflux(i,j,bi,bj) |
|
./pkg/ecco/cost_averagesfields.F |
741 |
COST_AVERAGESFIELDS |
& sflux(i,j,bi,bj) )/ |
|
./pkg/ecco/cost_averagesfields.F |
767 |
COST_AVERAGESFIELDS |
& sflux (i,j,bi,bj) |
|
./pkg/exf/exf_monitor.F |
46 |
EXF_MONITOR |
CALL MON_PRINTSTATS_RL(1,sflux,'_sflux', |
|
./pkg/exf/exf_init.F |
55 |
EXF_INIT |
& sfluxconst, sflux, sflux0, sflux1, mythid ) |
|
./pkg/exf/exf_bulkformulae.F |
491 |
EXF_BULKFORMULAE |
sflux(i,j,bi,bj) = evap(i,j,bi,bj) - precip(i,j,bi,bj) |
|
./pkg/exf/exf_getffields.F |
151 |
EXF_GETFFIELDS |
& sflux, sflux0, sflux1, sfluxmask, |
|
./pkg/exf/exf_getsurfacefluxes.F |
69 |
EXF_GETSURFACEFLUXES |
& maskc, sflux, xx_sflux0, xx_sflux1, xx_sflux_dummy, |
|
./pkg/exf/exf_check_range.F |
75 |
EXF_CHECK_RANGE |
if ( ABS(sflux(i,j,bi,bj)) .GT. 1.E-6 .AND. |
|
./pkg/exf/exf_check_range.F |
79 |
EXF_CHECK_RANGE |
& i, j, sflux(i,j,bi,bj) |
|
./pkg/exf/exf_mapfields.F |
118 |
EXF_MAPFIELDS |
empmr(i,j,bi,bj)= exf_outscal_sflux*sflux(i,j,bi,bj) |
|
./pkg/exf/exf_diagnostics_fill.F |
39 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(sflux, 'EXFempmr',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_getforcing.F |
156 |
EXF_GETFORCING |
sflux(i,j,bi,bj) = sflux(i,j,bi,bj) - runoff(i,j,bi,bj) |
|
./pkg/exf/exf_getforcing.F |
160 |
EXF_GETFORCING |
sflux(i,j,bi,bj) = sflux(i,j,bi,bj)*maskc(i,j,1,bi,bj) |
|
./pkg/exf/exf_getforcing.F |
168 |
EXF_GETFORCING |
_EXCH_XY_R8(sflux, mythid) |
|
./pkg/exf/exf_fields.h |
160 |
NO PROCEDURE |
common /exf_hsflux_r/ hflux, sflux |
|
./pkg/exf/exf_fields.h |
162 |
NO PROCEDURE |
_RL sflux (1-olx:snx+olx,1-oly:sny+oly,nsx,nsy) |