summaryrefslogtreecommitdiff
path: root/551/CH5/EX5.21/21.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /551/CH5/EX5.21/21.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '551/CH5/EX5.21/21.sce')
-rwxr-xr-x551/CH5/EX5.21/21.sce20
1 files changed, 20 insertions, 0 deletions
diff --git a/551/CH5/EX5.21/21.sce b/551/CH5/EX5.21/21.sce
new file mode 100755
index 000000000..5f7e6bcd9
--- /dev/null
+++ b/551/CH5/EX5.21/21.sce
@@ -0,0 +1,20 @@
+clc
+T0=273; //K
+T1=673; //K
+T2=298; //K
+m_w=10; //kg
+T3=323; //K
+c_pw=4186; //kJ/kg.K
+disp("Let C=mi*cpi")
+C=m_w*c_pw*(T3-T2)/(T1-T3);
+
+S_iT1=C*log(T1/T0); // Entropy of iron at 673 K
+S_wT2=m_w*c_pw*log(T2/T0); //Entropy of water at 298 K
+S_iT3=C*log(T3/T0); //Entropy of iron at 323 K
+S_wT3=m_w*c_pw*log(T3/T0); //Entropy of water at 323 K
+
+dS_i=S_iT3 - S_iT1;
+dS_w=S_wT3 - S_wT2;
+dS_net=dS_i + dS_w
+
+disp("Since dS>0, process is irreversible") \ No newline at end of file