Ignore:
Timestamp:
Sep 27, 2012 9:23:24 AM (9 years ago)
Author:
raasch
Message:

Starting with changes required for GPU optimization. OpenACC statements for using NVIDIA GPUs added.
Adjustment of mixing length to the Prandtl mixing length at first grid point above ground removed.
mask array is set zero for ghost boundaries

File:
1 edited

Legend:

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

    r997 r1015  
    44! Current revisions:
    55! -----------------
    6 !
     6! lower index for calculating wall_flags_0 set to nzb_w_inner instead of
     7! nzb_w_inner+1
    78!
    89! Former revisions:
     
    12531254       DO  i = nxl, nxr
    12541255          DO  j = nys, nyn
    1255              DO  k = nzb_w_inner(j,i)+1, nzt
     1256             DO  k = nzb_w_inner(j,i), nzt
    12561257!
    12571258!--             w component - x-direction
Note: See TracChangeset for help on using the changeset viewer.