1 files changed, 15 insertions, 0 deletions
diff --git a/2417/CH6/EX6.22/Ex6_22.sce b/2417/CH6/EX6.22/Ex6_22.sce
new file mode 100755
index 000000000..22a74043e
--- /dev/null
+++ b/2417/CH6/EX6.22/Ex6_22.sce
@@ -0,0 +1,15 @@
+clear;
+clc;
+printf("\t\t\tProblem Number 6.22\n\n\n");
+// Chapter 6: The Ideal Gas
+// Problem 6.22 (page no. 264) 
+// Solution
+
+//data
+deltas=0.0743; //change in entropy //Unit:Btu/lbm*R
+T1=460+100; //Fahrenheit temperature converted to absolute initial temperature
+cv=0.219; //specific heat at constant volume //Btu/lbm*R
+//Now,
+//deltas=cv*log(T2/T1); 
+T2=T1*exp(deltas/cv); //higher temperature //absolute temperature  //unit:R
+printf("The higher temperature is %f R\n",T2)