18 subroutine msecre(fid,mname,mdim,smname,setype,
19 & sgtype, etype, cret)
24 character*(*) mname,smname
25 integer fid,cret,mdim,setype,sgtype,etype
28 etype = msefcre(fid,mname,len(mname),mdim,
29 & smname,len(smname),setype,sgtype)
42 subroutine msense(fid,n,cret)
63 subroutine msesei(fid,it,mname,mgtype,mdim,smname,
64 & setype,snnode,sncell,sgtype,
65 & ncatt,ap,nvatt,cret)
70 character*(*) mname,smname
71 integer fid,cret,mdim,setype,sgtype,it
72 integer snnode,sncell,ncatt,ap,nvatt,mgtype
75 cret = msefsei(fid,it,mname,mgtype,mdim,smname,
76 & setype,snnode,sncell,sgtype,
84 subroutine msesin(fid,mname,mgtype,mdim,smname,
85 & setype,snnode,sncell,sgtype,
86 & ncatt,ap,nvatt,cret)
91 character*(*) mname,smname
92 integer fid,cret,mdim,setype,sgtype
93 integer snnode,sncell,ncatt,ap,nvatt,mgtype
96 cret = msefsin(fid,mname,len(mname),mgtype,
97 & mdim,smname,setype,snnode,
98 & sncell,sgtype,ncatt,ap,nvatt)
105 subroutine msesen(fid,mgtype,mname,cret)
111 integer fid,cret,mgtype
114 cret = msefsen(fid,mgtype,mname)
121 subroutine msesgt(fid,mname,gtype,cret)
127 integer fid,gtype,cret
130 gtype = msefsgt(fid,mname,len(mname))
143 subroutine msevac(fid,mname,aname,atype,anc,cret)
148 character*(*) mname,aname
149 integer fid,cret,atype,anc
152 cret = msefvac(fid,mname,len(mname),
153 & aname,len(aname),atype,
161 subroutine msevni(fid,mname,aname,atype,anc,cret)
166 character*(*) mname,aname
167 integer fid,cret,atype,anc
170 cret = msefvni(fid,mname,len(mname),
179 subroutine msevai(fid,mname,it,aname,atype,anc,cret)
184 character*(*) mname,aname
185 integer fid,cret,atype,anc,it
188 cret = msefvai(fid,mname,len(mname),it,
196 subroutine mseasz(atype,size,cret)
201 integer size,atype,cret
204 size = msefasz(atype)
217 subroutine mseraw(fid,mname,aname,atype,anc,
223 character*(*) mname,aname
224 integer fid,cret,atype,anc,setype
228 cret = msefraw(fid,mname,len(mname),
229 & aname,len(aname),atype,
237 subroutine mseiaw(fid,mname,aname,atype,anc,
243 character*(*) mname,aname
244 integer fid,cret,atype,anc,setype
248 cret = msefiaw(fid,mname,len(mname),
249 & aname,len(aname),atype,
257 subroutine msesaw(fid,mname,aname,atype,anc,
263 character*(*) mname,aname
264 integer fid,cret,atype,anc,setype
268 cret = msefsaw(fid,mname,len(mname),
269 & aname,len(aname),atype,
270 & anc,setype,val,anc*64)
277 subroutine mserpw(fid,mname,aname,atype,anc,
278 & setype,pname,val,cret)
283 character*(*) mname,aname,pname
284 integer fid,cret,atype,anc,setype
288 cret = msefrpw(fid,mname,len(mname),
289 & aname,len(aname),atype,
290 & anc,setype,pname,len(pname),
298 subroutine mseipw(fid,mname,aname,atype,anc,
299 & setype,pname,val,cret)
304 character*(*) mname,aname,pname
305 integer fid,cret,atype,anc,setype
309 cret = msefipw(fid,mname,len(mname),
310 & aname,len(aname),atype,
311 & anc,setype,pname,len(pname),
319 subroutine msespw(fid,mname,aname,atype,anc,
320 & setype,pname,val,cret)
325 character*(*) mname,aname,pname
326 integer fid,cret,atype,anc,setype
330 cret = msefspw(fid,mname,len(mname),
331 & aname,len(aname),atype,
332 & anc,setype,pname,len(pname),
340 subroutine msecni(fid,mname,aname,atype,anc,
341 & setype,pname,psize,cret)
346 character*(*) mname,aname,pname
347 integer fid,cret,atype,anc,setype,psize
350 cret = msefcni(fid,mname,len(mname),
351 & aname,len(aname),atype,
352 & anc,setype,pname,psize)
359 subroutine msecai(fid,mname,it,aname,atype,anc,
360 & setype,pname,psize,cret)
365 character*(*) mname,aname,pname
366 integer fid,cret,atype,anc,setype,psize,it
369 cret = msefcai(fid,mname,len(mname),it,
371 & anc,setype,pname,psize)
378 subroutine mserar(fid,mname,aname,val,cret)
383 character*(*) mname,aname
388 cret = msefrar(fid,mname,len(mname),
389 & aname,len(aname),val)
396 subroutine mseiar(fid,mname,aname,val,cret)
401 character*(*) mname,aname
406 cret = msefiar(fid,mname,len(mname),
407 & aname,len(aname),val)
414 subroutine msesar(fid,mname,aname,val,cret)
419 character*(*) mname,aname
424 cret = msefsar(fid,mname,len(mname),
subroutine msevni(fid, mname, aname, atype, anc, cret)
Cette routine décrit les caractéristiques d'un attribut variable de modèle d'élément de structure à p...
subroutine mseipw(fid, mname, aname, atype, anc, setype, pname, val, cret)
Cette routine définit un attribut caractéristique constant d'un modèle d'éléments de structure...
subroutine msense(fid, n, cret)
Cette routine renvoie le nombre de modèles d'éléments de structure.
subroutine mseiaw(fid, mname, aname, atype, anc, setype, val, cret)
Cette routine définit un attribut caractéristique constant d'un modèle d'éléments de structure...
subroutine mseraw(fid, mname, aname, atype, anc, setype, val, cret)
Cette routine définit un attribut caractéristique constant d'un modèle d'éléments de structure...
subroutine msevai(fid, mname, it, aname, atype, anc, cret)
Cette routine décrit les caractéristiques d'un attribut variable de modèle d'élément de structure par...
subroutine mseiar(fid, mname, aname, val, cret)
Cette routine lit la valeur d'un attribut caractéristique constant d'un modèle d'éléments de structur...
subroutine msecai(fid, mname, it, aname, atype, anc, setype, pname, psize, cret)
Cette routine décrit les caractéristiques d'un attribut constant de modèle d'élément de structure par...
subroutine mserpw(fid, mname, aname, atype, anc, setype, pname, val, cret)
Cette routine définit un attribut caractéristique constant d'un modèle d'éléments de structure...
subroutine msecre(fid, mname, mdim, smname, setype, sgtype, etype, cret)
Cette routine permet de créer un nouveau modèle d'éléments de structure dans un fichier MED...
subroutine msesgt(fid, mname, gtype, cret)
Cette routine renvoie le type géométrique mgeotype associé au modèle d'éléments de structure de nom m...
subroutine msesin(fid, mname, mgtype, mdim, smname, setype, snnode, sncell, sgtype, ncatt, ap, nvatt, cret)
Cette routine décrit les caractéristiques d'un modèle d'élément de structure à partir de son nom...
subroutine mserar(fid, mname, aname, val, cret)
Cette routine lit la valeur d'un attribut caractéristique constant d'un modèle d'éléments de structur...
subroutine msesar(fid, mname, aname, val, cret)
Cette routine lit la valeur d'un attribut caractéristique constant d'un modèle d'éléments de structur...
subroutine msespw(fid, mname, aname, atype, anc, setype, pname, val, cret)
Cette routine définit un attribut caractéristique constant d'un modèle d'éléments de structure...
subroutine msecni(fid, mname, aname, atype, anc, setype, pname, psize, cret)
Cette routine décrit les caractéristiques d'un attribut constant de modèle d'élément de structure à p...
subroutine msesen(fid, mgtype, mname, cret)
Cette routine renvoie le nom du modèle d'éléments de structure associé au type mgeotype.
subroutine msesei(fid, it, mname, mgtype, mdim, smname, setype, snnode, sncell, sgtype, ncatt, ap, nvatt, cret)
Cette routine décrit les caractéristiques d'un modèle d'élément de structure par itération.
subroutine msevac(fid, mname, aname, atype, anc, cret)
Cette routine déclare la présence d'un attribut caractéristique variable attaché aux éléments de type...
subroutine msesaw(fid, mname, aname, atype, anc, setype, val, cret)
Cette routine définit un attribut caractéristique constant d'un modèle d'éléments de structure...
subroutine mseasz(atype, size, cret)
Cette routine renvoie la taille en octets du type élémentaire atttype.