Index: palm/trunk/SOURCE/urban_surface_mod.f90
===================================================================
--- palm/trunk/SOURCE/urban_surface_mod.f90	(revision 3091)
+++ palm/trunk/SOURCE/urban_surface_mod.f90	(revision 3115)
@@ -28,4 +28,7 @@
 ! -----------------
 ! $Id$
+! Additional building type to represent bridges 
+! 
+! 3091 2018-06-28 16:20:35Z suehring
 ! - Limit aerodynamic resistance at vertical walls.
 ! - Add check for local roughness length not exceeding surface-layer height and
@@ -428,5 +431,5 @@
 
 
-    CHARACTER(37), DIMENSION(0:6), PARAMETER :: building_type_name = (/     &
+    CHARACTER(37), DIMENSION(0:7), PARAMETER :: building_type_name = (/     &
                                    'user-defined                         ', & !  0 
                                    'residential - 1950                   ', & !  1 
@@ -435,5 +438,6 @@
                                    'office - 1950                        ', & !  4 
                                    'office 1951 - 2000                   ', & !  5
-                                   'office 2001 -                        '  & !  6
+                                   'office 2001 -                        ', & !  6
+                                   'bridges                              '  & !  7
                                                                      /)
 !
@@ -460,9 +464,9 @@
 !-- 45 - heat capacity of the wall surface, 46 - heat conductivity
 !-- Please note, only preleminary dummy values so far!
-    REAL(wp), DIMENSION(0:46,1:6), PARAMETER :: building_pars = RESHAPE( (/    &
+    REAL(wp), DIMENSION(0:46,1:7), PARAMETER :: building_pars = RESHAPE( (/    &
         1.0_wp, 0.0_wp, 0.0_wp, 0.0_wp, 1.0_wp, 1.0_wp,                        & !parameter 0-5
         1000000.0_wp, 1000000.0_wp, 1000000.0_wp, 0.3_wp, 0.3_wp, 0.3_wp,      & !parameter 6-11
         296.15_wp, 293.15_wp, 0.9_wp, 0.9_wp, 0.01_wp, 0.99_wp,                & !parameter 12-17
-        0.001_wp, 0.0001_wp, 4.0_wp,                                             & !parameter 18-20
+        0.001_wp, 0.0001_wp, 4.0_wp,                                           & !parameter 18-20
         1.0_wp, 0.0_wp, 0.0_wp, 0.0_wp, 3.0_wp,                                & !parameter 21-25
         1000000.0_wp, 1000000.0_wp, 1000000.0_wp,                              & !parameter 26-28                     
@@ -475,5 +479,5 @@
         1000000.0_wp, 1000000.0_wp, 1000000.0_wp, 0.3_wp, 0.3_wp, 0.3_wp,      & !parameter 6-11
         296.15_wp, 293.15_wp, 0.9_wp, 0.9_wp, 0.01_wp, 0.99_wp,                & !parameter 12-17
-        0.001_wp, 0.0001_wp, 4.0_wp,                                             & !parameter 18-20
+        0.001_wp, 0.0001_wp, 4.0_wp,                                           & !parameter 18-20
         1.0_wp, 0.0_wp, 0.0_wp, 0.0_wp, 3.0_wp,                                & !parameter 21-25
         1000000.0_wp, 1000000.0_wp, 1000000.0_wp,                              & !parameter 26-28                     
@@ -486,5 +490,5 @@
         1000000.0_wp, 1000000.0_wp, 1000000.0_wp, 0.3_wp, 0.3_wp, 0.3_wp,      & !parameter 6-11
         296.15_wp, 293.15_wp, 0.9_wp, 0.9_wp, 0.01_wp, 0.99_wp,                & !parameter 12-17
-        0.001_wp, 0.0001_wp, 4.0_wp,                                             & !parameter 18-20
+        0.001_wp, 0.0001_wp, 4.0_wp,                                           & !parameter 18-20
         1.0_wp, 0.0_wp, 0.0_wp, 0.0_wp, 3.0_wp,                                & !parameter 21-25
         1000000.0_wp, 1000000.0_wp, 1000000.0_wp,                              & !parameter 26-28                     
@@ -508,5 +512,5 @@
         1000000.0_wp, 1000000.0_wp, 1000000.0_wp, 0.3_wp, 0.3_wp, 0.3_wp,      & !parameter 6-11
         296.15_wp, 293.15_wp, 0.9_wp, 0.9_wp, 0.01_wp, 0.99_wp,                & !parameter 12-17
-        0.001_wp, 0.0001_wp, 4.0_wp,                                             & !parameter 18-20
+        0.001_wp, 0.0001_wp, 4.0_wp,                                           & !parameter 18-20
         1.0_wp, 0.0_wp, 0.0_wp, 0.0_wp, 3.0_wp,                                & !parameter 21-25
         1000000.0_wp, 1000000.0_wp, 1000000.0_wp,                              & !parameter 26-28                     
@@ -519,5 +523,5 @@
         1000000.0_wp, 1000000.0_wp, 1000000.0_wp, 0.3_wp, 0.3_wp, 0.3_wp,      & !parameter 6-11
         296.15_wp, 293.15_wp, 0.9_wp, 0.9_wp, 0.01_wp, 0.99_wp,                & !parameter 12-17
-        0.001_wp, 0.0001_wp, 4.0_wp,                                             & !parameter 18-20
+        0.001_wp, 0.0001_wp, 4.0_wp,                                           & !parameter 18-20
         1.0_wp, 0.0_wp, 0.0_wp, 0.0_wp, 3.0_wp,                                & !parameter 21-25
         1000000.0_wp, 1000000.0_wp, 1000000.0_wp,                              & !parameter 26-28                     
@@ -526,7 +530,18 @@
         24.0_wp, 24.0_wp, 24.0_wp,                                             & !parameter 38-40
         0.0242_wp, 0.0969_wp, 0.346_wp, 1.0_wp,                                & !parameter 41-44
-        20000.0_wp, 10.0_wp                                                    & !parameter 45-46 - end of type 6
+        20000.0_wp, 10.0_wp,                                                   & !parameter 45-46 - end of type 6
+        1.0_wp, 0.0_wp, 0.0_wp, 0.0_wp, 1.0_wp, 1.0_wp,                        & !parameter 0-5
+        1000000.0_wp, 1000000.0_wp, 1000000.0_wp, 0.3_wp, 0.3_wp, 0.3_wp,      & !parameter 6-11
+        296.15_wp, 293.15_wp, 0.9_wp, 0.9_wp, 0.01_wp, 0.99_wp,                & !parameter 12-17
+        0.001_wp, 0.0001_wp, 0.0_wp,                                           & !parameter 18-20
+        1.0_wp, 0.0_wp, 0.0_wp, 0.0_wp, 3.0_wp,                                & !parameter 21-25
+        1000000.0_wp, 1000000.0_wp, 1000000.0_wp,                              & !parameter 26-28                     
+        0.3_wp, 0.3_wp, 0.3_wp,                                                & !parameter 29-31       
+        0.4_wp, 0.4_wp, 0.4_wp, 0.4_wp, 0.01_wp, 0.001_wp,                     & !parameter 32-37
+        24.0_wp, 24.0_wp, 24.0_wp,                                             & !parameter 38-40
+        0.0242_wp, 0.0969_wp, 0.346_wp, 1.0_wp,                                & !parameter 41-44
+        20000.0_wp, 10.0_wp                                                    & !parameter 45-46 - end of type 7 (bridges)
                                                                           /),  &
-                                                               (/47, 6/) )
+                                                               (/47, 7/) )
 
 !
