فرمول نويسي در بسكام

[870949623]

سلام
ايا كسي مي تونه روابط زير را برايم تو بسكام بنويسه
f0=5.92714-6.09648/(Tr)-1.28862*log(Tr)+0.16934*(Tr)^6
f1=15.2518-15.6875/(Tr)-13.4721*log(Tr)+0.43577*(Tr)^6
P=Pc*exp(f0+w*f (
Tr=T/Tc

[rdscience]

دوست عزيز سلام
نميدونم راه ساده تري هست يا نه ولي انشاالله با اين كارت راه ميفته

کد:

Tr=T/Tc

5.92714-6.09648=-0.16934
15.2518-15.6875=-0.4357

f0=-0.16934/Tr
a=tr^6
a=a*0.43577
b=log(tr)
b=b*13.4721
f0=f0-b
f0=f0+a

f1=-0.4357/Tr
a=tr^6
a=a*0.16934
b=log(tr)
b=b*1.28862
f1=f0-b
f1=f0+a

a=w*f
a=a+f0
a=Exp(a)
P=Pc*a

متغير ها از نوع سينگل مي باشند

نميدونم فرمولها را درست خوندم يا نه ، اميدوارم كه درست باشه
موفق تر از قبل باشيد