Open MPI logo

Open MPI User's Mailing List Archives

  |   Home   |   Support   |   FAQ   |   all Open MPI User's mailing list

From: Jeff Squyres (jsquyres_at_[hidden])
Date: 2007-01-02 09:56:34


Brock --

I think your test program is faulty. For MPI_CART_CREATE, you need
to pass in an array indicating whether the dimensions are periodic or
not -- it is not sufficient to pass in a scalar logical value.

For example, the following program seems to work fine for me:

program cart
include 'mpif.h'

logical periods(1)

call MPI_INIT(ierr);
call MPI_COMM_SIZE(MPI_COMM_WORLD, numprocs, ierr)
call MPI_COMM_RANK(MPI_COMM_WORLD, my_world_id, ierr)
periods(1) = .false.
call MPI_CART_CREATE(MPI_COMM_WORLD, 1, numprocs, periods, .true.,
ITER_COMM, ierr)
call MPI_COMM_RANK(ITER_COMM,myid, ierr)

call MPI_FINALIZE(ierr)
end

On Dec 19, 2006, at 3:22 PM, Brock Palen wrote:

> Hello,
>
> We are getting seg faults at run time on MPI_CART_CREATE() when
> using openmpi-1.1.2 built with the intel compilers. I have included
> all versions, code and messages bellow. I know there were problems
> in the past, and dug around the archives but didn't find this any
> place. Has anyone else seen this problem?
>
> The message is like so:
>
> [brockp_at_nyxtest1 bagci]$ mpirun -np 1 ./a.out
> Signal:11 info.si_errno:0(Success) si_code:2(SEGV_ACCERR)
> Failing at addr:0x448c78
> [0] func:/home/software/rhel4/openmpi-1.1.2/intel/lib/libopal.so.0
> [0x2a958dea55]
> [1] func:/lib64/tls/libpthread.so.0 [0x325560c430]
> [2] func:/home/software/rhel4/openmpi-1.1.2/intel/lib/libmpi.so.0
> (mpi_cart_create__+0x60) [0x2a955ef93c]
> [3] func:./a.out(MAIN__+0x8c) [0x406b8c]
> [4] func:./a.out(main+0x32) [0x406aea]
> [5] func:/lib64/tls/libc.so.6(__libc_start_main+0xdb) [0x325471c3fb]
> [6] func:./a.out [0x406a2a]
> *** End of error message ***
>
> ifort is version 9.1.037
> icc icpc are version 9.1.043
>
> This problem does not happen with pgi compilers. (version 6.1)
> Both were done em64t systems (xeon 5160's)
>
> Here is the code sample that fails.
>
> program cart
> include 'mpif.h'
>
> call MPI_INIT(ierr);
> call MPI_COMM_SIZE(MPI_COMM_WORLD, numprocs, ierr)
> call MPI_COMM_RANK(MPI_COMM_WORLD, my_world_id, ierr)
> call MPI_CART_CREATE(MPI_COMM_WORLD, 1, numprocs, .false., .true.,
> ITER_COMM, ierr)
> call MPI_COMM_RANK(ITER_COMM,myid, ierr)
>
> call MPI_FINALIZE(ierr)
> end
>
>
>
> Brock Palen
> Center for Advanced Computing
> brockp_at_[hidden]
> (734)936-1985
>
>
> _______________________________________________
> users mailing list
> users_at_[hidden]
> http://www.open-mpi.org/mailman/listinfo.cgi/users

-- 
Jeff Squyres
Server Virtualization Business Unit
Cisco Systems