Functor Animation.Make

module Make: 
functor (Puzzle : PUZZLE) -> sig .. end

val run : Puzzle.state -> Puzzle.move list -> unit

Given an initial state s and a list of moves, loop an animation of the application of those moves to the initial state.