| File |
Line number |
Procedure |
Code |
|
./pkg/cheapaml/CHEAPAML.h |
29 |
NO PROCEDURE |
& qair, gqairm, |
|
./pkg/cheapaml/CHEAPAML.h |
43 |
NO PROCEDURE |
_RL qair (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
|
./pkg/cheapaml/cheapaml.F |
191 |
CHEAPAML |
I cheapaml_kdiff, qair, |
|
./pkg/cheapaml/cheapaml.F |
206 |
CHEAPAML |
U qair, |
|
./pkg/cheapaml/cheapaml.F |
212 |
CHEAPAML |
_EXCH_XY_RL(qair,myThid) |
|
./pkg/cheapaml/cheapaml.F |
267 |
CHEAPAML |
U qair(1-OLx,1-OLy,bi,bj), |
|
./pkg/cheapaml/cheapaml.F |
287 |
CHEAPAML |
& CALL WRITE_FLD_XY_RL('qAir_afAdv.', sufx, qair, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
438 |
CHEAPAML |
& *(0.39 _d 0 - 0.05 _d 0*SQRT(ABS(qair(i,j,bi,bj)) |
|
./pkg/cheapaml/cheapaml.F |
534 |
CHEAPAML |
U qair, |
|
./pkg/cheapaml/cheapaml.F |
539 |
CHEAPAML |
dq=qr(i,j,bi,bj)-qair(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml.F |
540 |
CHEAPAML |
qair(i,j,bi,bj)=qair(i,j,bi,bj)+dq*xrelf(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml.F |
541 |
CHEAPAML |
IF (qair(i,j,bi,bj).LT.0.0) qair(i,j,bi,bj) = 0.0 _d 0 |
|
./pkg/cheapaml/cheapaml.F |
575 |
CHEAPAML |
_EXCH_XY_RL(qair,myThid) |
|
./pkg/cheapaml/cheapaml.F |
607 |
CHEAPAML |
U qair(1-OLx,1-OLy,bi,bj), |
|
./pkg/cheapaml/cheapaml_coare3_flux.F |
107 |
CHEAPAML_COARE3_FLUX |
q=qair(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
123 |
CHEAPAML_INIT_VARIA |
CALL READ_FLD_XY_RL( AirQFile,' ',qair,0,myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
135 |
CHEAPAML_INIT_VARIA |
qair(i,j,bi,bj)=0.8 _d 0*ssqa |
|
./pkg/cheapaml/cheapaml_init_varia.F |
141 |
CHEAPAML_INIT_VARIA |
_EXCH_XY_RL( qair, myThid ) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
218 |
CHEAPAML_INIT_VARIA |
qair(i,j,bi,bj)=qair(1,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
223 |
CHEAPAML_INIT_VARIA |
qair(i,j,bi,bj)=qair(sNx,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
228 |
CHEAPAML_INIT_VARIA |
qair(i,j,bi,bj)=qair(i,1,bi,bj) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
233 |
CHEAPAML_INIT_VARIA |
qair(i,j,bi,bj)=qair(i,sNy,bi,bj) |
|
./pkg/cheapaml/cheapaml_init_varia.F |
64 |
CHEAPAML_INIT_VARIA |
qair (i,j,bi,bj) = 0. _d 0 |
|
./pkg/cheapaml/cheapaml_lanl_flux.F |
143 |
CHEAPAML_LANL_FLUX |
q=qair(i,j,bi,bj) |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
141 |
CHEAPAML_READ_PICKUP |
CALL READ_MFLDS_3D_RL( 'Qair ', qair, |
|
./pkg/cheapaml/cheapaml_read_pickup.F |
205 |
CHEAPAML_READ_PICKUP |
CALL EXCH_XY_RL( qair, myThid ) |
|
./pkg/cheapaml/cheapaml_write_pickup.F |
96 |
CHEAPAML_WRITE_PICKUP |
& qair, nj, myIter, myThid ) |