summaryrefslogtreecommitdiff
path: root/3751/CH16/EX16.14/Ex16_14.sce
diff options
context:
space:
mode:
Diffstat (limited to '3751/CH16/EX16.14/Ex16_14.sce')
-rw-r--r--3751/CH16/EX16.14/Ex16_14.sce45
1 files changed, 45 insertions, 0 deletions
diff --git a/3751/CH16/EX16.14/Ex16_14.sce b/3751/CH16/EX16.14/Ex16_14.sce
new file mode 100644
index 000000000..b4699d3b0
--- /dev/null
+++ b/3751/CH16/EX16.14/Ex16_14.sce
@@ -0,0 +1,45 @@
+//Fluid Systems - By Shiv Kumar
+//Chapter 16- Hydraulic Power and Its Transmissions
+//Example 16.14
+//To Find (i)The Force applied in Plunger (ii) The Number of Strokes performed by Plunger (iii) Work done by the Press Ram and (iv) Power required to drive the Plunger.
+
+ clc
+ clear
+
+//Given Data:-
+ D=180; //Diameter of ram, mm
+ d=36; //Diameter of Plunger, mm
+ W=7 ; //Weight exerted by Press ram, kN
+ L=300; //Stroke Length of Plunger, mm
+ l=0.9; //Distance moved by ram, m
+ t=15; //Time, minutes
+
+//Computations:-
+ D=D/1000; //m
+ A=(%pi/4)*D^2; //m^2
+ d=d/1000; //m
+ a= (%pi/4)*d^2; //m^2
+ W=W*1000; //N
+ L=L/1000; //m
+ t=t*60; //seconds(s)
+
+ // (i)The Force applied in Plunger, F1
+ F1=(a/A)*W; //N
+
+ //(ii) The Number of Strokes performed by Plunger, n
+ n=(A/a)*(l/L);
+
+ // (iii) Work done by the Press Ram
+ Work=W*l; //N-m
+
+ // (iv) Power required to drive the Plunger, P
+ P=Work/t; //W
+
+
+//Results:-
+ printf(" (i) The Force applied in Plunger, F1=%.2f N \n",F1) //The answer vary due to round off error
+ printf(" (ii) The Number of Strokes performed by Plunger, n =%.f \n",n)
+ printf(" (iii) Work done by the Press Ram =%.f N.m \n",Work)
+ printf(" (iv) Power required to drive the Plunger, P =%.f W \n",P)
+
+