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

unused variables remove from several routines

File:
1 edited

Legend:

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

    r1037 r1092  
    1919!
    2020! Current revisions:
     21! ------------------
     22! unused variables removed
     23!
     24! Former revisions:
    2125! -----------------
    22 !
    23 !
    24 ! Former revisions:
    25 ! ------------------
    2626! $Id$
    2727!
     
    6565
    6666    IMPLICIT NONE
    67 
    68     INTEGER ::  i, j, k
    6967
    7068    REAL    ::  time_since_reference_point_rem
Note: See TracChangeset for help on using the changeset viewer.