diff --git a/xTras/Documentation/English/Guides/xTras.nb b/xTras/Documentation/English/Guides/xTras.nb index 07a8aa7..773f538 100644 --- a/xTras/Documentation/English/Guides/xTras.nb +++ b/xTras/Documentation/English/Guides/xTras.nb @@ -4,7 +4,7 @@ Cell[TextData[{ Cell["1.2.0", "HistoryData", CellTags->"New"], " | Modified in: ", - Cell["1.3.2 ", "HistoryData", + Cell["1.4.2 ", "HistoryData", CellTags->"Modified"], " | Obsolete in: ", Cell[" ", "HistoryData", @@ -15,7 +15,8 @@ Cell[TextData[{ }], "History", CellChangeTimes->{{3.580906000389572*^9, 3.58090602990597*^9}, { 3.600855131738778*^9, 3.6008551428502607`*^9}, {3.601881237851282*^9, - 3.601881237904076*^9}, {3.602776501670086*^9, 3.60277650175105*^9}}, + 3.601881237904076*^9}, {3.602776501670086*^9, 3.60277650175105*^9}, { + 3.623659101650119*^9, 3.623659101696364*^9}}, CellID->1247902091], Cell[CellGroupData[{ @@ -449,8 +450,9 @@ Cell["\t", "GuideDelimiter", Cell[CellGroupData[{ -Cell["New curvature tensors", "GuideFunctionsSubsection", - CellChangeTimes->{{3.580906650747198*^9, 3.5809066534565287`*^9}}, +Cell["Curvature tensors", "GuideFunctionsSubsection", + CellChangeTimes->{{3.580906650747198*^9, 3.5809066534565287`*^9}, + 3.623658953092937*^9}, CellID->966281796], Cell[TextData[{ @@ -492,7 +494,28 @@ Cell[TextData[{ " \[LongDash] the cosmological Einstein tensor" }], "GuideText", CellChangeTimes->{{3.580906681448494*^9, 3.5809067416012373`*^9}}, - CellID->1713209559] + CellID->1713209559], + +Cell[TextData[{ + Cell[BoxData[ + ButtonBox["ToRicci", + BaseStyle->"Link", + ButtonData->"paclet:xTras/ref/ToRicci"]], "InlineGuideFunction"], + " \[LongDash] converts curvature tensors to Ricci tensors where possible" +}], "GuideText", + CellChangeTimes->{{3.623658976494855*^9, 3.6236590378917913`*^9}}, + CellID->629045261], + +Cell[TextData[{ + Cell[BoxData[ + ButtonBox["ToRiemann", + BaseStyle->"Link", + ButtonData->"paclet:xTras/ref/ToRiemann"]], "InlineGuideFunction"], + " \[LongDash] converts curvature tensors to Riemann tensors where possible" +}], "GuideText", + CellChangeTimes->{{3.6236590104882317`*^9, 3.6236590125230923`*^9}, { + 3.623659043347414*^9, 3.623659055810835*^9}}, + CellID->622915928] }, Open ]], Cell["\t", "GuideDelimiter", diff --git a/xTras/Documentation/English/ReferencePages/Symbols/AllContractions.nb b/xTras/Documentation/English/ReferencePages/Symbols/AllContractions.nb index 1d4f2be..1a86a7a 100644 --- a/xTras/Documentation/English/ReferencePages/Symbols/AllContractions.nb +++ b/xTras/Documentation/English/ReferencePages/Symbols/AllContractions.nb @@ -3133,7 +3133,7 @@ Cell[BoxData[ RowBox[{"T", "[", RowBox[{"a", ",", "b"}], "]"}], ",", "M"}], "]"}]], "Input", CellChangeTimes->{{3.580826577872854*^9, 3.580826581618393*^9}}, - CellLabel->"In[58]:=", + CellLabel->"In[10]:=", CellID->878007297], Cell[BoxData[ @@ -3147,9 +3147,9 @@ Cell[BoxData[ SequenceForm["** ", xAct`xTensor`DefTensor, ": Defining ", "tensor ", $CellContext`T[$CellContext`a, $CellContext`b], ". ", ""], Editable->False]], "Print", - CellChangeTimes->{3.5808268201747227`*^9}, - CellLabel->"During evaluation of In[58]:=", - CellID->1158084739] + CellChangeTimes->{3.5808268201747227`*^9, 3.6236591919177523`*^9}, + CellLabel->"During evaluation of In[10]:=", + CellID->1199259032] }, Open ]], Cell[CellGroupData[{ @@ -3166,33 +3166,41 @@ Cell[BoxData[ RowBox[{"IndexFree", "[", RowBox[{"T", "^", "n"}], "]"}]}]}]}]}], "}"}], ",", RowBox[{"{", - RowBox[{"n", ",", "1", ",", "6"}], "}"}]}], "]"}]], "Input", + RowBox[{"n", ",", "1", ",", "8"}], "}"}]}], "]"}]], "Input", CellChangeTimes->{ - 3.580826822361742*^9, {3.580828121090761*^9, 3.580828153535651*^9}}, - CellLabel->"In[62]:=", + 3.580826822361742*^9, {3.580828121090761*^9, 3.580828153535651*^9}, { + 3.623659228140298*^9, 3.623659233292066*^9}, {3.623659368070026*^9, + 3.6236593681312437`*^9}}, + CellLabel->"In[21]:=", CellID->2040334199], Cell[BoxData[ RowBox[{"{", RowBox[{ RowBox[{"{", - RowBox[{"2", ",", "0.009414`4.425319187466553"}], "}"}], ",", + RowBox[{"2", ",", "0.028341`4.903960163571836"}], "}"}], ",", + RowBox[{"{", + RowBox[{"4", ",", "0.045144`5.106145030757957"}], "}"}], ",", + RowBox[{"{", + RowBox[{"6", ",", "0.076759`5.336674301699698"}], "}"}], ",", RowBox[{"{", - RowBox[{"4", ",", "0.033017`4.970282603227245"}], "}"}], ",", + RowBox[{"8", ",", "0.179122`5.704693923241319"}], "}"}], ",", RowBox[{"{", - RowBox[{"6", ",", "0.111966`5.500631156754469"}], "}"}], ",", + RowBox[{"10", ",", "0.49727`6.148137252793625"}], "}"}], ",", RowBox[{"{", - RowBox[{"8", ",", "0.69504`6.293554792732684"}], "}"}], ",", + RowBox[{"12", ",", "1.943952`6.7402305306333"}], "}"}], ",", RowBox[{"{", - RowBox[{"10", ",", "4.792115`7.132072225094695"}], "}"}], ",", + RowBox[{"14", ",", "8.932752`7.402530270334145"}], "}"}], ",", RowBox[{"{", - RowBox[{"12", ",", "35.57792`8.002725547729327"}], "}"}]}], + RowBox[{"16", ",", "48.569604`8.137909556073062"}], "}"}]}], "}"}]], "Output", CellChangeTimes->{ 3.580826811491037*^9, {3.580828118626444*^9, 3.580828147706098*^9}, - 3.580828196372294*^9}, - CellLabel->"Out[62]=", - CellID->689091716] + 3.580828196372294*^9, {3.623659197313946*^9, 3.623659201437668*^9}, + 3.623659248201869*^9, {3.623659317296564*^9, 3.623659327983569*^9}, + 3.6236594289950953`*^9}, + CellLabel->"Out[21]=", + CellID->405943424] }, Open ]], Cell[CellGroupData[{ @@ -3200,36 +3208,35 @@ Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ListLogPlot", "[", RowBox[{"%", ",", - RowBox[{"Filling", "\[Rule]", "Axis"}], ",", RowBox[{"Joined", "\[Rule]", "True"}], ",", + RowBox[{"Mesh", "\[Rule]", "All"}], ",", RowBox[{"AxesLabel", "\[Rule]", RowBox[{"{", RowBox[{"\"\\"", ",", "\"\\""}], "}"}]}]}], "]"}]], "Input", CellChangeTimes->{{3.580826497266553*^9, 3.5808265045768633`*^9}, { - 3.580828222363881*^9, 3.580828228970059*^9}, {3.580828291712413*^9, - 3.58082829745536*^9}, {3.58082833579976*^9, 3.580828401615053*^9}, { - 3.580828511299205*^9, 3.580828527256344*^9}, {3.5808285632412157`*^9, - 3.5808285633989563`*^9}}, - CellLabel->"In[74]:=", + 3.580828222363881*^9, 3.580828228970059*^9}, {3.580828291712413*^9, + 3.58082829745536*^9}, {3.58082833579976*^9, 3.580828401615053*^9}, { + 3.580828511299205*^9, 3.580828527256344*^9}, {3.5808285632412157`*^9, + 3.5808285633989563`*^9}, 3.623659218991218*^9, {3.6236593064572887`*^9, + 3.623659309271454*^9}, {3.6236595076140537`*^9, 3.62365952741879*^9}}, + CellLabel->"In[24]:=", CellID->1117114439], Cell[BoxData[ GraphicsBox[ - GraphicsComplexBox[{{2., -4.665557336003187}, {4., -3.410732698645494}, { - 6., -2.1895600252027476`}, {8., -0.3637858811166758}, {10., - 1.5669718588557437`}, {12., 3.5717252207199666`}, { - 12., -4.665557336003187}}, {{{}, - {Hue[0.67, 0.6, 0.6], Opacity[0.2], EdgeForm[None], - GraphicsGroupBox[ - PolygonBox[{{1, 7, 6, 5, 4, 3, 2}}]]}, {}, {}}, {{}, {}, - {Hue[0.67, 0.6, 0.6], LineBox[{1, 2, 3, 4, 5, 6}]}}}], + GraphicsComplexBox[{{2., -3.56344575952703}, {4., -3.0978978983152983`}, { + 6., -2.5670846355460495`}, {8., -1.719688141055001}, { + 10., -0.6986221408402151}, {12., 0.6647230143753861}, {14., + 2.1897245221043904`}, {16., 3.88299790314344}}, {{{}, {}, + {Hue[0.67, 0.6, 0.6], LineBox[{1, 2, 3, 4, 5, 6, 7, 8}]}}, { + {Hue[0.67, 0.6, 0.6], PointBox[{1, 2, 3, 4, 5, 6, 7, 8}]}, {}, {}}}], AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948], Axes->True, AxesLabel->{ FormBox["\"free indices\"", TraditionalForm], FormBox["\"seconds\"", TraditionalForm]}, - AxesOrigin->{2., -4.665557336003187}, + AxesOrigin->{2., -3.56344575952703}, CoordinatesToolOptions:>{"DisplayFunction" -> ({ Part[#, 1], Exp[ @@ -3377,9 +3384,9 @@ Cell[BoxData[ FormBox["\"\"", TraditionalForm], {0.00375, 0.}, { Thickness[0.001]}}}}, {Automatic, Automatic}}, GridLines->{None, None}, - ImageSize->{279.13043478260886`, Automatic}, + ImageSize->{320.86956521739154`, Automatic}, Method->{}, - PlotRange->{{2., 12.}, {-4.665557336003187, 3.5717252207199666`}}, + PlotRange->{{2., 16.}, {-3.56344575952703, 3.88299790314344}}, PlotRangeClipping->True, PlotRangePadding->{ Scaled[0.02], { @@ -3457,9 +3464,11 @@ Cell[BoxData[ Thickness[0.001]}}}}]], "Output", CellChangeTimes->{{3.580828201357682*^9, 3.580828229550201*^9}, 3.580828298630959*^9, {3.580828338026292*^9, 3.580828402000825*^9}, - 3.580828527784155*^9}, - CellLabel->"Out[74]=", - CellID->1788848749] + 3.580828527784155*^9, 3.623659205740347*^9, 3.6236592499926987`*^9, { + 3.623659310158496*^9, 3.623659339530113*^9}, 3.623659440843754*^9, { + 3.623659513521332*^9, 3.6236595250573397`*^9}}, + CellLabel->"Out[24]=", + CellID->960670098] }, Open ]] }, Open ]] }, Open ]], @@ -8315,7 +8324,7 @@ Cell[BoxData[ }, Open ]] }, WindowSize->{1217, 675}, -WindowMargins->{{Automatic, 241}, {138, Automatic}}, +WindowMargins->{{62, Automatic}, {Automatic, 89}}, CellContext->"Global`", FrontEndVersion->"8.0 for Mac OS X x86 (32-bit, 64-bit Kernel) (October 5, \ 2011)",