summaryrefslogtreecommitdiff
path: root/23/CH12/EX12.9/Example_12_9.sce
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