summaryrefslogtreecommitdiff
path: root/3718/CH13/EX13.6/Ex13_6.sce
blob: 4ad9922fd19ec78757d567aa5313147fa0a68d05 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
//Chapter 13: Fuel and Combustions
//Problem: 6
clc;

//Declaration of Variables
w1 = 2.5          // g
w2 = 2.415        // g
r = 1.528         // g
ma = 0.245        // Mass of ash, g

// Solution
m = w1 - w2       // Mass of moisture in coal
mv = w2 - r       // Mass of volatile matter

moip = m * 100 / w1
vp = mv * 100 / w1
ap = ma * 100 / w1
cp = 100 - (moip + vp + ap)

mprintf("Percentage of moisture:%.1f percentage\n", moip)
mprintf(" Percentage of volatile matter:%.2f percentage\n", vp)
mprintf(" Percentage of ash:%.1f percentage\n", ap)
mprintf(" Percentage of fixed carbon:%.2f percentage", cp)