diff options
Diffstat (limited to '2141/CH9/EX9.12/Ex9_12.sce')
-rwxr-xr-x | 2141/CH9/EX9.12/Ex9_12.sce | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/2141/CH9/EX9.12/Ex9_12.sce b/2141/CH9/EX9.12/Ex9_12.sce new file mode 100755 index 000000000..42c2f42d5 --- /dev/null +++ b/2141/CH9/EX9.12/Ex9_12.sce @@ -0,0 +1,24 @@ +
+clc
+//initialisation of variables
+T=1.563//R
+T1=520//R
+nc=0.80
+T3=367//R
+Cp=0.24
+t=2060//R
+P3=68//lbf/in^2
+nt=0.85
+//CALCULATIONS
+Wc=Cp*(T4-T1)//Btu/lbm
+T2=T*T1//R
+T4=T1+T3//R
+T4s=t/T//R
+T6=nt*(t-T4s)//R
+T7=t-T6//R
+Wt=Cp*(t-T7)//Btu/lbm
+Wnet=Wt-Wc//Btu/lbm
+qH=Cp*(t-T4)//Btu/lbm
+Nth=(Wnet/qH)*100//per cent
+//RESULTS
+printf('The compressor work turbine work and cycle efficiency =% f per cent',Nth)
|