[WIP] Use hgeometry instead of custom code (#142)

This commit is contained in:
David Himmelstrup 2020-08-26 17:39:13 +08:00 committed by GitHub
commit 117179cf60
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
25 changed files with 102 additions and 227 deletions

View file

@ -2,6 +2,7 @@
-- stack runghc --package reanimate
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RankNTypes #-}
{-# LANGUAGE PackageImports #-}
module Main (main) where
import Codec.Picture
@ -13,7 +14,7 @@ import Data.Vector.Unboxed (Vector)
import qualified Data.Vector.Unboxed as V
import Reanimate
import System.Random
import System.Random.Shuffle
import "random-shuffle" System.Random.Shuffle
main :: IO ()
main = reanimate $