| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_get_exf.F |
220 |
THSICE_GET_EXF |
& i,j,bi,bj, atemp(i,j,bi,bj),lwdown(i,j,bi,bj) |
|
./pkg/thsice/thsice_get_exf.F |
224 |
THSICE_GET_EXF |
IF ( iceFlag(i,j) .AND. atemp(i,j,bi,bj).NE.0. _d 0 ) THEN |
|
./pkg/thsice/thsice_get_exf.F |
243 |
THSICE_GET_EXF |
deltap(i,j) = atemp(i,j,bi,bj) + gamma_blk*ht - Tsf |
|
./pkg/thsice/thsice_get_exf.F |
273 |
THSICE_GET_EXF |
IF ( iceFlag(i,j) .AND. atemp(i,j,bi,bj).NE.0. _d 0 ) THEN |
|
./pkg/thsice/thsice_get_exf.F |
280 |
THSICE_GET_EXF |
t0 = atemp(i,j,bi,bj)* |
|
./pkg/thsice/thsice_get_exf.F |
305 |
THSICE_GET_EXF |
IF ( iceFlag(i,j) .AND. atemp(i,j,bi,bj).NE.0. _d 0 ) THEN |
|
./pkg/thsice/thsice_get_exf.F |
322 |
THSICE_GET_EXF |
t0 = atemp(i,j,bi,bj)* |
|
./pkg/thsice/thsice_get_exf.F |
402 |
THSICE_GET_EXF |
IF ( iceFlag(i,j) .AND. atemp(i,j,bi,bj).NE.0. _d 0 ) THEN |
|
./pkg/thsice/thsice_get_exf.F |
429 |
THSICE_GET_EXF |
IF ( iceFlag(i,j) .AND. atemp(i,j,bi,bj).NE.0. _d 0 ) THEN |
|
./pkg/thsice/thsice_get_exf.F |
462 |
THSICE_GET_EXF |
IF ( iceFlag(i,j) .AND. atemp(i,j,bi,bj).LE.0. _d 0 ) THEN |
|
./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 |
343 |
EXF_BULKFORMULAE |
IF ( atemp(i,j,bi,bj) .NE. 0. _d 0 ) THEN |
|
./pkg/exf/exf_bulkformulae.F |
362 |
EXF_BULKFORMULAE |
t0 = atemp(i,j,bi,bj)* |
|
./pkg/exf/exf_bulkformulae.F |
463 |
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', |