summaryrefslogtreecommitdiff
path: root/3825/CH8/EX8.3/Ex8_3.sce
blob: 100957904ed2a9d59b490c435ef0e4d2da7cb648 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clc
hi=2947.95
si=7.0248
se=si
sg=7.3598
sf=1.3027
Xe=(se-sf)/(sg-sf)
mprintf("Xe=%g\n",Xe)//ans vary due to roundoff error
hg=2675.4
hf=417.54
he=(Xe*hg)+(1-Xe)*hf
mprintf("he=%fkJ/kg\n",he)//ans vary due to roundoff error
W=hi-he
mprintf("W=%fkJ/s",W)//ans vary due to roundoff error