Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!usc!zaphod.mps.ohio-state.edu!rpi!batcomputer!cornell!vax8530!h3dy
From: h3dy@vax5.cit.cornell.edu
Newsgroups: comp.lang.fortran
Subject: slow write
Message-ID: <3673.2607e3bb@vax5.cit.cornell.edu>
Date: 22 Mar 90 00:27:39 GMT
Distribution: comp
Lines: 20

I have a large array (characters) that I read in, process,
then write out to a file.  Prior to run time, I dont know
the final number of elements - it is smaller than the original.

      write (10) array

is fast, but if the array is much smaller, I don't want to
do this.

      write (10) (array(i),i=1,n)

but an implied do is very very slow!  How can I get the
combine the advantages whilst avoiding the disadvantages?
My array is about 15000000 characters long initially.

I am embarrassed to say I tried equivalencing arrays of
different sizes, using the closest one.  Ugliness.

Thanks for the help, sorry if this appears 2x, pnews is "broken"
so I am using anunews.