module usegenplot

  implicit none
  contains

! -------------------------------------------------------------------

subroutine init_genplot(filename)

  character(200) :: filename

  write(0, *)   '-------- init genplot '

end subroutine

! -------------------------------------------------------------------

end module