|
subroutine efelel |
( |
integer |
fid, |
|
|
character*(*) |
maa, |
|
|
integer |
mdim, |
|
|
integer:dimension(*) |
conn, |
|
|
integer |
switch, |
|
|
character*(*) |
nom, |
|
|
logical |
inom, |
|
|
integer:dimension(*) |
num, |
|
|
logical |
inum, |
|
|
integer:dimension(*) |
fam, |
|
|
integer |
nele, |
|
|
integer |
typent, |
|
|
integer |
typgeo, |
|
|
integer |
typcon, |
|
|
integer |
cret | |
|
) |
| | |
|