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

unused variables remove from several routines

File:
1 edited

Legend:

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

    r1037 r1092  
    2020! Current revisions:
    2121! -----------------
    22 !
     22! unused variables removed
    2323!
    2424! Former revisions:
     
    7676    IMPLICIT NONE
    7777
    78     INTEGER ::  av, ngp, file_id, i, if, is, j, k, l, n, psi, s, sender, &
     78    INTEGER ::  av, ngp, i, if, j, k, n, psi, sender, &
    7979                ind(6)
    8080    LOGICAL ::  found, resorted
Note: See TracChangeset for help on using the changeset viewer.