MED fichier
subroutine mmhnow ( integer*8  fid,
character *(*)  name,
integer  numdt,
integer  numit,
real*8  dt,
integer  swm,
integer  n,
real*8:dimension(*)  coo,
integer  iname,
character *(*)  nname,
integer  inum,
integer:dimension(*)  num,
integer  ifam,
integer:dimension(*)  fam,
integer  cret 
)

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