diff options
author | Andrew Cady <d@jerkface.net> | 2022-10-21 01:31:23 -0400 |
---|---|---|
committer | Andrew Cady <d@jerkface.net> | 2022-10-21 01:31:23 -0400 |
commit | 4325763348135944fa0378144ccece16d523ee39 (patch) | |
tree | 25a7d036fe3f04a7fb9a8d69f680282e5001c6e2 | |
parent | b375f0160809c2b64e0dac7cc5182874da6fe327 (diff) |
quote from 5/3/1 book
-rwxr-xr-x | repgoal.hs | 6 |
1 files changed, 6 insertions, 0 deletions
@@ -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 | |||
100 | computeRepGoal :: Integer -> [Performance] -> (Integer) | 106 | computeRepGoal :: Integer -> [Performance] -> (Integer) |
101 | computeRepGoal targetWeight stats = head $ filter isPR [2..] | 107 | computeRepGoal targetWeight stats = head $ filter isPR [2..] |
102 | where | 108 | where |