summaryrefslogtreecommitdiff
path: root/3821/CH10/EX10.1/Example10_1.sce
blob: 0ed5768dce2642858c57de57b48fe64f62eb3ad3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
/////Chapter 10 Properties Of Steam
////Example 10.1 Page No:183
///Find Dryness fuction of steam
///Input data
clc;
clear;
mw=15;      //Water steam
ms=185;     //Dry steam

///Calculation
x=((ms)/(ms+mw))*100; //Dryness fuction of steam in %

///Output
printf('Dryness fuction of steam= %f percent \n',x);