Changeset 709 for trunk/NEMO/OPA_SRC/step.F90

Timestamp:

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

Author:

smasson

Message:

continue changeset:704, see ticket:5

File:

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

trunk/NEMO/OPA_SRC/step.F90

@@ -93 +93 @@
    USE zpshde          ! partial step: hor. derivative     (zps_hde routine)
    USE ice_oce         ! sea-ice variable
-   USE icestp          ! sea-ice time-stepping             (ice_stp routine)
 
    USE diawri          ! Standard run outputs             (dia_wri routine)
@@ -112 +111 @@
    USE stpctl          ! time stepping control            (stp_ctl routine)
    USE restart         ! ocean restart                    (rst_wri routine)
-   USE cpl             ! exchanges in coupled mode        (cpl_stp routine)
    USE prtctl          ! Print control                    (prt_ctl routine)
    USE domvvl          ! variable volume                  (dom_vvl routine)