| File |
Line number |
Procedure |
Code |
|
./model/src/post_cg3d.F |
131 |
POST_CG3D |
WRITE(sufx,'(I10.10)') myIter |
|
./model/src/post_cg3d.F |
132 |
POST_CG3D |
CALL WRITE_FLD_XYZ_RL( 'cg3d_x.',sufx, phi_nh, myIter, myThid ) |
|
./model/src/post_cg3d.F |
52 |
POST_CG3D |
CHARACTER*10 sufx |
|
./model/src/solve_for_pressure.F |
257 |
SOLVE_FOR_PRESSURE |
WRITE(sufx,'(I10.10)') myIter |
|
./model/src/solve_for_pressure.F |
258 |
SOLVE_FOR_PRESSURE |
CALL WRITE_FLD_XY_RL( 'cg2d_b.', sufx, cg2d_b, myIter, myThid ) |
|
./model/src/solve_for_pressure.F |
351 |
SOLVE_FOR_PRESSURE |
WRITE(sufx,'(I10.10)') myIter |
|
./model/src/solve_for_pressure.F |
352 |
SOLVE_FOR_PRESSURE |
CALL WRITE_FLD_XY_RL( 'cg2d_x.',sufx, cg2d_x, myIter, myThid ) |
|
./model/src/solve_for_pressure.F |
375 |
SOLVE_FOR_PRESSURE |
WRITE(sufx,'(I10.10)') myIter |
|
./model/src/solve_for_pressure.F |
376 |
SOLVE_FOR_PRESSURE |
CALL WRITE_FLD_XYZ_RL('cg3d_b.',sufx, cg3d_b, myIter,myThid ) |
|
./model/src/solve_for_pressure.F |
417 |
SOLVE_FOR_PRESSURE |
WRITE(sufx,'(I10.10)') myIter |
|
./model/src/solve_for_pressure.F |
418 |
SOLVE_FOR_PRESSURE |
CALL WRITE_FLD_XYZ_RL('cg3d_x.',sufx, phi_nh, myIter,myThid ) |
|
./model/src/solve_for_pressure.F |
62 |
SOLVE_FOR_PRESSURE |
CHARACTER*10 sufx |
|
./pkg/cheapaml/cheapaml.F |
397 |
CHEAPAML |
WRITE(sufx,'(I10.10)') myIter |
|
./pkg/cheapaml/cheapaml.F |
398 |
CHEAPAML |
CALL WRITE_FLD_XY_RL('tAir_afAdv.', sufx, Tair, myIter, myThid ) |
|
./pkg/cheapaml/cheapaml.F |
400 |
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 |
222 |
DIAG_CG2D |
WRITE(sufx,'(I10.10)') 0 |
|
./pkg/diagnostics/diag_cg2d.F |
223 |
DIAG_CG2D |
CALL WRITE_FLD_XY_RL( 'r2d.',sufx, r2d, 1, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
337 |
DIAG_CG2D |
WRITE(sufx,'(I10.10)') it2d |
|
./pkg/diagnostics/diag_cg2d.F |
338 |
DIAG_CG2D |
CALL WRITE_FLD_XY_RL( 'r2d.',sufx, r2d, 1, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
339 |
DIAG_CG2D |
CALL WRITE_FLD_XY_RL( 'x2d.',sufx, x2d, 1, myThid ) |
|
./pkg/diagnostics/diag_cg2d.F |
96 |
DIAG_CG2D |
CHARACTER*(10) sufx |