Compare commits
1 Commits
520a79e175
...
d493d56d28
| Author | SHA1 | Date |
|---|---|---|
|
|
d493d56d28 |
|
|
@ -1,7 +1,6 @@
|
||||||
import Data.List (transpose, delete)
|
import Data.List (transpose, delete)
|
||||||
import Data.List.Split (chunksOf, splitOn)
|
import Data.List.Split (chunksOf, splitOn)
|
||||||
import Data.Char (isSpace)
|
import Data.Char (isSpace)
|
||||||
import Debug.Trace (traceShowId, traceShow)
|
|
||||||
|
|
||||||
data Command = Move {amount :: Int, from :: Int, to :: Int} deriving Show
|
data Command = Move {amount :: Int, from :: Int, to :: Int} deriving Show
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue