Ignore:
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:
1 edited

Legend:

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

    r2719 r3241  
    2525! -----------------
    2626! $Id$
     27! unused variables removed
     28!
     29! 2719 2018-01-02 09:02:06Z maronga
    2730! Bugfix for last change.
    2831!
     
    8487!
    8588!
    86 !
    8789! Description:
    8890! ------------
     
    9496 
    9597
    96 
    9798    USE arrays_3d,                                                             &
    9899        ONLY:  q, qc, ql, qr
     
    102103
    103104    USE diagnostic_quantities_mod,                                             &
    104         ONLY:  e_s, magnus, q_s, sat, supersaturation, t_l
     105        ONLY:  magnus, q_s, supersaturation
    105106
    106107    USE indices,                                                               &
     
    126127!--          Call calculation of supersaturation located
    127128!--          in diagnostic_quantities_mod
    128              CALL supersaturation ( i, j, k )
     129             CALL supersaturation( i, j, k )
    129130
    130131!
Note: See TracChangeset for help on using the changeset viewer.