Changeset 2720 for palm

Timestamp:

Jan 2, 2018 4:27:15 PM (7 years ago)

Author:

kanani

Message:

update of palm version

Location:

palm/trunk/SOURCE

Files:

• palm.f90 (modified) (2 diffs)
• urban_surface_mod.f90 (modified) (2 diffs)

palm/trunk/SOURCE/palm.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Version update to 5.0
+! 
+! 2718 2018-01-02 08:49:38Z maronga
 ! Corrected "Former revisions" section
 ! 
@@ -262 +265 @@
     INTEGER(iwp)      ::  myid_openmpi    !< OpenMPI local rank for CUDA aware MPI
 
-    version = 'PALM 4.0'
+    version = 'PALM 5.0'
     user_interface_required_revision = 'r2512'
 

palm/trunk/SOURCE/urban_surface_mod.f90

@@ -26 +26 @@
 ! -----------------
 ! $Id$
+! Correction of comment
+! 
+! 2718 2018-01-02 08:49:38Z maronga
 ! Corrected "Former revisions" section
 ! 
@@ -6908 +6911 @@
 !--        data from the last time step is used here.
 
-!--        Workarounf to keep resistances positive
+!--        Workaround: use single r_a as stability is only treated for the
+!--        average temperature
            r_a = ( surf_usm_h%pt1(m) - surf_usm_h%pt_surface(m) ) /                            &
                  ( surf_usm_h%ts(m) * surf_usm_h%us(m) + 1.0E-20_wp )