use lifts.dat

2 files changed, 37 insertions, 1 deletions

diff --git a/lifts.dat b/lifts.dat
new file mode 100644
index 0000000..1ec2cac
--- /dev/null
+++ b/lifts.dat
@@ -0,0 +1,36 @@
+[ LiftRecord "Squat"
+    [ Achieved 6 270
+    , Achieved 8 255
+    , Achieved 5 285
+    , Achieved 10 255
+    , Achieved 7 280
+    ]
+, LiftRecord "Bench"
+    [ Achieved 7 190
+    , Achieved 9 180
+    , Achieved 4 205
+    , Achieved 11 180
+    , Achieved 8 200
+    ]
+, LiftRecord "Deadlift"
+    [ Achieved 5 360
+    , Achieved 9 315
+    , Achieved 8 345
+    , Achieved 7 360
+    , Achieved 10 340
+    ]
+, LiftRecord "Press"
+    [ Achieved 5 120 ]
+, LiftRecord "Power Clean"
+    [ Achieved 10 135 ]
+, LiftRecord "Push Press"
+    [ Achieved 7 135 ]
+, LiftRecord "Front Squat"
+    [ Achieved 5 255 ]
+, LiftRecord "Left-Arm Snatch"
+    [ Achieved 3 85 ]
+, LiftRecord "Right-Arm Snatch"
+    [ Achieved 3 85 ]
+, LiftRecord "Overhead Squat"
+    [ Achieved 5 65 ]
+]
diff --git a/repgoal.hs b/repgoal.hs
index a873e59..9265c05 100755
--- a/repgoal.hs
+++ b/repgoal.hs
@@ -209,5 +209,5 @@ main = do
     vty <- buildVty
     -- liftIO $ setMode (outputIface vty) Mouse True
     chan <- newBChan 10
-    initial <- read <$> readFile "targets.dat" :: IO [LiftRecord]
+    initial <- read <$> readFile "lifts.dat" :: IO [LiftRecord]
     void $ customMain vty buildVty (Just chan) (theApp) (St initial Week1)