update lift records

1 files changed, 7 insertions, 1 deletions

diff --git a/repgoal.hs b/repgoal.hs
index 20c367f..a82aaa3 100755
--- a/repgoal.hs
+++ b/repgoal.hs
@@ -86,7 +86,13 @@ initial =
     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 6 130, Achieved 9 120, Achieved 4 135]
-    LiftRecord "Press"    [Achieved 5 120]
+    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]
   ]
 
 computeRepGoal :: Rational -> [Performance] -> (Integer)