I/O performance blues
Salvatore Filippone
filippone.salvatore@gmail.com
Mon Nov 25 18:32:00 GMT 2013
Hi Thomas,
Unfortunately it doesn't make any difference that I can see
Salvatore
On Mon, Nov 25, 2013 at 7:25 PM, Thomas Koenig <tkoenig@netcologne.de> wrote:
> Hi Salvaore,
>
>> read (infile,fmt=ptrfmt) (icp(i),i=1,ncol+1)
>> read (infile,fmt=indfmt) (ia(i),i=1,nnzero)
>> if (valcrd > 0) read (infile,fmt=valfmt) (val(i),i=1,nnzero)
>
> Try using
>
> read (infile,fmt=ptrfmt) icpi(1:ncol+1)
> read (infile,fmt=indfmt) ia(1:nnzero)
> if (valcrd > 0) rad (infile,fmt=valfmt) val(1:nnzero)
>
> (minus the typos, if any) and see if this helps.
>
> There's a PR for doing this optimization in the front end, but
> I haven't got a round tuit.
>
> Thomas
More information about the Fortran
mailing list