summaryrefslogtreecommitdiff
path: root/1627/CH8/EX8.5/Ex8_5.sce
diff options
context:
space:
mode:
Diffstat (limited to '1627/CH8/EX8.5/Ex8_5.sce')
-rw-r--r--1627/CH8/EX8.5/Ex8_5.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/1627/CH8/EX8.5/Ex8_5.sce b/1627/CH8/EX8.5/Ex8_5.sce
new file mode 100644
index 000000000..d213163c1
--- /dev/null
+++ b/1627/CH8/EX8.5/Ex8_5.sce
@@ -0,0 +1,16 @@
+clc
+//initialisation of variables
+w=0.05//m^3/s
+p=1000//N.s^2/m^4
+v=25//m/s
+a=135//deg
+v1=30//m/s
+b=55//deg
+//CALCULATIONS
+Fx=(p*w)*[(v)*-cosd(a)-v1]//N
+Fy=(p*w)*(v*-cosd(a))//N
+FR=sqrt((Fx)^2+(Fy)^2)//N
+F=-(Fy/Fx)
+F1=tand(b)//deg
+//RESULTS
+printf('The angle of the resultant force on the vane=% f deg',F1)