Changeset 5105 for branches/2015/dev_r5003_MERCATOR6_CRS/NEMOGCM/NEMO/TOP_SRC/trcstp.F90

Timestamp:

2015-02-24T15:46:25+01:00 (9 years ago)

Author:

cbricaud

Message:

bug correction

File:

• branches/2015/dev_r5003_MERCATOR6_CRS/NEMOGCM/NEMO/TOP_SRC/trcstp.F90 (modified) (2 diffs)

branches/2015/dev_r5003_MERCATOR6_CRS/NEMOGCM/NEMO/TOP_SRC/trcstp.F90

@@ -11 +11 @@
    !!----------------------------------------------------------------------
    USE oce_trc          ! ocean dynamics and active tracers variables
-   USE sbc_oce
+   USE sbc_oce , ONLY : ltrcdm2dc,qsr_mean
    USE trc
    USE trctrp           ! passive tracers transport
@@ -17 +17 @@
    USE prtctl_trc       ! Print control for debbuging
    USE trcdia
-   USE trcwri
+   USE trcwri , ONLY : trc_wri
    USE trcrst
    USE trdtrc_oce
    USE trdmxl_trc
-   USE iom
+   USE iom, ONLY : lk_iomput , iom_close
    USE in_out_manager
    USE trcsub
+   USE dom_oce, ONLY : nday, nmonth, nyear
 
    IMPLICIT NONE