blob: 1ac2f87457a929d4f1254bf34835a3bb9e5f3fbc (
plain)
1
2
3
4
5
6
7
8
|
//clc()
P = 101.3;//kPa
Per1 = 10;//%
Pa = P * Per1 / 100;// ( a - benzene )
Ps = Pa;//( saturation )
//lnPs = 13.8858 - 2788.51/(T - 52.36)
T = 2788.51 / ( 13.8858 - log(Ps)) + 52.36;
disp("K",T,"Temperature at which saturation occurs = ")
|
