Changeset 1119 for trunk/NEMO/OFF_SRC/lib_mpp.F90

Timestamp:

2008-06-20T17:17:41+02:00 (16 years ago)

Author:

cetlod

Message:

style of all top namelist has been modified ; update modules to take it into account, see ticket:196

File:

• trunk/NEMO/OFF_SRC/lib_mpp.F90 (modified) (2 diffs)

trunk/NEMO/OFF_SRC/lib_mpp.F90

@@ -282 +282 @@
       !! * Local variables   (MPI version)
       INTEGER ::   mynode, ierr
-      NAMELIST/nam_mpp/ c_mpi_send
+      NAMELIST/nammpp/ c_mpi_send
       !!----------------------------------------------------------------------
 
@@ -292 +292 @@
       ! Namelist namrun : parameters of the run
       REWIND( numnam )
-      READ  ( numnam, nam_mpp )
-
-      WRITE(numout,*) '        Namelist nam_mpp'
+      READ  ( numnam, nammpp )
+
+      WRITE(numout,*) '        Namelist nammpp'
       WRITE(numout,*) '           mpi send type            c_mpi_send = ', c_mpi_send