Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2004
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2004

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

Search the Archive

Re: Simple expression won't simplify

  • To: mathgroup at smc.vnet.net
  • Subject: [mg48976] Re: Simple expression won't simplify
  • From: Jens-Peer Kuska <kuska at informatik.uni-leipzig.de>
  • Date: Fri, 25 Jun 2004 17:52:18 -0400 (EDT)
  • Organization: Universitaet Leipzig
  • References: <cbgjg5$cfg$1@smc.vnet.net>
  • Reply-to: kuska at informatik.uni-leipzig.de
  • Sender: owner-wri-mathgroup at wolfram.com

Hi,

Sqrt[m^2/(m^2 + t^2*\[Alpha]^2*\[HBar]^2)]*
   (Sqrt[\[Alpha]]/Sqrt[(m^2*\[Alpha])/(m^2 + t^2*\[Alpha]^2*
        \[HBar]^2)]) /. Sqrt[a_]*Sqrt[b_] :> Sqrt[a*b]

Regards
  Jens

Peter Jay Salzman wrote:
> 
> I have a sperically symmetric wavefunction Bra[r_,t_] and its complex
> conjugate Ket[r_,t_].  They're complex, but not overly complicated.
> Basically a time dependent Gaussian.
> 
> When I do (parsed for readability):
> 
> 4 Pi Integrate
>    [
>    r^2 Bra[r,t] Ket[r,t], {r, 0, Infinity},
>    Assumptions -> { Re[m^2*\[Alpha]/(m^2 + t^2*\[Alpha]^2*\[HBar]^2)] > 0 }
>    ] // FullSimplify
> 
> I get:
> 
>                            m^2
>    sqrt{ a } sqrt{ ------------------- }
>                     m^2 + t^2 a^2 h^2
> 
>    ---------------------------------------
>                 m^2   a
>       sqrt{ ------------------- }
>              m^2 + t^2 a^2 h^2
> 
> How do I coax Mathematica to admit this expression is 1?
> 
> Thanks!
> Pete


  • Prev by Date: Re: Simple expression won't simplify
  • Next by Date: Re: Simplifying with assumptions
  • Previous by thread: Re: Simple expression won't simplify
  • Next by thread: Re: Simple expression won't simplify