|
◆ msesei()
subroutine msesei |
( |
integer*8 |
fid, |
|
|
integer |
it, |
|
|
character*(*) |
mname, |
|
|
integer |
mgtype, |
|
|
integer |
mdim, |
|
|
character*(*) |
smname, |
|
|
integer |
setype, |
|
|
integer |
snnode, |
|
|
integer |
sncell, |
|
|
integer |
sgtype, |
|
|
integer |
ncatt, |
|
|
integer |
ap, |
|
|
integer |
nvatt, |
|
|
integer |
cret |
|
) |
| |
|