Lines Matching refs:descriptor

53       integer :: descriptor, color, nfiles, nfields  local
205         call initphmpiio(nfields,nppf,nfiles,descriptor,'read'//char(0))
206         call openfile( fnamer//char(0), 'read'//char(0), descriptor )
217         call readheader(descriptor,fname1//char(0),intfromfile,ithree,
235         call readdatablock(descriptor,fname1//char(0),qread,iqsiz,
251           call readheader(descriptor,fname1//char(0),intfromfile,ithree,
269           call readdatablock(descriptor,fname1//char(0),qread,iqsiz,
299             call readheader(descriptor,fname1//char(0),intfromfile,
318             call readdatablock(descriptor,fname1//char(0),qread,iqsiz,
342           call readheader(descriptor,fname1//char(0) ,intfromfile,
353             call readdatablock(descriptor,fname1//char(0),qread,iqsiz,
371             call readheader(descriptor,fname1//char(0),intfromfile,
380               call readdatablock(descriptor,fname1//char(0),qread,
399             call readheader(descriptor,fname1//char(0),intfromfile,
407               call readdatablock(descriptor,fname1//char(0),qread1,
423         call closefile( descriptor, 'read'//char(0) )
424         call finalizephmpiio( descriptor )