mirror of
https://github.com/reanimate/reanimate.git
synced 2026-09-09 15:12:21 +00:00
c2af9fbac0
* Improve CLI help message. * Change hackage badge color. * Add supported platforms. * Add 'signalOscillate' * Split SVG module into smaller parts. Former-commit-id: ad62a06a5442912f6bd0be0e10d02fe53345b846
17 lines
516 B
Haskell
Executable file
17 lines
516 B
Haskell
Executable file
#!/usr/bin/env stack
|
|
-- stack runghc --package reanimate
|
|
{-# LANGUAGE OverloadedStrings #-}
|
|
module Main (main) where
|
|
|
|
import Reanimate
|
|
|
|
main :: IO ()
|
|
main = reanimate $ playThenReverseA $ mkAnimation 2 $ \t ->
|
|
mkGroup
|
|
[ mkBackground "black"
|
|
, withStrokeColor "white" $ withFillOpacity 0 text
|
|
, withFillColor "white" $ withFillOpacity t text
|
|
]
|
|
where
|
|
text = withStrokeWidth 0.01 $ scale 2 $ center $ latexAlign
|
|
"\\sum_{k=1}^\\infty {1 \\over k^2} = {\\pi^2 \\over 6}"
|