1 files changed, 22 insertions, 0 deletions
diff --git a/2837/CH19/EX19.2/Ex19_2.sce b/2837/CH19/EX19.2/Ex19_2.sce
new file mode 100755
index 000000000..0c253cf0f
--- /dev/null
+++ b/2837/CH19/EX19.2/Ex19_2.sce
@@ -0,0 +1,22 @@
+clc
+clear
+//Initalization of variables
+work=75.9 //Btu/lb
+twork=173.5 //Btu/lb
+eta=0.8
+t2=856 //R
+t1=540 //R
+t4=1960 //R
+cp=0.24
+//calculations
+cwork=work/eta
+internal=twork*eta
+net=-cwork+internal
+t2d=(t2-t1)/eta + t1
+Qs=cp*(t4-t2d)
+eff=net/Qs *100
+//results
+printf("Indicated compressor work = %.1f Btu/lb",cwork)
+printf("\n Internal work = %.1f Btu/lb",internal)
+printf("\n Net work = %.1f Btu/lb",net)
+printf('\n Thermal efficiency = %.2f percent",eff)