[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