Validate attempted shed against prev card

1 files changed, 2 insertions, 1 deletions

diff --git a/Main.hs b/Main.hs
index 7e66efa..aaae87c 100644
--- a/Main.hs
+++ b/Main.hs
@@ -29,7 +29,8 @@ main = do
                     , playerIdx   = 0
                     , attack      = 1
                     , direction   = 1
-                    , stockPile   = stock
+                    , prevCard    = head stock
+                    , stockPile   = tail stock
                     , discardPile = discard
                     }