| Thread Tools | Search this thread |
|---|
| elfmade | May 7, 2008 3:00 AM PDT Problem compiling the simplest MPI program | ||||
I've installed Visual Studio 2005 and Intel Fortran Compiler 10 in Windows XP...No problems with the instalations...
I've tryed to run the first program i've found in the book USING MPI (http://www-unix.mcs.anl.gov/mpi/usingmpi/usingmpi-1st/index.html) but it give me an error "Error 1 error LNK2019: unresolved external symbol _MPI_INIT referenced in function _MAIN__ pi.obj " ...The program is: program main include 'mpif.h' double precision PI25DT parameter (PI25DT = 3.141592653589793238462643d0) double precision mypi, pi, h, sum, x, f, a integer n, myid, numprocs, i, rc c function to integrate f(a) = 4.d0 / (1.d0 + a*a) call MPI_INIT( ierr ) call MPI_COMM_RANK( MPI_COMM_WORLD, myid, ierr ) call MPI_COMM_SIZE( MPI_COMM_WORLD, numprocs, ierr ) print *, "Process ", myid, " of ", numprocs, " is alive" sizetype = 1 sumtype = 2 10 if ( myid .eq. 0 ) then write(6,98) 98 format('Enter the number of intervals: (0 quits)') read(5,99) n 99 format(i10) endif call MPI_BCAST(n,1,MPI_INTEGER,0,MPI_COMM_WORLD,ierr) c check for quit signal if ( n .le. 0 ) goto 30 c calculate the interval size h = 1.0d0/n sum = 0.0d0 do 20 i = myid+1, n, numprocs x = h * (dble(i) - 0.5d0) sum = sum + f(x) 20 continue mypi = h * sum c collect all the partial sums call MPI_REDUCE(mypi,pi,1,MPI_DOUBLE_PRECISION,MPI_SUM,0, $ MPI_COMM_WORLD,ierr) c node 0 prints the answer. if (myid .eq. 0) then write(6, 97) pi, abs(pi - PI25DT) 97 format(' pi is approximately: ', F18.16, + ' Error is: ', F18.16) endif goto 10 30 call MPI_FINALIZE(rc) stop end ...I found the mpif.h and i put it in project directory...but it seems that this is not enough...Looks like it needs more linked files...Any help would be appreciated...Thank you | |||||
|
|||||||||||||
|
|||||||||||||
|
|||||||||||||
|
|||||||||||||
|
|||||||||||||
|
|||||||||||||
|
|||||||||||||
|
|||||||||||||
| 8445 users have contributed to 31553 threads and 100389 posts to date. |
|---|
| In the past 24 hours, we have 12 new thread(s) 25 new posts(s), and 43 new user(s). In the past 3 days, the most popular thread for everyone has been OMP Parallel do The most posts were made to TBB on linux segfaulting The post with the most views is If you have an example you c Please welcome our newest member nonamez |