summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndrew Cady <d@jerkface.net>2022-10-21 01:31:23 -0400
committerAndrew Cady <d@jerkface.net>2022-10-21 01:31:23 -0400
commit4325763348135944fa0378144ccece16d523ee39 (patch)
tree25a7d036fe3f04a7fb9a8d69f680282e5001c6e2
parentb375f0160809c2b64e0dac7cc5182874da6fe327 (diff)
quote from 5/3/1 book
-rwxr-xr-xrepgoal.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/repgoal.hs b/repgoal.hs
index dfd7f6e..631085c 100755
--- a/repgoal.hs
+++ b/repgoal.hs
@@ -97,6 +97,12 @@ initial' =
97 LiftRecord "Overhead Squat" [Achieved 5 65] 97 LiftRecord "Overhead Squat" [Achieved 5 65]
98 ] 98 ]
99 99
100-- "I highly recommend having a goal in mind for these last sets. Sit down the
101-- night before, or the week before, and think of the number of reps you’d like
102-- to hit. See yourself doing it. Write it down and visualize the bar in your
103-- hands or on your back. When it’s time, let yourself go and attack the
104-- weight."
105
100computeRepGoal :: Integer -> [Performance] -> (Integer) 106computeRepGoal :: Integer -> [Performance] -> (Integer)
101computeRepGoal targetWeight stats = head $ filter isPR [2..] 107computeRepGoal targetWeight stats = head $ filter isPR [2..]
102 where 108 where