File |
Line number |
Procedure |
Code |
./pkg/layers/layers_readparms.F |
104 |
LAYERS_READPARMS |
IF ( LAYER_nb.LT.0 .OR. LAYER_nb.GT.3 ) THEN |
./pkg/layers/layers_readparms.F |
106 |
LAYERS_READPARMS |
& 'Invalid LAYER_nb=', LAYER_nb |
./pkg/layers/layers_readparms.F |
110 |
LAYERS_READPARMS |
IF ( LAYER_nb.EQ.0 ) THEN |
./pkg/layers/layers_readparms.F |
124 |
LAYERS_READPARMS |
IF ( LAYER_nb.EQ.1 ) layers_name(1) = 'TH ' |
./pkg/layers/layers_readparms.F |
125 |
LAYERS_READPARMS |
IF ( LAYER_nb.EQ.2 ) layers_name(1) = 'SLT' |
./pkg/layers/layers_readparms.F |
126 |
LAYERS_READPARMS |
IF ( LAYER_nb.EQ.3 ) layers_name(1) = 'RHO' |
./pkg/layers/layers_readparms.F |
33 |
LAYERS_READPARMS |
INTEGER LAYER_nb, layers_kref |
./pkg/layers/layers_readparms.F |
41 |
LAYERS_READPARMS |
& LAYER_nb, layers_kref, useBOLUS, layers_bolus, |
./pkg/layers/layers_readparms.F |
75 |
LAYERS_READPARMS |
LAYER_nb = 0 |