Ignore:
Timestamp:
Sep 20, 2019 9:55:54 AM (5 years ago)
Author:
knoop
Message:

OpenACC support added to global_min_max.f90

File:
1 edited

Legend:

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

    r4182 r4233  
    2525! -----------------
    2626! $Id$
     27! OpenACC data update host removed
     28!
     29! 4182 2019-08-22 15:20:23Z scharf
    2730! Corrected "Former revisions" section
    2831!
     
    119122    CALL cpu_log( log_point(12), 'calculate_timestep', 'start' )
    120123
    121     !$ACC UPDATE &
    122     !$ACC HOST(u(nzb:nzt+1,nysg:nyng,nxlg:nxrg)) &
    123     !$ACC HOST(v(nzb:nzt+1,nysg:nyng,nxlg:nxrg)) &
    124     !$ACC HOST(w(nzb:nzt+1,nysg:nyng,nxlg:nxrg)) &
    125     !$ACC HOST(kh(nzb:nzt+1,nysg:nyng,nxlg:nxrg)) &
    126     !$ACC HOST(km(nzb:nzt+1,nysg:nyng,nxlg:nxrg))
    127 
    128124!
    129125!-- In case of Galilei-transform not using the geostrophic wind as translation
Note: See TracChangeset for help on using the changeset viewer.