summaryrefslogtreecommitdiff
path: root/2165/CH1/EX1.23/1_23.sce
blob: 37d32db845a9241a3dccd74f79a3e0fc64ab1e4d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

clc
//initialisation of variables
p=1//lb
T=200//Degree C
p1=15//lb/in^2
v1=4//ft^3
gama=1.41//lb
Cv=0.169//lb
J=1400//lb
n=1.2
T=473//F
v2=16.1//ft^3
T1=473//F
//CALCULATIONS
T2=(p1*v2)/(p*v1)*T1//Degree C
R=Cv*J*(gama-p)//lb/in^2
Fhi=0.1772*log(1.317)//rank
//RESULTS
printf('the change of entropy from intial conditions=% f rank',Fhi)