Symbol Description Uses
layers_num 29



File Line number Procedure Code
./pkg/layers/LAYERS.h 19 NO PROCEDURE
      INTEGER layers_num(layers_maxNum), layers_krho(layers_maxNum)
./pkg/layers/LAYERS.h 20 NO PROCEDURE
      COMMON /LAYERS_PARM_I/ layers_num, layers_krho
./pkg/layers/layers_calc.F 124 LAYERS_CALC
       IF ( layers_num(iLa) .EQ. 1 ) THEN
./pkg/layers/layers_calc.F 144 LAYERS_CALC
       ELSEIF ( layers_num(iLa) .EQ. 2 ) THEN
./pkg/layers/layers_calc.F 164 LAYERS_CALC
       ELSEIF ( layers_num(iLa) .EQ. 3 ) THEN
./pkg/layers/layers_calc.F 229 LAYERS_CALC
     &    .AND. layers_num(iLa).NE.0 ) THEN
./pkg/layers/layers_calc.F 255 LAYERS_CALC
          IF ( layers_num(iLa).EQ.3 ) THEN
./pkg/layers/layers_calc.F 303 LAYERS_CALC
       IF ( useDiagnostics .AND. layers_num(iLa).NE.0 ) THEN
./pkg/layers/layers_calc.F 306 LAYERS_CALC
         IF ( layers_num(iLa).EQ.3 ) THEN
./pkg/layers/layers_calc.F 423 LAYERS_CALC
          IF ( layers_num(iLa) .EQ. 3 )
./pkg/layers/layers_check.F 45 LAYERS_CHECK
       IF ( layers_num(iLa).NE.0 ) THEN
./pkg/layers/layers_check.F 50 LAYERS_CHECK
        CALL WRITE_0D_I( layers_num(iLa), INDEX_NONE, tmpName(1:15),
./pkg/layers/layers_check.F 60 LAYERS_CHECK
        IF ( layers_num(iLa).EQ.3 )
./pkg/layers/layers_check.F 74 LAYERS_CHECK
       IF ( layers_num(iLa).NE.0 ) THEN
./pkg/layers/layers_check.F 87 LAYERS_CHECK
       IF ( layers_num(iLa).EQ.3 ) THEN
./pkg/layers/layers_diagnostics_init.F 64 LAYERS_DIAGNOSTICS_INIT
       IF ( layers_num(iLa).NE.0 ) THEN
./pkg/layers/layers_diagnostics_init.F 67 LAYERS_DIAGNOSTICS_INIT
       IF ( layers_num(iLa).EQ.3 ) THEN
./pkg/layers/layers_fluxcalc.F 629 LAYERS_DIAPYCNAL
         IF ( layers_num(iLa) .EQ. 3 ) THEN
./pkg/layers/layers_init_fixed.F 146 LAYERS_INIT_FIXED
      IF ( layers_num(iLa).NE.0 ) THEN
./pkg/layers/layers_init_fixed.F 156 LAYERS_INIT_FIXED
       IF ( layers_num(iLa).NE.0 ) THEN
./pkg/layers/layers_output.F 112 LAYERS_OUTPUT
          IF ( layers_num(1).EQ.3 )
./pkg/layers/layers_output.F 144 LAYERS_OUTPUT
         IF ( layers_num(1).EQ.3 )
./pkg/layers/layers_output.F 174 LAYERS_OUTPUT
          IF ( layers_num(1).EQ.3 )
./pkg/layers/layers_readparms.F 149 LAYERS_READPARMS
        layers_num(iLa) = 0
./pkg/layers/layers_readparms.F 150 LAYERS_READPARMS
        IF ( layers_name(iLa).EQ.'TH ' ) layers_num(iLa) = 1
./pkg/layers/layers_readparms.F 151 LAYERS_READPARMS
        IF ( layers_name(iLa).EQ.'SLT' ) layers_num(iLa) = 2
./pkg/layers/layers_readparms.F 152 LAYERS_READPARMS
        IF ( layers_name(iLa).EQ.'RHO' ) layers_num(iLa) = 3
./pkg/layers/layers_readparms.F 154 LAYERS_READPARMS
     &       layers_num(iLa).EQ.0 ) THEN
./pkg/layers/layers_readparms.F 166 LAYERS_READPARMS
       IF ( layers_num(iLa).NE.0 ) THEN