| File |
Line number |
Procedure |
Code |
|
./pkg/layers/LAYERS.h |
128 |
NO PROCEDURE |
_RL layers_afr(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,2,nSx,nSy) |
|
./pkg/layers/LAYERS.h |
89 |
NO PROCEDURE |
& layers_afx, layers_afy, layers_afr, layers_tottend |
|
./pkg/layers/layers_calc.F |
281 |
LAYERS_CALC |
& layers_afr, myIter, myThid ) |
|
./pkg/layers/layers_calc.F |
456 |
LAYERS_CALC |
layers_afr (i,j,k,iTracer,bi,bj) = 0. _d 0 |
|
./pkg/layers/layers_fluxcalc.F |
671 |
LAYERS_DIAPYCNAL |
& dzfac * Tfac * layers_afr(i,j,kci,1,bi,bj) |
|
./pkg/layers/layers_fluxcalc.F |
678 |
LAYERS_DIAPYCNAL |
& dzfac * Sfac * layers_afr(i,j,kci,2,bi,bj) |
|
./pkg/layers/layers_init_varia.F |
90 |
LAYERS_INIT_VARIA |
layers_afr (i,j,kg,iTracer,bi,bj) = 0. _d 0 |
|
./pkg/layers/layers_save.F |
88 |
LAYERS_FILL |
CALL LAYERS_FILL_FIELD(df, trIdentity, Nr, layers_afr,'M', |
|
./pkg/layers/layers_thermodynamics.F |
123 |
LAYERS_CALC_RHS |
layers_afr(i,j,k,iTracer,bi,bj) = tmpfac * rkSign * |
|
./pkg/layers/layers_thermodynamics.F |
124 |
LAYERS_CALC_RHS |
& ( layers_afr(i,j,kdown,iTracer,bi,bj)*downfac - |
|
./pkg/layers/layers_thermodynamics.F |
125 |
LAYERS_CALC_RHS |
& layers_afr(i,j,k,iTracer,bi,bj) ) |