| File |
Line number |
Procedure |
Code |
|
./pkg/exf/EXF_FIELDS.h |
218 |
NO PROCEDURE |
COMMON /exf_swflux_r/ swflux |
|
./pkg/exf/EXF_FIELDS.h |
219 |
NO PROCEDURE |
_RL swflux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/exf/exf_check_range.F |
191 |
EXF_CHECK_RANGE |
if ( (swflux(i,j,bi,bj) .GT. 1. .OR. |
|
./pkg/exf/exf_check_range.F |
192 |
EXF_CHECK_RANGE |
& swflux(i,j,bi,bj) .LT. -1000. ) .AND. |
|
./pkg/exf/exf_check_range.F |
196 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myiter, swflux(i,j,bi,bj) |
|
./pkg/exf/exf_diagnostics_fill.F |
40 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(swflux, 'EXFswnet',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_getffields.F |
270 |
EXF_GETFFIELDS |
& swflux, swflux0, swflux1, swfluxmask, |
|
./pkg/exf/exf_getffields.F |
407 |
EXF_GETFFIELDS |
& maskc, swflux, xx_swflux0, xx_swflux1, xx_swflux_dummy, |
|
./pkg/exf/exf_getforcing.F |
217 |
EXF_GETFORCING |
& + swflux(i,j,bi,bj) |
|
./pkg/exf/exf_getforcing.F |
277 |
EXF_GETFORCING |
hflux(i,j,bi,bj) = hflux(i,j,bi,bj) + swflux(i,j,bi,bj) |
|
./pkg/exf/exf_init.F |
240 |
EXF_INIT |
& swfluxconst, swflux, swflux0, swflux1, |
|
./pkg/exf/exf_mapfields.F |
299 |
EXF_MAPFIELDS |
Qsw(i,j,bi,bj) = exf_outscal_swflux*swflux(i,j,bi,bj) |
|
./pkg/exf/exf_monitor.F |
161 |
EXF_MONITOR |
CALL MON_WRITESTATS_RL( 1, swflux, '_swflux', |
|
./pkg/exf/exf_radiation.F |
162 |
EXF_RADIATION |
swflux(i,j,bi,bj) = - swdown(i,j,bi,bj) * |
|
./pkg/exf/exf_radiation.F |
165 |
EXF_RADIATION |
swflux(i,j,bi,bj) = - swdown(i,j,bi,bj) * |
|
./pkg/exf/exf_radiation.F |
169 |
EXF_RADIATION |
swflux(i,j,bi,bj) = - swdown(i,j,bi,bj) * |