Create a gist now

Instantly share code, notes, and snippets.

What would you like to do?
* (ql:quickload 'gpxtools)
To load "gpxtools":
Load 1 ASDF system:
gpxtools
; Loading "gpxtools"
.....
(GPXTOOLS)
* (defparameter *gpx*
(gpxtools:read-gpx "/Users/jeremiah/gpx_tracks/precarious_climb.gpx"))
Processing track: ACTIVE LOG
*GPX*
* (gpxtools:summarize *gpx*)
Total elevation gain: 3567.271946242661d0 feet
Total elevation loss: -3538.885209324304d0 feet
Total elevation loss: 6.437161570619994d0 miles
NIL
*
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment