Ignore:
Timestamp:
Feb 2, 2013 11:24:22 AM (9 years ago)
Author:
raasch
Message:

unused variables remove from several routines

File:
1 edited

Legend:

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

    r1037 r1092  
    2020! Current revisions:
    2121! -----------------
    22 !
     22! unused variables removed
    2323!
    2424! Former revisions:
     
    124124    IMPLICIT NONE
    125125
    126     INTEGER ::  i, j, k, sr
     126    INTEGER ::  i, j, k
    127127
    128128    REAL    ::  ddt_3d, localsum, threadsum, d_weight_pres
Note: See TracChangeset for help on using the changeset viewer.