diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /551/CH6/EX6.18 | |
download | Scilab-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/CH6/EX6.18')
-rwxr-xr-x | 551/CH6/EX6.18/18.sce | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/551/CH6/EX6.18/18.sce b/551/CH6/EX6.18/18.sce new file mode 100755 index 000000000..ab6588cc9 --- /dev/null +++ b/551/CH6/EX6.18/18.sce @@ -0,0 +1,30 @@ +clc
+m=1; //kg
+p1=7*10^5; //Pa
+T1=873; //K
+p2=1*10^5; //Pa
+T2=523; //K
+T0=288; //K
+Q=-9; //kJ/kg
+cp=1.005; //kJ/kg K
+R=0.287; //kJ/kg K
+disp("(i) The decrease in availability ")
+dA=cp*(T1-T2) - T0*(R*log(p2/p1) - cp*log(T2/T1));
+disp("dA=")
+disp(dA)
+disp("kJ/kg")
+
+
+disp("(ii) The maximum work")
+Wmax=dA; //change in availability
+disp("Wmax")
+disp(Wmax)
+disp("kJ/kg")
+
+
+disp("The irreversibility")
+W=cp*(T1-T2) + Q;
+I=Wmax - W;
+disp("Irreversibility =")
+disp(I)
+disp("kJ/kg")
|