MathGroup Archive 2005

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: Simplifying Jacobian elliptic functions


> > Unprotect[Plus]
> > JacobiDN[p_, k_]^2 + k_ JacobiSN[p_, k_]^2 := 1
> > Protect[Plus]
> > 
> 
> Thanks for the tip. Why does your suggestion work,
> but
> 
> Unprotect[Minus];
> 1 -  JacobiSN[p_, m_]^2 := JacobiCN[p, m]^2;
> Protect[Minus];
> 
> doesn't??

OK. Sorry. Having read some help files, I can see that

Unprotect[Plus];
JacobiDN[p_, k_]^2 + k_ JacobiSN[p_, k_]^2 := 1
1 + Minus[ JacobiSN[p_, m_]^2] := JacobiCN[p, m]^2;
Protect[Plus];

Does the trick.

John


  • Prev by Date: Re: multiple 3d plots
  • Next by Date: Solving partial moment with unknowns in boundaries
  • Previous by thread: Re: Simplifying Jacobian elliptic functions
  • Next by thread: Re: Simplifying Jacobian elliptic functions