Lines Matching refs:fname1

58       character*255 fname1,fnamer, fnamelr  local
327       write (fname1,temp1) (myrank+1),'?'
328       fname1 = trim(fname1)
333       call readheader(descriptor,fname1//char(0) ,intfromfile,
356          call readdatablock(descriptor,fname1//char(0),qread,iqsiz,
389         write (fname1,temp1) (myrank+1),'?'
390         fname1 = trim(fname1)
392         call readheader(descriptor,fname1//char(0),intfromfile,
402           call readdatablock(descriptor,fname1//char(0) ,ybar,iqsiz,
419         write (fname1,temp1) (myrank+1),'?'
420         fname1 = trim(fname1)
422         call readheader(descriptor,fname1//char(0),intfromfile,
432           call readdatablock(descriptor,fname1//char(0),errors,iqsiz,
453           write (fname1,temp1) iphavg,(myrank+1),'?'
454           fname1 = trim(fname1)
456           call readheader(descriptor,fname1//char(0),intfromfile,
471             call readdatablock(descriptor,fname1//char(0),qread,iqsiz,
496         write (fname1,temp1) (myrank+1),'?'
497         fname1 = trim(fname1)
499         call readheader(descriptor,fname1//char(0),intfromfile,
509           call readdatablock(descriptor,fname1//char(0) ,vort ,iqsiz,
528         write (fname1,temp1) (myrank+1),'?'
529         fname1 = trim(fname1)
531         call readheader(descriptor,fname1//char(0),intfromfile,
545           call readdatablock(descriptor,fname1//char(0), dwal, iqsiz,
593        write (fname1,temp1) (myrank+1),'?'
594        fname1 = trim(fname1)
596        call readheader(descriptor,fname1//char(0),intfromfile,
609        call readdatablock(descriptor,fname1//char(0) ,pID,iqsiz,
617         write (fname1,temp1) (myrank+1),'?'
618         fname1 = trim(fname1)
620         call readheader(descriptor,fname1//char(0),intfromfile,
633        call readdatablock(descriptor,fname1//char(0) ,vid,iqsiz,