Ignore:
Timestamp:
Sep 25, 2019 4:06:01 PM (4 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:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/urban_surface_mod.f90

    r4230 r4238  
    2828! -----------------
    2929! $Id$
     30! Indoor-model parameters for some building types adjusted in order to avoid
     31! unrealistically high indoor temperatures (S. Rissmann)
     32!
     33! 4230 2019-09-11 13:58:14Z suehring
    3034! Bugfix, initialize canopy resistance. Even if no green fraction is set,
    3135! r_canopy must be initialized for output purposes.
     
    50195023                                       surf_usm_h%ddz_wall_stag(nzb_wall,m)
    50205024!
    5021 !-- if indoor model ist used inner wall layer is calculated by using iwghf (indoor wall ground heat flux)
     5025!-- if indoor model is used inner wall layer is calculated by using iwghf (indoor wall ground heat flux)
    50225026           IF ( indoor_model ) THEN
    50235027              DO  kw = nzb_wall+1, nzt_wall-1
     
    89458949           0.001_wp,       &  !< parameter 18  - z0 roughness above ground floor level
    89468950           0.0001_wp,      &  !< parameter 19  - z0h/z0g roughness heat/humidity above ground floor level
    8947            4.0_wp,         &  !< parameter 20  - ground floor level height
     8951           3.0_wp,         &  !< parameter 20  - ground floor level height
    89488952           0.75_wp,        &  !< parameter 21  - wall fraction ground floor level
    89498953           0.25_wp,        &  !< parameter 22  - window fraction ground floor level
     
    90469050           0.8_wp,         &  !< parameter 119 - shading factor
    90479051           0.5_wp,         &  !< parameter 120 - g-value windows
    9048            0.6_wp,         &  !< parameter 121 - u-value windows
     9052           2.5_wp,         &  !< parameter 121 - u-value windows
    90499053           0.1_wp,         &  !< parameter 122 - basical airflow without occupancy of the room
    90509054           0.5_wp,         &  !< parameter 123 - additional airflow depend of occupancy of the room
     
    90599063           3.0_wp,         &  !< parameter 132 - storey height
    90609064           0.2_wp,         &  !< parameter 133 - ceiling construction height
    9061            0.1_wp,         &  !< parameter 134 - anthropogenic heat output for heating
    9062            1.333_wp        &  !< parameter 135 - anthropogenic heat output for cooling
    9063                             /)  
     9065           -2.0_wp,        &  !< parameter 134 - anthropogenic heat output for heating
     9066           1.25_wp         &  !< parameter 135 - anthropogenic heat output for cooling
     9067                            /)
    90649068                           
    90659069        building_pars(:,4) = (/   &
     
    94639467           0.8_wp,         &  !< parameter 119 - shading factor
    94649468           0.5_wp,         &  !< parameter 120 - g-value windows
    9465            0.6_wp,         &  !< parameter 121 - u-value windows
     9469           2.5_wp,         &  !< parameter 121 - u-value windows
    94669470           0.1_wp,         &  !< parameter 122 - basical airflow without occupancy of the room
    94679471           1.5_wp,         &  !< parameter 123 - additional airflow depend of occupancy of the room
Note: See TracChangeset for help on using the changeset viewer.