Skip to content

Latest commit

 

History

History
30 lines (27 loc) · 955 Bytes

README.md

File metadata and controls

30 lines (27 loc) · 955 Bytes
Raw

This is a small library for working with GPX files in Common Lisp.

Parts of the code are a little ugly, and it doesn't have many features, but it is still useful already.

Here is a sample usage from the REPL:

* (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
* (gpxtools:elevation-plot *gpx* :file-name "/Users/jeremiah/gpx_tracks/precarious.png")
collect-points returning 1906 points
Plotting 1905 points.
#P"/Users/jeremiah/gpx_tracks/precarious.png"
*

Screenshot