blob: 9e444b2bdb5c1c2c1c8435560a37fc7783c4bd61 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
clc;clear;
//Example 3.3
// constants used
Hfg=2257.5;//enthalpy of vaporization in kJ/kg
//given values
m=200/1000;//converting in kg
P=100;
//Values from Table A-5
vg=1.6941;
vf=0.001043;//specific vol of sat liq and vapor
//caluclation
vfg=vg-vf;
V=m*vfg;
disp(V,'the volume change in m^3');
E=m*Hfg;
disp(E,'amount of energy transferred to the water in kJ')
|
