summaryrefslogtreecommitdiff
path: root/3821/CH10/EX10.17/Example10_17.sce
blob: 4aebc492280b016ac5440955369f1e8df4446d9f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
///Chapter 10 Properties Of Steam
///Example 10.17 Page No:198
///Find Volume of steam dryness fraction
//Input data
clc;
clear;
P=7;                  //Absolute pressure in bar
v=0.2;                //Specific volume in m^3/Kg
//from steam table (pressure basis at 7 bar) 
ts=165;               //In degree celsius
vf=0.001108;          //In m^3/Kg
vg=0.2727;            //In m^3/Kg

//Calculation
x=v/vg;               //Volume of steam dryness fraction

//Output
printf('Volume of steam dryness fraction= %f \n',x);