MathGroup Archive 2001

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

Search the Archive

Simplify with If and UnitStep

  • To: mathgroup at smc.vnet.net
  • Subject: [mg31286] Simplify with If and UnitStep
  • From: gg at hugo.doemaarwat.nl (Hugo Buddelmeijer)
  • Date: Fri, 26 Oct 2001 04:28:37 -0400 (EDT)
  • Sender: owner-wri-mathgroup at wolfram.com

I finally understand how I can create a 'piecewise' function with
mathematica with UnitStep, but somewhere further in my calculations it
doesn't Simplify it at all.
This is what I've got as a result now (I removed the ugly pieces
already):

If[ 1/(32*t^0.3) > 1 && t^(-0.3) > 32,
 62000*UnitStep[-0.1 + 32]*UnitStep[-0.1 + 1/t^0.3], 
 Integrate[M^2.55*UnitStep[M - 0.1, -M + 32], 
  {M, 0.1, 1/t^0.3}]]

There are a couple of annoying things here that I can't solve...

1) On the first line there are 2 conditions which are exactly the same
only the 32 is on the other site of the >, how can I turn this into
just 1 condition? (preferable the latter)

2) On the second line there is a UnitStep[-0.1+32] which is certainly
1. The second UnitStep is also 1 because the last part there is always
larger then 32, that's what the If statement implies. How can I get
these UnitStep's to be 1?

3) On the 3th and 4th line it Integrate's over M in between 0.1 and a
number lower then 32 (as the If statement implies), so the last
UnitStep should also be 1.


So what I want to see is actualy

If[t^(-0.3) > 32, 62000, -0.00007939 + 0.281/t^1.065]

Which looks way nicer then the upper statement, but essentially the
same. (I rounded the numbers somewhat, but you get the idea.)

If anyone can give me a hint about what I should do I will be very
gratefull :-)

Groetjes,
Hugo


  • Prev by Date: Re: FullGraphics with Graphics3D
  • Next by Date: Re: Function Coloring with ParametricPlot3D
  • Previous by thread: Re: SplineFit - Parametrization ?
  • Next by thread: Re: Simplify with If and UnitStep