mirror of
https://github.com/reanimate/reanimate.git
synced 2026-09-10 23:52:22 +00:00
458da0f2ec
* Support GeoJSON. * Fix framerate issue for gifs. * Vastly improve performance for SVG serialization. Former-commit-id: b0dbb06b8810d56aa993d7138dd97c9e514db2e3
12 lines
342 B
Haskell
Executable file
12 lines
342 B
Haskell
Executable file
#!/usr/bin/env stack
|
|
-- stack runghc --package reanimate
|
|
module Main (main) where
|
|
|
|
import Reanimate
|
|
import Reanimate.GeoProjection
|
|
import Reanimate.Builtin.Images
|
|
|
|
main :: IO ()
|
|
main = reanimate $ animate $
|
|
const $ scaleToSize screenWidth screenHeight $
|
|
embedImage $ project smallEarth (orthoP $ LonLat 0 0)
|