Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

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

Search the Archive

Re: Constraint visualization

  • To: mathgroup at smc.vnet.net
  • Subject: [mg85793] Re: Constraint visualization
  • From: stelmakris at gmail.com
  • Date: Fri, 22 Feb 2008 07:22:28 -0500 (EST)
  • References: <fpkvmq$hpm$1@smc.vnet.net>

On Feb 22, 12:58 am, NeilJ <neil... at gmail.com> wrote:
> Hallo,
>
> I am brand new to Mathematica. I have acquired the program to assist
> me in constraints/solution space visualization but the results I got
> from my fiddling the past two weeks have been fairly disappointing. (I
> must admit that I've elarnt a lot of wonderful new things but I am
> still unable to carry out my initial objective.)
>
> If I can find out how to color all the faces/edges of the following
> regionplot it will help me a lot.
>
> RegionPlot3D[
>  Or[And[And[And[Fm <= 120/(8 - y), 8 - y >= 0],
>     Or[And[Fm <= 69.6/(2.4 + 2 x), x >= 0],
>      And[Fm <= 69.6/(2.4 - 2 x), x <= 0]]],
>    And[Or[And[Fm <= 69.6/(2.4 + 2 x), x >= 0],
>      And[Fm <= 69.6/(2.4 - 2 x), x <= 0]], And[Fm <= 112/y, y =
> 0]]],
>   And[And[Fm <= 120/(8 - y), y < 0],
>    Or[And[Fm <= 69.6/(2.4 + 2 x), x >= 0],
>     And[Fm <= 69.6/(2.4 - 2 x), x <= 0]]],
>   And[And[Fm <= 112/y, y > 8],
>    Or[And[Fm <= 69.6/(2.4 + 2 x), x >= 0],
>     And[Fm <= 69.6/(2.4 - 2 x), x <= 0]]]], {x, -2.6, 2.6}, {y, -3,
>   9.6}, {Fm, 0, 30}]
>
> Neil Jacobs

It appears to be a simple body enclosed by the surfaces:
Fm=0
x=-2.6
x=2.6
y=-3
y=9.6
Fm = 69.6/(2.4 + 2 x)
Fm = 69.6/(2.4 - 2 x)
Fm = 112/y
Fm=120/(8-y)

Is that correct ?

Stellios



  • Prev by Date: Re: Re: Extracting the value from Solve
  • Next by Date: Re: squared norm in Mathematica
  • Previous by thread: Constraint visualization
  • Next by thread: Re: Constraint visualization