Symbol Description Uses
layers_PIs 1 if layer exists, 0 otherwise 8



File Line number Procedure Code
./pkg/layers/LAYERS.h 75 NO PROCEDURE
     &    layers_Hs, layers_PIs, layers_V
./pkg/layers/LAYERS.h 77 NO PROCEDURE
      _RL layers_PIs(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nlayers,nSx,nSy)
./pkg/layers/layers_calc.F 112 LAYERS_CALC
     &              layers_PIw,layers_PIs,
./pkg/layers/layers_calc.F 147 LAYERS_CALC
     &              layers_PIw,layers_PIs,
./pkg/layers/layers_calc.F 270 LAYERS_CALC
         CALL DIAGNOSTICS_FILL( layers_PIs,
./pkg/layers/layers_calc.F 80 LAYERS_CALC
      _RL layers_Hs(1), layers_PIs(1), layers_V(1)
./pkg/layers/layers_calc.F 97 LAYERS_CALC
     &              layers_PIw,layers_PIs,
./pkg/layers/layers_init_varia.F 55 LAYERS_INIT_VARIA
           layers_PIs(i,j,kg,bi,bj) = 0. _d 0