On Tuesday, July 19, 2011 16:13:38 Jonathan Dursi wrote: > On 19 Jul 9:02AM, Alexander Beck-Ratzka wrote: > > integer ierr, i, myrank, BUFSIZE, thefile, intsize > > parameter (BUFSIZE=100) > > integer buf(BUFSIZE) > > > > do i=0,BUFSIZE > > > > buf(i) = myrank*BUFSIZE + i > > print*, 'i =', i, 'myrank =', myrank, 'buf(i)=',buf(i) > > > > end do > > [...] > > > When I am reading the data in again and print them out, I always have: > > > > buf(0)=0 > > If you compile your code with -check bounds and run, you'll get an error > pointing out that buf(0) is an illegal access; in Fortran arrays start at > 1. >
Thanks a lot, that solved the problem! Best wishes Alexander