20 subroutine mpfprw(fid,pname,psize,profil,cret)
31 cret = mpffprw(fid,pname,len(pname),psize,profil)
38 subroutine mpfnpf(fid,n,cret)
60 subroutine mpfpfi(fid, it, pname, psize, cret)
68 integer psize, it, cret
71 cret = mpffpfi(fid, it, pname, psize)
78 subroutine mpfpsn(fid, pname, psize, cret)
89 cret = mpffpsn(fid, pname, len(pname), psize)
96 subroutine mpfprr(fid,pname,profil,cret)
107 cret = mpffprr(fid,pname,len(pname),profil)