PR - q=(psi*aTr)/(omega*Tr) beta=(omega*Pr)/(Tr)

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

View Full Document Right Arrow Icon
function PR(Tr,Pr,z,R,P,T) sigma=1+(2^.5) epsilon=1+(2^(-.5)) omega=.07780; psi=.45724; p aTr=(1+(.37464+(1.54226*omega)-(.26992*omega^2))*(1-(Tr^-.5)))^2
Background image of page 1
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: q=(psi*aTr)/(omega*Tr) 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