summaryrefslogtreecommitdiff
path: root/2870/CH7/EX7.21/Ex7_21.sce
blob: d77693dd379fe2eae0a16b81e0e233d0114f4dcc (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clc;clear;
//Example 7.21

//given data
T=100+273;//in K
Q=-600;
Tb=25+273;//in K

//calculation
dSsys=Q/T;
disp(dSsys,'entropy change of water in kJ/K');
// Sin - sout + Sgen = dSsystem
Sgen= -Q/Tb + dSsys;
disp(Sgen,'total entropy generation in kJ/K')