Changeset 3658 for palm/trunk/SOURCE/timestep.f90

Timestamp:

Jan 7, 2019 8:28:54 PM (5 years ago)

Author:

knoop

Message:

OpenACC: flow_statistics partly ported to GPU

File:

• palm/trunk/SOURCE/timestep.f90 (modified) (1 diff)

palm/trunk/SOURCE/timestep.f90

@@ -211 +211 @@
 
     CALL cpu_log( log_point(12), 'calculate_timestep', 'start' )
+
+    !$ACC UPDATE &
+    !$ACC HOST(u(nzb:nzt+1,nysg:nyng,nxlg:nxrg)) &
+    !$ACC HOST(v(nzb:nzt+1,nysg:nyng,nxlg:nxrg)) &
+    !$ACC HOST(w(nzb:nzt+1,nysg:nyng,nxlg:nxrg)) &
+    !$ACC HOST(kh(nzb:nzt+1,nysg:nyng,nxlg:nxrg)) &
+    !$ACC HOST(km(nzb:nzt+1,nysg:nyng,nxlg:nxrg))
+
 !
 !--    Save former time step as reference