1 files changed, 13 insertions, 0 deletions
diff --git a/167/CH8/EX8.4/ex4.sce b/167/CH8/EX8.4/ex4.sce
new file mode 100755
index 000000000..f2442f24f
--- /dev/null
+++ b/167/CH8/EX8.4/ex4.sce
@@ -0,0 +1,13 @@
+//example 4
+//irreversibility during cooling of an iron block
+clear
+clc
+m=500 //mass of iron block in kg
+cavg=0.45 //kJ/kg-K
+T1=473 //Initial Temp. in K
+T2=300 //Final Temp. in K
+Wrev=m*cavg*((T1-T2)-T2*log(T1/T2)) //reversible work in kJ
+Wu=0
+I=Wrev-Wu //irreversibility of the process in kJ
+printf("\n Hence, the reversible owrk for the pressure ois = %.0f kJ. \n",Wrev);
+printf("\n and irreversibility of the process is = %.0f kJ. \n",I);
+\ No newline at end of file