blob: a52c5312540572a991aca9c583f473f7fb989128 (
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
28
|
clear;
clc;
//To find Approx Value
function[A]=approx(V,n)
A=round(V*10^n)/10^n;//V-Value n-To what place
funcprot(0)
endfunction
//Example 12.9
//Caption : Program to Calculate the Heat Transformed per Kg of Solution formed
T=294.15;//[K]
m_NaOH_soln=1;//[kg]
m_NaOH_solid=0.45*m_NaOH_soln;//[Kg]
m_H2O=0.55*m_NaOH_soln;//[Kg]
//From Steam Tables
H_NaOH_soln=216;//[kJ/Kg]
H_NaOH_solid=1113;//[kJ/Kg]
H_H2O=88;//[kJ/Kg]
dH=m_NaOH_soln*H_NaOH_soln-(m_NaOH_solid*H_NaOH_solid)-(m_H2O*H_H2O);
Q=dH;
disp('kW or kJ/kg',Q,'Heat Transferred per Kg of NaOH Soln')
//End
|