mirror of
https://github.com/reanimate/reanimate.git
synced 2026-09-11 16:12:20 +00:00
doc: rgbComponents
Former-commit-id: 71e0c2e1fafb32520c69ae2110a93565e865e683
This commit is contained in:
parent
cffabcb58f
commit
bd056436d3
2 changed files with 24 additions and 0 deletions
14
examples/doc_rgbComponents.hs
Normal file
14
examples/doc_rgbComponents.hs
Normal file
|
|
@ -0,0 +1,14 @@
|
|||
#!/usr/bin/env stack
|
||||
-- stack runghc --package reanimate
|
||||
module Main(main) where
|
||||
|
||||
import Reanimate
|
||||
import Reanimate.Interpolate
|
||||
import Reanimate.Builtin.Documentation
|
||||
import Codec.Picture
|
||||
|
||||
main :: IO ()
|
||||
main = reanimate $ docEnv $ animate $ const $ showColorMap $ interpolateRGB8 rgbComponents yellow blue
|
||||
where
|
||||
yellow = PixelRGB8 0xFF 0xFF 0x00
|
||||
blue = PixelRGB8 0x00 0x00 0xFF
|
||||
Loading…
Reference in a new issue