| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_get_exf.F |
171 |
THSICE_GET_EXF |
IF ( atemp(i,j,bi,bj) .NE. 0. _d 0 ) THEN |
|
./pkg/thsice/thsice_get_exf.F |
178 |
THSICE_GET_EXF |
deltap = atemp(i,j,bi,bj) + gamma_blk*ht - Tsf |
|
./pkg/thsice/thsice_get_exf.F |
192 |
THSICE_GET_EXF |
t0 = atemp(i,j,bi,bj)* |
|
./pkg/thsice/thsice_map_exf.F |
96 |
THSICE_MAP_EXF |
& .AND. atemp(i,j,bi,bj).LE.cen2kel ) THEN |
|
./pkg/exf/EXF_FIELDS.h |
181 |
NO PROCEDURE |
COMMON /exf_atm_temp_r/ atemp, aqh, lwflux, precip, snowprecip |
|
./pkg/exf/EXF_FIELDS.h |
182 |
NO PROCEDURE |
_RL atemp (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/exf/exf_bulkformulae.F |
280 |
EXF_BULKFORMULAE |
IF ( atemp(i,j,bi,bj) .NE. 0. _d 0 ) THEN |
|
./pkg/exf/exf_bulkformulae.F |
292 |
EXF_BULKFORMULAE |
deltap(i,j) = atemp(i,j,bi,bj) + gamma_blk*ht - Tsf |
|
./pkg/exf/exf_bulkformulae.F |
342 |
EXF_BULKFORMULAE |
IF ( atemp(i,j,bi,bj) .NE. 0. _d 0 ) THEN |
|
./pkg/exf/exf_bulkformulae.F |
361 |
EXF_BULKFORMULAE |
t0 = atemp(i,j,bi,bj)* |
|
./pkg/exf/exf_bulkformulae.F |
460 |
EXF_BULKFORMULAE |
IF ( atemp(i,j,bi,bj) .NE. 0. _d 0 ) THEN |
|
./pkg/exf/exf_check_range.F |
147 |
EXF_CHECK_RANGE |
if ( (atemp(i,j,bi,bj) .LT. 183 .OR. |
|
./pkg/exf/exf_check_range.F |
148 |
EXF_CHECK_RANGE |
& atemp(i,j,bi,bj) .GT. 343 ) .AND. |
|
./pkg/exf/exf_check_range.F |
153 |
EXF_CHECK_RANGE |
& bi, bj, i, j, myiter, atemp(i,j,bi,bj) |
|
./pkg/exf/exf_diagnostics_fill.F |
51 |
EXF_DIAGNOSTICS_FILL |
CALL DIAGNOSTICS_FILL(atemp, 'EXFatemp',0,1,0,1,1,myThid) |
|
./pkg/exf/exf_getffields.F |
184 |
EXF_GETFFIELDS |
& atemp, atemp0, atemp1, atempmask, |
|
./pkg/exf/exf_getffields.F |
194 |
EXF_GETFFIELDS |
atemp(i,j,bi,bj) = atemp(i,j,bi,bj) + exf_offset_atemp |
|
./pkg/exf/exf_getffields.F |
366 |
EXF_GETFFIELDS |
& maskc, atemp, xx_atemp0, xx_atemp1, xx_atemp_dummy, |
|
./pkg/exf/exf_init.F |
170 |
EXF_INIT |
& atempconst, atemp, atemp0, atemp1, |
|
./pkg/exf/exf_monitor.F |
125 |
EXF_MONITOR |
CALL MON_WRITESTATS_RL( 1, atemp, '_atemp', |