18 subroutine meqcre(fid , maa , eq , des , cret)
24 character *(*) maa, des, eq
29 cret = meqfcre(fid, maa, len(maa), eq, len(eq), des, len(des))
36 subroutine meqcow(fid,maa,eq,numdt,numit,typent,typgeo,
43 character *(*) maa, eq
46 integer cret, n, typent, typgeo
50 cret = meqfcow(fid,maa,len(maa),eq,len(eq),
51 & numdt,numit,typent,typgeo,
59 subroutine meqneq(fid,maa,n,cret)
70 n = meqfneq(fid, maa, len(maa))
82 subroutine meqeqi(fid,maa,ind,eq,des,nstep,nctcor,cret)
88 character *(*) maa,eq,des
90 integer cret,ind,nstep,nctcor
93 cret = meqfeqi(fid,maa,len(maa),ind,eq,des,
101 subroutine meqcsz(fid,maa,eq,numdt,numit,
102 & typent,typgeo,n,cret)
108 character *(*) maa, eq
110 integer cret,n,typent,typgeo,numit,numdt
113 n = meqfcsz(fid,maa,len(maa),eq,len(eq),
114 & numdt,numit,typent,typgeo)
127 subroutine meqszi(fid,maa,eq,numdt,numit,
128 & corit,typent,typgeo,n,cret)
134 character *(*) maa, eq
136 integer cret,n,typent,typgeo,numit,numdt
140 cret = meqfszi(fid,maa,len(maa),eq,len(eq),
141 & numdt,numit,corit,typent,typgeo,n)
148 subroutine meqcor(fid,maa,eq,numdt,mumit,typent,typgeo,
155 character *(*) maa, eq
157 integer cret, corr(*), typent, typgeo,numdt,mumit
160 cret = meqfcor(fid, maa, len(maa), eq, len(eq),
161 & numdt,mumit,typent,typgeo,corr)
168 subroutine meqcsi(fid,maa,eq,ind,numdt,numit,ncor,cret)
174 character *(*) maa,eq
176 integer cret,ind,numdt,numit,ncor
179 cret = meqfcsi(fid,maa,len(maa),eq,len(eq),
subroutine meqcsz(fid, maa, eq, numdt, numit, typent, typgeo, n, cret)
subroutine meqcow(fid, maa, eq, numdt, numit, typent, typgeo, n, corr, cret)
subroutine meqeqi(fid, maa, ind, eq, des, nstep, nctcor, cret)
subroutine meqszi(fid, maa, eq, numdt, numit, corit, typent, typgeo, n, cret)
subroutine meqneq(fid, maa, n, cret)
subroutine meqcre(fid, maa, eq, des, cret)
subroutine meqcsi(fid, maa, eq, ind, numdt, numit, ncor, cret)
subroutine meqcor(fid, maa, eq, numdt, mumit, typent, typgeo, corr, cret)