| File |
Line number |
Procedure |
Code |
|
./pkg/layers/LAYERS.h |
22 |
NO PROCEDURE |
CHARACTER*(3) layers_name(layers_maxNum) |
|
./pkg/layers/LAYERS.h |
23 |
NO PROCEDURE |
COMMON /LAYERS_PARM_C/ layers_name |
|
./pkg/layers/layers_calc.F |
307 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaTr',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
314 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaUH',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
318 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaHw',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
321 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaPw',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
324 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaUa',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
331 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaVH',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
335 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaHs',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
338 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaPs',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
341 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaVa',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
348 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaHc',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
351 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaPc',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
354 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaTs',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
357 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaTh',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
360 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaTz',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
363 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LTha',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
366 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LTza',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
369 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LTto',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
372 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaSs',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
375 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaSh',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
378 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LaSz',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
381 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LSha',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
384 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LSza',iLa,layers_name(iLa) |
|
./pkg/layers/layers_calc.F |
387 |
LAYERS_CALC |
WRITE(diagName,'(A4,I1,A3)') 'LSto',iLa,layers_name(iLa) |
|
./pkg/layers/layers_check.F |
53 |
LAYERS_CHECK |
CALL WRITE_0D_C( layers_name(iLa),-1,INDEX_NONE, tmpName(1:16), |
|
./pkg/layers/layers_diagnostics_init.F |
109 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaHw',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
118 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaHs',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
128 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaPw',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
137 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaPs',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
147 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaUa',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
156 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaVa',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
171 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaHc',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
180 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaTs',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
189 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaTh',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
200 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaTz',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
209 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LTha',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
218 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LTza',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
227 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LTto',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
236 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaSs',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
245 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaSh',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
254 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaSz',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
263 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LSha',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
272 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LSza',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
281 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LSto',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
291 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaPc',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
68 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaTr',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
88 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaUH',iLa,layers_name(iLa) |
|
./pkg/layers/layers_diagnostics_init.F |
97 |
LAYERS_DIAGNOSTICS_INIT |
WRITE(diagName,'(A4,I1,A3)') 'LaVH',iLa,layers_name(iLa) |
|
./pkg/layers/layers_init_fixed.F |
147 |
LAYERS_INIT_FIXED |
WRITE(tmpName,'(A7,I1,A3)') 'layers',iLa,layers_name(iLa) |
|
./pkg/layers/layers_readparms.F |
117 |
LAYERS_READPARMS |
IF ( layers_name(iLa).NE.' ' ) errCount = errCount + 1 |
|
./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 |
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 |
153 |
LAYERS_READPARMS |
IF ( layers_name(iLa).NE.' ' .AND. |
|
./pkg/layers/layers_readparms.F |
156 |
LAYERS_READPARMS |
& 'invalid layers_name(',iLa,')= "',layers_name(iLa),'"' |
|
./pkg/layers/layers_readparms.F |
42 |
LAYERS_READPARMS |
& layers_name, layers_bounds, layers_krho |
|
./pkg/layers/layers_readparms.F |
66 |
LAYERS_READPARMS |
layers_name(iLa) = ' ' |