remove unused hard-coded lift data

1 files changed, 1 insertions, 18 deletions

diff --git a/repgoal.hs b/repgoal.hs
index a7b2fbf..0ceaf46 100755
--- a/repgoal.hs
+++ b/repgoal.hs
@@ -87,22 +87,6 @@ data LiftRecord = LiftRecord {
   stats :: [Performance]
 } deriving Generic deriving (Read, Show) via Surgery Derecordify LiftRecord
 
-initial' :: [LiftRecord]
-initial' =
-  [
-    LiftRecord "Squat"    [Achieved 6 270, Achieved 8 255, Achieved 5 285, Achieved 10 255, Achieved 7 280],
-    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 "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]
-  ]
-
 -- "I highly recommend having a goal in mind for these last sets. Sit down the
 -- night before, or the week before, and think of the number of reps you’d like
 -- to hit. See yourself doing it. Write it down and visualize the bar in your
@@ -274,8 +258,7 @@ routine =
   , Set.fromList ["Push Press", "Power Clean"]
   ]
 
-main, main' :: IO ()
-main' = pPrint initial'
+main :: IO ()
 main = do
     let buildVty = V.mkVty V.defaultConfig
     vty <- buildVty