MED fichier
subroutine mmhcor ( integer*8  fid,
character *(*)  name,
integer  numdt,
integer  numit,
integer  swm,
real*8:dimension(*)  coo,
integer  cret 
)

Définition à la ligne 320 du fichier medmesh.f.