Changeset 9124 for branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/step.F90

Timestamp:

2017-12-19T09:26:25+01:00 (6 years ago)

Author:

gm

Message:

dev_merge_2017: ln_timing instead of nn_timing + restricted timing to nemo_init and routine called by step in OPA_SRC

File:

• branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/step.F90 (modified) (2 diffs)

branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/step.F90

@@ -91 +91 @@
 # endif
 #endif
+      !
+      IF( ln_timing )   CALL timing_start('stp')
+      !
       !>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
       ! update I/O and calendar 
@@ -334 +337 @@
 #endif
       !
-      IF( ln_timing .AND.  kstp == nit000  )   CALL timing_reset
+      IF( ln_timing ) THEN
+         IF( ln_timing      )   CALL timing_start('stp')
+!!gm avoid the init phase during 1st time step ???  useless now no?
+         IF( kstp == nit000 )   CALL timing_reset           
+      ENDIF
       !
    END SUBROUTINE stp