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

---
 1325/CH7/EX7.2/7_2.PNG | Bin 0 -> 91813 bytes
 1325/CH7/EX7.2/7_2.sce |  28 ++++++++++++++++++++++++++++
 2 files changed, 28 insertions(+)
 create mode 100644 1325/CH7/EX7.2/7_2.PNG
 create mode 100644 1325/CH7/EX7.2/7_2.sce

(limited to '1325/CH7/EX7.2')

diff --git a/1325/CH7/EX7.2/7_2.PNG b/1325/CH7/EX7.2/7_2.PNG
new file mode 100644
index 000000000..c989cb9cd
Binary files /dev/null and b/1325/CH7/EX7.2/7_2.PNG differ
diff --git a/1325/CH7/EX7.2/7_2.sce b/1325/CH7/EX7.2/7_2.sce
new file mode 100644
index 000000000..4a1e56237
--- /dev/null
+++ b/1325/CH7/EX7.2/7_2.sce
@@ -0,0 +1,28 @@
+//to find maximun horsepower when drive is a) Vertical b) Horizontal
+clc
+w=1.2//lb/ft^2
+u=0.3
+v=3600//ft/min
+V=v/60//ft/sec
+theta=165//degrees
+g=32.2//ft/s^2
+x=theta*%pi/180
+k=%e^(u*x)//k=T1/T2=e^(u*x)
+To=500//lb
+//Solution a)Vertical drive
+Tc=w*V^2/g//equation 7.5
+//solution a)
+H=2*(k-1)*(To-Tc)*V/((k+1)*550)
+Vmax=(To*g/(3*w))^(1/2)
+Hmax=2*(k-1)*(To-Tc)*Vmax/((k+1)*550)
+//Solution b)
+To1=To+Tc
+//from equation 7.15 2/To1^2=1/Tt^2+1/Ts^2
+//T1/T2=k
+T2=367 //lb - from trail and error
+T1=k*T2
+Tt=T1+Tc
+Ts=T2+Tc
+HP=(T1-T2)*V/550
+printf("\nSolution a)\nHorsepower transmitted= %.1f\nMaximum Horsepower transmitted= %.1f (at velocit = %.1f ft/s^2)Solution b)\nTt=%.f lb\nTs=%.f lb\nHorsepower transmitted= %.1f",H,Hmax,Vmax,Tt,Ts,HP)
+
-- 
cgit