summaryrefslogtreecommitdiff
path: root/1388/CH3/EX3.12/3_12.sce
blob: 16515e5521c7bd987a9db74ed0f6563e4e4020b1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clc
//initialisation of variables
P= 100 //atm
P1= 1 //atm
R= 1.99 //cal/mol^-1 K^-1
k= 0.3 //atm^-1
E= 1600 //cal
T= -183 //C
T1= 0 //C
//CALCULATIONS
X= (k*3.5*R*(P-P1))/(3.5*R*(T1-T)+E)
//RESULTS
printf (' fraction of liquid = %.3f  ',X)