1 files changed, 22 insertions, 21 deletions
diff --git a/1472/CH21/EX21.3/21_3.sce b/1472/CH21/EX21.3/21_3.sce
index 0cdb4760a..6e12126cb 100755
--- a/1472/CH21/EX21.3/21_3.sce
+++ b/1472/CH21/EX21.3/21_3.sce
@@ -1,21 +1,22 @@
-clc
-//initialization of varaibles
-R=53.34
-T1=540 //R
-n=1.4
-g=n
-n2=1.3
-P2=90 //psia
-P1=15 //psia
-cv=0.171
-eta=0.95
-//calculations
-pv=R*T1
-Wk=n*R*T1*((P2/P1)^((g-1)/g) -1) /(n-1)
-Wn=n2*R*T1*((P2/P1)^((n2-1)/n2) -1) /(n2-1)
-Wt=R*T1*log(P2/P1)
-Wx=-Wk/eta
-dh=cp*T1*(1.52 - 1)
-Q=dh+Wx/778
-//results
-printf("Heat transferred = %.1f B/lb",Q)
+clc
+//initialization of variables
+R=53.34
+T1=540 //R
+n=1.4
+g=n
+n2=1.3
+P2=90 //psia
+P1=15 //psia
+cv=0.171
+cp=0.24;
+eta=0.95
+//calculations
+pv=R*T1
+Wk=n*R*T1*((P2/P1)^((g-1)/g) -1) /(n-1)
+Wn=n2*R*T1*((P2/P1)^((n2-1)/n2) -1) /(n2-1)
+Wt=R*T1*log(P2/P1)
+Wx=-Wk/eta
+dh=cp*T1*(1.52 - 1)
+Q=dh+Wx/778
+//results
+printf("Heat transferred = %.1f B/lb",Q)
+\ No newline at end of file