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


File Line number Procedure Code
./pkg/layers/layers_calc.F 111 LAYERS_CALC 
      _RL layers_Hs(1), layers_PIs(1), layers_V(1)
./pkg/layers/layers_calc.F 128 LAYERS_CALC 
     &              layers_PIw,layers_PIs,
./pkg/layers/layers_calc.F 148 LAYERS_CALC 
     &              layers_PIw,layers_PIs,
./pkg/layers/layers_calc.F 207 LAYERS_CALC 
     &              layers_PIw,layers_PIs,
./pkg/layers/layers_calc.F 339 LAYERS_CALC 
         CALL DIAGNOSTICS_FILL( layers_PIs,
./pkg/layers/layers_calc.F 73 LAYERS_CALC 
      _RL layers_PIs(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nlayers,nSx,nSy)