Function

[young engineer]

Function brixcor(Brix)
A = 0.006222
B = 0.00023725
C = -0.0000018165
D = 0.000000018906
E = 0.00002328
brixcor = A * Brix + B * Brix ^ 2 + C * Brix ^ 3 + D * Brix ^ 4 + E * Brix ^ 2
End Function

Function brixFG(brixcor, dil)
brixFG = brixcor + dil
End Function

Function bxcorr2(brixFG, SG)
bxcorr2 = brixFG * SG
End Function

Function SG(dil)
SG = 1 + [(dil ^ 2 + 200 * dil) / 54000]
End Function

Function Gdil(bxcorr2, fruc)
Gdil = bxcorr2 - fruc
End Function

Function fruc(bxcorr2, angle1)
A = 52.5
B = 143.8
C = 50
fruc = ((A * bxcorr2) / B) - ((C * angle1) / B)
End Function

Function Frucpurity(Brix, dil, angle1)
Frucpurity = (fruc(bxcorr2(brixFG(brixcor(Brix), dil), SG(dil)), angle1) / bxcorr2(brixFG(brixcor(Brix), dil), SG(dil))) * 100
End Function

Hi All
My final function (bold) is using all the preceding functions to calculate and run. The function is extremely long, I would like to knwo if there is an easier way to write my last function.