[Maxima] How to declare the inverse to a function

[Stavros Macrakis]

------=_Part_3382_22468389.1136995609533
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: quoted-printable
Content-Disposition: inline

OK, here is how you declare conjugate to be the inverse of conjugate for
Solve internally.

I do not guarantee that it will work correctly in general.  It does work in
the case of solve(conjugate(x)=3D%i), but I have not studied the code, and =
it
is possible that various things could go wrong (infinite loops, etc.).

load(conjugate)$             /* load the standard conjugate definitions */

:lisp (putprop '$conjugate '$conjugate '$inverse)

------=_Part_3382_22468389.1136995609533
Content-Type: text/html; charset=ISO-8859-1
Content-Transfer-Encoding: quoted-printable
Content-Disposition: inline

OK, here is how you declare conjugate to be the inverse of conjugate for So=
lve internally.<br><br>I do not guarantee that it will work correctly in ge=
neral.&nbsp; It does work in the case of solve(conjugate(x)=3D%i), but I ha=
ve not studied the code, and it is possible that various things could go wr=
ong (infinite loops, etc.).
<br><br>load(conjugate)$ &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&n=
bsp;&nbsp;&nbsp; /* load the standard conjugate definitions */<br><br>:lisp=
 (putprop '$conjugate '$conjugate '$inverse)<br><br>

------=_Part_3382_22468389.1136995609533--