summaryrefslogtreecommitdiff
path: root/1052/CH11/EX11.6/116.sce
blob: a3c78492f9d16361070c37fe533faea303d73469 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
clc;
//Example 11.6
//page no 118
printf("Example 11.6 page no 118\n\n");
clear;
//first and second viral coeff.
B=-0.159//m^3/kgmol
C=0.009//(m^3/kgmol)^2
V_new=0
V=0.820;
for i=1:3
    V_new=(1+(B)/V+(C)/(V^2))/1.22
    V=V_new
end
printf("\nVolume of gas V=%f L/gmol",V)