summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xrepgoal.hs8
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 =
86 LiftRecord "Bench" [Achieved 7 190, Achieved 9 180, Achieved 4 205, Achieved 11 180, Achieved 8 200], 86 LiftRecord "Bench" [Achieved 7 190, Achieved 9 180, Achieved 4 205, Achieved 11 180, Achieved 8 200],
87 LiftRecord "Deadlift" [Achieved 5 360, Achieved 9 315, Achieved 8 345, Achieved 7 360, Achieved 10 340], 87 LiftRecord "Deadlift" [Achieved 5 360, Achieved 9 315, Achieved 8 345, Achieved 7 360, Achieved 10 340],
88 -- LiftRecord "Press" [Achieved 6 130, Achieved 9 120, Achieved 4 135] 88 -- LiftRecord "Press" [Achieved 6 130, Achieved 9 120, Achieved 4 135]
89 LiftRecord "Press" [Achieved 5 120] 89 LiftRecord "Press" [Achieved 5 120],
90 LiftRecord "Power Clean" [Achieved 10 135],
91 LiftRecord "Push Press" [Achieved 7 135],
92 LiftRecord "Front Squat" [Achieved 5 255],
93 LiftRecord "Left-Arm Snatch" [Achieved 3 85],
94 LiftRecord "Right-Arm Snatch" [Achieved 3 85],
95 LiftRecord "Overhead Squat" [Achieved 5 65]
90 ] 96 ]
91 97
92computeRepGoal :: Rational -> [Performance] -> (Integer) 98computeRepGoal :: Rational -> [Performance] -> (Integer)