Changeset 709 for trunk/NEMO/LIM_SRC/limthd.F90

Timestamp:

2007-10-10T16:23:51+02:00 (17 years ago)

Author:

smasson

Message:

continue changeset:704, see ticket:5

File:

• trunk/NEMO/LIM_SRC/limthd.F90 (modified) (1 diff)

trunk/NEMO/LIM_SRC/limthd.F90

@@ -12 +12 @@
    !!----------------------------------------------------------------------
    !! * Modules used
-   USE phycst          ! physical constants
    USE dom_oce         ! ocean space and time domain variables
-   USE lbclnk
-   USE in_out_manager  ! I/O manager
-   USE ice             ! LIM sea-ice variables
+   USE sbc_oce         ! surface boundary condition: ocean
    USE ice_oce         ! sea-ice/ocean variables
-   USE flx_oce         ! sea-ice/ocean forcings variables 
    USE thd_ice         ! LIM thermodynamic sea-ice variables
    USE dom_ice         ! LIM sea-ice domain
+   USE ice             ! LIM sea-ice variables
    USE iceini
    USE limthd_zdf
    USE limthd_lac
    USE limtab
+   USE phycst          ! physical constants
+   USE in_out_manager  ! I/O manager
    USE prtctl          ! Print control
+   USE lbclnk
       
    IMPLICIT NONE