Changeset 4238 for palm/trunk/SOURCE/urban_surface_mod.f90

Timestamp:

Sep 25, 2019 4:06:01 PM (5 years ago)

Author:

suehring

Message:

Building data base: Indoor-model parameters for some building types adjusted in order to avoid unrealistically high indoor temperatures (S. Rissmann); Indoor model: Bugfix in determination of minimum facade height and in location message, avoid divisions by zero, minor optimizations; radiation model: Modify check in order to avoid equality comparisons of floating points

File:

• palm/trunk/SOURCE/urban_surface_mod.f90 (modified) (6 diffs)

palm/trunk/SOURCE/urban_surface_mod.f90

@@ -28 +28 @@
 ! -----------------
 ! $Id$
+! Indoor-model parameters for some building types adjusted in order to avoid
+! unrealistically high indoor temperatures (S. Rissmann) 
+! 
+! 4230 2019-09-11 13:58:14Z suehring
 ! Bugfix, initialize canopy resistance. Even if no green fraction is set, 
 ! r_canopy must be initialized for output purposes. 
@@ -5019 +5023 @@
                                        surf_usm_h%ddz_wall_stag(nzb_wall,m)
 !
-!-- if indoor model ist used inner wall layer is calculated by using iwghf (indoor wall ground heat flux)
+!-- if indoor model is used inner wall layer is calculated by using iwghf (indoor wall ground heat flux)
            IF ( indoor_model ) THEN 
               DO  kw = nzb_wall+1, nzt_wall-1
@@ -8945 +8949 @@
            0.001_wp,       &  !< parameter 18  - z0 roughness above ground floor level
            0.0001_wp,      &  !< parameter 19  - z0h/z0g roughness heat/humidity above ground floor level
-           4.0_wp,         &  !< parameter 20  - ground floor level height
+           3.0_wp,         &  !< parameter 20  - ground floor level height
            0.75_wp,        &  !< parameter 21  - wall fraction ground floor level
            0.25_wp,        &  !< parameter 22  - window fraction ground floor level
@@ -9046 +9050 @@
            0.8_wp,         &  !< parameter 119 - shading factor
            0.5_wp,         &  !< parameter 120 - g-value windows
-           0.6_wp,         &  !< parameter 121 - u-value windows
+           2.5_wp,         &  !< parameter 121 - u-value windows
            0.1_wp,         &  !< parameter 122 - basical airflow without occupancy of the room
            0.5_wp,         &  !< parameter 123 - additional airflow depend of occupancy of the room
@@ -9059 +9063 @@
            3.0_wp,         &  !< parameter 132 - storey height
            0.2_wp,         &  !< parameter 133 - ceiling construction height
-           0.1_wp,         &  !< parameter 134 - anthropogenic heat output for heating
-           1.333_wp        &  !< parameter 135 - anthropogenic heat output for cooling
-                            /)   
+           -2.0_wp,        &  !< parameter 134 - anthropogenic heat output for heating
+           1.25_wp         &  !< parameter 135 - anthropogenic heat output for cooling
+                            /) 
                             
         building_pars(:,4) = (/   &
@@ -9463 +9467 @@
            0.8_wp,         &  !< parameter 119 - shading factor
            0.5_wp,         &  !< parameter 120 - g-value windows
-           0.6_wp,         &  !< parameter 121 - u-value windows
+           2.5_wp,         &  !< parameter 121 - u-value windows
            0.1_wp,         &  !< parameter 122 - basical airflow without occupancy of the room
            1.5_wp,         &  !< parameter 123 - additional airflow depend of occupancy of the room