| Symbol | Description | Uses |
| gTKE | right hand side of diffusion equation | 4 |
| File | Line number | Procedure | Code |
| ./pkg/ggl90/ggl90_calc.F | 125 | GGL90_CALC |
_RL gTKE(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
| ./pkg/ggl90/ggl90_calc.F | 202 | GGL90_CALC |
gTKE(i,j) = 0. _d 0 |
| ./pkg/ggl90/ggl90_calc.F | 411 | GGL90_CALC |
gTKE(i,j) = -recip_drC(k)*recip_rA(i,j,bi,bj) |
| ./pkg/ggl90/ggl90_calc.F | 536 | GGL90_CALC |
& + gTKE(i,j)*deltaTggl90 |