[m-rev.] diff: remove reverse modes of extras/complex_numbers arithmetic functions

Fergus Henderson fjh at cs.mu.OZ.AU
Sun Sep 23 16:22:33 AEST 2001


On 22-Sep-2001, Simon Taylor <stayl at cs.mu.OZ.AU> wrote:
> 
> +++ extras/complex_numbers//complex.m	2001/09/22 12:08:00
> @@ -1,5 +1,5 @@
>  %---------------------------------------------------------------------------%
> -% Copyright (C) 1997-1998 The University of Melbourne.
> +% Copyright (C) 1997-2001 The University of Melbourne.

That should be

% Copyright (C) 1997-1998,2001 The University of Melbourne.

Likewise for the other files here.

> +++ extras/complex_numbers//complex_float.m	2001/09/22 12:08:11
>  
> -pow(cmplx(Re0, Im0), P) = cmplx(Re, Im) :-
> -	cartesian_to_polar(Re0, Im0, L0, Th0),
> -	L = pow(L0, P),
> +pow(Z0, P) = Z :-
> +	complex_to_polar(Z0, L0, Th0),
> +	L = math__pow(L0, P),
>  	Th = Th0 * P,
> -	polar_to_cartesian(L, Th, Re, Im).
> +	Z = polar_to_complex(L, Th).

What was the motivation for that change?

-- 
Fergus Henderson <fjh at cs.mu.oz.au>  |  "I have always known that the pursuit
The University of Melbourne         |  of excellence is a lethal habit"
WWW: <http://www.cs.mu.oz.au/~fjh>  |     -- the last words of T. S. Garp.
--------------------------------------------------------------------------
mercury-reviews mailing list
post:  mercury-reviews at cs.mu.oz.au
administrative address: owner-mercury-reviews at cs.mu.oz.au
unsubscribe: Address: mercury-reviews-request at cs.mu.oz.au Message: unsubscribe
subscribe:   Address: mercury-reviews-request at cs.mu.oz.au Message: subscribe
--------------------------------------------------------------------------



More information about the reviews mailing list