PGI User Forum

[lionel@predsci.com]

Hi,

I'm starting pgdbg in this way to debug my Fortran program:

mpirun -np 4 -dbg=pgdbg mas_0.2.1.3_dbg


but pgdbg only reports one process (see screenshot) and when I check the number of processors with mpi_comm_size I always get one.

What am I doing wrong? Thanks!

Cheers,

RL

[hongyon]

Hi,

Which version of PGI, pgdbg?
What OS?

Please try the following program and let us know if you still get 1 process.

program hello
include 'mpif.h'
integer ierr, myproc
call mpi_init(ierr)
call mpi_comm_rank(MPI_COMM_WORLD, myproc, ierr)
print *, "Hello world! I'm node", myproc
call mpi_finalize(ierr)

end


Hongyon

[lionel@predsci.com]

Hi,

pgf90 10.6-0 64-bit target on x86-64 Linux -tp gh-64
pgdbg 10.6-0

I'm running Debian Squeeze.

The "Hello world" program shows 4 processors, my program, which is of course much more complex, only one.
Maybe because I'm using modules.

[hongyon]

MPI_Init() is where it spawns the processes. If you can narrow down and give us a small program, perhaps we can see what the problem is.

Hongyon

[lionel@predsci.com]

I discovered something very interesting (or at least I think so). To run my program, I need to provide an argument. If I don't provide the argument, the 4 processes are indeed initiated by MPI_Init(), but of course my internal error checking does not allow me to continue the run.
But this is true also with your "Hello world" program, although no argument is necessary to run it.

If I load

mpirun -np 4 -dbg=pgdbg hello

and type

run myargument

PI_Init() will not initiate 4 processes but only one.