Changeset 4422

Timestamp:

Feb 24, 2020 10:45:13 PM (4 years ago)

Author:

suehring

Message:

missing trim() in open statement

File:

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

palm/trunk/SOURCE/virtual_measurement_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Missing trim()
+! 
+! 4408 2020-02-14 10:04:39Z gronemeier
 ! - Output of character string station_name after DOM has been enabled to
 !   output character variables
-! - Bugfix, missing coupling char statement when opening the input file
+! - Bugfix, missing coupling_char statement when opening the input file
 ! 
 ! 4408 2020-02-14 10:04:39Z gronemeier
@@ -882 +885 @@
 !
 !-- Open the input file.
-    CALL open_read_file( input_file_vm // TRIM( coupling_char ), pids_id )
+    CALL open_read_file( TRIM( input_file_vm ) // TRIM( coupling_char ), pids_id )
 !
 !-- Obtain number of sites.