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/PISCES/trcice_pisces.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/PISCES/trcice_pisces.F90

    r7646 r9124  
    2020   PUBLIC   trc_ice_ini_pisces ! called by trcini.F90 module 
    2121 
     22   !!---------------------------------------------------------------------- 
     23   !! NEMO/TOP 4.0 , NEMO Consortium (2017) 
     24   !! $Id: trcsub.F90 9019 2017-12-13 14:58:53Z timgraham $  
     25   !! Software governed by the CeCILL licence (NEMOGCM/NEMO_CeCILL.txt) 
     26   !!---------------------------------------------------------------------- 
    2227CONTAINS 
    2328 
    24  
    2529   SUBROUTINE trc_ice_ini_pisces 
    2630      !!---------------------------------------------------------------------- 
     
    2933      !! ** Purpose :   Initialisation of the PISCES biochemical model 
    3034      !!---------------------------------------------------------------------- 
    31  
     35      ! 
    3236      IF( ln_p4z .OR. ln_p5z ) THEN  ;   CALL p4z_ice_ini   !  PISCES 
    3337      ELSE                           ;   CALL p2z_ice_ini   !  LOBSTER 
    3438      ENDIF 
    35  
     39      ! 
    3640   END SUBROUTINE trc_ice_ini_pisces 
    3741 
Note: See TracChangeset for help on using the changeset viewer.