| File |
Line number |
Procedure |
Code |
|
./pkg/layers/layers_calc.F |
100 |
LAYERS_CALC |
kci = CellIndex(kk) |
|
./pkg/layers/layers_calc.F |
146 |
LAYERS_CALC |
& dZZf(kk) * uVel(i,j,kci,bi,bj) * hFacW(i,j,kci,bi,bj) |
|
./pkg/layers/layers_calc.F |
150 |
LAYERS_CALC |
& + dZZf(kk) * hFacW(i,j,kci,bi,bj) |
|
./pkg/layers/layers_calc.F |
196 |
LAYERS_CALC |
& + dZZf(kk) * vVel(i,j,kci,bi,bj) * hFacS(i,j,kci,bi,bj) |
|
./pkg/layers/layers_calc.F |
200 |
LAYERS_CALC |
& + dZZf(kk) * hFacS(i,j,kci,bi,bj) |
|
./pkg/layers/layers_calc.F |
52 |
LAYERS_CALC |
INTEGER i,j,k,kk,kg,kci |