Ignore:
Timestamp:
May 16, 2014 1:47:01 PM (7 years ago)
Author:
raasch
Message:
 
File:
1 edited

Legend:

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

    r1343 r1406  
    2020! Current revisions:
    2121! ------------------
    22 !
     22! bugfix for pgi 14.4: declare create moved after array declaration
    2323!
    2424! Former revisions:
     
    336336          REAL(wp)     ::  ar(nxl_z:nxr_z,nys_z:nyn_z,1:nz) !:
    337337
     338          REAL(wp), DIMENSION(nxl_z:nxr_z,nys_z:nyn_z,0:nz-1) ::  ar1 !:
    338339          !$acc declare create( ar1 )
    339           REAL(wp), DIMENSION(nxl_z:nxr_z,nys_z:nyn_z,0:nz-1) ::  ar1 !:
    340340
    341341!
Note: See TracChangeset for help on using the changeset viewer.