Changeset 15 for trunk/NEMO/OPA_SRC/cpl.F90

Timestamp:

2004-02-17T08:25:44+01:00 (20 years ago)

Author:

opalod

Message:

CT : UPDATE001 : First major NEMO update

File:

• trunk/NEMO/OPA_SRC/cpl.F90 (modified) (1 diff)

trunk/NEMO/OPA_SRC/cpl.F90

@@ -773 +773 @@
    END SUBROUTINE cpl_init
    SUBROUTINE cpl_step( kt )       ! Dummy routine
-      WRITE(*,*) kt
+      WRITE(*,*) 'cpl_step: You should have not see this print! error?', kt
    END SUBROUTINE cpl_step
 #endif