File |
Line number |
Procedure |
Code |
./pkg/layers/LAYERS.h |
123 |
NO PROCEDURE |
_RL layers_dfx(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,2,nSx,nSy) |
./pkg/layers/LAYERS.h |
88 |
NO PROCEDURE |
& layers_surfflux, layers_dfx, layers_dfy, layers_dfr, |
./pkg/layers/layers_calc.F |
271 |
LAYERS_CALC |
& layers_dfx, myIter, myThid ) |
./pkg/layers/layers_calc.F |
451 |
LAYERS_CALC |
layers_dfx (i,j,k,iTracer,bi,bj) = 0. _d 0 |
./pkg/layers/layers_fluxcalc.F |
652 |
LAYERS_DIAPYCNAL |
& (layers_dfx(i,j,kci,1,bi,bj)+ |
./pkg/layers/layers_fluxcalc.F |
659 |
LAYERS_DIAPYCNAL |
& (layers_dfx(i,j,kci,2,bi,bj)+ |
./pkg/layers/layers_init_varia.F |
85 |
LAYERS_INIT_VARIA |
layers_dfx (i,j,kg,iTracer,bi,bj) = 0. _d 0 |
./pkg/layers/layers_save.F |
73 |
LAYERS_FILL |
CALL LAYERS_FILL_FIELD(df, trIdentity, Nr, layers_dfx,'U', |
./pkg/layers/layers_thermodynamics.F |
107 |
LAYERS_CALC_RHS |
layers_dfx(i,j,k,iTracer,bi,bj) = maskInC(i,j,bi,bj) * |
./pkg/layers/layers_thermodynamics.F |
108 |
LAYERS_CALC_RHS |
& tmpfac * ( layers_dfx(i+1,j,k,iTracer,bi,bj) - |
./pkg/layers/layers_thermodynamics.F |
109 |
LAYERS_CALC_RHS |
& layers_dfx(i,j,k,iTracer,bi,bj) ) |