Changeset 3139 for branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90

Timestamp:

2011-11-16T17:11:51+01:00 (13 years ago)

Author:

rblod

Message:

Add timing module see ticket #829

File:

• branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90 (modified) (2 diffs)

branches/2011/dev_NEMO_MERGE_2011/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90

@@ -87 +87 @@
    !!----------------------------------------------------------------------
    LOGICAL ::   ln_ctl     = .FALSE.   !: run control for debugging
+   INTEGER ::   nn_timing    =    0    !: run control for timing
    INTEGER ::   nn_print     =    0    !: level of print (0 no print)
    INTEGER ::   nn_ictls     =    0    !: Start i indice for the SUM control
@@ -106 +107 @@
    !!----------------------------------------------------------------------
    INTEGER ::   numstp      =   -1      !: logical unit for time step
+   INTEGER ::   numtime     =   -1      !: logical unit for timing
    INTEGER ::   numout      =    6      !: logical unit for output print
    INTEGER ::   numnam      =   -1      !: logical unit for namelist