Changeset 3241 for palm/trunk/SOURCE/sum_up_3d_data.f90

Timestamp:

Sep 12, 2018 3:02:00 PM (6 years ago)

Author:

raasch

Message:

various changes to avoid compiler warnings (mainly removal of unused variables)

File:

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

palm/trunk/SOURCE/sum_up_3d_data.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! unused variables removed
+! 
+! 3176 2018-07-26 17:12:48Z suehring
 ! Remove output of latent heat flux at urban-surfaces and set fill values 
 ! instead 
@@ -204 +207 @@
 
     USE averaging,                                                             &
-        ONLY:  diss_av, e_av, ghf_av, kh_av, km_av, lpt_av, lwp_av, nc_av,     &
+        ONLY:  e_av, ghf_av, lpt_av, lwp_av, nc_av,     &
                nr_av,                                                          &
                ol_av, p_av, pc_av, pr_av, prr_av, pt_av, q_av, qc_av, ql_av,   &
@@ -210 +213 @@
                rho_ocean_av, s_av, sa_av, shf_av, ssws_av, ts_av, tsurf_av,    &
                u_av, us_av, v_av, vpt_av, w_av, z0_av, z0h_av, z0q_av
+
     USE chemistry_model_mod,                                                   &
-        ONLY:  chem_3d_data_averaging, chem_integrate, chem_species, nspec                                   
+        ONLY:  chem_3d_data_averaging
 
     USE cloud_parameters,                                                      &