Changeset 4077 for palm/trunk/SOURCE
- Timestamp:
- Jul 9, 2019 1:27:11 PM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/urban_surface_mod.f90
r4051 r4077 28 28 ! ----------------- 29 29 ! $Id$ 30 ! Set roughness length z0 and z0h/q at ground-floor level to same value as 31 ! those above ground-floor level 32 ! 33 ! 4051 2019-06-24 13:58:30Z suehring 30 34 ! Remove work-around for green surface fraction on buildings 31 35 ! (do not set it zero) … … 8963 8967 0.86_wp, & !< parameter 34 - green emissivity ground floor level 8964 8968 0.75_wp, & !< parameter 35 - window transmissivity ground floor level 8965 0.0 1_wp,& !< parameter 36 - z0 roughness ground floor level8966 0.00 1_wp,& !< parameter 37 - z0h/z0q roughness heat/humidity8969 0.001_wp, & !< parameter 36 - z0 roughness ground floor level 8970 0.0001_wp, & !< parameter 37 - z0h/z0q roughness heat/humidity 8967 8971 27.0_wp, & !< parameter 38 - wall albedo above ground floor level 8968 8972 5.0_wp, & !< parameter 39 - green albedo above ground floor level … … 9100 9104 0.86_wp, & !< parameter 34 - green emissivity ground floor level 9101 9105 0.7_wp, & !< parameter 35 - window transmissivity ground floor level 9102 0.0 1_wp,& !< parameter 36 - z0 roughness ground floor level9103 0.00 1_wp,& !< parameter 37 - z0h/z0q roughness heat/humidity9106 0.001_wp, & !< parameter 36 - z0 roughness ground floor level 9107 0.0001_wp, & !< parameter 37 - z0h/z0q roughness heat/humidity 9104 9108 27.0_wp, & !< parameter 38 - wall albedo above ground floor level 9105 9109 5.0_wp, & !< parameter 39 - green albedo above ground floor level … … 9237 9241 0.86_wp, & !< parameter 34 - green emissivity ground floor level 9238 9242 0.6_wp, & !< parameter 35 - window transmissivity ground floor level 9239 0.0 1_wp,& !< parameter 36 - z0 roughness ground floor level9240 0.00 1_wp,& !< parameter 37 - z0h/z0q roughness heat/humidity9243 0.001_wp, & !< parameter 36 - z0 roughness ground floor level 9244 0.0001_wp, & !< parameter 37 - z0h/z0q roughness heat/humidity 9241 9245 27.0_wp, & !< parameter 38 - wall albedo above ground floor level 9242 9246 5.0_wp, & !< parameter 39 - green albedo above ground floor level … … 9374 9378 0.86_wp, & !< parameter 34 - green emissivity ground floor level 9375 9379 0.75_wp, & !< parameter 35 - window transmissivity ground floor level 9376 0.0 1_wp,& !< parameter 36 - z0 roughness ground floor level9377 0.00 1_wp,& !< parameter 37 - z0h/z0q roughness heat/humidity9380 0.001_wp, & !< parameter 36 - z0 roughness ground floor level 9381 0.0001_wp, & !< parameter 37 - z0h/z0q roughness heat/humidity 9378 9382 27.0_wp, & !< parameter 38 - wall albedo above ground floor level 9379 9383 5.0_wp, & !< parameter 39 - green albedo above ground floor level … … 9511 9515 0.86_wp, & !< parameter 34 - green emissivity ground floor level 9512 9516 0.7_wp, & !< parameter 35 - window transmissivity ground floor level 9513 0.0 1_wp,& !< parameter 36 - z0 roughness ground floor level9514 0.00 1_wp,& !< parameter 37 - z0h/z0q roughness heat/humidity9517 0.001_wp, & !< parameter 36 - z0 roughness ground floor level 9518 0.0001_wp, & !< parameter 37 - z0h/z0q roughness heat/humidity 9515 9519 27.0_wp, & !< parameter 38 - wall albedo above ground floor level 9516 9520 5.0_wp, & !< parameter 39 - green albedo above ground floor level … … 9648 9652 0.86_wp, & !< parameter 34 - green emissivity ground floor level 9649 9653 0.6_wp, & !< parameter 35 - window transmissivity ground floor level 9650 0.0 1_wp,& !< parameter 36 - z0 roughness ground floor level9651 0.00 1_wp,& !< parameter 37 - z0h/z0q roughness heat/humidity9654 0.001_wp, & !< parameter 36 - z0 roughness ground floor level 9655 0.0001_wp, & !< parameter 37 - z0h/z0q roughness heat/humidity 9652 9656 27.0_wp, & !< parameter 38 - wall albedo above ground floor level 9653 9657 5.0_wp, & !< parameter 39 - green albedo above ground floor level … … 9785 9789 0.86_wp, & !< parameter 34 - green emissivity ground floor level 9786 9790 0.6_wp, & !< parameter 35 - window transmissivity ground floor level 9787 0.0 1_wp,& !< parameter 36 - z0 roughness ground floor level9788 0.00 1_wp,& !< parameter 37 - z0h/z0q roughness heat/humidity9791 0.001_wp, & !< parameter 36 - z0 roughness ground floor level 9792 0.0001_wp, & !< parameter 37 - z0h/z0q roughness heat/humidity 9789 9793 27.0_wp, & !< parameter 38 - wall albedo above ground floor level 9790 9794 5.0_wp, & !< parameter 39 - green albedo above ground floor level
Note: See TracChangeset
for help on using the changeset viewer.