MED fichier
subroutine mfdorr ( integer*8  fid,
character*(*)  fname,
integer  numdt,
integer  numit,
integer  etype,
integer  gtype,
character*(*)  mname,
integer  stm,
character*(*)  pname,
integer  swm,
integer  cs,
real*8:dimension(*)  val,
integer  cret 
)

Définition à la ligne 738 du fichier medfield.f.