summaryrefslogtreecommitdiff
path: root/3776/CH4/EX4.5/Ex4_5.sce
diff options
context:
space:
mode:
Diffstat (limited to '3776/CH4/EX4.5/Ex4_5.sce')
-rw-r--r--3776/CH4/EX4.5/Ex4_5.sce21
1 files changed, 11 insertions, 10 deletions
diff --git a/3776/CH4/EX4.5/Ex4_5.sce b/3776/CH4/EX4.5/Ex4_5.sce
index 8d033dc9a..edd0d1fe6 100644
--- a/3776/CH4/EX4.5/Ex4_5.sce
+++ b/3776/CH4/EX4.5/Ex4_5.sce
@@ -1,23 +1,24 @@
clear
-//Given
+//Given
hp = 200 //Horse power
stress_sh = 10000 //psi- shear stress
-rpm_1 = 20.0 // The rpm at which this shaft1 operates
+rpm_1 = 20.0 // The rpm at which this shaft1 operates
rpm_2 = 20000.0 // The rpm at which this shaft2 operates
T_1= hp*63000.0/rpm_1 //in-lb Torsion due to rpm1
T_2= hp*63000/rpm_2 //in-lb Torsion due to rpm1
-//caliculations
+//calculations
//j/c=T/shear_T=K
-k_1= T_1/stress_sh //mm3
+k_1= T_1/stress_sh //cu.in
//c3=2K/3.14
-c_1= ((2*k_1/3)**0.33) //mm - The radius of the shaft
-diamter_1 = 2*c_1 //mm - The diameter of the shaft
-printf("\n The Diameter of the shaft1 is %0.2f mm",diamter_1)
+//c_1= ((2*k_1/3)**0.33) //mm - The radius of the shaft
+diamter_1 = (16*k_1/%pi)**(1/3) //mm - The diameter of the shaft
+printf("\n The Diameter of the shaft1 is %0.2f in",diamter_1)
//j/c=T/shear_T=K
k_2= T_2/stress_sh //mm3
//c3=2K/3.14
-c_2= ((2*k_2/3)**0.33) //mm - The radius of the shaft
-diamter_2 = 2*c_2 //mm - The diameter of the shaft
-printf("\n The Diameter of the shaft2 is %0.3f mm",diamter_2)
+//c_2= ((2*k_2/3)**0.33) //mm - The radius of the shaft
+diamter_2 = (16*k_2/%pi)**(1/3) //mm - The diameter of the shaft
+
+printf("\n The Diameter of the shaft2 is %0.3f in",diamter_2)