| File |
Line number |
Procedure |
Code |
|
./pkg/exf/EXF_FIELDS.h |
190 |
NO PROCEDURE |
COMMON /exf_atm_temp_r/ atemp, aqh, hs, hl, lwflux, |
|
./pkg/exf/EXF_FIELDS.h |
193 |
NO PROCEDURE |
_RL aqh (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/exf/exf_bulkformulae.F |
302 |
EXF_BULKFORMULAE |
& *(1. _d 0 + humid_fac*aqh(i,j,bi,bj))) |
|
./pkg/exf/exf_bulkformulae.F |
308 |
EXF_BULKFORMULAE |
delq(i,j) = aqh(i,j,bi,bj) - ssq |
|
./pkg/exf/exf_bulkformulae.F |
379 |
EXF_BULKFORMULAE |
& (exf_one + humid_fac*aqh(i,j,bi,bj)) |
|
./pkg/exf/exf_bulkformulae.F |
381 |
EXF_BULKFORMULAE |
& qstar(i,j)/(exf_one/humid_fac+aqh(i,j,bi,bj)) |
|
./pkg/exf/exf_check_range.F |
132 |
EXF_CHECK_RANGE |
IF ( (aqh(i,j,bi,bj) .LT. 0. .OR. |
|
./pkg/exf/exf_check_range.F |
133 |
EXF_CHECK_RANGE |
& aqh(i,j,bi,bj) .GT. 0.1 ) .AND. |
|
./pkg/exf/exf_check_range.F |
137 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myIter, aqh(i,j,bi,bj) |
|
./pkg/exf/exf_diagnostics_fill.F |
46 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(aqh, 'EXFaqh ',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_getffields.F |
229 |
EXF_GETFFIELDS |
U aqh, aqh0, aqh1, |
|
./pkg/exf/exf_getffields.F |
510 |
EXF_GETFFIELDS |
& maskc, aqh, xx_aqh0, xx_aqh1, xx_aqh_dummy, |
|
./pkg/exf/exf_getffields.F |
646 |
EXF_GETFFIELDS |
aqh(i,j,bi,bj) =aqh(i,j,bi,bj) +xx_aqh_mean(i,j,bi,bj) |
|
./pkg/exf/exf_getffields.F |
692 |
EXF_GETFFIELDS |
& aqh(i,j,bi,bj)=aqh(i,j,bi,bj)+ |
|
./pkg/exf/exf_init_varia.F |
193 |
EXF_INIT_VARIA |
O aqh, aqh0, aqh1, |
|
./pkg/exf/exf_monitor.F |
147 |
EXF_MONITOR |
CALL MON_WRITESTATS_RL( 1, aqh, '_aqh', |
|
./pkg/thsice/thsice_get_exf.F |
252 |
THSICE_GET_EXF |
& *(1. _d 0 + humid_fac*aqh(i,j,bi,bj))) |
|
./pkg/thsice/thsice_get_exf.F |
258 |
THSICE_GET_EXF |
delq(i,j) = aqh(i,j,bi,bj) - ssq(i,j) |
|
./pkg/thsice/thsice_get_exf.F |
308 |
THSICE_GET_EXF |
& (exf_one + humid_fac*aqh(i,j,bi,bj)) |
|
./pkg/thsice/thsice_get_exf.F |
353 |
THSICE_GET_EXF |
& (exf_one + humid_fac*aqh(i,j,bi,bj)) |
|
./pkg/thsice/thsice_get_exf.F |
355 |
THSICE_GET_EXF |
& qstar(i,j)/(exf_one/humid_fac+aqh(i,j,bi,bj)) |
|
./pkg/ecco/cost_gencost_customize.F |
172 |
COST_GENCOST_CUSTOMIZE |
& aqh(i,j,bi,bj)*maskC(i,j,1,bi,bj) |