Re: Choosing preferred functions for Trig Simplification?
- To: mathgroup at smc.vnet.net
- Subject: [mg83210] Re: Choosing preferred functions for Trig Simplification?
- From: Steven Siew <siewsk at bp.com>
- Date: Thu, 15 Nov 2007 05:34:51 -0500 (EST)
- References: <fhegov$m8b$1@smc.vnet.net>
I do not have anything that does exactly what you wanted. But I have a
simple substitution function
CosToSec[x_]:=Module[{s},
s={Power[Sin[A_],Times[-1,B_]]\[RuleDelayed]Power[Csc[A],B],
Power[Csc[A_],Times[-1,B_]]\[RuleDelayed]Power[Sin[A],B],
Power[Cos[A_],Times[-1,B_]]\[RuleDelayed]Power[Sec[A],B],
Power[Sec[A_],Times[-1,B_]]\[RuleDelayed]Power[Cos[A],B],
Power[Tan[A_],Times[-1,B_]]\[RuleDelayed]Power[Cot[A],B],
Power[Cot[A_],Times[-1,B_]]\[RuleDelayed]Power[Tan[A],B],
Power[Sinh[A_],Times[-1,B_]]\[RuleDelayed]Power[Csch[A],B],
Power[Csch[A_],Times[-1,B_]]\[RuleDelayed]Power[Sinh[A],B],
Power[Cosh[A_],Times[-1,B_]]\[RuleDelayed]Power[Sech[A],B],
Power[Sech[A_],Times[-1,B_]]\[RuleDelayed]Power[Cosh[A],B],
Power[Tanh[A_],Times[-1,B_]]\[RuleDelayed]Power[Coth[A],B],
Power[Coth[A_],Times[-1,B_]]\[RuleDelayed]Power[Tanh[A],B]
};
x /. s
];
You can take the above code and modify it to fit your own
requirements.
Steven Siew
On Nov 14, 8:56 pm, AES <sieg... at stanford.edu> wrote:
> In Simplifying expressions containing multiple Trig functions, I'd like
> to persuade Mathematica to limit its vocabulary to Sin, Cos and Tan,
> and avoid Sec, Csc and Cot (while continuing to put expressions into the
> simplest Together form, and so on).
>
> Are there simple tricks or Assumptions or options to do this?
>
> [I appreciate that Simplification is a can of worms.]
>
> Thanks . . .