3825/CH10/EX10.14/Ex10_14.sce


1
2
3
4
5
6
7
8
9
10

clc
TDB=49
phi1=0.2
w1=0.0147
w2=0.023
ma1=1
mw=ma1*(w2-w1)
mprintf("mw=%fkg/s\n",mw)
mprintf("Water required to operate coler for 5 hours=%fkg",mw*5*3600)