Changeset 3587 for branches/2012/dev_MERCATOR_2012_rev3555/NEMOGCM/NEMO/OPA_SRC/BDY/bdydyn3d.F90

Timestamp:

2012-11-16T19:04:37+01:00 (11 years ago)

Author:

cbricaud

Message:

add miising dummy subroutines

File:

• branches/2012/dev_MERCATOR_2012_rev3555/NEMOGCM/NEMO/OPA_SRC/BDY/bdydyn3d.F90 (modified) (1 diff)

branches/2012/dev_MERCATOR_2012_rev3555/NEMOGCM/NEMO/OPA_SRC/BDY/bdydyn3d.F90

@@ -289 +289 @@
 CONTAINS
    SUBROUTINE bdy_dyn3d( kt )      ! Empty routine
-      WRITE(*,*) 'bdy_dyn_frs: You should not have seen this print! error?', kt
+      WRITE(*,*) 'bdy_dyn3d: You should not have seen this print! error?', kt
    END SUBROUTINE bdy_dyn3d
+
+   SUBROUTINE bdy_dyn3d_dmp( kt )      ! Empty routine
+      WRITE(*,*) 'bdy_dyn3d_dmp: You should not have seen this print! error?', kt
+   END SUBROUTINE bdy_dyn3d_dmp
+
 #endif