module Monomer.Graph.GraphMsg ( GraphMsg(..) ) where import Monomer.Common.BasicTypes import Monomer.Core.WidgetTypes data GraphMsg = GraphSetTranslation Point | GraphSetScale Point | GraphReset | GraphStopAnimations | GraphFinished Int Millisecond deriving (GraphMsg -> GraphMsg -> Bool forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: GraphMsg -> GraphMsg -> Bool $c/= :: GraphMsg -> GraphMsg -> Bool == :: GraphMsg -> GraphMsg -> Bool $c== :: GraphMsg -> GraphMsg -> Bool Eq, Int -> GraphMsg -> ShowS [GraphMsg] -> ShowS GraphMsg -> String forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [GraphMsg] -> ShowS $cshowList :: [GraphMsg] -> ShowS show :: GraphMsg -> String $cshow :: GraphMsg -> String showsPrec :: Int -> GraphMsg -> ShowS $cshowsPrec :: Int -> GraphMsg -> ShowS Show)