File |
Line number |
Procedure |
Code |
./pkg/ggl90/ggl90_calc.F |
172 |
GGL90_CALC |
rMixingLength(i,j,k) = 0. _d 0 |
./pkg/ggl90/ggl90_calc.F |
194 |
GGL90_CALC |
rMixingLength(i,j,1) = 0. _d 0 |
./pkg/ggl90/ggl90_calc.F |
257 |
GGL90_CALC |
rMixingLength(i,j,k) = 1. _d 0 / GGL90mixingLength(i,j,k) |
./pkg/ggl90/ggl90_calc.F |
280 |
GGL90_CALC |
rMixingLength(i,j,k) = 1. _d 0 / GGL90mixingLength(i,j,k) |
./pkg/ggl90/ggl90_calc.F |
315 |
GGL90_CALC |
rMixingLength(i,j,k) = 1. _d 0 / GGL90mixingLength(i,j,k) |
./pkg/ggl90/ggl90_calc.F |
352 |
GGL90_CALC |
rMixingLength(i,j,k) = 1. _d 0 / tmpmlx |
./pkg/ggl90/ggl90_calc.F |
504 |
GGL90_CALC |
& *SQRTTKE(i,j,k)*rMixingLength(i,j,k) |
./pkg/ggl90/ggl90_calc.F |
621 |
GGL90_CALC |
& * rMixingLength(i,j,k) |
./pkg/ggl90/ggl90_calc.F |
98 |
GGL90_CALC |
_RL rMixingLength (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |