Ignore:
Timestamp:
Aug 26, 2013 9:31:42 AM (8 years ago)
Author:
raasch
Message:

overlapping execution of fft and transpositions (MPI_ALLTOALL), but real overlapping is not activated so far,
fftw implemented for 1D-decomposition
resorting of arrays moved to separate routines resort_for_...
bugfix in mbuild concerning Makefile_check

File:
1 edited

Legend:

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

    r1213 r1216  
    2020! Current revisions:
    2121! ------------------
    22 !
     22! +transpose_compute_overlap,
     23! several variables are now defined in the serial (non-parallel) case also
    2324!
    2425! Former revisions:
     
    776777                scalar_rayleigh_damping = .TRUE., sloping_surface = .FALSE., &
    777778                stop_dt = .FALSE., synchronous_exchange = .FALSE., &
    778                 terminate_run = .FALSE., turbulence = .FALSE., &
    779                 turbulent_inflow = .FALSE., use_cmax = .TRUE., &
    780                 use_initial_profile_as_reference = .FALSE., &
     779                terminate_run = .FALSE., transpose_compute_overlap = .FALSE., &
     780                turbulence = .FALSE., turbulent_inflow = .FALSE., &
     781                use_cmax = .TRUE., use_initial_profile_as_reference = .FALSE., &
    781782                use_prescribed_profile_data = .FALSE., &
    782783                use_single_reference_value = .FALSE., &
     
    14891490    CHARACTER(LEN=2) ::  send_receive = 'al'
    14901491    CHARACTER(LEN=5) ::  myid_char = ''
    1491     INTEGER          ::  acc_rank, id_inflow = 0, id_recycling = 0,      &
    1492                          myid = 0, num_acc_per_node = 0, req_count = 0,  &
    1493                          target_id, npex = -1, npey = -1, numprocs = 1,  &
    1494                          numprocs_previous_run = -1,                     &
    1495                          tasks_per_node = -9999, threads_per_task = 1
     1492    INTEGER          ::  acc_rank, comm1dx, comm1dy, comm2d, comm_inter,       &
     1493                         comm_palm, id_inflow = 0, id_recycling = 0, ierr,     &
     1494                         myid = 0, myidx = 0, myidy = 0, ndim = 2, ngp_a,      &
     1495                         ngp_o, ngp_xy, ngp_y, npex = -1, npey = -1,           &
     1496                         numprocs = 1, numprocs_previous_run = -1,             &
     1497                         num_acc_per_node = 0, pleft, pnorth, pright, psouth,  &
     1498                         req_count = 0, sendrecvcount_xy, sendrecvcount_yz,    &
     1499                         sendrecvcount_zx, sendrecvcount_zyd,                  &
     1500                         sendrecvcount_yxd, target_id, tasks_per_node = -9999, &
     1501                         threads_per_task = 1, type_x, type_x_int, type_xy,    &
     1502                         type_y, type_y_int
    14961503
    14971504    INTEGER          ::  pdims(2) = 1, req(100)
     
    15071514    CHARACTER (LEN=MPI_MAX_PORT_NAME) ::  port_name
    15081515#endif
    1509 
    1510     INTEGER ::  comm1dx, comm1dy, comm2d, comm_inter, comm_palm, ierr, myidx,  &
    1511                 myidy, ndim = 2, ngp_a, ngp_o, ngp_xy, ngp_y, pleft, pnorth,   &
    1512                 pright, psouth, sendrecvcount_xy, sendrecvcount_yz,            &
    1513                 sendrecvcount_zx, sendrecvcount_zyd, sendrecvcount_yxd,        &
    1514                 type_x, type_x_int, type_xy, type_y, type_y_int
    15151516
    15161517    INTEGER ::  ibuf(12), pcoord(2)
Note: See TracChangeset for help on using the changeset viewer.