Changeset 3127 for palm/trunk/SOURCE/radiation_model_mod.f90

Timestamp:

Jul 15, 2018 8:01:25 AM (6 years ago)

Author:

maronga

Message:

bugfix for high vegetation surface temperatures

File:

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

palm/trunk/SOURCE/radiation_model_mod.f90

@@ -28 +28 @@
 ! -----------------
 ! $Id$
+! A few pavement parameters updated.
+! 
+! 3123 2018-07-12 16:21:53Z suehring
 ! Correct working precision for INTEGER number
 ! 
@@ -566 +569 @@
                                    0.17_wp, 0.17_wp, 0.17_wp,            & ! 18
                                    0.17_wp, 0.17_wp, 0.17_wp,            & ! 19
-                                   0.17_wp, 0.17_wp, 0.17_wp,            & ! 20
+                                   0.30_wp, 0.30_wp, 0.30_wp,            & ! 20
                                    0.17_wp, 0.17_wp, 0.17_wp,            & ! 21
                                    0.17_wp, 0.17_wp, 0.17_wp,            & ! 22