Changeset 3534 for palm/trunk/UTIL/inifor/src/inifor_io.f90

Timestamp:

Nov 19, 2018 3:35:16 PM (5 years ago)

Author:

raasch

Message:

inifor integrated in build mechanism, some bugfixes in inifor to avoid compile time errors, batch_scp for sending back the job protocol file is called via login-node if a login-node has been set in the config-file, ssh-calls rearranged to avoid output of system/user-profile messages

File:

• palm/trunk/UTIL/inifor/src/inifor_io.f90 (modified) (2 diffs)

palm/trunk/UTIL/inifor/src/inifor_io.f90

@@ -26 +26 @@
 ! -----------------
 ! $Id$
+! bugfix: INTENT attribute changed
+! 
+! 3456 2018-10-30 14:29:54Z eckhard
 ! NetCDf output of internal arrays only with --debug option 
 ! 
@@ -172 +175 @@
     SUBROUTINE get_input_dimensions(in_var, ncid)
 
-       TYPE(nc_var), INTENT(INOUT)     ::  in_var
-       INTEGER, INTENT(OUT)            ::  ncid
+       TYPE(nc_var), INTENT(INOUT) ::  in_var
+       INTEGER, INTENT(IN)         ::  ncid
 
        INTEGER ::  i