Changeset 2957 for palm/trunk/SOURCE

Timestamp:

Apr 11, 2018 8:48:06 AM (6 years ago)

Author:

Giersch

Message:

Sky view factors will always be read from file now in case of automatic restarts, corrected error message in case of writing sky view factors

File:

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

palm/trunk/SOURCE/check_open.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Error message has been corrected in case of writing sky view factors
+! 
+! 2906 2018-03-19 08:56:40Z Giersch
 ! CASE 88 and 89 has been added for the input/output of sky view factors
 ! 
@@ -583 +586 @@
                            FORM='UNFORMATTED', STATUS='NEW', IOSTAT=ioerr )
                 IF ( ioerr /= 0 )  THEN
-                   WRITE( 9, * )  '*** could not open "BINOUT'//         &
-                                  TRIM(coupling_char)//'/'//myid_char//  &
+                   WRITE( 9, * )  '*** could not open "SVFOUT'//               &
+                                  TRIM(coupling_char)//'/'//myid_char//        &
                                   '"! Trying again in 1 sec.'
                    CALL fortran_sleep( 1 )