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