Hello everyone,
I'm trying to implement some functions in my code using parallel writing.
Each processor has an array, say q, whose length is single_no(could be zero
on some processors). I want to write q down to a common file, but the
elements of q would be scattered to their locations in this f
> > end if
> >
> > if (count .gt. 0) then
> > allocate(temp(count))
> > temp(1) = 2122010.0d0
> > end if
>
> In C/C++ something like this would almost certainly lead to a crash,
> but i don't know if this would be the case in Fortran...
> jody
, ierr)
>
>
> if (single_no .gt. 0) deallocate(map)
>
> if (single_no .gt. 0) deallocate(q)
>
> if (count .gt. 0) deallocate(temp)
>
> !--Finilize MPI
> call MPI_FINALIZE(irc)! ---> Required statement
>
> stop
>
>
> end program test_MPI_w
