Changeset 2746 for palm/trunk/SOURCE/data_output_3d.f90

Timestamp:

Jan 15, 2018 12:06:04 PM (5 years ago)

Author:

suehring

Message:

Read information from statitic driver for resolved vegetation independently from land- or urban-surface model

File:

• palm/trunk/SOURCE/data_output_3d.f90 (modified) (3 diffs)

palm/trunk/SOURCE/data_output_3d.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Move flag plant canopy to modules
+! 
+! 2718 2018-01-02 08:49:38Z maronga
 ! Corrected "Former revisions" section
 ! 
@@ -190 +193 @@
         ONLY:  air_chemistry, cloud_physics, do3d, do3d_no, do3d_time_count,   &
                io_blocks, io_group, land_surface, message_string,              &
-               ntdim_3d, nz_do3d,                                              &
+               ntdim_3d, nz_do3d,  plant_canopy,                               &
                psolver, simulated_time, time_since_reference_point,            &
                urban_surface, varnamelength
@@ -220 +223 @@
 
     USE plant_canopy_model_mod,                                                &
-        ONLY:  pcm_data_output_3d, plant_canopy
+        ONLY:  pcm_data_output_3d
         
     USE radiation_model_mod,                                                   &