File |
Line number |
Procedure |
Code |
./pkg/layers/layers_thermodynamics.F |
105 |
LAYERS_CALC_RHS |
tmpfac = -_recip_hFacC(i,j,k,bi,bj)*recip_drF(k) |
./pkg/layers/layers_thermodynamics.F |
108 |
LAYERS_CALC_RHS |
& tmpfac * ( layers_dfx(i+1,j,k,iTracer,bi,bj) - |
./pkg/layers/layers_thermodynamics.F |
111 |
LAYERS_CALC_RHS |
& tmpfac * ( layers_dfy(i,j+1,k,iTracer,bi,bj) - |
./pkg/layers/layers_thermodynamics.F |
113 |
LAYERS_CALC_RHS |
layers_dfr(i,j,k,iTracer,bi,bj) = tmpfac * rkSign * |
./pkg/layers/layers_thermodynamics.F |
118 |
LAYERS_CALC_RHS |
& tmpfac * ( layers_afx(i+1,j,k,iTracer,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 |
123 |
LAYERS_CALC_RHS |
layers_afr(i,j,k,iTracer,bi,bj) = tmpfac * rkSign * |
./pkg/layers/layers_thermodynamics.F |
53 |
LAYERS_CALC_RHS |
_RL fluxfac(2), downfac, tmpfac |