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

---
 3594/CH13/EX13.1/Ex13_1.sce | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 3594/CH13/EX13.1/Ex13_1.sce

(limited to '3594/CH13/EX13.1/Ex13_1.sce')

diff --git a/3594/CH13/EX13.1/Ex13_1.sce b/3594/CH13/EX13.1/Ex13_1.sce
new file mode 100644
index 000000000..69d8c5733
--- /dev/null
+++ b/3594/CH13/EX13.1/Ex13_1.sce
@@ -0,0 +1,24 @@
+
+clc
+//given
+//all lengths are in inches
+W=120//lb
+w=15//lb
+AB=12
+BF=8
+BC=12
+BE=6.5
+g=35230//inches rpm
+//at Minimum radius 
+AF=(AB^2-BF^2)^(1/2)
+CE=(BC^2-BE^2)^(1/2)
+k2=(BE*AF)/(CE*BF)
+N2=(((W/2)*(1+k2)+w)*g/(w*AF))^(1/2)
+//At MAximum radius 
+BF1=10
+BE1=8.5
+AF1=(AB^2-BF1^2)^(1/2)
+CE1=(BC^2-BE1^2)^(1/2)
+k1=(BE1*AF1)/(CE1*BF1)
+N1=(((W/2)*(1+k1)+w)*g/(w*AF1))^(1/2)
+printf("\nN1 (corresponding maximum radius) = %.1f rpm\nN2 (corresponding minimum radius) = %.1f rpm",N1,N2)
-- 
cgit