mirror of
https://github.com/reanimate/reanimate.git
synced 2026-09-10 15:42:21 +00:00
16 lines
458 B
Haskell
Executable file
16 lines
458 B
Haskell
Executable file
#!/usr/bin/env stack
|
|
-- stack runghc --package reanimate
|
|
{-# LANGUAGE OverloadedStrings #-}
|
|
module Main(main) where
|
|
|
|
import Reanimate
|
|
import Reanimate.Scene
|
|
import Reanimate.Builtin.Documentation
|
|
|
|
main :: IO ()
|
|
main = reanimate $ docEnv $ scene $ do
|
|
txt <- oNew $ withStrokeWidth 0 $ withFillOpacity 1 $
|
|
center $ scale 3 $ latex "oScaleIn"
|
|
oShowWith txt oFadeIn
|
|
-- oShowWith txt $ adjustDuration (*2) . oScaleIn
|
|
-- wait 1; oHideWith txt oFadeOut
|