Running many functions

[young engineer]

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 know if there is an easier way to write my last function. <!-- / message -->


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

 

[RoryA]

Not if you want it on one line, no. You could break up each of the intermediate steps by storing the results of each function in variables and then use those in the final function, which would probably be easier to read.

 

[young engineer]

How would i go about doing that. Could you give me an example please

 

[Norie]

Why do you have 6 different functions that are just doing basic calculations?

If you want too split the final function perhaps this will give you a start.

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