Changeset 2720 for palm/trunk/SOURCE
- Timestamp:
- Jan 2, 2018 4:27:15 PM (7 years ago)
- Location:
- palm/trunk/SOURCE
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/palm.f90
r2718 r2720 25 25 ! ----------------- 26 26 ! $Id$ 27 ! Version update to 5.0 28 ! 29 ! 2718 2018-01-02 08:49:38Z maronga 27 30 ! Corrected "Former revisions" section 28 31 ! … … 262 265 INTEGER(iwp) :: myid_openmpi !< OpenMPI local rank for CUDA aware MPI 263 266 264 version = 'PALM 4.0'267 version = 'PALM 5.0' 265 268 user_interface_required_revision = 'r2512' 266 269 -
palm/trunk/SOURCE/urban_surface_mod.f90
r2718 r2720 26 26 ! ----------------- 27 27 ! $Id$ 28 ! Correction of comment 29 ! 30 ! 2718 2018-01-02 08:49:38Z maronga 28 31 ! Corrected "Former revisions" section 29 32 ! … … 6908 6911 !-- data from the last time step is used here. 6909 6912 6910 !-- Workarounf to keep resistances positive 6913 !-- Workaround: use single r_a as stability is only treated for the 6914 !-- average temperature 6911 6915 r_a = ( surf_usm_h%pt1(m) - surf_usm_h%pt_surface(m) ) / & 6912 6916 ( surf_usm_h%ts(m) * surf_usm_h%us(m) + 1.0E-20_wp )
Note: See TracChangeset
for help on using the changeset viewer.