Lines Matching refs:igeom
58 integer :: igeom, ibndc, irstin, ierr local
180 call initphmpiio( nfields, nppf, nfiles, igeom,
182 call openfile( fnamer, 'read'//char(0), igeom )
186 call readheader(igeom,fname2//char(0),numnp,ione,
191 call readheader(igeom,fname2//char(0),nshg,ione,
197 call readheader(igeom,fname2//char(0),numel,ione,
203 call readheader(igeom,fname2//char(0),numelb,ione,
209 call readheader(igeom,fname2//char(0),nen,ione,
215 call readheader(igeom,fname2//char(0),nelblk,ione,
221 call readheader(igeom,fname2//char(0),nelblb,ione,
227 call readheader(igeom,fname2//char(0),numpbc,ione,
233 call readheader(igeom,fname2//char(0),ntopsh,ione,
236 call closefile( igeom, "read"//char(0) )
237 call finalizephmpiio( igeom )
578 call initphmpiio( nfields, nppf, nfiles, igeom,
580 call openfile( fnamer, 'read'//char(0), igeom )
584 call readheader(igeom,fname2//char(0),nlwork,ione,
589 call readheader(igeom,fname2//char(0) ,nlwork,ione,
594 call readdatablock(igeom,fname2//char(0),ilworkread,
600 call closefile( igeom, "read"//char(0) )
601 call finalizephmpiio( igeom )
837 994 call error ('input ','opening ', igeom)
838 995 call error ('input ','opening ', igeom)
839 997 call error ('input ','end file', igeom)
840 998 call error ('input ','end file', igeom)