Changeset 3764 for palm/trunk/UTIL
- Timestamp:
- Feb 26, 2019 1:42:09 PM (6 years ago)
- Location:
- palm/trunk/UTIL/inifor
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/UTIL/inifor/README
r3678 r3764 1 # INIFOR - Mesoscale Interface for Initializing and Forcing PALM-4U (v1.4. 4)1 # INIFOR - Mesoscale Interface for Initializing and Forcing PALM-4U (v1.4.6) 2 2 3 3 INIFOR provides the meteorological fields required to initialize and drive the -
palm/trunk/UTIL/inifor/src/inifor_defs.f90
r3716 r3764 26 26 ! ----------------- 27 27 ! $Id$ 28 ! Bumped version number 29 ! 30 ! 31 ! 3716 2019-02-05 17:02:38Z eckhard 28 32 ! Bumped version number 29 33 ! … … 132 136 INTEGER, PARAMETER :: FORCING_STEP = 1 !< Number of hours between forcing time steps [h] 133 137 REAL(dp), PARAMETER :: NUDGING_TAU = 21600.0_dp !< Nudging relaxation time scale [s] 134 CHARACTER(LEN=*), PARAMETER :: VERSION = '1.4. 5' !< INIFOR version number138 CHARACTER(LEN=*), PARAMETER :: VERSION = '1.4.6' !< INIFOR version number 135 139 CHARACTER(LEN=*), PARAMETER :: COPYRIGHT = 'Copyright 2017-2018 Leibniz Universitaet Hannover' // & 136 140 ACHAR( 10 ) // ' Copyright 2017-2018 Deutscher Wetterdienst Offenbach' !< Copyright notice -
palm/trunk/UTIL/inifor/src/inifor_io.f90
r3716 r3764 26 26 ! ----------------- 27 27 ! $Id$ 28 ! Removed dependency on radiation input files 29 ! 30 ! 31 ! 3716 2019-02-05 17:02:38Z eckhard 28 32 ! Removed dependency on soilmoisture input files 29 33 ! … … 565 569 TRIM(date_string) // TRIM(suffix) // '.nc' 566 570 567 message = "Set up input file name '" // TRIM(file_list(i+1)) // "'"568 CALL report('input_file_list', message)569 570 571 END DO 571 572 … … 646 647 647 648 END IF 649 650 message = "Set up input file name '" // TRIM(file_name) // "'" 651 CALL report('verify_file', message) 648 652 649 653 END SUBROUTINE verify_file
Note: See TracChangeset
for help on using the changeset viewer.