module excursion

real(8), dimension(:), pointer :: xm => NULL()
real(8), dimension(:), pointer :: ym => NULL()

end module