MathGroup Archive 2008

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

Search the Archive

Re: FullSimplify interpretation

  • To: mathgroup at smc.vnet.net
  • Subject: [mg86511] Re: [mg86467] FullSimplify interpretation
  • From: Bob Hanlon <hanlonr at cox.net>
  • Date: Wed, 12 Mar 2008 05:37:22 -0500 (EST)
  • Reply-to: hanlonr at cox.net

Convert the output to InputForm and you will see that the output is a list of Piecewise functions. Look up Piecewise in the Help browser.


Bob Hanlon

---- Brian Beckage <Brian.Beckage at uvm.edu> wrote: 
> Hi all,
> 
> Can anyone provide some guidance on how to interpret the result of  
> FullSimplify[ ] given in the Cell Expression copied below?  I'm  
> specifically wondering how to interpret the conditional nature of the  
> result.
> 
> Thanks for your help!
> 
> Best wishes,
> Brian
> 
> 
> 
> Cell[CellGroupData[{Cell[BoxData[
>   RowBox[{" ",
>    RowBox[{"d1EIGwP", "=",
>     RowBox[{"FullSimplify", "[",
>      RowBox[{
>       RowBox[{
>        RowBox[{"d1EIG", "[",
>         RowBox[{"[", "3", "]"}], "]"}], "/.", "parmListND1"}], ",",
>       RowBox[{
>        RowBox[{"c", ">", "0"}], " ", "&&",
>        RowBox[{"c", "\[Element]", "Reals"}], "&&",
>        RowBox[{
>         SubscriptBox["M", "g"], ">", "0"}], " ", "&&",
>        RowBox[{
>         SubscriptBox["M", "g"], "\[Element]", "Reals"}], "&&",
>        RowBox[{
>         SubscriptBox["r", "g"], ">", "0"}], "&&",
>        RowBox[{
>         SubscriptBox["r", "g"], "\[Element]", "Reals"}], "&&",
>        RowBox[{
>         SubscriptBox["M", "p"], ">", "0"}], "&&",
>        RowBox[{
>         SubscriptBox["M", "p"], "\[Element]", "Reals"}], "&&",
>        RowBox[{
>         SubscriptBox["r", "p"], ">", "0"}], "&&",
>        RowBox[{
>         SubscriptBox["r", "p"], "\[Element]", "Reals"}]}]}], "]"}],
>     " "}]}]], "Input",
>   CellChangeTimes->{{3.413589871370825*^9, 3.413589953706039*^9},
>     3.413589997339566*^9, {3.4135900344682426`*^9,
>     3.413590190426937*^9}, {3.414235731209591*^9,
>     3.414235759758086*^9}, {3.414236913610442*^9,
>     3.4142369526933117`*^9}, {3.4142398465364103`*^9,
>     3.4142398469656754`*^9}}],
> 
> Cell[BoxData[
>   RowBox[{"{",
>    RowBox[{
>     RowBox[{"\[Piecewise]", GridBox[{
>        {
>         RowBox[{"-", "1"}],
>         RowBox[{
>          RowBox[{
>           RowBox[{"c", " ",
>            SubscriptBox["M", "g"], " ",
>            RowBox[{"(",
>             RowBox[{
>              SubscriptBox["r", "g"], "+",
>              SubscriptBox["r", "p"]}], ")"}]}], "+",
>           RowBox[{
>            SubscriptBox["r", "g"], " ",
>            RowBox[{"(",
>             RowBox[{
>              RowBox[{
>               RowBox[{"-", "c"}], " ",
>               SubscriptBox["M", "p"]}], "+",
>              SubscriptBox["r", "g"], "+",
>              SubscriptBox["r", "p"]}], ")"}]}]}], "\[GreaterEqual]",
>          "0"}]},
>        {
>         RowBox[{
>          RowBox[{"-",
>           FractionBox[
>            RowBox[{"c", " ",
>             SubscriptBox["M", "p"]}],
>            RowBox[{
>             RowBox[{"c", " ",
>              SubscriptBox["M", "g"]}], "+",
>             SubscriptBox["r", "g"]}]]}], "+",
>          FractionBox[
>           SubscriptBox["r", "p"],
>           SubscriptBox["r", "g"]]}],
>         TagBox["True",
>          "PiecewiseDefault",
>          AutoDelete->False,
>          DeletionWarning->True]}
>       },
>       GridBoxAlignment->{
>        "Columns" -> {{Left}}, "ColumnsIndexed" -> {},
>         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
>       GridBoxItemSize->{
>        "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {},
>         "Rows" -> {{1.}}, "RowsIndexed" -> {}},
>       GridBoxSpacings->{"Columns" -> {
>           Offset[0.27999999999999997`], {
>            Offset[0.84]},
>           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {},
>         "Rows" -> {
>           Offset[0.2], {
>            Offset[0.4]},
>           Offset[0.2]}, "RowsIndexed" -> {}}]}], ",",
>     RowBox[{"\[Piecewise]", GridBox[{
>        {
>         RowBox[{"-", "1"}],
>         RowBox[{
>          RowBox[{
>           RowBox[{"c", " ",
>            SubscriptBox["M", "g"], " ",
>            RowBox[{"(",
>             RowBox[{
>              SubscriptBox["r", "g"], "+",
>              SubscriptBox["r", "p"]}], ")"}]}], "+",
>           RowBox[{
>            SubscriptBox["r", "g"], " ",
>            RowBox[{"(",
>             RowBox[{
>              RowBox[{
>               RowBox[{"-", "c"}], " ",
>               SubscriptBox["M", "p"]}], "+",
>              SubscriptBox["r", "g"], "+",
>              SubscriptBox["r", "p"]}], ")"}]}]}], "<", "0"}]},
>        {
>         RowBox[{
>          RowBox[{"-",
>           FractionBox[
>            RowBox[{"c", " ",
>             SubscriptBox["M", "p"]}],
>            RowBox[{
>             RowBox[{"c", " ",
>              SubscriptBox["M", "g"]}], "+",
>             SubscriptBox["r", "g"]}]]}], "+",
>          FractionBox[
>           SubscriptBox["r", "p"],
>           SubscriptBox["r", "g"]]}],
>         TagBox["True",
>          "PiecewiseDefault",
>          AutoDelete->False,
>          DeletionWarning->True]}
>       },
>       GridBoxAlignment->{
>        "Columns" -> {{Left}}, "ColumnsIndexed" -> {},
>         "Rows" -> {{Baseline}}, "RowsIndexed" -> {}},
>       GridBoxItemSize->{
>        "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {},
>         "Rows" -> {{1.}}, "RowsIndexed" -> {}},
>       GridBoxSpacings->{"Columns" -> {
>           Offset[0.27999999999999997`], {
>            Offset[0.84]},
>           Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {},
>         "Rows" -> {
>           Offset[0.2], {
>            Offset[0.4]},
>           Offset[0.2]}, "RowsIndexed" -> {}}]}]}], "}"}]], "Output",
>   CellChangeTimes->{3.414236972638122*^9, 3.414239858373014*^9}]
> }, Open  ]]
> 
> 



  • Prev by Date: Re: Impedance Equation fit to Complex Data
  • Next by Date: Re: FullSimplify interpretation
  • Previous by thread: Re: FullSimplify interpretation
  • Next by thread: V.6.0.2 gripes...