Changeset 4719 for branches/2014/dev_4707_CNRS04_bgc_ice/NEMOGCM/NEMO/TOP_SRC/trcini.F90

Timestamp:

2014-07-15T18:48:35+02:00 (10 years ago)

Author:

vancop

Message:

[sea ice tracer boundary conditions ORCA2_LIM2 PISCES]

File:

• branches/2014/dev_4707_CNRS04_bgc_ice/NEMOGCM/NEMO/TOP_SRC/trcini.F90 (modified) (2 diffs)

branches/2014/dev_4707_CNRS04_bgc_ice/NEMOGCM/NEMO/TOP_SRC/trcini.F90

@@ -31 +31 @@
    USE lib_mpp         ! distribued memory computing library
    USE sbc_oce
- 
+   USE trcice          ! MV prescribed bio tracers
+
    IMPLICIT NONE
    PRIVATE
@@ -100 +101 @@
       IF( lk_c14b    )       CALL trc_ini_c14b         ! C14 bomb  tracer
       IF( lk_my_trc  )       CALL trc_ini_my_trc       ! MY_TRC  tracers
+
+      ! MV
+      CALL trc_ice_ini ! Sea ice boundary condition
+      ! END MV
 
       IF( lwp ) THEN