From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3845/CH10/EX10.14/Ex10_14.sce | 14 ++++++++++++++
 1 file changed, 14 insertions(+)
 create mode 100644 3845/CH10/EX10.14/Ex10_14.sce

(limited to '3845/CH10/EX10.14/Ex10_14.sce')

diff --git a/3845/CH10/EX10.14/Ex10_14.sce b/3845/CH10/EX10.14/Ex10_14.sce
new file mode 100644
index 000000000..6dd3dffa2
--- /dev/null
+++ b/3845/CH10/EX10.14/Ex10_14.sce
@@ -0,0 +1,14 @@
+//Example 10.14
+omega=0.8;//Angular velocity (rev/s)
+I=2.34;//Moment of inertia when arms are extended (kg.m^2)
+I_prime=0.363;//Moment of inertia when arms are close to the body (kg.m^2)
+m=60;//Mas of the skater (kg)
+omega_prime=I/I_prime*omega;//Angular velocity when arms are pulled in (rev/s)
+printf('a.Angular velocity when arms are pulled in = %0.2f rev/s',omega_prime)
+KE_rot=(1/2)*I*(omega*2*%pi)^2;//Rotational kinetic energy when arms are extended (J), also convert omega to units of rad/s
+printf('\nb.Initial rotational kinetic energy (extended arms) = %0.1f J',KE_rot)
+KE_rot_prime=(1/2)*I_prime*(omega_prime*2*%pi)^2;//Rotational kinetic energy when arms are pulled in (J), also convert omega to units of rad/s
+printf('\n  Final rotational kinetic energy (arms pulled in) = %0.1f J',KE_rot_prime)
+//Answer varies due to round off error
+//Openstax - College Physics
+//Download for free at http://cnx.org/content/col11406/latest
-- 
cgit