Function to devise an equivelent n-alkane pseudo-component for a given molecular weight

[Graphics:Images/index_gr_1.gif]
[Graphics:Images/index_gr_2.gif]

Last Run on:

[Graphics:Images/index_gr_3.gif]
[Graphics:Images/index_gr_4.gif]

Derivation

1:  identify the average molecular weight of a plus fraction

[Graphics:Images/index_gr_5.gif]
[Graphics:Images/index_gr_6.gif]

Try C20+.  

The dot product is the average

[Graphics:Images/index_gr_7.gif]
[Graphics:Images/index_gr_8.gif]

Find the nearest n-alkane

[Graphics:Images/index_gr_9.gif]
[Graphics:Images/index_gr_10.gif]
[Graphics:Images/index_gr_11.gif]
[Graphics:Images/index_gr_12.gif]
[Graphics:Images/index_gr_13.gif]
[Graphics:Images/index_gr_14.gif]
[Graphics:Images/index_gr_15.gif]
[Graphics:Images/index_gr_16.gif]
[Graphics:Images/index_gr_17.gif]
[Graphics:Images/index_gr_18.gif]
[Graphics:Images/index_gr_19.gif]
[Graphics:Images/index_gr_20.gif]
Now create a function that produces the appropriate options for Drawdown
[Graphics:Images/index_gr_21.gif]
[Graphics:Images/index_gr_22.gif]
[Graphics:Images/index_gr_23.gif]
[Graphics:Images/index_gr_24.gif]
[Graphics:Images/index_gr_25.gif]
[Graphics:Images/index_gr_26.gif]
[Graphics:Images/index_gr_27.gif]
[Graphics:Images/index_gr_28.gif]


Converted by Mathematica      May 6, 2002