Symbol Description Uses
GGL90diffTKEh 12


File Line number Procedure Code
./pkg/ggl90/GGL90.h 71 NO PROCEDURE 
      _RL    GGL90diffTKEh
./pkg/ggl90/GGL90.h 80 NO PROCEDURE 
     &     GGL90diffTKEh,
./pkg/ggl90/ggl90_calc.F 367 GGL90_CALC 
      IF ( GGL90diffTKEh .GT. 0. _d 0 ) THEN
./pkg/ggl90/ggl90_calc.F 386 GGL90_CALC 
          dfx(i,j) = -GGL90diffTKEh*xA(i,j)
./pkg/ggl90/ggl90_calc.F 400 GGL90_CALC 
          dfy(i,j) = -GGL90diffTKEh*yA(i,j)
./pkg/ggl90/ggl90_calc.F 531 GGL90_CALC 
       IF ( GGL90diffTKEh .GT. 0. _d 0 ) THEN
./pkg/ggl90/ggl90_check.F 51 GGL90_CHECK 
      IF ( GGL90diffTKEh .NE. 0. _d 0 ) THEN
./pkg/ggl90/ggl90_check.F 59 GGL90_CHECK 
      IF ( GGL90diffTKEh .NE. 0. _d 0 ) THEN
./pkg/ggl90/ggl90_exchanges.F 37 GGL90_EXCHANGES 
      IF (GGL90isON .AND. GGL90diffTKEh .GT. 0. _d 0) THEN
./pkg/ggl90/ggl90_readparms.F 109 GGL90_READPARMS 
      GGL90diffTKEh        = 0.0 _d 0
./pkg/ggl90/ggl90_readparms.F 301 GGL90_READPARMS 
      CALL WRITE_0D_RL( GGL90diffTKEh, INDEX_NONE,'GGL90diffTKEh =',
./pkg/ggl90/ggl90_readparms.F 50 GGL90_READPARMS 
     &     GGL90diffTKEh,