+- HP Forums (https://www.hpmuseum.org/forum)
+-- Forum: HP Software Libraries (/forum-10.html)
+--- Forum: General Software Library (/forum-13.html)
+--- Thread: (42S) Pulley (/thread-8642.html)
(42S) Pulley - Eddie W. Shore - 07-07-2017 05:30 AM
There are two weights in a pulley system, held by a rope has a negligible contribution. The program uses SI units (kg, m, s, with g = 9.80665 m/s^2). The simultaneous equations solve for acceleration (m/s^2) and tensions:
T – m1 * a = m1 * g
T + m2 * a = m2 * g
Source: HP 22S Science Student Applications. Edition 1. Corvallis, Oregon. May 1988
Code:
00 {161-Byte Prgm}
01 LBL “PULLEY”
02 “MASS 1 (KG)”
03 PROMPT
04 STO 01
05 “MASS 2 (KG)”
06 PROMPT
07 STO 02
08 9.80665
09 STO 00
10 2
11 ENTER
12 2
13 DIM “MAT1”
14 INDEX “MAT1”
15 1
16 STOEL
17 J+
18 RCL 01
19 +/-
20 STOEL
21 2
22 ENTER
23 1
24 STOIJ
25 1
26 STOEL
27 J+
28 RCL 02
29 STOEL
30 2
31 ENTER
32 1
33 DIM “MAT2”
34 INDEX “MAT2”
35 RCL 00
36 RCL* 01
37 STOEL
38 I+
39 RCL 00
40 RCL* 02
41 STOEL
42 RCL “MAT1”
43 INVRT
44 RCL “MAT2”
45 *
46 STO “MAT3”
47 INDEX “MAT3”
48 RCLEL
49 “T”
50 AVIEW
51 STOP
52 I+
53 RCLEL
54 “a”
55 AVIEW
56 ENDExample: m1 = 32 kg, m2 = 56 kg
Result: tension = 399.3981, a = 2.6745 m/s^2