From 6d597a27ad3e82fbb3ea57ce6bc49bb7a0059412 Mon Sep 17 00:00:00 2001 From: Andrew Cady Date: Wed, 19 Oct 2022 23:04:13 -0400 Subject: update lift records --- repgoal.hs | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'repgoal.hs') diff --git a/repgoal.hs b/repgoal.hs index 431c928..60fcbd4 100755 --- a/repgoal.hs +++ b/repgoal.hs @@ -78,8 +78,9 @@ initial = [ LiftRecord "Squat" [Achieved 6 270, Achieved 8 255, Achieved 5 285, Achieved 10 255], LiftRecord "Bench" [Achieved 7 190, Achieved 9 180, Achieved 4 205, Achieved 11 180], - LiftRecord "Deadlift" [Achieved 5 360, Achieved 9 315, Achieved 8 345, Achieved 7 360], - LiftRecord "Press" [Achieved 6 130, Achieved 9 120, Achieved 4 135] + 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] ] computeRepGoal :: Rational -> [Performance] -> (Integer) -- cgit v1.2.3