Symbol Description Uses
kgcw 5


File Line number Procedure Code
./pkg/layers/layers_fluxcalc.F 457 LAYERS_DIAPYCNAL 
      INTEGER kgcw(sNx+1,sNy+1)
./pkg/layers/layers_fluxcalc.F 486 LAYERS_DIAPYCNAL 
          kgcw(i,j) = Nlayers-1
./pkg/layers/layers_fluxcalc.F 588 LAYERS_DIAPYCNAL 
     O      kgcw,
./pkg/layers/layers_fluxcalc.F 596 LAYERS_DIAPYCNAL 
          IF ( kgcw(i,j) .LE. 0 ) THEN
./pkg/layers/layers_fluxcalc.F 617 LAYERS_DIAPYCNAL 
         kloc = kgcw(i,j)