Ignore:
Timestamp:
Sep 10, 2013 8:59:13 AM (11 years ago)
Author:
raasch
Message:

New:


openACC porting of reduction operations
additional 3D-flag arrays for replacing the 2D-index arrays nzb_s_inner and nzb_diff_s_inner
(flow_statistics, init_grid, init_3d_model, modules, palm, pres, time_integration)

Changed:


for PGI/openACC performance reasons set default compile options for openACC to "-ta=nocache",
and set environment variable PGI_ACC_SYNCHRONOUS=1
(MAKE.inc.pgi.openacc, palm_simple_run)

wall_flags_0 changed to 32bit INTEGER, additional array wall_flags_00 introduced to hold
bits 32-63
(advec_ws, init_grid, modules, palm)

Errors:


dummy argument tri in 1d-routines replaced by tri_for_1d because of name
conflict with arry tri in module arrays_3d
(tridia_solver)

File:
1 edited

Legend:

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

    r1213 r1221  
    2323! Current revisions:
    2424! ------------------
    25 !
     25! +rflags_s_inner in copyin statement, use copyin for most arrays instead of
     26! copy
    2627!
    2728! Former revisions:
     
    14991500       CALL disturb_field( nzb_v_inner, tend, v )
    15001501       n_sor = nsor_ini
    1501        !$acc data copy( d, ddzu, ddzw, nzb_s_inner, nzb_u_inner, nzb_v_inner, nzb_w_inner, p, tri, tric, u, v, w, weight_pres, weight_substep, tend )
     1502       !$acc data copyin( d, ddzu, ddzw, nzb_s_inner, nzb_u_inner )            &
     1503       !$acc      copyin( nzb_v_inner, nzb_w_inner, p, rflags_s_inner, tend )  &
     1504       !$acc      copyin( weight_pres, weight_substep )                        &
     1505       !$acc      copy( tri, tric, u, v, w )
    15021506       CALL pres
    15031507       !$acc end data
Note: See TracChangeset for help on using the changeset viewer.