Symbol | Description | Uses |
gTKE | 10 |
File | Line number | Procedure | Code |
./pkg/ggl90/ggl90_calc.F | 126 | GGL90_CALC |
gTKE(I,J,K) = 0. _d 0 |
./pkg/ggl90/ggl90_calc.F | 195 | GGL90_CALC |
gTKE(I,J,K) = GGL90TKE(I,J,K,bi,bj) |
./pkg/ggl90/ggl90_calc.F | 246 | GGL90_CALC |
gTKE(i,j,k)=gTKE(i,j,k) |
./pkg/ggl90/ggl90_calc.F | 327 | GGL90_CALC |
gTKE(I,J,kSurf) = MAX(GGL90TKEmin,GGL90m2*uStarSquare) |
./pkg/ggl90/ggl90_calc.F | 331 | GGL90_CALC |
gTKE(I,J,kBottom) = gTKE(I,J,kBottom) |
./pkg/ggl90/ggl90_calc.F | 340 | GGL90_CALC |
U gTKE, |
./pkg/ggl90/ggl90_calc.F | 349 | GGL90_CALC |
GGL90TKE(I,J,K,bi,bj) = MAX( gTKE(I,J,K), GGL90TKEmin ) |
./pkg/ggl90/ggl90_calc.F | 93 | GGL90_CALC |
_RL gTKE (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |