MED fichier

◆ mfdrpw()

subroutine mfdrpw ( integer*8  fid,
character*(*)  fname,
integer  numdt,
integer  numit,
real*8  dt,
integer  etype,
integer  gtype,
integer  stm,
character*(*)  pname,
character*(*)  lname,
integer  swm,
integer  cs,
integer  n,
real*8, dimension(*)  val,
integer  cret 
)

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