Changeset 2771 for branches/2011/dev_r2769_LOCEAN_dynamic_mem/NEMOGCM/NEMO/OPA_SRC/IOM/in_out_manager.F90

Timestamp:

2011-05-31T17:05:34+02:00 (13 years ago)

Author:

rblod

Message:

First implementation of timing, with tvd as an example, see ticket #829

File:

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

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

@@ -87 +87 @@
    !!----------------------------------------------------------------------
    LOGICAL ::   ln_ctl     = .FALSE.   !: run control for debugging
+   LOGICAL ::   ln_timing  = .FALSE.   !: 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
@@ -111 +112 @@
    INTEGER ::   numevo_ice =   -1      !: logical unit for ice variables (temp. evolution)
    INTEGER ::   numsol     =   -1      !: logical unit for solver statistics
+   INTEGER ::   numtime    =   -1      !: logical unit for timing statistics
 
    !!----------------------------------------------------------------------