summaryrefslogtreecommitdiff
path: root/944/CH5/EX5.27/example5_27_TACC.sce
blob: eaaa9e10f4fd36997ed52d3af0dafbfe02fa974e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
//example 5.27

clear;
clc;

//Given:
P1=101.3;//Initial Pressure[KPa]
P2=60;//Final Pressure[KPa]
He=31.8;//Enthalpy of vaporization[KJ/mol]
R=8.314;//Universal gas constant[J/K/mol]
T1=353.2;//boiling point of benzene at 101.3KPa[K]

//To find the boiling point of b/enzene at 60KPa
x=(T1^-1)-(R*0.001*log(P2/P1)/He);
T2=x^-1;//Boiling point of benzene at 60KPa
printf("The boiling point of benzene at 60KPa is %f K",T2);