1 files changed, 19 insertions, 0 deletions
diff --git a/3137/CH16/EX16.43/Ex16_43.sce b/3137/CH16/EX16.43/Ex16_43.sce
new file mode 100755
index 000000000..2d17b7aac
--- /dev/null
+++ b/3137/CH16/EX16.43/Ex16_43.sce
@@ -0,0 +1,19 @@
+//Initilization of variables
+W=161 //lb
+F=16.1 //lb
+r=18 //ft radius
+t=2 //s
+g=32.2 //ft/s^2
+wo=0 //rad/s
+//Calculations
+//Using equations of motion
+//Solving for T and alpha
+A=[r/12,-0.5*(W/g)*(r/12)^2;-1,-F/g]
+B=[0;-F]
+C=inv(A)*B
+alpha=C(2) //rad/s^2
+w=wo+alpha*t //rad/s
+//Result
+clc
+printf('The angular speed is %f rad/s',w)
+//The decimal accuray causes the discrepancy