File |
Line number |
Procedure |
Code |
./pkg/layers/layers_calc.F |
235 |
LAYERS_CALC |
CALL RW_GET_SUFFIX( sufx, myTime, myIter, myThid ) |
./pkg/layers/layers_calc.F |
236 |
LAYERS_CALC |
WRITE(suff,'(I2.2,A1,A)') iLa, '.', sufx |
./pkg/layers/layers_calc.F |
88 |
LAYERS_CALC |
CHARACTER*(10) sufx |
./pkg/cheapaml/cheapaml.F |
284 |
CHEAPAML |
WRITE(sufx,'(I10.10)') myIter |
./pkg/cheapaml/cheapaml.F |
285 |
CHEAPAML |
CALL WRITE_FLD_XY_RL('tAir_afAdv.', sufx, Tair, myIter, myThid ) |
./pkg/cheapaml/cheapaml.F |
287 |
CHEAPAML |
& CALL WRITE_FLD_XY_RL('qAir_afAdv.', sufx, qair, myIter, myThid ) |
./pkg/cheapaml/cheapaml.F |
58 |
CHEAPAML |
CHARACTER*10 sufx |
./pkg/diagnostics/diag_cg2d.F |
223 |
DIAG_CG2D |
WRITE(sufx,'(I10.10)') 0 |
./pkg/diagnostics/diag_cg2d.F |
224 |
DIAG_CG2D |
CALL WRITE_FLD_XY_RL( 'r2d.',sufx, r2d, 1, myThid ) |
./pkg/diagnostics/diag_cg2d.F |
338 |
DIAG_CG2D |
WRITE(sufx,'(I10.10)') it2d |
./pkg/diagnostics/diag_cg2d.F |
339 |
DIAG_CG2D |
CALL WRITE_FLD_XY_RL( 'r2d.',sufx, r2d, 1, myThid ) |
./pkg/diagnostics/diag_cg2d.F |
340 |
DIAG_CG2D |
CALL WRITE_FLD_XY_RL( 'x2d.',sufx, x2d, 1, myThid ) |
./pkg/diagnostics/diag_cg2d.F |
98 |
DIAG_CG2D |
CHARACTER*(10) sufx |