Changeset 888 for trunk/NEMO/OPA_SRC/DYN/dynspg_flt.F90

Timestamp:

2008-04-11T19:05:03+02:00 (16 years ago)

Author:

ctlod

Message:

merge dev_001_SBC branche with the trunk to include the New Surface Module package, see ticket: #113

File:

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

trunk/NEMO/OPA_SRC/DYN/dynspg_flt.F90

@@ -25 +25 @@
    USE dom_oce         ! ocean space and time domain 
    USE zdf_oce         ! ocean vertical physics
+   USE sbc_oce         ! surface boundary condition: ocean
+   USE obc_oce         ! Lateral open boundary condition
+   USE sol_oce         ! ocean elliptic solver
    USE phycst          ! physical constants
-   USE ocesbc          ! ocean surface boundary condition
-   USE flxrnf          ! ocean runoffs
-   USE sol_oce         ! ocean elliptic solver
+   USE domvvl          ! variable volume
    USE solver          ! solver initialization
    USE solpcg          ! preconditionned conjugate gradient solver
    USE solsor          ! Successive Over-relaxation solver
    USE solfet          ! FETI solver
-   USE obc_oce         ! Lateral open boundary condition
    USE obcdyn          ! ocean open boundary condition (obc_dyn routines)
    USE obcvol          ! ocean open boundary condition (obc_vol routines)
+   USE cla_dynspg      ! cross land advection
+   USE in_out_manager  ! I/O manager
    USE lib_mpp         ! distributed memory computing library
    USE lbclnk          ! ocean lateral boundary conditions (or mpp link)
-   USE cla_dynspg      ! cross land advection
    USE prtctl          ! Print control
    USE solmat          ! matrix construction for elliptic solvers
    USE agrif_opa_interp
-   USE in_out_manager  ! I/O manager
    USE iom
    USE restart         ! only for lrst_oce
-   USE domvvl          ! variable volume
 
    IMPLICIT NONE
@@ -58 +57 @@
    !!----------------------------------------------------------------------
    !!   OPA 9.0 , LOCEAN-IPSL (2005) 
-   !! $Header: /home/opalod/NEMOCVSROOT/NEMO/OPA_SRC/DYN/dynspg_flt.F90,v 1.14 2007/06/05 10:38:27 opalod Exp $ 
+   !! $Id$
    !! Software governed by the CeCILL licence (modipsl/doc/NEMO_CeCILL.txt) 
    !!----------------------------------------------------------------------