| File |
Line number |
Procedure |
Code |
|
./pkg/thsice/thsice_get_bulkf.F |
101 |
THSICE_GET_BULKF |
I ThAir(i,j,bi,bj), Tair(i,j,bi,bj), |
|
./pkg/thsice/thsice_get_bulkf.F |
125 |
THSICE_GET_BULKF |
I Tair(i,j,bi,bj), Qair(i,j,bi,bj), |
|
./pkg/thsice/thsice_get_bulkf.F |
133 |
THSICE_GET_BULKF |
I Tair(i,j,bi,bj), Qair(i,j,bi,bj), Tsf(i,j), |
|
./pkg/thsice/thsice_get_precip.F |
107 |
THSICE_GET_PRECIP |
& ( Tair(i,j,bi,bj) - Tf0kel - temp_EvPrRn ) |
|
./pkg/thsice/thsice_get_precip.F |
138 |
THSICE_GET_PRECIP |
& .AND. Tair(i,j,bi,bj).LT.zeroRL ) THEN |
|
./pkg/thsice/thsice_get_precip.F |
153 |
THSICE_GET_PRECIP |
& ( Tair(i,j,bi,bj) - temp_EvPrRn ) |
|
./pkg/thsice/thsice_get_precip.F |
91 |
THSICE_GET_PRECIP |
& .AND. Tair(i,j,bi,bj).LE.Tf0kel ) THEN |
|
./pkg/bulk_force/BULKF.h |
29 |
NO PROCEDURE |
& Tair, Qair, Rain, Solar, flwdwn, |
|
./pkg/bulk_force/BULKF.h |
36 |
NO PROCEDURE |
_RL Tair (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/bulk_force/bulkf_forcing.F |
110 |
BULKF_FORCING |
I Tair(i,j,bi,bj), Qair(i,j,bi,bj), |
|
./pkg/bulk_force/bulkf_forcing.F |
126 |
BULKF_FORCING |
I wspeed(i,j,bi,bj), Tair(i,j,bi,bj), |
|
./pkg/bulk_force/bulkf_forcing.F |
234 |
BULKF_FORCING |
IF ( Tair(i,j,bi,bj).LE.Tf0kel ) THEN |
|
./pkg/bulk_force/bulkf_forcing.F |
241 |
BULKF_FORCING |
& *( Tair(i,j,bi,bj) - Tf0kel - temp_EvPrRn ) |
|
./pkg/bulk_force/bulkf_forcing.F |
89 |
BULKF_FORCING |
I thAir(i,j,bi,bj), Tair(i,j,bi,bj), |
|
./pkg/bulk_force/bulkf_init_varia.F |
46 |
BULKF_INIT_VARIA |
Tair (i,j,bi,bj) = 0. _d 0 |
|
./pkg/cheapaml/CHEAPAML.h |
28 |
NO PROCEDURE |
& Tair, gTairm, |
|
./pkg/cheapaml/CHEAPAML.h |
41 |
NO PROCEDURE |
_RL Tair (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/cheapaml/cheapaml.F |
109 |
CHEAPAML |
CALL DIAGNOSTICS_FILL( Tair, 'CH_TAIR ', 0,1,0,1,1, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
153 |
CHEAPAML |
I cheapaml_kdiff, Tair, |
|
./pkg/cheapaml/cheapaml.F |
168 |
CHEAPAML |
U Tair, |
|
./pkg/cheapaml/cheapaml.F |
174 |
CHEAPAML |
_EXCH_XY_RL(Tair,myThid) |
|
./pkg/cheapaml/cheapaml.F |
261 |
CHEAPAML |
U Tair(1-OLx,1-OLy,bi,bj), |
|
./pkg/cheapaml/cheapaml.F |
285 |
CHEAPAML |
CALL WRITE_FLD_XY_RL('tAir_afAdv.', sufx, Tair, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
417 |
CHEAPAML |
ttt = Tair(i,j,bi,bj)-gamma_blk*(CheapHgrid(i,j,bi,bj)-zt) |
|
./pkg/cheapaml/cheapaml.F |
419 |
CHEAPAML |
xalwu = stefan*(0.5*Tair(i,j,bi,bj)+0.5*ttt+celsius2K)**4 |
|
./pkg/cheapaml/cheapaml.F |
422 |
CHEAPAML |
xalwd = stefan*(Tair(i,j,bi,bj)+celsius2K)**4*0.5 _d 0 |
|
./pkg/cheapaml/cheapaml.F |
443 |
CHEAPAML |
& *(theta(i,j,1,bi,bj)-Tair(i,j,bi,bj)) |
|
./pkg/cheapaml/cheapaml.F |
476 |
CHEAPAML |
ts=Tair(i,j,bi,bj)+gamma_blk*zt+celsius2K |
|
./pkg/cheapaml/cheapaml.F |
519 |
CHEAPAML |
U Tair, |
|
./pkg/cheapaml/cheapaml.F |
524 |
CHEAPAML |
dtemp=tr(i,j,bi,bj)-Tair(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml.F |
525 |
CHEAPAML |
Tair(i,j,bi,bj)=Tair(i,j,bi,bj)+dtemp*xrelf(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml.F |
572 |
CHEAPAML |
_EXCH_XY_RL(Tair,myThid) |
|
./pkg/cheapaml/cheapaml.F |
600 |
CHEAPAML |
U Tair(1-OLx,1-OLy,bi,bj), |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
80 |
CHEAPAML_COARE3_FLUX |
Tas = Tair(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
109 |
CHEAPAML_INIT_VARIA |
Tair(i,j,bi,bj) = localt |
|
./pkg/cheapaml/cheapaml_init_varia.F |
115 |
CHEAPAML_INIT_VARIA |
_EXCH_XY_RL( Tair, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
133 |
CHEAPAML_INIT_VARIA |
local= Tair(i,j,bi,bj)+celsius2K |
|
./pkg/cheapaml/cheapaml_init_varia.F |
217 |
CHEAPAML_INIT_VARIA |
Tair(i,j,bi,bj)=Tair(1,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
222 |
CHEAPAML_INIT_VARIA |
Tair(i,j,bi,bj)=Tair(sNx,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
227 |
CHEAPAML_INIT_VARIA |
Tair(i,j,bi,bj)=Tair(i,1,bi,bj) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
232 |
CHEAPAML_INIT_VARIA |
Tair(i,j,bi,bj)=Tair(i,sNy,bi,bj) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
62 |
CHEAPAML_INIT_VARIA |
Tair (i,j,bi,bj) = 0. _d 0 |
|
./pkg/cheapaml/cheapaml_init_varia.F |
95 |
CHEAPAML_INIT_VARIA |
CALL READ_FLD_XY_RL( AirTempFile,' ',Tair,0,myThid ) |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
128 |
CHEAPAML_LANL_FLUX |
t=Tair(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
135 |
CHEAPAML_READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'Tair ', Tair, |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
204 |
CHEAPAML_READ_PICKUP |
CALL EXCH_XY_RL( Tair, myThid ) |
|
./pkg/cheapaml/cheapaml_write_pickup.F |
84 |
CHEAPAML_WRITE_PICKUP |
& Tair, nj, myIter, myThid ) |