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/set_slicer_attributes_dvrp.f90

    r3655 r3761  
    2525! -----------------
    2626! $Id$
     27! statements added to avoid compiler warnings about unused variables
     28!
     29! 3655 2019-01-07 16:51:22Z knoop
    2730! Corrected "Former revisions" section
    2831!
     
    105108    dvrp_colortable_entries = 100
    106109
     110#else
     111!
     112!-- These statements are just to avoid compiler warnings about unused variables
     113    INTEGER ::  n_slicer  !<
     114
     115    IF ( n_slicer == 0 )  RETURN
     116
    107117#endif
    108118
Note: See TracChangeset for help on using the changeset viewer.