summaryrefslogtreecommitdiff
path: root/3647/CH1/EX1.4/Ex1_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '3647/CH1/EX1.4/Ex1_4.sce')
-rw-r--r--3647/CH1/EX1.4/Ex1_4.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/3647/CH1/EX1.4/Ex1_4.sce b/3647/CH1/EX1.4/Ex1_4.sce
new file mode 100644
index 000000000..9f1a141e5
--- /dev/null
+++ b/3647/CH1/EX1.4/Ex1_4.sce
@@ -0,0 +1,19 @@
+//Tension Coupling calculation
+clc
+//initialisation of variables
+w=30//tonf
+m=100//tonf
+w1=150//tonf
+f=6000//lbf
+h=2240//lbf
+q=105//lbf
+p=135//lbf
+a=711.7//lbf
+//CALCULATIONS
+M=(q*h)/m//lbf
+R=(w*h)/w1//lbf
+T=M+R//lbf
+A=f-T//lbf
+T1=R+a//lbf
+//RESULTS
+printf('the Tension Coupling is=% f lbf',T1)