1 files changed, 19 insertions, 0 deletions
diff --git a/2165/CH1/EX1.22/1_22.sce b/2165/CH1/EX1.22/1_22.sce
new file mode 100755
index 000000000..6d8c4999a
--- /dev/null
+++ b/2165/CH1/EX1.22/1_22.sce
@@ -0,0 +1,19 @@
+clc
+//initialisation of variables
+v=10//ft^3
+T=20//Degree C
+p=15//lb in^2
+p1=200//lb//in^2
+gama=1.41 //lb
+Cv=0.169//lb
+v2=1.153//ft^3
+j=1400//lb
+T1=293//F
+T2=451//F
+T1=[(p1*v2)/(p*v)]*T1//Degree C
+//CALCULATIONS
+R=Cv*j*(gama-1)
+W=0.816//lb
+Fhi=Cv*[(gama-1.2)/(1.2-1)]*log(T1/T2)*W//rnak
+//RESULTS
+printf('The change of entropy=% f rank',Fhi)