Symbol Description Uses
GGL90diffTKEh 8


File Line number Procedure Code
./pkg/ggl90/ggl90_readparms.F 36 GGL90_READPARMS 
     &     GGL90diffTKEh,
./pkg/ggl90/ggl90_readparms.F 67 GGL90_READPARMS 
      GGL90diffTKEh        = 0.0 _d 0
./pkg/ggl90/GGL90.h 60 NO PROCEDURE 
      _RL    GGL90diffTKEh
./pkg/ggl90/GGL90.h 68 NO PROCEDURE 
     &     GGL90diffTKEh,
./pkg/ggl90/ggl90_exchanges.F 33 GGL90_EXCHANGES 
      IF (GGL90isON .AND. GGL90diffTKEh .GT. 0. _d 0) THEN
./pkg/ggl90/ggl90_calc.F 207 GGL90_CALC 
      IF ( GGL90diffTKEh .GT. 0. _d 0 ) THEN
./pkg/ggl90/ggl90_calc.F 223 GGL90_CALC 
          dfx(i,j) = -GGL90diffTKEh*xA(i,j)
./pkg/ggl90/ggl90_calc.F 235 GGL90_CALC 
          dfy(i,j) = -GGL90diffTKEh*yA(i,j)