| File |
Line number |
Procedure |
Code |
|
./pkg/layers/LAYERS.h |
127 |
NO PROCEDURE |
_RL layers_afy(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 |
279 |
LAYERS_CALC |
& layers_afy, myIter, myThid ) |
|
./pkg/layers/layers_calc.F |
455 |
LAYERS_CALC |
layers_afy (i,j,k,iTracer,bi,bj) = 0. _d 0 |
|
./pkg/layers/layers_fluxcalc.F |
668 |
LAYERS_DIAPYCNAL |
& layers_afy(i,j,kci,1,bi,bj)) |
|
./pkg/layers/layers_fluxcalc.F |
675 |
LAYERS_DIAPYCNAL |
& layers_afy(i,j,kci,2,bi,bj)) |
|
./pkg/layers/layers_init_varia.F |
89 |
LAYERS_INIT_VARIA |
layers_afy (i,j,kg,iTracer,bi,bj) = 0. _d 0 |
|
./pkg/layers/layers_save.F |
85 |
LAYERS_FILL |
CALL LAYERS_FILL_FIELD(df, trIdentity, Nr, layers_afy,'V', |
|
./pkg/layers/layers_thermodynamics.F |
120 |
LAYERS_CALC_RHS |
layers_afy(i,j,k,iTracer,bi,bj) = maskInC(i,j,bi,bj) * |
|
./pkg/layers/layers_thermodynamics.F |
121 |
LAYERS_CALC_RHS |
& tmpfac * ( layers_afy(i,j+1,k,iTracer,bi,bj) - |
|
./pkg/layers/layers_thermodynamics.F |
122 |
LAYERS_CALC_RHS |
& layers_afy(i,j,k,iTracer,bi,bj) ) |