Changeset 4732 for palm/trunk/SOURCE

Timestamp:

Oct 7, 2020 2:46:34 PM (4 years ago)

Author:

schwenkel

Message:

add use statements for openacc

File:

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

palm/trunk/SOURCE/time_integration.f90

@@ -25 +25 @@
 ! -----------------
 ! $Id$
+! Add use statements for OPENACC
+!
+! 4731 2020-10-07 13:25:11Z schwenkel
 ! Move exchange_horiz from time_integration to modules
 !
@@ -435 +438 @@
     USE arrays_3d,                                                                                 &
         ONLY:  d, dd2zu, ddzu, ddzw,                                                               &
+               diss,                                                                               &
+               diss_p,                                                                             &
                diss_l_u,                                                                           &
                diss_l_v,                                                                           &
@@ -449 +454 @@
                flux_s_w,                                                                           &
                heatflux_output_conversion,                                                         &
+               e_p,                                                                                &
+               pt_p,                                                                               &
+               u_p,                                                                                &
+               v_p,                                                                                &
+               w_p,                                                                                &
                kh, km, momentumflux_output_conversion, nc, ni, nr, p, ptdf_x, ptdf_y, qc, qi, qr, rdf,     &
                rdf_sc, rho_air, rho_air_zw, s, tdiss_m, te_m, tpt_m, tu_m, tv_m, tw_m, ug, u_init, &