summaryrefslogtreecommitdiff
path: root/3821/CH10/EX10.19/Example10_19.sce
blob: 2fb5cc318b384effeed81f7dec7981fbeee33fc7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
/////////Chapter 10 Properties Of Steam
///Example 10.19 Page No:198
///Find Quality of steam
///Input data
clc;
clear;
m=2;        //steam of vessel in Kg
V=0.1598;   //volume of vessel in M**3
P=25;       //Absolute pressure of vessel in bar

//Calculation
v=V/m;      //Quality of steam in m**3/Kg

//Output
printf('Quality of steam %f m^3/Kg \n' ,v);