New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 9124 for branches/2017/dev_merge_2017/NEMOGCM/NEMO/TOP_SRC/C14/trcatm_c14.F90 – NEMO

Ignore:
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:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_merge_2017/NEMOGCM/NEMO/TOP_SRC/C14/trcatm_c14.F90

    r7192 r9124  
    4949      !!---------------------------------------------------------------------- 
    5050      ! 
    51       IF( nn_timing == 1 )  CALL timing_start('trc_atm_c14_ini') 
     51      IF( ln_timing )   CALL timing_start('trc_atm_c14_ini') 
    5252      ! 
    5353       
     
    192192      ENDIF 
    193193      ! 
    194       IF( nn_timing == 1 )  CALL timing_stop('trc_atm_c14_ini') 
     194      IF( ln_timing )   CALL timing_stop('trc_atm_c14_ini') 
    195195      ! 
    196196   END SUBROUTINE trc_atm_c14_ini 
     
    216216      !!---------------------------------------------------------------------- 
    217217      ! 
    218       IF( nn_timing == 1 )  CALL timing_start('trc_atm_c14') 
     218      IF( ln_timing )   CALL timing_start('trc_atm_c14') 
    219219      ! 
    220220      IF( kc14typ == 0) THEN 
     
    297297      ENDIF 
    298298      ! 
    299       IF( nn_timing == 1 )  CALL timing_stop('trc_atm_c14') 
     299      IF( ln_timing )   CALL timing_stop('trc_atm_c14') 
    300300      ! 
    301301   END SUBROUTINE trc_atm_c14 
Note: See TracChangeset for help on using the changeset viewer.