summaryrefslogtreecommitdiff
path: root/3137/CH17/EX17.16/Ex17_16.sce
diff options
context:
space:
mode:
Diffstat (limited to '3137/CH17/EX17.16/Ex17_16.sce')
-rwxr-xr-x3137/CH17/EX17.16/Ex17_16.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/3137/CH17/EX17.16/Ex17_16.sce b/3137/CH17/EX17.16/Ex17_16.sce
new file mode 100755
index 000000000..e627244be
--- /dev/null
+++ b/3137/CH17/EX17.16/Ex17_16.sce
@@ -0,0 +1,15 @@
+//Initilization of variables
+l=2 //m
+m=4 //kg
+w_1=20 //rpm
+w_2=50 //rpm
+rev=10 //no of revolution
+//Calculations
+Io=(1/3)*(m)*l^2 //kg.m^2
+w1=(2*%pi*w_1)/60 //rad/s
+w2=(2*%pi*w_2)/60 //rad/s
+theta=2*%pi*rev //rad
+M=(0.5*Io*(w2^2-w1^2))/theta //N.m
+//result
+clc
+printf('The constant moment required is %fN.m',M)