// problem 7.15
Q=20.2
i=1/2500
C=60
n=1/(tand(60))
a=(3^0.5)
d=((Q*(2^0.5))/(C*a*(i^0.5)))^0.4
b=2*d/(a)
disp(d,b,"dimension of the cross section in m")