summaryrefslogtreecommitdiff
path: root/2165/CH6/EX6.1/6_1.sce
blob: 2fdc931b6b6a6d5cb3be391520822d77a9d8fbf4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
clc
//initialisation of variables
p1=150//lb/in^2
p2=10//lb/in^2
n=10//percent
T=183.6+479.4//C.H.U
x2=0.852//C.H.U
H=553.9//C.H.U/lb
h1=T-H//C.H.U/lb
//CALCULATIONS
V=sqrt(2*32.2*1400*h1)//ft/sec
V1=sqrt(2*32.2*1400*0.9*h1)//ft/sec
//RESULTS
printf('the neglecting friction=% f ft/sec',V)
printf('the frictional drop in the nozzle is 10 recent of the total heat drop=% f ft/sec',V1)