diff options
Diffstat (limited to '1226/CH3/EX3.27/EX3_27.sce')
| -rwxr-xr-x | 1226/CH3/EX3.27/EX3_27.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/1226/CH3/EX3.27/EX3_27.sce b/1226/CH3/EX3.27/EX3_27.sce new file mode 100755 index 000000000..c0588df7f --- /dev/null +++ b/1226/CH3/EX3.27/EX3_27.sce @@ -0,0 +1,13 @@ +clc;funcprot(0);//EXAMPLE 3.27
+// Initialisation of Variables
+t1=300;...............//Initial temperature
+rmami=70;....................//Ratio of max pressure and min pressure
+r=15;....................//Compression ratio
+ga=1.4;.................//Ratio of specific heats
+R=287;....................//Gas constant in kJ/kgK
+t2=t1*(r^(ga-1));.................//Temperature at the end of adiabatic compression in K
+t3=t2*(rmami/(r^ga));............//Temperature at the end of isochoric compression in K
+t4=t3+((t3-t2)/ga);..............//Temperature at the end of isobaric process in K
+t5=t4/((1/(t4/(t3*r)))^(ga-1));..........//Temperature at the end of adiabatic expansion in K
+etast=1-[(t5-t1)/((t3-t2)+ga*(t4-t3))];..............//Air standard efficiency
+disp(etast*100,"Air standard efficiency in %:")
|