cubic - beta=(omega*Pr)/(Tr)

Info iconThis preview shows page 1. Sign up to view the full content.

View Full Document Right Arrow Icon
function cubic(Tr,Pr,sigma,epsilon,omega,psi,z,R,P,T) sigma=1; epsilon=0; omega=.0664; psi=.42478; aTr=Tr^(-.5) q=(psi*aTr)/(omega*Tr)
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: beta=(omega*Pr)/(Tr) Z=1+beta-q*beta*((z-beta)/((z+(epsilon*beta))*(z+(sigma*beta)))) V=(Z*R*T)/P V end...
View Full Document

Ask a homework question - tutors are online