diff options
Diffstat (limited to '2870/CH8/EX8.10/Ex8_10.sce')
| -rwxr-xr-x | 2870/CH8/EX8.10/Ex8_10.sce | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/2870/CH8/EX8.10/Ex8_10.sce b/2870/CH8/EX8.10/Ex8_10.sce new file mode 100755 index 000000000..688046f2d --- /dev/null +++ b/2870/CH8/EX8.10/Ex8_10.sce @@ -0,0 +1,18 @@ +clc;clear;
+//Example 8.10
+
+//given values
+Q=1035;
+T0=273;
+Tin=293;
+Tout=278;
+T1=300;
+
+//calculations
+//Xin - Xout - Xdestroyed = dX/dt
+Xdestroyed=Q*(1-T0/Tin)-Q*(1-T0/Tout);
+Xdestroyed=round(Xdestroyed);
+disp(Xdestroyed,'the rate of exergy destroyed in W');
+//the total rate of exergy destroyed
+Xdestroyed=Q*(1-T0/T1)-Q*(1-T0/T0);
+disp(Xdestroyed,'the otal total of exergy destroyed in W');
|