> It is possible to collect in a list L,
> all the arguments of sin or cos by scanning the expression.
> Then ... for x in L do ratsubst.....
>
> >RJF
The gatherargs() function defined in share/contrib/opsubst.lisp may be
useful here.
For example, I used it to simplify Bessel function in besFsimp() from
share/contrib/diffequations/contrib_ode.mac
David
NOTICE
This e-mail and any attachments are private and confidential and may contain privileged information. If you are not an authorised recipient, the copying or distribution of this e-mail and any attachments is prohibited and you must not read, print or act in reliance on this e-mail or attachments.
This notice should not be removed.