defaultRearrangeState :: RearrangeState a b c
defaultRearrangeState = RearrangeState 0 Seq.empty Seq.empty Map.empty
defaultRearrangeState :: RearrangeState a b c
defaultRearrangeState = RearrangeState 0 Seq.empty Seq.empty Map.empty
defaultRearrangeState = RearrangeState 0 Seq.empty Seq.empty Map.empty