File |
Line number |
Procedure |
Code |
./pkg/ggl90/ggl90_calc.F |
150 |
GGL90_CALC |
rMixingLength(i,j,1) = 0. _d 0 |
./pkg/ggl90/ggl90_calc.F |
216 |
GGL90_CALC |
rMixingLength(i,j,k) = 1. _d 0 / GGL90mixingLength(i,j,k) |
./pkg/ggl90/ggl90_calc.F |
239 |
GGL90_CALC |
rMixingLength(i,j,k) = 1. _d 0 / GGL90mixingLength(i,j,k) |
./pkg/ggl90/ggl90_calc.F |
281 |
GGL90_CALC |
rMixingLength(i,j,k) = 1. _d 0 / GGL90mixingLength(i,j,k) |
./pkg/ggl90/ggl90_calc.F |
318 |
GGL90_CALC |
rMixingLength(i,j,k) = 1. _d 0 / tmpmlx |
./pkg/ggl90/ggl90_calc.F |
422 |
GGL90_CALC |
& *SQRTTKE(i,j,k)*rMixingLength(i,j,k) |
./pkg/ggl90/ggl90_calc.F |
501 |
GGL90_CALC |
& * rMixingLength(i,j,k) |
./pkg/ggl90/ggl90_calc.F |
93 |
GGL90_CALC |
_RL rMixingLength (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |