[Pharo] Personal fitness tracker web app.
Update exercises and equipments.
Changed files
src/MyFitnessTracker-Core/MFTEquipment.class.st
@@ -12,19 +12,25 @@
12
12
#tag : 'Base'
13
13
}
14
14
15
Removed:
{ #category : 'as yet unclassified' }
15
Added:
{ #category : 'freeweights' }
16
16
MFTEquipment class >> barbell [
17
17
18
18
^ self newWithEnglishName
19
19
]
20
20
21
Removed:
{ #category : 'as yet unclassified' }
21
Added:
{ #category : 'machines' }
22
Added:
MFTEquipment class >> cable [
23
Added:
24
Added:
^ self newWithEnglishName
25
Added:
]
26
Added:
27
Added:
{ #category : 'freeweights' }
22
28
MFTEquipment class >> dumbbell [
23
29
24
30
^ self newWithEnglishName
25
31
]
26
32
27
Removed:
{ #category : 'as yet unclassified' }
33
Added:
{ #category : 'freeweights' }
28
34
MFTEquipment class >> ezBar [
29
35
30
36
^ self new
@@ -32,6 +38,12 @@
32
38
yourself
33
39
]
34
40
41
Added:
{ #category : 'machines' }
42
Added:
MFTEquipment class >> legExtensionMachine [
43
Added:
44
Added:
^ self newWithEnglishName
45
Added:
]
46
Added:
35
47
{ #category : 'as yet unclassified' }
36
48
MFTEquipment class >> newWithEnglishName [
37
49
"I return a MFTEquipment instance for which englishName is set to the calling method selector, as a space-separated string."
@@ -43,8 +55,14 @@
43
55
^ self new englishName: equipmentNameFromSender
44
56
]
45
57
46
Removed:
{ #category : 'as yet unclassified' }
58
Added:
{ #category : 'machines' }
47
59
MFTEquipment class >> pecDeck [
60
Added:
61
Added:
^ self newWithEnglishName
62
Added:
]
63
Added:
64
Added:
{ #category : 'machines' }
65
Added:
MFTEquipment class >> seatedLegCurlMachine [
48
66
49
67
^ self newWithEnglishName
50
68
]
src/MyFitnessTracker-Core/MFTExercise.class.st
@@ -29,7 +29,15 @@
29
29
activates: MFTMuscleGroup chest
30
30
]
31
31
32
Removed:
{ #category : 'benchmarking' }
32
Added:
{ #category : 'compound' }
33
Added:
MFTExercise class >> barbellSquat [
34
Added:
35
Added:
^ self newWithEnglishName
36
Added:
activates: MFTMuscleGroup leg;
37
Added:
equipment: MFTEquipment barbell
38
Added:
]
39
Added:
40
Added:
{ #category : 'back' }
33
41
MFTExercise class >> bentOverBarbellRows [
34
42
35
43
^ self new
@@ -43,24 +51,25 @@
43
51
^ self newWithEnglishName activates: MFTMuscleGroup arm
44
52
]
45
53
46
Removed:
{ #category : 'benchmarking' }
54
Added:
{ #category : 'back' }
47
55
MFTExercise class >> cableRow [
48
56
49
57
^ self newWithEnglishName activates: MFTMuscleGroup back
50
58
]
51
59
52
Removed:
{ #category : 'compound' }
60
Added:
{ #category : 'calves' }
53
61
MFTExercise class >> calfRaise [
54
62
55
63
^ self newWithEnglishName activates: MFTMuscleGroup calf
56
64
]
57
65
58
Removed:
{ #category : 'benchmarking' }
66
Added:
{ #category : 'back' }
59
67
MFTExercise class >> closeGripPalmsUpPulldown [
60
68
61
69
^ self new
62
70
englishName: 'close-grip palms-up pulldown';
63
Removed:
equipment: MFTEquipment dumbbell
71
Added:
activates: MFTMuscleGroup back;
72
Added:
equipment: MFTEquipment cable
64
73
]
65
74
66
75
{ #category : 'compound' }
@@ -77,7 +86,7 @@
77
86
activates: MFTMuscleGroup arm
78
87
]
79
88
80
Removed:
{ #category : 'benchmarking' }
89
Added:
{ #category : 'chest' }
81
90
MFTExercise class >> dumbbellBenchPress [
82
91
83
92
^ self newWithEnglishName
@@ -85,7 +94,7 @@
85
94
activates: MFTMuscleGroup chest
86
95
]
87
96
88
Removed:
{ #category : 'benchmarking' }
97
Added:
{ #category : 'chest' }
89
98
MFTExercise class >> dumbbellFly [
90
99
91
100
^ self newWithEnglishName
@@ -93,67 +102,67 @@
93
102
equipment: MFTEquipment dumbbell
94
103
]
95
104
96
Removed:
{ #category : 'benchmarking' }
105
Added:
{ #category : 'compound' }
97
106
MFTExercise class >> gobletSquat [
98
107
99
108
^ self newWithEnglishName equipment: MFTEquipment dumbbell
100
109
]
101
110
102
Removed:
{ #category : 'benchmarking' }
111
Added:
{ #category : 'bicep' }
103
112
MFTExercise class >> hammerCurl [
104
113
105
114
^ self newWithEnglishName activates: MFTMuscleGroup arm
106
115
]
107
116
108
Removed:
{ #category : 'benchmarking' }
117
Added:
{ #category : 'back' }
109
118
MFTExercise class >> hyperextension [
110
119
111
120
^ self newWithEnglishName equipment: MFTEquipment dumbbell
112
121
]
113
122
114
Removed:
{ #category : 'benchmarking' }
123
Added:
{ #category : 'chest' }
115
124
MFTExercise class >> inclinePress [
116
125
117
126
^ self newWithEnglishName activates: MFTMuscleGroup chest
118
127
]
119
128
120
Removed:
{ #category : 'benchmarking' }
129
Added:
{ #category : 'back' }
121
130
MFTExercise class >> latPulldown [
122
131
123
132
^ self newWithEnglishName
133
Added:
activates: MFTMuscleGroup back;
134
Added:
equipment: MFTEquipment cable
124
135
]
125
136
126
Removed:
{ #category : 'benchmarking' }
137
Added:
{ #category : 'back' }
127
138
MFTExercise class >> latPullover [
128
139
129
140
^ self newWithEnglishName equipment: MFTEquipment dumbbell
130
141
]
131
142
132
Removed:
{ #category : 'benchmarking' }
143
Added:
{ #category : 'shoulder' }
133
144
MFTExercise class >> lateralRaise [
134
145
135
146
^ self newWithEnglishName activates: MFTMuscleGroup shoulder
136
147
]
137
148
138
Removed:
{ #category : 'benchmarking' }
139
Removed:
MFTExercise class >> legCurl [
140
Removed:
141
Removed:
^ self newWithEnglishName
142
Removed:
]
143
Removed:
144
Removed:
{ #category : 'benchmarking' }
149
Added:
{ #category : 'leg' }
145
150
MFTExercise class >> legExtension [
146
151
147
152
^ self newWithEnglishName
153
Added:
activates: MFTMuscleGroup leg;
154
Added:
equipment: MFTEquipment legExtensionMachine
148
155
]
149
156
150
157
{ #category : 'tricep' }
151
158
MFTExercise class >> lyingFrenchPress [
152
159
153
Removed:
^ self newWithEnglishName equipment: MFTEquipment ezBar
160
Added:
^ self newWithEnglishName
161
Added:
activates: MFTMuscleGroup arm;
162
Added:
equipment: MFTEquipment ezBar
154
163
]
155
164
156
Removed:
{ #category : 'benchmarking' }
165
Added:
{ #category : 'as yet unclassified' }
157
166
MFTExercise class >> newWithEnglishName [
158
167
"I return a MFTExercise instance for which englishName is set to the calling method selector, as a space-separated string."
159
168
@@ -164,7 +173,7 @@
164
173
^ self new englishName: exerciseNameFromSender
165
174
]
166
175
167
Removed:
{ #category : 'benchmarking' }
176
Added:
{ #category : 'traps' }
168
177
MFTExercise class >> rearDeltFly [
169
178
170
179
^ self newWithEnglishName
@@ -172,6 +181,14 @@
172
181
equipment: MFTEquipment pecDeck
173
182
]
174
183
184
Added:
{ #category : 'leg' }
185
Added:
MFTExercise class >> seatedLegCurl [
186
Added:
187
Added:
^ self newWithEnglishName
188
Added:
activates: MFTMuscleGroup leg;
189
Added:
equipment: MFTEquipment seatedLegCurlMachine
190
Added:
]
191
Added:
175
192
{ #category : 'shoulder' }
176
193
MFTExercise class >> shoulderPressDumbell [
177
194
@@ -185,9 +202,11 @@
185
202
MFTExercise class >> shrug [
186
203
187
204
^ self newWithEnglishName
205
Added:
activates: MFTMuscleGroup back;
206
Added:
equipment: MFTEquipment dumbbell
188
207
]
189
208
190
Removed:
{ #category : 'compound' }
209
Added:
{ #category : 'core' }
191
210
MFTExercise class >> sitUp [
192
211
193
212
^ self new
@@ -195,16 +214,12 @@
195
214
activates: MFTMuscleGroup abdominal
196
215
]
197
216
198
Removed:
{ #category : 'compound' }
199
Removed:
MFTExercise class >> squat [
200
Removed:
201
Removed:
^ self newWithEnglishName
202
Removed:
]
203
Removed:
204
Removed:
{ #category : 'benchmarking' }
217
Added:
{ #category : 'tricep' }
205
218
MFTExercise class >> tricepExtension [
206
219
207
220
^ self newWithEnglishName
221
Added:
activates: MFTMuscleGroup arm;
222
Added:
equipment: MFTEquipment cable
208
223
]
209
224
210
225
{ #category : 'comparing' }