Changeset 9927 for NEMO/trunk/src/OCE/C1D/step_c1d.F90

Timestamp:

2018-07-11T14:49:16+02:00 (6 years ago)

Author:

mathiot

Message:

add missing IMPLICIT NONE and variable declaration in dummy routine to be able to compile with Cray debug option

File:

• NEMO/trunk/src/OCE/C1D/step_c1d.F90 (modified) (1 diff)

NEMO/trunk/src/OCE/C1D/step_c1d.F90

@@ -147 +147 @@
 CONTAINS
    SUBROUTINE stp_c1d ( kt )      ! dummy routine
+      IMPLICIT NONE
+      INTEGER, INTENT( in ) :: kt
       WRITE(*,*) 'stp_c1d: You should not have seen this print! error?', kt
    END SUBROUTINE stp_c1d