11 lines
212 B
Haskell
11 lines
212 B
Haskell
module Main where
|
|
|
|
import Control.Exception
|
|
import Track(parseFile)
|
|
import Data.List as List
|
|
|
|
main :: IO ()
|
|
main = do
|
|
points <- Track.parseFile "track.gpx"
|
|
putStrLn ("loaded " ++ (show (List.length points)))
|