Changeset 277 for palm/trunk/SOURCE/netcdf.f90

Timestamp:

Mar 31, 2009 9:13:47 AM (15 years ago)

Author:

heinze

Message:

Change of arguments in message calls whenever there are errors induced by MPI-ABORT

File:

• palm/trunk/SOURCE/netcdf.f90 (modified) (1 diff)

palm/trunk/SOURCE/netcdf.f90

@@ -3626 +3626 @@
        message_string = TRIM( NF90_STRERROR( nc_stat ) )
 
-       CALL message( routine_name, message_identifier, 2, 2, 0, 6, 0 )
+       CALL message( routine_name, message_identifier, 2, 2, -1, 6, 1 )
 
     ENDIF