On Tue, 20 Jul 2004 21:28:14 +0100, Andrew C on Mozilla <voi### [at] devnull>  
wrote:
> #declare Fn1 =
> {
>    ( (sin(x) * cos(y) * tan(z))*sqrt(x*y / z) - exp(log(x)*y - z) ) *  
> (tan(sin(x) * cos(y) * tan(z) + sqrt(x*y / z)) - log(exp(log(x)*y - z)) )
> }
>
> Notice how A, B and C have to be calculated *TWICE*...
>
> Is there any way round this??


Something like this:


#declare Fn1_Aux =
function ( A, B, C ) {
	(A*B - C)*(tan(A+B)-log(C))
}


#declare Fn1 =
function {
	Fn_1_Aux( sin(x)*cos(y)*tan(z), sqrt(x*y / z), exp(log(x)*y - z) )
}



-- 
FE

Post a reply to this message