blob: b0666eaa2ac206111097fb2a81e1fc40d9413cf9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
clear;
clc;
// Example: 5.15
// Page: 169
printf("Example: 5.15 - Page: 169\n\n");
// Solution
//*****Data*****//
m1 = 5;// [kg]
m2 = 20;// [kg]
C = 4.2;// [kJ/kg K]
T1 = 350;// [K]
T2 = 250;// [K]
//**************//
// Suppose the final temperature is T
deff('[y] = f(T)','y = m1*C*(T1 - T) - m2*C*(T - T2)');
T = fsolve(7,f);// [K]
// Change in entropy of Hot Water:
deltaS1 = m1*C*integrate('(1/T)','T',T1,T);// [kJ/K]
// Change in Entopy of Hot Water:
deltaS2 = m2*C*integrate('(1/T)','T',T2,T);// [kJ/K]
deltaS = deltaS1 + deltaS2;// [kJ/K]
printf("Change in Entropy is %.3f kJ/K",deltaS);
|
