Changeset 3241 for palm/trunk/SOURCE/virtual_flight_mod.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/virtual_flight_mod.f90 (modified) (6 diffs)

palm/trunk/SOURCE/virtual_flight_mod.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! unused variables removed
+! 
+! 3182 2018-07-27 13:36:03Z suehring
 ! IF statement revised to consider new vertical grid stretching
 ! 
@@ -227 +230 @@
 
        USE control_parameters,                                                 &
-           ONLY:  initializing_actions, message_string  
+           ONLY:  message_string
       
        IMPLICIT NONE
@@ -514 +517 @@
 
        USE control_parameters,                                                 &
-           ONLY:  cloud_droplets, cloud_physics, dz, dz_stretch_level, dt_3d,  &
-                  humidity, neutral, passive_scalar, simulated_time
+           ONLY:  cloud_droplets, cloud_physics, dt_3d, humidity, neutral,     &
+                  passive_scalar, simulated_time
                   
        USE cpulog,                                                             &
@@ -524 +527 @@
 
        USE indices,                                                            &
-           ONLY:  nx, nxl, nxlg, nxr, nxrg, ny, nys, nysg, nyn, nyng, nzb, nzt
+           ONLY:  nx, nxl, nxr, ny, nys, nyn
 
        USE pegrid
@@ -739 +742 @@
            ONLY:  dz, dz_stretch_level_start   
   
-      USE grid_variables,                                                     &
+      USE grid_variables,                                                      &
           ONLY:  dx, dy
     
@@ -828 +831 @@
     
        USE control_parameters,                                                 &
-           ONLY:  bc_lr_cyc, bc_ns_cyc, dz, message_string
+           ONLY:  bc_lr_cyc, bc_ns_cyc, message_string
 
        USE grid_variables,                                                     &