20 subroutine mlnliw(fid,mname,lname,cret)
25 character*(*) mname,lname
30 cret = mlnfliw(fid,mname,len(mname),lname,len(lname))
37 subroutine mlnnln(fid,n,cret)
59 subroutine mlnlni(fid, it, mname, lsize, cret)
67 integer lsize, it, cret
70 cret = mlnflni(fid, it, mname, lsize)
77 subroutine mlnlai(fid, mname, lsize, cret)
88 n = mlnflai(fid, mname, len(mname), lsize)
101 subroutine mlnlir(fid,mname,lname,cret)
106 character*(*) mname,lname
111 cret = mlnflir(fid,mname,len(mname),lname,len(lname))