Changeset 2574

Timestamp:

Oct 23, 2017 9:02:53 AM (6 years ago)

Author:

Giersch

Message:

Bugfix: Increased length of the character string * end *

File:

• palm/trunk/SOURCE/write_var_list.f90 (modified) (2 diffs)

palm/trunk/SOURCE/write_var_list.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Bugfix: Increased length of the character string *** end ***
+! 
+! 2563 2017-10-19 15:36:10Z Giersch
 ! Function call wtm_write_restart_data was added and the end of the standard 
 ! parameter list is now marked with *** end default ***. The end of the whole
@@ -764 +767 @@
 !
 !-- Set the end-of-file mark for default parameter
-    WRITE ( 14 )  '*** end ***            '
+    WRITE ( 14 )  '*** end ***                   '