- Timestamp:
- 2014-07-15T12:25:14+02:00 (10 years ago)
- Location:
- branches/2014/dev_r4650_UKMO12_CFL_diags_take2/NEMOGCM
- Files:
-
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2014/dev_r4650_UKMO12_CFL_diags_take2/NEMOGCM/CONFIG/SHARED/namelist_ref
r4384 r4714 957 957 ! (no physical validity of the results) 958 958 nn_timing = 0 ! timing by routine activated (=1) creates timing.output file, or not (=0) 959 nn_diacfl = 0 ! Write out cfl diagnostics (=1) in cfl_diagnostics.ascii, or not (=0) 959 960 / 960 961 !----------------------------------------------------------------------- -
branches/2014/dev_r4650_UKMO12_CFL_diags_take2/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90
r4624 r4714 91 91 LOGICAL :: ln_ctl !: run control for debugging 92 92 INTEGER :: nn_timing !: run control for timing 93 INTEGER :: nn_diacfl !: flag whether to create CFL diagnostics 93 94 INTEGER :: nn_print !: level of print (0 no print) 94 95 INTEGER :: nn_ictls !: Start i indice for the SUM control -
branches/2014/dev_r4650_UKMO12_CFL_diags_take2/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
r4645 r4714 65 65 USE diadct ! sections transports (dia_dct_init routine) 66 66 USE diaobs ! Observation diagnostics (dia_obs_init routine) 67 USE diacfl ! CFL diagnostics (dia_cfl_init routine) 67 68 USE lib_fortran ! Fortran utilities (allows no signed zero when 'key_nosignedzero' defined) 68 69 USE step ! NEMO time-stepping (stp routine) … … 230 231 NAMELIST/namctl/ ln_ctl, nn_print, nn_ictls, nn_ictle, & 231 232 & nn_isplt, nn_jsplt, nn_jctls, nn_jctle, & 232 & nn_bench, nn_timing 233 & nn_bench, nn_timing, nn_diacfl 233 234 NAMELIST/namcfg/ cp_cfg, cp_cfz, jp_cfg, jpidta, jpjdta, jpkdta, jpiglo, jpjglo, & 234 235 & jpizoom, jpjzoom, jperio … … 453 454 ! Diagnostics 454 455 IF( lk_floats ) CALL flo_init ! drifting Floats 456 CALL dia_cfl_init ! Initialise CFL diagnostics 455 457 IF( lk_diaar5 ) CALL dia_ar5_init ! ar5 diag 456 458 CALL dia_ptr_init ! Poleward TRansports initialization -
branches/2014/dev_r4650_UKMO12_CFL_diags_take2/NEMOGCM/NEMO/OPA_SRC/step.F90
r4624 r4714 202 202 !<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 203 203 IF( lk_floats ) CALL flo_stp( kstp ) ! drifting Floats 204 IF( nn_diacfl == 1 ) CALL dia_cfl( kstp ) ! Courant number diagnostics 204 205 IF( lk_diahth ) CALL dia_hth( kstp ) ! Thermocline depth (20 degres isotherm depth) 205 206 IF( lk_diafwb ) CALL dia_fwb( kstp ) ! Fresh water budget diagnostics -
branches/2014/dev_r4650_UKMO12_CFL_diags_take2/NEMOGCM/NEMO/OPA_SRC/step_oce.F90
r4328 r4714 97 97 USE diahsb ! heat, salt and volume budgets (dia_hsb routine) 98 98 USE diaharm 99 USE diacfl 99 100 USE flo_oce ! floats variables 100 101 USE floats ! floats computation (flo_stp routine)
Note: See TracChangeset
for help on using the changeset viewer.