Changeset 1250 for trunk/NEMO/TOP_SRC/SED/sedarr.F90

Timestamp:

2009-01-13T10:41:45+01:00 (16 years ago)

Author:

cetlod

Message:

update modules of sediment model to take into account minor modifications, see ticket:297

File:

• trunk/NEMO/TOP_SRC/SED/sedarr.F90 (modified) (1 diff)

trunk/NEMO/TOP_SRC/SED/sedarr.F90

@@ -116 +116 @@
    END SUBROUTINE unpack_arr_2d_3d
 
+#else
+   !!======================================================================
+   !! MODULE sedarr  :   Dummy module
+   !!======================================================================
+CONTAINS
+   SUBROUTINE pack_arr         ! Empty routine
+   END SUBROUTINE  pack_arr
+   SUBROUTINE unpack_arr         ! Empty routine
+   END SUBROUTINE  unpack_arr
+   !!======================================================================
 #endif
 END MODULE sedarr