Changeset 708 for trunk/NEMO/OPA_SRC/ZDF/zdftke_jki.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/ZDF/zdftke_jki.F90 (modified) (1 diff)

trunk/NEMO/OPA_SRC/ZDF/zdftke_jki.F90

@@ -20 +20 @@
    USE dom_oce         ! ocean space and time domain
    USE zdf_oce         ! ocean vertical physics
+   USE sbc_oce         ! surface boundary condition: ocean
    USE zdftke          ! ???
+   USE phycst          ! physical constants
    USE in_out_manager  ! I/O manager
    USE lbclnk          ! ocean lateral boundary conditions (or mpp link)
-   USE phycst          ! physical constants
-   USE taumod          ! surface stress
    USE prtctl          ! Print control
    USE restart         ! only for lrst_oce