ingle_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_write_adv2
>
>
; > count = 0
> > 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 Fort
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