Changeset db375cc in flexpart.git for src/wetdepo.f90


Ignore:
Timestamp:
Jun 7, 2017, 2:53:29 PM (7 years ago)
Author:
Espen Sollum ATMOS <eso@…>
Branches:
master, 10.4.1_pesei, GFS_025, bugfixes+enhancements, dev, release-10, release-10.4.1, scaling-bug, univie
Children:
a76d954
Parents:
e52967c
Message:

Removed some unused variables

File:
1 edited

Legend:

Unmodified
Added
Removed
  • src/wetdepo.f90

    r6985a98 rdb375cc  
    6363  implicit none
    6464
    65   integer :: jpart,itime,ltsample,loutnext,ldeltat,i,j,ix,jy
    66   integer :: itage,nage,il,interp_time, n
     65  integer :: jpart,itime,ltsample,loutnext,ldeltat
     66  integer :: itage,nage
    6767  integer :: ks, kp
    6868  integer(selected_int_kind(16)), dimension(nspec) :: blc_count, inc_count
Note: See TracChangeset for help on using the changeset viewer.
hosted by ZAMG