Ignore:
Timestamp:
Feb 25, 2019 3:31:42 PM (3 years ago)
Author:
raasch
Message:

unused variables removed, OpenACC directives re-formatted, statements added to avoid compiler warnings

File:
1 edited

Legend:

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

    r3655 r3761  
    2525! -----------------
    2626! $Id$
     27! unused variables removed
     28!
     29! 3655 2019-01-07 16:51:22Z knoop
    2730! nopointer option removed
    2831!
     
    151154       
    152155       USE indices,                                                            &
    153            ONLY:  nxl, nxlg, nxr, nxrg, nyn, nyng, nys, nysg, nzb,             &
    154                   nzt, wall_flags_0
     156           ONLY:  nxl, nxr, nyn, nys, nzb, nzt, wall_flags_0
    155157       
    156158       USE kinds
     
    481483       
    482484       USE indices,                                                            &
    483            ONLY:  nxlg, nxrg, nyng, nysg, nzb, nzt, wall_flags_0
     485           ONLY:  nzb, nzt, wall_flags_0
    484486       
    485487       USE kinds
Note: See TracChangeset for help on using the changeset viewer.