[mpich-discuss] Writing files

[Qiguo Jing]

Hi All,

I have a FORTRAN program, which needs to open a new file and write 
information to it. I only want the main processor to do the writing, so I 
did this: 

      IF (IMRANK .EQ. 0) THEN 
         OPEN (IDRUNT(IDEM),FILE=DIRFIL(IDEM),
     &         ACCESS='DIRECT',RECL=LREC_DIR)        
      END IF 

However, no matter how many processors I specified for the program, after 
the parallel program finishes, the file (121M) generated by the main 
processor is different from the one (30M) generated without paralleling.

Can someone provide any insights? 

Thanks.
_________________________________________________________________________

The information transmitted is intended only for the person or entity to
which it is addressed and may contain confidential and/or privileged
material.  Any review, retransmission, dissemination or other use of, or
taking of any action in reliance upon, this information by persons or
entities other than the intended recipient is prohibited.   If you
Received this in error, please contact the sender and delete the material 
from any computer.
_________________________________________________________________________
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.mpich.org/pipermail/discuss/attachments/20130123/ea53e5fb/attachment.html>