diff options
Diffstat (limited to '1226/CH3/EX3.12')
-rwxr-xr-x | 1226/CH3/EX3.12/EX3_12.jpg | bin | 0 -> 117344 bytes | |||
-rwxr-xr-x | 1226/CH3/EX3.12/EX3_12.sce | 19 |
2 files changed, 19 insertions, 0 deletions
diff --git a/1226/CH3/EX3.12/EX3_12.jpg b/1226/CH3/EX3.12/EX3_12.jpg Binary files differnew file mode 100755 index 000000000..dcc32315a --- /dev/null +++ b/1226/CH3/EX3.12/EX3_12.jpg diff --git a/1226/CH3/EX3.12/EX3_12.sce b/1226/CH3/EX3.12/EX3_12.sce new file mode 100755 index 000000000..440a9ca19 --- /dev/null +++ b/1226/CH3/EX3.12/EX3_12.sce @@ -0,0 +1,19 @@ +clc;funcprot(0);//EXAMPLE 3.12
+// Initialisation of Variables
+ga=1.4;..............//Ratio of specific heats
+p2byp1=15;...............//Ratio pressure at the end of compression to that of pressure at the start
+t1=311;................//Initial temperature in K
+t3=2223;...............//Maximum temperature in K
+R=0.287;...............//Gas constant in kJ/kg K
+//Calculations
+r=p2byp1^(1/ga);...............//Compression ratio
+etath=1-(1/(r^(ga-1)));.............//Thermal efficiency
+t2=t1*(r^(ga-1));............//Temperature at the end of compression in K
+t4=t3/(r^(ga-1));...........//Temperature at the end of isothermal expansion in K
+cv=R/(ga-1);................//Specific heat at constant volume in kJ/kg
+Q=cv*(t3-t2);..............//Heat supplied in kJ/kg of air
+Qr=cv*(t4-t1);.................//Heat rejected in kJ/kg of air
+W=Q-Qr;.................//Work done
+disp(r,"Compression ratio:")
+disp(etath*100,"Thermal efficiency in %:")
+disp(W,"Work done in kJ:")
|