Changeset 2232 for palm/trunk/SOURCE/read_var_list.f90

Timestamp:

May 30, 2017 5:47:52 PM (7 years ago)

Author:

suehring

Message:

Adjustments according new topography and surface-modelling concept implemented

File:

• palm/trunk/SOURCE/read_var_list.f90 (modified) (5 diffs)

palm/trunk/SOURCE/read_var_list.f90

@@ -20 +20 @@
 ! Current revisions:
 ! ------------------
-! 
-! 
+! Replace wall_qflux, wall_sflux by wall_humidityflux and wall_scalarflux; add
+! wall_salinityflux
+! +tunnel_height, tunnel_length, tunnel_width_x, tunnel_width_y, 
+!  tunnel_wall_depth
+!
 ! Former revisions:
 ! -----------------
@@ -705 +708 @@
           CASE ( 'collision_turbulence' )
              READ ( 13 )  collision_turbulence
+          CASE ( 'tunnel_height' )
+             READ ( 13 )  tunnel_height
+          CASE ( 'tunnel_length' )
+             READ ( 13 )  tunnel_length
+          CASE ( 'tunnel_width_x' )
+             READ ( 13 )  tunnel_width_x
+          CASE ( 'tunnel_width_y' )
+             READ ( 13 )  tunnel_width_y
+          CASE ( 'tunnel_wall_depth' )
+             READ ( 13 )  tunnel_wall_depth
           CASE ( 'turbulent_inflow' )
              READ ( 13 )  turbulent_inflow
@@ -769 +782 @@
           CASE ( 'wall_heatflux' )
              READ ( 13 )  wall_heatflux
-          CASE ( 'wall_qflux' )
-             READ ( 13 )  wall_qflux
-          CASE ( 'wall_sflux' )
-             READ ( 13 )  wall_sflux
+          CASE ( 'wall_humidityflux' )
+             READ ( 13 )  wall_humidityflux
+          CASE ( 'wall_scalarflux' )
+             READ ( 13 )  wall_scalarflux
+          CASE ( 'wall_salinityflux' )
+             READ ( 13 )  wall_salinityflux
           CASE ( 'w_max' )
              READ ( 13 )  w_max
@@ -851 +866 @@
 
     READ ( 13 )  version_on_file
+
 
 !
@@ -932 +948 @@
     ENDIF
 
-
 !
 !-- Now read and check some control parameters and skip the rest