| File |
Line number |
Procedure |
Code |
|
./pkg/exf/EXF_FIELDS.h |
238 |
NO PROCEDURE |
COMMON /exf_swflux_r/ swflux |
|
./pkg/exf/EXF_FIELDS.h |
239 |
NO PROCEDURE |
_RL swflux (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/exf/exf_check_range.F |
165 |
EXF_CHECK_RANGE |
IF ( (swflux(i,j,bi,bj) .GT. 1. .OR. |
|
./pkg/exf/exf_check_range.F |
166 |
EXF_CHECK_RANGE |
& swflux(i,j,bi,bj) .LT. -1000. ) .AND. |
|
./pkg/exf/exf_check_range.F |
170 |
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 |
344 |
EXF_GETFFIELDS |
U swflux, swflux0, swflux1, |
|
./pkg/exf/exf_getffields.F |
544 |
EXF_GETFFIELDS |
& maskc, swflux, xx_swflux0, xx_swflux1, xx_swflux_dummy, |
|
./pkg/exf/exf_getffields.F |
703 |
EXF_GETFFIELDS |
& swflux(i,j,bi,bj)=swflux(i,j,bi,bj)+ |
|
./pkg/exf/exf_getforcing.F |
216 |
EXF_GETFORCING |
& + swflux(i,j,bi,bj) |
|
./pkg/exf/exf_getforcing.F |
284 |
EXF_GETFORCING |
hflux(i,j,bi,bj) = hflux(i,j,bi,bj) + swflux(i,j,bi,bj) |
|
./pkg/exf/exf_init_varia.F |
280 |
EXF_INIT_VARIA |
O swflux, swflux0, swflux1, |
|
./pkg/exf/exf_mapfields.F |
302 |
EXF_MAPFIELDS |
Qsw(i,j,bi,bj) = exf_outscal_swflux*swflux(i,j,bi,bj) |
|
./pkg/exf/exf_monitor.F |
169 |
EXF_MONITOR |
CALL MON_WRITESTATS_RL( 1, swflux, '_swflux', |
|
./pkg/exf/exf_radiation.F |
165 |
EXF_RADIATION |
swflux(i,j,bi,bj) = - swdown(i,j,bi,bj) |
|
./pkg/exf/exf_radiation.F |
173 |
EXF_RADIATION |
swflux(i,j,bi,bj) = - swdown(i,j,bi,bj) |