Changeset 708 for trunk/NEMO/OPA_SRC/opa.F90

Timestamp:

2007-10-10T15:11:42+02:00 (17 years ago)

Author:

smasson

Message:

continue changeset:704, see ticket:5

File:

• trunk/NEMO/OPA_SRC/opa.F90 (modified) (2 diffs)

trunk/NEMO/OPA_SRC/opa.F90

@@ -36 +36 @@
    !!----------------------------------------------------------------------
    !! * Modules used
+   USE oce             ! dynamics and tracers variables
    USE cpl_oce         ! ocean-atmosphere-sea ice coupled exchanges
    USE dom_oce         ! ocean space domain variables
-   USE oce             ! dynamics and tracers variables
+   USE sbc_oce         ! surface boundary condition: ocean
    USE trdmod_oce      ! ocean variables trends
    USE daymod          ! calendar
@@ -60 +61 @@
    USE phycst          ! physical constant                  (par_cst routine)
    USE iceini          ! initialization of sea-ice         (ice_init routine)
-   USE cpl             ! coupled ocean/atmos.              (cpl_init routine)
    USE ocfzpt          ! ocean freezing point              (oc_fz_pt routine)
    USE trdmod          ! momentum/tracers trends       (trd_mod_init routine)
-   USE flxfwb          ! freshwater budget correction  (flx_fwb_init routine)
-   USE flxmod          ! thermohaline forcing of the ocean (flx_init routine)
 
    USE diaptr          ! poleward transports           (dia_ptr_init routine)