Ignore:
Timestamp:
Oct 13, 2008 2:59:11 PM (13 years ago)
Author:
raasch
Message:

ocean-atmosphere coupling realized with MPI-1, adjustments in mrun, mbuild, subjob for lcxt4

File:
1 edited

Legend:

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

    r198 r206  
    44! Actual revisions:
    55! -----------------
     6! Implementation of a MPI-1 coupling: added __parallel within the __mpi2 part
     7! 2d-decomposition is default on SGI-ICE systems
    68! ATTENTION: nnz_x undefined problem still has to be solved!!!!!!!!
    79! TEST OUTPUT (TO BE REMOVED) logging mpi2 ierr values
     
    9395!--    Automatic determination of the topology
    9496!--    The default on SMP- and cluster-hosts is a 1d-decomposition along x
    95        IF ( host(1:3) == 'ibm'  .OR.  host(1:3) == 'nec'  .OR. &
    96             host(1:2) == 'lc'   .OR.  host(1:3) == 'dec' )  THEN
     97       IF ( host(1:3) == 'ibm'  .OR.  host(1:3) == 'nec'      .OR. &
     98            ( host(1:2) == 'lc'  .AND.  host(3:5) /= 'sgi' )  .OR. &
     99             host(1:3) == 'dec' )  THEN
    97100
    98101          pdims(1) = numprocs
     
    540543#endif
    541544
     545#if defined( __parallel )
    542546#if defined( __mpi2 )
    543547!
     
    623627
    624628    ENDIF
     629#endif
    625630
    626631!
Note: See TracChangeset for help on using the changeset viewer.