Changeset 1171 for palm/trunk/SOURCE/buoyancy.f90

Timestamp:

May 30, 2013 11:27:45 AM (11 years ago)

Author:

raasch

Message:

New:
---

use_reference-case activated in accelerator version. (buoyancy, diffusion_e)
new option -e which defines the execution command to be used to run PALM,
compiler options for pgi/openacc added (palm_simple_run)
parameter sets for openACC benchmarks added (trunk/EXAMPLES/benchmark_acc)

Changed:

---

split of prognostic_equations deactivated (time_integration)

Errors:

---

bugfix: diss array is allocated with full size if accelerator boards are used (init_3d_model)

File:

• palm/trunk/SOURCE/buoyancy.f90 (modified) (3 diffs)

palm/trunk/SOURCE/buoyancy.f90

@@ -20 +20 @@
 ! Currrent revisions:
 ! -----------------
-!
+! openacc statements added to use_reference-case in accelerator version
 !
 ! Former revisions:
@@ -225 +225 @@
 !--       Normal case: horizontal surface
           IF ( use_reference )  THEN
+             !$acc kernels present( nzb_s_inner, hom, tend, var )
+             !$acc loop
              DO  i = i_left, i_right
                 DO  j = j_south, j_north
+                   !$acc loop independent vector(32)
                    DO  k = nzb_s_inner(j,i)+1, nzt-1
                       tend(k,j,i) = tend(k,j,i) + atmos_ocean_sign * g * 0.5 * &
@@ -236 +239 @@
                 ENDDO
              ENDDO
+             !$acc end kernels
           ELSE
              !$acc kernels present( nzb_s_inner, hom, tend, var )