Ignore:
Timestamp:
Sep 12, 2018 3:02:00 PM (3 years ago)
Author:
raasch
Message:

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

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/virtual_flight_mod.f90

    r3182 r3241  
    2525! -----------------
    2626! $Id$
     27! unused variables removed
     28!
     29! 3182 2018-07-27 13:36:03Z suehring
    2730! IF statement revised to consider new vertical grid stretching
    2831!
     
    227230
    228231       USE control_parameters,                                                 &
    229            ONLY:  initializing_actions, message_string 
     232           ONLY:  message_string
    230233     
    231234       IMPLICIT NONE
     
    514517
    515518       USE control_parameters,                                                 &
    516            ONLY:  cloud_droplets, cloud_physics, dz, dz_stretch_level, dt_3d,  &
    517                   humidity, neutral, passive_scalar, simulated_time
     519           ONLY:  cloud_droplets, cloud_physics, dt_3d, humidity, neutral,     &
     520                  passive_scalar, simulated_time
    518521                 
    519522       USE cpulog,                                                             &
     
    524527
    525528       USE indices,                                                            &
    526            ONLY:  nx, nxl, nxlg, nxr, nxrg, ny, nys, nysg, nyn, nyng, nzb, nzt
     529           ONLY:  nx, nxl, nxr, ny, nys, nyn
    527530
    528531       USE pegrid
     
    739742           ONLY:  dz, dz_stretch_level_start   
    740743 
    741       USE grid_variables,                                                     &
     744      USE grid_variables,                                                      &
    742745          ONLY:  dx, dy
    743746   
     
    828831   
    829832       USE control_parameters,                                                 &
    830            ONLY:  bc_lr_cyc, bc_ns_cyc, dz, message_string
     833           ONLY:  bc_lr_cyc, bc_ns_cyc, message_string
    831834
    832835       USE grid_variables,                                                     &
Note: See TracChangeset for help on using the changeset viewer.