diff options
Diffstat (limited to '1226/CH3/EX3.23')
-rwxr-xr-x | 1226/CH3/EX3.23/EX3_23.jpg | bin | 0 -> 110720 bytes | |||
-rwxr-xr-x | 1226/CH3/EX3.23/EX3_23.sce | 18 |
2 files changed, 18 insertions, 0 deletions
diff --git a/1226/CH3/EX3.23/EX3_23.jpg b/1226/CH3/EX3.23/EX3_23.jpg Binary files differnew file mode 100755 index 000000000..65a50f0bd --- /dev/null +++ b/1226/CH3/EX3.23/EX3_23.jpg diff --git a/1226/CH3/EX3.23/EX3_23.sce b/1226/CH3/EX3.23/EX3_23.sce new file mode 100755 index 000000000..726f589a0 --- /dev/null +++ b/1226/CH3/EX3.23/EX3_23.sce @@ -0,0 +1,18 @@ +clc;funcprot(0);//EXAMPLE 3.23
+// Initialisation of Variables
+Vs=0.0053;................//Swept volume in m^3
+Vc=0.00035;...............//Clearance volume in m^3
+v3=Vc;
+v2=Vc;
+p3=65;..................//Max pressure in bar
+co=5;...................//Cut off percentage
+p4=p3;ga=1.4;...............//Ratio of specific heats
+t1=353;....................//Temperature at the start of compression in K
+p1=0.9;...................//Pressure at the start of compression in bar
+//Calculations
+r=1+(Vs/Vc);...................//Compression ratio
+rho=(((co/100)*Vs)/Vc)+1;...................//Cut off ratio
+p2=p1*(r^ga);
+Beta=p3/p2;.............................//Explosion ratio
+etadual=1-[(1/(r^(ga-1)))*((Beta*(rho^ga))-1)*(1/((Beta-1)+(Beta*ga*(rho-1))))];............//Efficiency of dual cycle
+disp(etadual*100,"Efficiency of dual cycle:")
|