20 subroutine mfrcre(fid,nent,nvent,ncent,cs,swm,
21 & stm,pname,fltas,flta,flt,cret)
29 integer nent,nvent,ncent
35 cret = mfrfcre(fid,nent,nvent,ncent,cs,swm,stm,
36 & pname,len(pname),fltas,flta,flt)
43 subroutine mfrall(nflt,flt,cret)
52 cret = mfrfall(nflt,flt)
59 subroutine mfrdea(nflt,flt,cret)
68 cret = mfrfdea(nflt,flt)
75 subroutine mfrblc(fid,nent,nvent,ncent,cs,swm,
76 & stm,pname,start,stride,count,bsize,
84 integer nent,nvent,ncent
85 integer start,stride,count,bsize,lbsize
91 cret = mfrfblc(fid,nent,nvent,ncent,cs,swm,stm,
92 & pname,len(pname),start,stride,count,bsize,
subroutine mfrdea(nflt, flt, cret)
subroutine mfrcre(fid, nent, nvent, ncent, cs, swm, stm, pname, fltas, flta, flt, cret)
subroutine mfrblc(fid, nent, nvent, ncent, cs, swm, stm, pname, start, stride, count, bsize, lbsize, flt, cret)
subroutine mfrall(nflt, flt, cret)